Laserfiche WebLink
<br />11.1 General Functions and Subroutines <br /> <br />NCLOCK, ICLOCK, HHMMSS, DATEJ are time and date conversion conveniences. SIND, <br />COSD, and TAND are trigonometric functions using inputs in degrees (0) rather than radians. <br /> <br />BEAMHT(R,E,A) calculates the height of the center of the radar beam at input radius R <br />(km), elevation angleE (degrees), and antenna altitude A (km). The formula uses a 4/3 earth <br />radius relationship. Setting A=O, gives radar beam height above the radar antenna. <br /> <br />The following is a "tree" showing, by indentations, which program units call the others. <br />GETRADAR is called by three program units, twice by the main program; the data that are <br />subsequently used are different with each call. The above program units in the "tree" are <br />omitted. Program units with names starting with "A31" are equivalents to PPS and VAD <br />routines of the same names. The specific differences in each unit between this Snow <br />Algorithm and those provided by the OSF are listed in appendix J. <br /> <br />~ <br /> <br />PROGRAM RADAR7 <br />A3133D <br />A3133F <br />GETRADAR <br />GETPROF <br />GETRADAR <br />A317G2 <br />A317H2 <br />A317I2 <br />A317J2 <br />A317K2 <br />GETRADAR <br />GETARI <br />GETRADAR <br />OCCULT <br />NOSPIKES <br />PRECIP <br />ADVECT <br />FILENAME <br /> <br />! The main program that calls the other units <br />! _INIT_ADAPT loads the adaptable parameters <br />! _FILL_PRECIP _TABLE biased dBZ to mmIh * 100 <br />! The unpacker of Level II data: header <br />! Calculates the vertical wind profile to 15k ft <br />! The unpacker of Level II data: (dBZ and velocity) <br />! _VAD_PROC <br />! _VAD_LSF <br />! _VAD_RMS <br />! _FIT_TEST <br />! _SYM_CHK <br />! The unpacker of Level II data: header <br />! Loads azimuth-range arrays <br />! The unpacker of Level II data: dBZ (and velocity) <br />! Performs occultation adjustment <br />! Cleans reflectivities of isolateds and outliers <br />! Integrates snowfall rates for both falling styles <br />! Calculates volume scan bins for advected snow <br />! Increments input file name <br /> <br />11.2 Program Unit Description for the Snow Algorithm <br /> <br />GETRADAR: <br /> <br />The IRADIAIllist has indices such that an index of 0 indicates a location centered at the <br />range of the radar antenna itself. The subroutine loads all data for each radial into two <br />named commons whether they are ever used or not. The ICLOCK/list has all of the dates <br />and times in "yymmdd" and "hhmmss" format. The VAL array has floating point numbers <br />and the NUM has integer numbers for what might be considered housekeeping numbers: <br />V AL(2), the center azimuth angle; V AL(3), the center elevation angle; NUM(7), the radial <br />status; and NUM(8), the RDA elevation number, are used extensively by the rest of the Snow <br />Algorithm. The other arrays present the reflectivities, velocities, and spectrum widths in <br /> <br />41 <br />