AND ENGINEERING STATION 

 NEWPORT, RHODE ISLAND 02840 



FATHOMETER CORRECTION LANGUAGE - FORTRAN 



COMPUTER - CDC 1604 

 (COPY ON FILE AT NODC) 



CORRECTS ECHO SOUNDER READINGS BY COMPUTING ACTUAL TRAVEL TIME FROM A 

 LINEAR SEGMENT VELOCITY PROFILE. INPUT — DEPTH VS. VELOCITY POINTS ON 

 CARDS. OUTPUT IS PRINTED LIST OF ACTUAL DEPTHS. FATHOMETER DEPTHS AND 

 CORRECTIONS (FATHOMS). A SUBROUTINE FOR THE CALCOMP PLOTS DIFFERENCES 

 VS. ECHO SOUNDER DEPTHS. CORE STORAGE USED — 4100. 



COMMANDER 



NAVAL UNDERSEA RESEARCH AND DEVELOPMENT CENTER 



ATTN. D. F. GORDON 



SAN DIEGO. CALIFORNIA 92132 



GENERAL VELOCITY FIELD LANGUAGE - FOrTRAN-63 



COMPUTER - CDC 3800. 

 DRUM SCOPE 



GIVEN A SERIES OF INCOMPLETE VELOCITY PROFILES ALONG A RANGE TRACK THE 

 PROGRAM EXTRAPOLATES THE DEEP PROFILES TO THE BOTTOM USING WILSON'S 

 EQUATION AND INTERPOLATES BETWEEN THE DEEP PROFILES IN ORDER To EXTEND 

 THE SHALLOW PROFILES. THE RESULT IS A COMPLETE DESCRIPTION OF THE 

 VELOCITY FIELD OVER THE RANGE-DEPTH PlANE. OUTPUT FROM PROGRAM IN- 

 CLUDES — VELOCITY. GRADIENT, AND CURVATURE AT DEPTHS AND RANGES SPECI- 

 FIED BY USER, A CAlCOMP CONTOUR PLOT OF SPECIFIED VELOCITY FIElD. AND 

 A 3-DIMENSIONAL PLOT OF VELOCITY VS. RANGE AND DEPTH. STORAGE NECES- 

 SARY — 117.450 OCTAL WORDS OF CORE AND 2 CDC-863 DRUMS. 



J. J. CORNYN, CODE 8140 



ACOUSTICS DIVISION 



NAVAL RESEARCH LABORATORY. WASHINGTON. D. C. 20390 



SVLIM LANGUAGE - FORTRAN II 



COMPUTER - CDC 3100 

 (COPY ON FILE AT NODC) 



EXAMPLE OF 'LIMITS' RETRIEVAL FUNCTIONS USED TO EXTRACT SOUND VELOCITY 

 PROFILES. THE PROGRAM READS CONTROL CARDS SPECIFYING GEOGRAPHICAL AND 

 SEASONAL LIMITS OF INTEREST, SCANS A COMPACTED NODC FORMAT FILE FOR 

 OCEAN STATIONS FALLING WITHIN THE SELECTED LIMITS, CONVERTS THE PRO- 

 FILE FROM METERS/SEC TO FEET/SEC AND PRINTS THE PROFILE. REF. INFORM- 

 AL REPORT IR NO. 69-59, JULY 1969. AUTHOR — WALT YERGEN, EXPLORATORY 

 OCEANOGRAPHY DIVISION, CODE 7240. FURTHER INFORMATION MAY BE OBTAINED 

 FROM THE DISSEMINATION DEPARTMENT CODE 44, OR THE AUTHOR. 



NAVAL OCEANOGRAPHIC OFFICE 

 SUITLAND, MARYLAND 20390 



DETERMINATION OF POSSIBLE MAGNITUTE OF LANGUAGE - FORTRAN 



ERROR IN VERTICAL SOUND VELOCITY COMPUTER - IBM 7074 



(COPY ON FILE AT NODC) 



PROGRAM REQUESTED BY THE COAST AND GEODETIC SURVEY TO CORRECT FATHOM- 

 ETER READINGS. PROVIDES — (1) HARMONIC MEAN OF SOUND VELOCITY IN M/ 

 SEC AT CHOSEN DEPTHS (2) MEAN VERTICAL SV AT ABOVE DEPTHS WITHIN ONE 

 MARSDEN SO. (3) VARIANCE OF 2 (4) DIFFERENCE BETWEEN STANDARD AND COM- 

 PUTED SV, TESTED AGAINST GIVEN ALLOWABLE ERROR VALUES (5) NUMBER OF 

 STATIONS USED AT EACH DEPTH WITHIN EACH MARSDEN SQ. INPUT MUST BE IN 

 NODC FORMAT TAPE, ZONE-EDITED, IN DEPTH SEQUENCE AND SORTED ON MARSDEN 

 SQUARES. AUTHOR — RUDI SAENGER. OS NO. 52203. 



COMPUTER SYSTEMS DIVISION 



NATIONAL OCEANOGRAPHIC DATA CENTER 



WASHINGTON, D. C. 20390 



PAGE 101 



