$
$*********************************************      set basics
$
&title Test of Compartments with Structural analysis
&device   -g_default device  -oecho no
$
$*********************************************      read model
$
inmodel
&instate -con 600
&weight -compute 100 .29*600 .29*600 32
medit
   m_pan_fix 100 .1
   map HS#00001 &token(1 %nlist )
end
hydro
   g_press -period  15 -heading  90
end
freq_resp
   rao -head 90
end
&status config
struct
    s_rest ~rest
    lcase -rao
    ssolve
end
strpost
    rest load -detail
    bmom_sh  %nlist
&devi -g_default sc
$p 1 9 10 -rax 12 13 -n
view -sele 1 8 9 10 11 12 13  -hard
view -sele 1 14 15 16 17 18 19 -hard
$eofile
$
$*********************************************      all done
$
&finish
