$
$*********************************************      set basics
$
&dimen -DIMEN FEET KIPS
&DEVICE   -oecho no -g_default devi -auxin prop.dat
&TITLE Test of #PROP
$
$*********************************************      read model
$
inmodel
$
$*********************************************      define prop
$
medit
  ~prop prop prop 300  1 10 5 -r_angle_limits -60 60
  connector screw ~prop *b_cn
  &set r_angle = 0
  &connector screw -set_prop -1 0 %r_angle
$ assembly control control screw -sensors 1 angle
$ assembly control control screw -sensors 10 d_y_b 10 d_y_s 10 v_y_b
  assembly control control screw -sensors 10 d_bs  1 v_bs
end
$
$*********************************************      Set Initial Condition
$
&INSTATE -loc 0 0 -5
&weight -compute 5 32 129 129
$
$*********************************************      set envs
$
&set dir = 090
&ENV e%dir -TIME 600  .5 -ramp 20 -current 0 %dir \
           -wind 20 %dir $-sea issc 90 10 6
&stat force
$
$*********************************************      do time domain
$
tdom
$
$*********************************************      prcpost
$
prcpost
    traj
       vl
       plot 1 5 6       -rax 10    -n
       plot 1 11 12     -rax 16    -n
       plot 1 18 19     -rax 23    -n
       report
       end
    body -force flex
       vl
       plot 1 2 3 4 -rax 5 6 7 -n
       report
       end
    conforce @ -mag y z
       vl
       report
       end
    sensor @
       vl
       plot 1 3 4 5 6 7 -rax 2 -n
       report
       end
end
$
$*********************************************      all done
$
&fini
