ASSIGN INPUTT4='gpsc_fem.op4', UNIT=13
ASSIGN MASTER ='gpsc_aset.MASTER', DELETE
ASSIGN DBALL ='gpsc_aset.DBALL', DELETE
$
SOL 103 $
$
INCLUDE 'residual_kinetic_energy.v2001'
$
CEND
TITLE =GENERAL PURPOSE SPACECRAFT (GPSC)
SUBTITLE =RESIDUAL KINETIC ENERGIES
$
SPC = 10 $ Constrain booster interface points
METHOD = 70 $ Modes to 70 Hz
$
DISP(PLOT) = ALL $ Recover displacements
$
BEGIN BULK
$
PARAM WTMASS .00259
PARAM OMODES 13
PARAM ORTHO YES
PARAM KENORM YES
PARAM KEFILT 10.0
$
EIGRL 70 1.0 70.0
$
$ Spacecraft bulk data
$
INCLUDE 'gpsc.blk'
INCLUDE 'gpsc.prp'
$
$ Initial DOF to start selection process
$
INCLUDE 'gpsc_init.aset'
$
ENDDATA