noshdb2xyz
/infobank/programs/refmt/noshdb2xyz/noshdb2xyz.for
Program to reformat NOS Hydrographic Data Base bathymetry data in NGDC a93 format into XYZ formatted for GMT bathymetry data.
CDegnan, 1/17/97
read (InputUnit, 400, iostat = ErrorFlag) * SurveyID, Latitude, Longitude, * CorrDepth, DepthType, CartCode
write (Output1Unit, 500) * Longitude, Latitude, CalcDepth
call openem (1, -1) call percentage (InputUnit) call forerror (ErrorFlag) call percentage (0)