GEODESY DIVISION. CODE 8430 

 NAVAL OCEANOGRAPHIC OFFICE 



SUITLAND» MD. 20390 



SUBROUTINE SDANO , LANGUAGE - FORTRAN IV 



COMPUTER - IBM 1800 SYS 

 (COPY ON FILE AT NODC ) 



GIVEN THE GEOGRAPHICAL CO-ORDINATES OF TWO POINTS, SDANO CALCULATES 

 THE GEODETIC DISTANCE AND AZIMUTHS BETWEEN THEM. BASED ON METHOD OF 

 E.S. SODANO FOR A NON- I T ER Aj I VE SOLUTION OF THE INVERSE AND DIRECT 

 GEODETIC PROBLEMS. N.I.O. PROG. NO. -46. AUTHOR — M. FASHAM. 



NATIONAL INSTITUTE OF OCEANOGRAPHY 

 WORMLEY, GODALMING, SURREY 

 ENGLAND 



HNVl (LORAN/DECCA FILE INITIALISATION) LANGUAGE - FORTRAN IV 



COMPUTER - IBM 1800 SYS 

 (COPY ON FILE AT NODC) 



GIVEN INPUT DATA ON A MASTER-SLAVE PAIR, HNVl CALCULATES CERTAIN GEO- 

 DETIC VALUES AND STORES THEN ON TAPE FILE FOR LATER USE BY PROGRAM 

 HNAV. N.I.O. PROGRAM NO. 164. AUTHOR — M. FASHAM. 



NATIONAL INSTITUTE OF OCEANOGRAPHY 

 WORMLEY, GODALMING, SURREY 

 ENGLAND 



HNAv (LORAN/DECCA COORDINATES CALCULATION) LANGUAGE - FORTRAN IV 



COMPUTER - IbM 1800 SYS 

 (COPY ON FILE AT NODC) 



GIVEN A DECCA, LORAN-A OR LORAN-C FIX, CALCULATES THE LATITUDE AND 

 LONGITUDE. THE METHOD FOR A HYPERBOLIC SYSTEM WITH SEPARATE MASTER IS 

 USED FOR ALL CASES. THE CONSTANTS FOR THE HYPERBOLOIDS ARE CALCULATED 

 IN METRES FOR BOTH LORAN AND DECCA THUS ALLOWING A FIX TO BE CALCULA- 

 TED IF ONE LORAN READING AND ONE DECCA READING ARE KNOWN. N.I.O. PRO- 

 GRAM NO. 165. USES 'SDANO' AND OTHER SUBROUTINES. AUTHOR — M. FASHAM 



NATIONAL INSTITUTE OF OCEANOGRAPHY 

 WORMLEY, GODALMING, SURREY 

 ENGLAND 



SUBROUTINE 'MAP' LANGUAGE - FORTRAN IV 



COMPUTER - IBM 360/40, 

 CAlCOMP 763 



PROVIDES A WIDE VARIETY OF MAP PROJECTIONS AND GRIDS TO FACILITATE THE 

 DISPLAY OF GEOGRAPHICAL DATA. THE PROGRAM HAS BEEN WRITTENIN AS MOD- 

 ULAR A FORM AS POSSIBLE TO ALLOW FOR EASE OF INSERTION OR DElEtION OF 

 ROUTINES. PRESENTLY UNDER DEVELOPMENT BY JOHN 0. WARD, THIRTEEN MAP 

 PROJECTIONS ARE NOW AVAILABLE, AND IN THE NEAR FUTURE SIX MORE WILL 

 BE ADDED. 



COMPUTER SYSTEMS DIVISION 

 NATIONAL OCEANOGRAPHIC DATA CENTER 

 WASHINGTON, D. C. 20390 



INDIVIDUAL POINT GENERATOR FOR MAP PROJECTIONS LANGUAGE - FORTRAN II 



COMPUTER - IBM 7074 

 (COPY ON FILE AT NODC) 



CONVERTS GEOGRAPHIC POSITIONS TO DISCRETE POINTS IN RECTANGULAR COOR- 

 DINATES ON THE FOLLOWING PROJECTIONS — MERCATOR, TRANSVERSE MErCATOR, 

 GNOMONIC, POLAR ST EREOGR APH I C , AZIMUTHAL EQUIDISTANT, LAMBERT CONFORM- 

 Al (WITH TWO OR ONE STANDARD PARALLELS), lAMBERT AZIMUTHAl EQUAL AREA 

 POLAR, LAMBERT EQUAL AREA CYLINDRICAL, MIlLER, ALBERS EQUAL AREA CON- 

 IC, RECTIFIED SKEW ORTHOMORPHI C , AND OBLIQUE MERCATOR. CARTOGRAPHIC 



PAGE 063 



