$ $**************************************** dimensions $ &dimen -dim feet kips $ $**************************************** describe body $ &describe body test &default -nuse @ $ *a1 -10 -5 0 *a3 -10 4 0 *a4 -10 5 0 $ $ *b1 -9 -5 0 *b3 -9 4 0 *b4 -9 5 0 $ $ *f1 10 -5 0 *f3 10 4 0 *f4 10 5 0 $ ~plate plate 1 plate qab ~plate *a1 *a3 *a4 *b4 *f4 *f3 *b3 *b1