$
$*********************************************      basics
$
&device  -oecho n
&title test of waves on plates
&dimen -dimen meters m-tons
$
$*********************************************      read model
$
inmodel
&dcptime
&instate -con  0.
&weight -compute  23 34 34 6.4
&stat
&describe interes -asso *c
medit
   ~pins  fix x y z
   connec pin1 ~pins *1
   connec pin2 ~pins *2
   connec pin3 ~pins *3
   connec pin4 ~pins *4
end
&title regular sea
&env -sea regular 90 10  14 -time  14 .5 -ramp -1 -depth 300 \
     -wind 90 100
tdom
&dcptime time for regular
prcpost
  body_force -force @
     plot 1 24 -rax 31 38 -n
     vl
     report
     end
  point *c
     report motion
     end
end
$
$*********************************************      all done
$
&fini
