$******************************* HEADING ******************************************
$
PROJ 'Diffraction' '090'
$
$***************************** MODEL INPUT ****************************************
$
CGRID 0. -60. 0. 600. 360. 100 60 CIRCLE 1440 .1 .4 9
$
INPGRID BOTTOM 0. -60. 0. 1 1 600. 360.
READINP BOTTOM 1. 'grid.dat' 3 0 FREE
$
BOUN SHAPESPEC JONSWAP
BOUN SIDE S CCW CONSTANT PAR 1. 5. 90. 800
BOUN SIDE W CCW CONSTANT PAR 1. 5. 90. 800
BOUN SEGMENT XY 600. -60. 600. -6. CONSTANT PAR 1. 5. 90. 800
$
OBSTACLE TRANSM 0.0 LINE 303. -1. 600. -1.
$
OFF WINDGROWTH
OFF WCAP
OFF QUAD
OFF BREAKING
DIFFRACTION smpar=0.2 smnum=1
$
$***************************** MODEL OUTPUT ***************************************
$
CURVE 'CIRC1' 120. 0. 1 122.7 31.25 1 130.85 61.56 1 144.11 90. 1 162.11 115.7 &
	      1 184.30 137.89 1 210. 155.88 1 238.43 169.14 1 268.74 177.26 &
	      1 300. 180. 1 331.26 177.26 1 361.56 169.14 1 390. 155.88 1 415.70 137.89 1 437.89 115.7 &
	      1 455.88 90. 1 469.14 61.56 1 477.26 31.26 1 480. 0.
CURVE 'CIRC2' 180. 0. 1 181.82 20.83 1 187.24 41.04 1 196.08 60. 1 208.07 77.13 &
	      1 222.86 91.92 1 240. 103.92 1 258.96 112.76 1 279.16 118.17 1 300. 120. &
	      1 320.83 118.18 1 341.04 112.76 1 360. 103.92 1 377.13 91.92 1 391.92 77.13 &
	      1 403.92 60. 1 412.76 41.04 1 418.18 20.83 1 420. 0.
CURVE 'CIRC3' 240. 0. 1 240.91 10.42 1 243.61 20.52 1 248.03 30. 1 254.04 38.57 &
	      1 261.43 45.96 1 270. 51.96 1 279.47 56.38 1 289.58 59.09 1 300. 60. 1 &
	      310.42 59.09 1 320.52 56.38 1 330. 51.96 1 338.56 45.96 1 345.96 38.57 1 &
	      351.96 30. 1 356.38 20.52 1 359.09 10.42 1 360. 0.
$
TABLE 'CIRC1' NOHEAD 'dif90C1.dat' HSIGN DIR
TABLE 'CIRC2' NOHEAD 'dif90C2.dat' HSIGN DIR
TABLE 'CIRC3' NOHEAD 'dif90C3.dat' HSIGN DIR
$
BLOCK 'COMPGRID' NOHEAD 'dif90.mat' LAY 3 HSIGN DIR
$
$***************************** COMPUTATIONS ***************************************
$
COMPUTE
STOP