function p = press(z)
%function p = press(z)
%C-------------------------------------------------------------------------------
%C
%C Function = PRESS
%C
%C This computes pressure in decibars, given the depth in meters. *
%C Formula is from the GEOSECS operation group (See computer routine
%C listings in the El Nino Watch Data Reports).
%C
%C-------------------------------------------------------------------------------
C1= 2.398599584e05;
C2= 5.753279964e10;
C3= 4.833657881e05;
ARG = C2 - C3 * z;
p = C1 - sqrt( ARG );