$
$*********************************************      set basics
$
&dimen -DIMEN FEET KIPS
&DEVICE   -oecho no -g_default devi -lime 0 -debug
&TITLE Test of #PROP
$
$*********************************************      read model
$
inmodel
$
$*********************************************      define prop
$
medit
  ~prop prop prop 300  1
  connector p_bp  ~prop *b_bp
  connector p_bs  ~prop *b_bs
  connector p_sp  ~prop *b_sp
  connector p_ss  ~prop *b_ss
  &set an = .0
  &set st = 5
  &set dp = 25
  &set cv = 0.
  assembly control control p_bp p_bs p_sp p_ss \
                  -sensors \
                     %st d_x_bp %st d_y_bp %st d_x_sp %st d_y_sp \
                     %dp v_x_bp %dp v_y_bp %dp v_x_sp %dp v_y_sp
end
$
$*********************************************      Set Initial Condition
$
&INSTATE -loc tbrg 0 0 -10
&weight -compute 5 32 129 129
$
$*********************************************      set envs
$
&set dir = 090
&ENV e%dir -TIME 600   .5 -ramp 20 -current 3 %dir \
           -wind 20 %dir $-sea issc 90 10 6
$
$*********************************************      environment
$
&connector @     -set_prop .0046+.0001 +90
&stat b_w
&stat force
&stat f_c
$
$*********************************************      do time domain
$
$&exec -diag inout
tdom
&exec -diag none
$
$*********************************************      prcpost
$
prcpost
    traj
       vl
       plot 1 5 6                  -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 @
       vl
       report
       end
    sensor @
       vl
       plot 1 2 3 4 5 -n
       plot 1 6 7 8 9 -n
       report
       end
end
$
$*********************************************      all done
$
&fini
