*include,input=tr_all_nodes.inp
*include,input=tr_parameters_inphase.inp
*include,input=tr_parameters.inp
*include,input=tr_materials.inp
*include,input=tr_bed_elts.inp
*include,input=tr_bed_coup.inp
**----------------------------------
*step
*frequency,eigen=lanc, SIM=NO
<neigenmodes>,
*boundary
retained_bed,1,6
*end step
**-----------------------------------
*step
*substructure generate, type=z47, overwrite, 
recovery matrix=<recov_yes_no>, mass matrix=yes,grav=yes,
libr=tr_body_parts
**
**
*RETAINED NODAL DOFS,sorted=no
retained_bed,
***Retained Eigenmodes,generate
**1,<neigenmodes>,1
**
**
*substructure matrix output, stiffness=yes, 
mass=yes, recovery=no,grav=yes,
file=lib_bed
*end step
**-----------------------------------