Appendix B.2 



C PROGRAM TO SELECT PROVINCES FOR SPECTRUM GENERATION 



C 



C PROGRAMMED BY C.G. FOX, ADVANCED TECHNOLOGY STAFF, NAVOCEANO, 5/15/84 



C 



C PROVINCE SELECTION IS BASED ON A SPATIAL DOMAIN ESTIMATE OF THE 



C FUNCTIONAL DESCRIPTION OF THE SPECTRUM BASED ON A POWER LAW MODEL 



C 



C AMPLITUDE = A*FREQUENCY**B 



C 



C THE SPECTRUM PARAMETERS A & B ARE ESTIMATED BY PERFORMING A 



C REGRESSION ANALYSIS ON THE ENERGY ENVELOPES GENERATED ON TEN 



C BAND PASSES OF THE DATA SPACED EVENLY IN FREQUENCY. PROVINCE 



C BOUNDARY SELECTION IS BASED ON CHANGES IN THE BAND LIMITED 



C RMS LEVEL OF EACH LOCATION ALONG THE TRACKLINE AS DERIVED 



C BY INTEGRATING THE RESULTS OF THE REGRESSION MODEL. 



C 



C PROGRAM CONTROLS ARE ENTERED IN FREE FORMAT FOLLOWING @XQT 



C 



C JTOTL= NUMBER OF TRACKLINES OF DATA TO BE ANALYZED IN THIS ANALYSIS 



C MAXIMUM IS CURRENTLY SET TO 50 



C 



C IPLOT= 1, PRODUCE PLOT TAPE ON UNIT 10 OF INTERPOLATED DATA, 



C OPTIONAL BAND PASS PLOTS, PROVINCES SPECTRAL PARAMETER 



C ESTIMATES, AND PROVINCE BOUNDARIES. 



C OUTPUT CAN GO TO ZETA OR CALCOMP PLOTTER 



C 0, NO PLOT TAPE IS PRODUCED 



C 



C IBAND= 1, PLOT ALL BAND PASSED SIGNALS WITH ENVELOPES 



C 0, NO BAND PASSES 



C IGNORED IF IPLOT=0 



C 



C ISAVE1= 1, SAVE DATA WITHIN EACH PROVINCE ON UNIT 13 FOR LATER 



C ANALYSIS IN FFT PROGRAM. 



C 0, NO DATA SAVED 



C 



C ILIST= 1, PRODUCE COMPLETE LISTING OF ANALYSIS 



C 0, ONLY RUDIMENTARY LISTING IS PRODUCED 



C 



C GRID= DESIRED SPACING OF INTERPOLATED DATA IN NAUTICAL MILES 



C THIS SPACING IS NORMALLY SLIGHTLY LESS THAN THE ORIGINAL 



C SPACING OF THE RAW DATA. 



C 



C KPTS= NUMBER OF RAW DATA VALUES TO BE ANALYSED IN EACH PROFILE. 



C READING OF THE DATA WILL CEASE WHEN THIS NUMBER IS REACHED 



C 



C DATA INPUT IS CURRENTLY DESIGNED SUCH THAT FOLLOWING THJS CONTROL 



C CARD, THE PROGRAM EXPECTS A CARD IMAGE CONTAINING THE NAME (LESS 



149 



