$ vm01  
$ file vm01z modified from rlh 15 feb 95
$ modified on November 29, 2001 by mag
$ supports to ground installed, CMS added
$ modified July 3, 2002 for better resvec performance
$ changes for this revision at ***
DIAG 8
TIME 10
sol 108 $ direct solution from cms solution ***
CEND
TITLE = VIRTUAL MASS OF A BOX, real modes     vm01
subtitle = single mfluid element tester, resvec, freq. resp
label = ground springs added to simulate oil tank on engine
DISP = ALL
MFLUI	= 300
METHO	= 400
dload = 1 $
spc = 1
freq=1
BEGIN BULK
spoint,	101	thru 	125 $ provisions for 10 generalized coordinates
qset1,	0,	101	thru 125 $ define generalized coordinates.
$ end of CMS input
Spc,	1,	9	3 $ enfmo applied here
Spcd,	1,	9,	3,	1.0 $ scale factor for enfmo
$ add a-set for stat. Det. Support system ***
$ not needed for this model, it has no rigid body modes
Rload1,	1,	1,	,	,	1,	,	acce
Tabled1,	1
,	0.	1.	1.	1.	endt $ constant input
freq,	1,	1.	2.	3.	4.
$Param, 	vmopt, 	1 $ exact, expensive solution
$ don't use vmopt 1 unless very small problem
CQUAD4  1001    100     10000   10001   10101   10100                           
CQUAD4  2001    100     20000   20001   20101   20100                           
CQUAD4  3001    100     10000   10100   20001   20000                           
CQUAD4  4001    100     20100   20101   10101   10001                           
CQUAD4  5001    100     10000   20000   20100   10001                           
EIGRL   400                     16                                              
ELIST   350     1001    2001    3001    4001    5001                            
GRID,	9,	,	-.5     -.5     -.6 $ enfmo point                                     
GRID    10000           -.5     -.5     -.5                                     
GRID    10001           -.5     .5      -.5                                     
GRID    10100           -.5     -.5     .5                                      
GRID    10101           -.5     .5      .5                                      
GRID    20000           .5      -.5     -.5                                     
GRID    20001           .5      -.5     .5                                      
GRID    20100           .5      .5      -.5                                     
GRID    20101           .5      .5      .5                                      
MAT1    100     1.+6            .3      10.                                     
MFLUID  300     0       +.5     1.      350             N       N               
PARAM,  GRDPNT, 0 $ weight summaries for structure and fluid
$ remove to make it easier to understand modes
$Conm2,	20101,	20101,	,	0.1 $ add asymmetric mass to separate 
$ repeated roots
PSHELL  100     100     .001    100             100    
$ added for Leeza
param, resvec, yes $ always do for enf. Motion.
Param, resviner, yes $ used to test error fix alters
$param, cmsmsg, all $ print the final set of eigenvalues
$ ground springs at corners of bottom surface
celas2,	10000,	1.e2	10000	1
=,	*1,	=,	=,	*1
$=1                         
celas2,	10009,	1.e2,	10000	3	9,	3 $ use for enfmo
celas2,	20001,	1.e2	10001	1
=,	*1,	=,	=,	*1
=1                         
celas2,	30100,	1.e2	20000	1
=,	*1,	=,	=,	*1
=1                         
celas2,	40101,	1.e2	20100	1
=,	*1,	=,	=,	*1
=1                         
ENDDATA