$
$*********************************************      basics
$
&dimen -dimen feet kips
&device      -oecho no
&dcptime
&device    -silent yes
medit
   &insert maur.dat
end
&device      -oecho no -silent no
&dcptime Time To read model
&instate -con 7.01 0 .47
&apply @
&status b_w
&summ
    point_sum prop
end
struct
   s_part @ jacket tiedown @
   s_rest ~'$'vlway
   lcase -dead dead 0 0 1
   ssolve
end
strpost
   joint displace -load dead -node *j@
   restraint loads -load dead -node *j@ -detail
   &select :class -select ~/vlway ~tiedown
   beam load -load dead -node @ -class :class
   &select :class -select ~j1@
   beam code -load dead -summary -class :class
   &select :node -select *j1@
   &select :class -select ~j@
   joint code -load dead -node :node -class :class
$
$*********************************************      all done
$
&finish
