Subroutine WEDGE Listing 



6. Subroutine WEDGE, which is listed in this section, calls subroutine 

 BESJ which, in turn, calls subroutine JAIRY and function GAMLN. Subroutines 

 BESJ and JAIRY and function GAMLN are borrowed from the NSWC Library of Mathe- 

 matics Subroutines (Morris 1984) . Including these borrowed subroutines here 

 in the list is only for the purpose of allowing subroutine WEDGE to be self- 

 contained and complete. The computer program of subroutine WEDGE is listed in 

 Figure A3. 



A4 



