$
$****************************************       dimensions
$
&dimen -dim feet kips
$
$****************************************       describe body
$
&describe body test
&default -nuse @
&default -nuse @
*1 0      5/12
*2 10/12  5/12
*3 10/12 -5/12
*4 0     -5/12
~plate plate 4
plate    n_Pl        ~plate *1 *2 *3 *4
sp_plate s_Pl -ele @ ~plate *1 *2 *3 *4
~rest1 fix x   z rx ry rz
~rest2 fix x y z rx ry rz
rest ~rest1 *1
rest ~rest1 *4
rest ~rest1 *3
rest ~rest2 *2