ID MSC, MAA GTO
diag 8,15
SOL 109  $ Or sol 112
include 'SSSALTERDIR:gpftrna.alt'
CEND
$
TITLE = GRID 2 X DISPLACEMENT * 10,000 = BEAM FORCE 
SET 2 = 2
DISP = 2
SET 12 = 12
$FORCE=12
GPFORCE=all
METHOD=1
DLOAD=1
TSTEP=66
$
BEGIN BULK
$ Optional w/ sol 112:
$ PARAM,DDRMM,-1
$
PARAM   DBDROPT 0
PARAM   GRDPNT  0
$.......2.......3.......4.......5.......6.......7.......8.......9.......0
EIGRL   1                       3
$.......2.......3.......4.......5.......6.......7.......8.......9.......0
$
$
$        \| Grid 1                     Grid 2
$        \|*==========================@--------> F(t)
$        \|         ^
$                   |
$                   +-- Beam: A=.02, L=20, E=10.E6 ==> K=AE/L=1.E5
$                         Therefore: dx(2)=(Load in bar/1.E5)
$
GRID    1               0.      0.      0.              123456
GRID    2               20.     0.      0.
CBEAM   12      1       1       2       0.      1.      0.
PBEAM   1       1       .02     .01     .01     0.      .01
CONM2   99      2               1.
TLOAD1  1       88                      77
DAREA   88      2       1       1000.
TABLED1 77
        0.      0.      .05     0.      .10     1.      .15     1.
        .20     0.      100.    0.      endt
TSTEP   66      10      0.02    1
MAT1    1       10.E6           .3      .1
$.......2.......3.......4.......5.......6.......7.......8.......9.......0
ENDDATA