$
$*********************************************      basics
$
&dimen -dimen feet kips
&device -oecho no
$
$*********************************************      read model
$
inmodel
&apply -load @ 100 -force @ 100
&instate -loc 0 0 0
medit
    conne ~two *02 *ground
end
&status f_connector
&instate -loc 0 0 1
&status f_connector
&loop i ( 1  2 )
   struc
      lcase  -dead lc1 0 0 -1
      lcase  -dead lc2 0 0  1
      ssolve cow -nonlinear
   end
   strpost
      joint disp
      rest -detail
      beam loads
   end
   &instate -loc 0 0 0
&endloop
$
$*********************************************      all done
$
&finish
