$
$ mfrss.dat
$
$ Straight Shot Modal Frequency Response  for DELMODEs SSSalter testing
$=======================================================================$
$
$ Scratch SOL 111 run where the DelModes alter is invoked "on the
$ fly" to remove modes 1,3,4 and 7.  These results can be contrasted
$ to those the mfrssnoalt.dat (Modal Frequency Response, Straight Shot,
$ No Alter) results (i.e. a run with no modes removed).
$
INIT MASTER(S)
$
ID MSC, SWRO
TIME 100
DIAG 5,6,8,56
SOL 111 $ Modal Frequency Response
include 'delmodea.v707'
CEND
$
TITLE = CANTILEVERED BEAM MADE OF PLATES - Modal Frequency w/ DelModes
$
SET 11 = 111
DISP(phase,sort2)=11
SDISP(phase,sort2)=ALL
$
$
  METHOD =    10
   SDAMP = 11102
   DLOAD = 11103
    FREQ = 11104
BEGIN BULK
$.......2.......3.......4.......5.......6.......7.......8.......9.......0
DMI     SKPMODE 0       2       1       0               1       7
DMI     SKPMODE 1       1       -1.
DMI     SKPMODE 3       1       -1.
DMI     SKPMODE 4       1       -1.
DMI     SKPMODE 7       1       -1.
$.......2.......3.......4.......5.......6.......7.......8.......9.......0
$
$                  Cantilevered Beam Made of Plates Model
$
$            \201 202  203  204  205  206  207  208  209  210  211
$  Y         \*----*----*----*----*----*----*----*----*----*----*
$  ^         \|    |    |    |    |    |    |    |    |    |    |
$  |         \| 1  | 2  | 3  | 4  | 5  | 6  | 7  | 8  | 9  | 10 |
$  |         \|    |    |    |    |    |    |    |    |    |    |
$  +--->X    \*----*----*----*----*----*----*----*----*----*----*
$            \101 102  103  104  105  106  107  108  109  110  111
$
$.......2.......3.......4.......5.......6.......7.......8.......9.......0
PARAM,POST,0 
GRID    101             0.      0.      0.              123456
GRID    102             1.      0.      0.              
=       *1      =       *1.     ==
=8
GRID    201             0.      1.      0.              123456
GRID    202             1.      1.      0.              
=       *1      =       *1.     ==
=8
$
CQUAD4  1       1       101     102     202     201
=       *1      =       *1      *1      *1      *1
=8
MAT1    1       10.E6           .3      2.588-4 1.E-6   0.
PSHELL  1       1       .08     1
$
EIGRL   1       -.1              1
=       *1      =       =       *1
=8
$.......2.......3.......4.......5.......6.......7.......8.......9.......0
$.......2.......3.......4.......5.......6.......7.......8.......9.......0
$ Harmonic Load, Output Frequencies, and Damping PARAMs for SOL 111/
$ Modal Frequency Response
TABDMP1 11102   CRIT
        0.      .06     99999.  0.06    ENDT
RLOAD1  11103   11105                   11106
FREQ    11104   25.4    157.7   286.9   328.3   438.2   853.2   857.8
DAREA   11105   105     3       100.
TABLED1 11106
        0.      0.      10.     1.      2000.   1.      3000.   0.
        99999.  0.      ENDT
$.......2.......3.......4.......5.......6.......7.......8.......9.......0 
ENDDATA