libgamma.pl
author Andreas Thurnherr <ant@ldeo.columbia.edu>
Mon, 13 Apr 2020 11:06:22 -0400
changeset 40 c1803ae2540f
parent 0 a5233793bf69
permissions -rw-r--r--
.

#======================================================================
#                    L I B G A M M A . P L 
#                    doc: Mon Mar  8 11:46:36 1999
#                    dlm: Tue Jan  2 11:27:11 2001
#                    (c) 1999 A.M. Thurnherr
#                    uE-Info: 17 40 NIL 0 0 72 0 2 4 ofnI
#======================================================================

# HISTORY:
#	Sep 25, 2000: - finished implementation
#	Jan 02, 2001: - updated documentation (here)

# NOTES:
# 	- gamma library stub to allow -L option
# 	- requires the perl interface of the (fortran library) gamma.a 
#	  [/usr/local/src/gamma/perl-interface]
#	- main use of this library: [gamma_n]

# SYNOPSIS:
#	$gamma::temp_scale = &antsRequireParam(temp_scale);
#		MUST DO THIS 1ST
#	&gamma::gamma_n(S,T,P,lon,lat[,dg_lo,dg_hi])
#		[$|@]S			salinity
#		[$|@]T			temperature (scale in $gamma::temp_scale)
#		[$|@]P			pressure
#		$lat			latitude
#		$lon			longitude
#		[$|\$|\@]dg_lo	low end of error range
#		[$|\$|\@]dg_lo	high end of error range
#	&gamma::gamma_n_lol(buf,S_f,T_f,P_f,gam_f,lon,lat[,dg_lo_f,dg_hi_f])
#		@buf			LoL containing columns for S,T,P,gamma[,dg_lo,dg_hi]
#		$S_f			salinity field
#		$T_f			temperature field
#		$P_f			pressure field
#		$lat			latitude
#		$lon			longitude
#		$dg_lo_f		low end of error range (field number)
#		$dg_lo_f		high end of error range (field number)

use gamma;

1;