構造力学　構造工学特論

FORTRANプログラム

平板の曲げの計算データ例（剛性マトリックス法）
ＦＥＭＤＡ４ｂ．ＤＡＴ
４辺固定支持　２４要素　等分布荷重

　　　要素分割の図

以下のプログラム
FEMPL2.FOR
に対応する。
C     READ A(I),B(I): REAL LENGTH OF PLATE 2*A(I),2*B(I)
C     弾性床上の平板　ＦＥＭ
C     "FEMPL2.FOR"  台形分布荷重に対応　1990.9.29
C                   Ｙ方向変化とＸ方向変化にそれぞれ対応　1991.7.22
C                    いちおうＹ方向変化に対応する

   35   24   35    1    1
    1    2    8    9      1.25      1.25   0.0E+00
    2    3    9   10      1.25      1.25   0.0E+00
    3    4   10   11      1.25      1.25   0.0E+00
    4    5   11   12      1.25      1.25   0.0E+00
    5    6   12   13      1.25      1.25   0.0E+00
    6    7   13   14      1.25      1.25   0.0E+00
    8    9   15   16      1.25      1.25   0.0E+00
    9   10   16   17      1.25      1.25   0.0E+00
   10   11   17   18      1.25      1.28   0.0E+00
   11   12   18   19      1.25      1.25   0.0E+00
   12   13   19   20      1.25      1.25   0.0E+00
   13   14   20   21      1.25      1.25   0.0E+00
   15   16   22   23      1.25      1.25   0.0E+00
   16   17   23   24      1.25      1.25   0.0E+00
   17   18   24   25      1.25      1.25   0.0E+00
   18   19   25   26      1.25      1.25   0.0E+00
   19   20   26   27      1.25      1.25   0.0E+00
   20   21   27   28      1.25      1.28   0.0E+00
   22   23   29   30      1.25      1.25   0.0E+00
   23   24   30   31      1.25      1.25   0.0E+00
   24   25   31   32      1.25      1.25   0.0E+00
   25   26   32   33      1.25      1.25   0.0E+00
   26   27   33   34      1.25      1.25   0.0E+00
   27   28   34   35      1.25      1.25   0.0E+00
    1         1    1    1
    2         1    1    1
    3         1    1    1
    4         1    1    1
    5         1    1    1
    6         1    1    1
    7         1    1    1
    8         1    1    1
    9         0    0    0
   10         0    0    0
   11         0    0    0
   12         0    0    0
   13         0    0    0
   14         1    1    1
   15         1    1    1
   16         0    0    0
   17         0    0    0
   18         0    0    0
   19         0    0    0
   20         0    0    0
   21         1    1    1
   22         1    1    1
   23         0    0    0
   24         0    0    0
   25         0    0    0
   26         0    0    0
   27         0    0    0
   28         1    1    1
   29         1    1    1
   30         1    1    1
   31         1    1    1
   32         1    1    1
   33         1    1    1
   34         1    1    1
   35         1    1    1
   0.3E-01  2.10E+07  8076920.
   24
    1       2.0       2.0
    2       2.0       2.0
    3       2.0       2.0
    4       2.0       2.0
    5       2.0       2.0
    6       2.0       2.0
    7       2.0       2.0
    8       2.0       2.0
    9       2.0       2.0
   10       2.0       2.0
   11       2.0       2.0
   12       2.0       2.0
   13       2.0       2.0
   14       2.0       2.0
   15       2.0       2.0
   16       2.0       2.0
   17       2.0       2.0
   18       2.0       2.0
   19       2.0       2.0
   20       2.0       2.0
   21       2.0       2.0
   22       2.0       2.0
   23       2.0       2.0
   24       2.0       2.0