208 - 



00050 



C 



00100 



c 



00150 



c 



00200 



c 



00250 



c 



00300 



c 



00350 



c 



00400 



c 



00450 



c 



00500 



c 



00550 



c 



00600 



c 



00650 



c 



00700 



c 



00750 



c 



00800 



c 



00850 



c 



00900 



c 



00950 





01000 





01050 





01 100 





01150 





01200 





01250 





01300 





01350 





01400 





01450 





01500 





01550 





01 600 





01650 





01700 





01750 





01800 





01850 





01900 





01950 





02000 





02050 





02 100 





02150 





02200 





02250 





02300 



c 



02350 



c 



02400 



c 



02450 



c 



02500 



c 



02550 



c 



02600 



c 



02650 



c 



02700 



c 



02750 



c 



02800 



c 



02850 



c 



02900 



c 



02950 





03000 





This program is designed for use with the University 

 of Delaware DPG Directional Wave Monitor as installed 

 at the FRF on 14 May, 1982. The instrument and software 

 were designed by Kevin R. Bodge under the direction of 

 Dr. Robert G. Dean. 



The program, as utilized by the FRF, uses only 

 differential pressure channels dP2 and dP3 with the 

 absolute gauge. It generates the directional spectra 

 using the first 5 directional Fourier coefficients. 



The program as listed utilizes all four differ- 

 ential gauges with the absolute gauge and is capable 

 of generating the directional spectra using 

 the first seven directional Fourier coefficients, 



English units are used throughout. 



DIMENSION 



DIMENSION 



DIMENSION 



DIMENSION 

 DIMENSION 

 DIMENSION 



DIMENSION 



INTEGER 



0PEN(un1 t= 

 0PEN(un1 t= 

 0PEN(unit= 

 OPEN(unit= 

 OPEN(unit= 

 0PEN(uni t= 

 OPEN(uni t= 

 OPEN(unit= 

 0PEN(un1t= 



dpi (4 100) ,dp2(4 100) ,dp3(4 100).dp4(4100), 



abs(4 100) ,dpxx(4 100) ,dpyy(4 100) 



d 1 1 ( 2050 ) , d2 i ( 2050 ) , d3 i ( 2050 ) . d4 i ( 2050 ) , 



ab 1 ( 2050 ) , dxx i ( 2050 ) , dyy i ( 2050 ) 



d 1 ( 2050 ) , d2 ( 2050 ) , d3 ( 2050 ) , d4 ( 2050 ) , 



ab(2050) ,dxx(2050) ,dyy(2050) 



prsp(2050) ,wvnr(2050) ,f req(2050) ,maxf rq(20) 



thta 1(400) , thta2(400), thta3(400) ,pd(20) 



aO(400) .a1(400) ,a2(400) ,a3(400), 



b 1 ( 400 ) . b2 ( 400 ) , b3 ( 400 ) 



din (400) ,dir2(400) ,dir3(400) ,dir4(400) . 



angi (400) ,ang2(40O) ,ang3(400) ,ang4(400) 



blk 



18 ,device= 

 19,device= 

 20, device= 

 21 ,device = 

 22, device= 

 17 , device= 

 14 , device= 

 3 . dev ice = 

 4 , dev ice = 



'dsk 

 'dsk 

 'dsk 

 'dsk 

 'dsk 

 'dsk 

 'dsk 

 'dsk 

 'dsk 



, f i 1e= 'DPI .dat ' 

 .f i le='DP2 .dat' 

 ,f ile='DP3.dat ' 

 ,f i le='DP4.dat ' 

 ,f 1le='DP5.dat' 

 , f 1 le='PWR.DAT' 

 ,f 1 le='RAW.dat ' 

 ,f i le='DIR.dat' 

 .f i le='FRF dat' 



INPUT ANALYSIS DETAILS: 



ATM = Atmospheric Pressure (mb) 



GAMMA = Seawater Specific Gravity (Ib/cu.ft.) 



N = I* of sampled points to analyze (power of 2) 



K = such that 2**K=N 



dT = sampling interval (sees) 



BLK = # of freq. bands to block-average 



NUFF = /i* of peak energy bands to identify 



Icut = # of non-block-averaged cut-off freq. 



ATM 

 ATM 



1013.0 



ATM*0. 0145038 



