$
$*********************************************      basics
$
&dimen -dimen feet kips
&device   -oecho no
$
$*********************************************      read model
$
inmodel
&instate -con 10
&compartment -percent tank 25
&weight  -compute 0 129 32 129
&status
&macro doit
hydro
   g_press -period 9 10 -heading  90 180
end
&dcptime
freq_resp
  rao
  equ_sum
  fr_point
     report
     end
end
&endmacro
doit
medit
   &describe part temp -move 0 0 0 0 0 -90
end
doit
$
$*********************************************      all done
$
&finish
