&device   -oecho n
&title time domain test of wave grids
&dimen -dimen meters m-tons
inmodel
&data env
   grid reggri regular 100  5 14
   grid stmgri stream  100  5 14
end_&data
&instate -con  40.
&weight -compute 23 34 34 6.4
medit
   ~pins  fix
   connec pin1 ~pins *1
   connec pin2 ~pins *2
end
&dcptime time for connect
&default -ramp -1 -depth 100
&title regular sea
&env -sea regular 180 5 14 -time  14 .5 -spread 200
tdom
&dcptime time for regular
prcpost
  tot_cforce
  report
  end
end
&dcptime time for reporting
&title regular grid
&env -sea reggri 180 -time  14 .5
tdom
&dcptime time for regular  grid
prcpost
  tot_cforce
  report
  end
end
&dcptime time for reporting
&title stream grid
&env -sea stmgri 180 -time  14 .5
tdom
&dcptime time for stream  grid
prcpost
  tot_cforce
  report
  end
end
&dcptime time for reporting
&fini