$ $ Model information files $ &dimen -save -dimen meters m-tons use_ves amt_carr &describe body amt_carr $ $ ****************************** points needed for draft marks $ *bpt 0 -13.716 6.096 *bpb 0 -13.716 0 *bst 0 13.716 6.096 *bsb 0 13.716 0 *spt 91.35 -13.716 6.096 *spb 91.35 -13.716 0 *sst 91.35 13.716 6.096 *ssb 91.35 13.716 0 $ $ ****************************** define draft marks $ &describe body amt_carr -dmark bp *bpb *bpt \ -dmark bs *bsb *bst \ -dmark sp *spb *spt \ -dmark ss *ssb *sst \ -section 1.66e8 45 2.40 \ -location 0 5 10 15 20 25 30 35 40 45 50 55 60 \ 65 70 75 80 85 90 91.35 $ $ ****************************** points needed for connectors $ *b1 2*8.22 0 6.096 *b2 8.22 0 6.096 *b3 0 0 6.096 *b4 8.22 -8.22 6.096 *b5 8.22 8.22 6.096 $ &dimen -rem