$ $**************************************** dimensions $ &dimen -dim feet kips $ $**************************************** describe body $ &describe body cow &default -use @ -nuse #dead *b1p 0 -50 0 *b1s 0 50 0 *b2p 50 -50 0 *b2s 50 50 0 *t1p 0 -50 20 *t1s 0 50 20 *t2p 50 -50 20 *t2s 50 50 20 ~top plate 1 ~bot plate 1 ~sid plate 1 plate top ~top *b1p *b2p *b2s *b1s plate bot ~bot *t1p *t2p *t2s *t1s plate si1 ~sid *b1p *b2p *t2p *t1p plate si2 ~sid *b1s *b2s *t2s *t1s sp_plate sp_top -ele top ~top *b1p *b2p *b2s *b1s sp_plate sp_bot -ele bot ~bot *t1p *t2p *t2s *t1s sp_plate sp_si1 -ele si1 ~sid *b1p *b2p *t2p *t1p sp_plate sp_si2 -ele si2 ~sid *b1s *b2s *t2s *t1s ~rest fix y x z rest ~rest *b1p rest ~rest *b1s rest ~rest *t1p rest ~rest *t1s