ASSIGN INPUTT4='gpsc_fem.op4', UNIT=13
ASSIGN MASTER ='gpsc_itam.MASTER', DELETE
ASSIGN DBALL ='gpsc_itam.DBALL', DELETE
$
SOL 103 $ Normal modes
INCLUDE 'ortho.v2001'
INCLUDE 'irs_tam.v2001'
CEND
TITLE =GENERAL PURPOSE SPACECRAFT (GPSC)
SUBTITLE =TAM - IRS REDUCTION AND ORTHOGONALITY
$
SPC = 10 $ Constrain booster interface points
METHOD = 70 $ Modes to 70 Hz
$
DISP(PLOT) = ALL $ Recover but do not print mode shapes
$
BEGIN BULK
$
$ PARAMeter cards
$ ---------------
$
PARAM GRDPNT 0
PARAM USETPRT 0
PARAM WTMASS .00259
PARAM OMODES 13
PARAM MAC YES
$
$ Compute eigenvalues using the Lanczos method
$ --------------------------------------------
$
EIGRL 70 70.
$
$ Spacecraft bulk data
$ --------------------
$
INCLUDE 'gpsc.blk'
INCLUDE 'gpsc.prp'
$
$ Static reduction data
$ ---------------------
$
INCLUDE 'gpsc_rke1.aset'
$
ENDDATA