th1.dat

利用有限元分析进行线弹性静动力分析的fortran程序源代码

    0 
8-node brick element patch test #1.1: constant x1 displacement
    1    1    0    0    0    0    1    0    3   27    3    1    1    1    1
    1    1    1    0    0    1      0.00      1.00      0.00      1.00
    1    8        0.        0.        0.
                  2.        0.        0.
                  2.        2.        0.
                  0.        2.        0.
                  0.        0.        2.
                  2.        0.        2.
                  2.        2.        2.
                  0.        2.        2.
    2    1    2    3    2    9
   14    0       0.8      1.05      1.15

    1   27    1    1    1    1
   14    0    0    0    0    0

    1    8       1.0        0.        0.
                 1.0        0.        0.
                 1.0        0.        0.
                 1.0        0.        0.
                 1.0        0.        0.
                 1.0        0.        0.
                 1.0        0.        0.
                 1.0        0.        0.
    2    1    2    3    2    9
   14    0      0.00      0.00      0.00

      1.00       1.0
    3    8    1    0    0    0    0    0    0    0    0    0    0
    1             1.       0.3      0.00      0.00       0.0
      0.00      0.00      0.00
    1    1    1    2    5    4   10   11   14   13    1
    2    1    1    2    2    3    2    4    9

*end