$ file fsum11. Sum a static loading with dynamic loading in modal frequency $ response diag 8,15 sol 111 include 'SSSALTERDIR:fsuma.alt' cend title = Add static solution to frequency response solutions fsum subtitle = fsum alter demo problem, sol 111 echo=both SPC = 1 method = 1 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 110 = 1,10 $ base and tip elements ELFORCE = 110 OLOAD = 1011 loadset=1 $ select the steady load BEGIN BULK eigrl, 1, , , 3 cvisc, 111, 111, 1 11 pvisc, 111, 100. $ damper between base and tip 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 $ osciallatory 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 param, ddrmm, -1 $ block ddrmm. required for fsum alter ENDDATA