--- MITgcm_contrib/gmaze_pv/subfct/densjmd95.m 2006/06/16 21:14:02 1.1 +++ MITgcm_contrib/gmaze_pv/subfct/densjmd95.m 2007/09/19 15:24:41 1.2 @@ -1,9 +1,6 @@ -function rho = densjmd95(s,t,p); -%function rho = densjmd95(S,Theta,P); - -% DENSJMD95 Density of sea water +% DENSJMD95: Density of sea water %========================================================================= - +% % USAGE: dens = densjmd95(S,Theta,P) % % DESCRIPTION: @@ -31,6 +28,9 @@ % Jackett and McDougall, 1995, JAOT 12(4), pp. 381-388 % created by mlosch on 2002-08-09 + + function rho = densjmd95(s,t,p) + %---------------------- % CHECK INPUT ARGUMENTS