$
$*********************************************      set basics
$
&device -oecho no
&dimen -dimen feet kips
$
$*********************************************      read model
$
inmodel
&data env
   env ss1090 -sea issc 90 26. 11.403 -use_mean yes -time 20 .5
end_&data
&instate -con 10
&weight -compute temp 0.
hydro
   g_press -heading 0 45 90 -period 5 10 15 20 25 30
end
freq_resp
   sresp ss1090
end
struc
   lcase -rao
   lcase -time ss1090 t10  10 t11 11 t15 15
   s_rest ~supo
ssolve
end
strpost -old no
   cases -spec ss1090
   &sele :check -sel ss@ t@
   restraint -load :check -detail
   beam load -detail
$
$*********************************************      all done
$
&finish
