$
$*********************************************      basics
$
&title Import/Export Pressure Test
&set export = .true.
&dimen -dimen feet kips
&device     -oecho no
$
$*********************************************      read model
$
inmodel
&instate -con 10 0 .11
&status
&if %export &then
   hydro
      g_press -heading 90 135 180
      &dcptime
      e_press
      &dcptime Time To Emit Pressure Database
   end
&endif
freq_resp
  rao -heading 90 135 180
  equ_sum
  fr_point
    report
    end
end
hydro
   v_mdri
       report
       end
end
$
$*********************************************      all done
$
&finish
