以下のプログラム
FEM.FOR
に対応する。
C ******** STRESS ANALYSIS OF 2-DIMENSIONAL PROBLEM ********
C KIKUTI,SUGIDATE AND MIYAMOTO 1983,7,7
C
1
4 2 1 2 2
1 1 3 2 1.0
2 2 3 4 1.0
1 0. 4.
2 3. 4.
3 0. 0.
4 3. 0.
21E+5 3E-1
1
1 2
0
3 0.000 0.500
4 0.000 0.500