$ file fsum8. Sum a static loading with dynamic loading in direct frequency $ response diag 8,15 sol 108 include 'SSSALTERDIR:fsuma.alt' $ cend title = Add static solution to frequency response solutions fsum subtitle = fsum alter demo problem, sol 108 echo=both SPC = 1 mpc=2 DLOAD = 20 $ calls a dload card below FREQ = 3 set 1011=10,11 $ tip grid points DISP(SORT2) = 1011 set 1 = 1 $ grounded points SPCF = 1 set 2 = 2,3 $ mpc points mpcf = 2 set 110 = 1,10 $ base and tip elements ELFORCE(phase) = 110 elstress(phase)= 110 strain(phase)= 110 $ rod elements don't output strain. $ add quad4 if you want to see strain. It is in the alter OLOAD = 1011 loadset=1 $ select the steady load BEGIN BULK cvisc, 111, 111, 1 11 pvisc, 111, 100. $ damper between base and tipe grid, 1, , , , 100.0 =, *1, =, =, =, *100.0 =9 $ 11 equally spaced grid points crod, 1, 1, 1 2 =, *1 =, *1, *1 =8$ 10 rods which join them prod, 1, 1, 1.0 mat1, 1, 1.e6, , , 0.3 $ sort of aluminum, with mass density 0.3 FREQ1, 3, 0.0, 0.5, 10 $ 0.0 to 5.0 by incr. of 0.5 $ input freq of 0.0, then others $ steady load rload1, 1, 1, , , 1 tabled1, 1 $ 1.0 at zero freq, 0.0 elsewhere , 0.0 1.0 .1 0.0 100. 0.0, endt grav, 10, , 386.4 0. 0., -1. $ lseq, 1, 1, 10 $ grav load 10 is darea 1 $ oscillatory load rload1, 2, 100, , , 2 tabled1, 2 $ 0.0 at zero freq., 1.0 elsewhere , 0.0 0.0 .1, 1.0, 100. 1.0 endt darea, 100 11, 3, 10000.0 $ oscillatory load at tip dload, 20, 1.0, 1.0 1, 1.0, 2 $ sum both loads SPC, 1, 1, 3 $ ground mpc, 2, 2, 3, -1.0 3, 3, 1.0 $lock out $ element 2 ENDDATA