of the edge of the grid. 



AMM^AJOT Used in determining WGO. 



MAX Defined previously. 



MIT Designates whether the last two curvature estimates for a 



given MAX are less than O.OOOO9/D, whether the l8th and the 



20th estimates are less than this value, or whether neither 



of the above is true. 

 Summary of Program : 



MAIN reads S and M and sets NOT = 1 to denote batch one. It then reads the 

 information (XLABL, MM, KM, CHECK, TT, WOT, D, and CMAT) for processing the 

 first batch of rays. For W = 1 the program reads the information (X, Y, and 

 A) for processing the first wave ray. MAIN converts A from degrees to radians 

 and then p\inches the title information (XLABL, TT, NOT, W, and the column 

 headings). Control is then transferred to the RAYN subroutine. When RAJN 

 has determined the path of the first ray, control is transferred back to MAIN. 

 MAIN then reads the information for the second ray (N = 2) and proceeds as 

 before. When NOJ ray paths have been determined for NOT = 1, the computer 

 pauses allowing time to load the necessary information for the second batch. 

 After pressing start, MAIN sets NOT = 2, and the information for this batch 

 is read. MAIN then continues as before. The program is terminated when the 

 desired number of batches has been processed. 

 Remarks ; 



This program calls four subroutine /RAYN, SURFCE, MOVE, and ROUND. Descrip- 

 tions of these subroutines follow. (ROUND has been described previously. ) 



42 



