guillou Module Reference

Data Types
type	ivar_type

Functions/Subroutines
subroutine, public	guillou_ocean_permittivity (Temperature, Salinity, Frequency, Permittivity, iVar)
subroutine, public	guillou_ocean_permittivity_tl (Temperature_TL, Salinity_TL, Frequency, Permittivity_TL, iVar)
subroutine, public	guillou_ocean_permittivity_ad (Permittivity_AD, Frequency, Temperature_AD, Salinity_AD, iVar)

Variables
character(*), parameter	module_version_id = '$Id: Guillou.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
real(fp), parameter	zero = 0.0_fp
real(fp), parameter	point5 = 0.5_fp
real(fp), parameter	one = 1.0_fp
real(fp), parameter	two = 2.0_fp
real(fp), parameter	three = 3.0_fp
real(fp), parameter	four = 4.0_fp
real(fp), parameter	five = 5.0_fp
real(fp), parameter	twopi = TWO*PI
real(fp), parameter	ps_to_s = 1.0e-12_fp
real(fp), parameter	ghz_to_hz = 1.0e+09_fp
real(fp), parameter	scale_factor = PS_TO_S * GHZ_TO_HZ
real(fp), dimension(0:2), parameter	d1_coeff = (/ 0.086374_fp, 0.030606_fp, -0.0004121_fp /)
real(fp), dimension(0:2), parameter	d2_coeff = (/ 0.077454_fp, 0.001687_fp, 0.00001937_fp /)
real(fp), dimension(0:5), parameter	a1_coeff = (/ 81.820_fp, -6.0503E-02_fp, -3.1661E-02_fp, 3.1097E-03_fp, -1.1791E-04_fp, 1.4838E-06_fp /)
real(fp), dimension(0:5), parameter	a2_coeff = (/ 0.12544_fp, 9.4037E-03_fp, -9.5551E-04_fp, 9.0888E-05_fp, -3.6011E-06_fp, 4.7130E-08_fp /)
real(fp), dimension(0:5), parameter	b1_coeff = (/ 6.4587_fp , -0.04203_fp , -0.0065881_fp , 0.00064924_fp, -1.2328E-05_fp, 5.0433E-08_fp /)
real(fp), dimension(0:5), parameter	c1_coeff = (/ 17.303_fp , -0.66651_fp , 5.1482E-03_fp, 1.2145E-03_fp, -5.0325E-05_fp, 5.8272E-07_fp /)
real(fp), dimension(0:5), parameter	c2_coeff = (/-6.272E-03_fp , 2.357E-04_fp , 5.075E-04_fp , -6.3983E-05_fp, 2.463E-06_fp , -3.0676E-08_fp /)

Function/Subroutine Documentation

guillou_ocean_permittivity()

subroutine, public guillou::guillou_ocean_permittivity	(	real(fp), intent(in)	Temperature,
		real(fp), intent(in)	Salinity,
		real(fp), intent(in)	Frequency,
		complex(fp), intent(out)	Permittivity,
		type(ivar_type), intent(inout)	iVar
	)

Definition at line 209 of file Guillou.f90.

Here is the caller graph for this function:

guillou_ocean_permittivity_ad()

subroutine, public guillou::guillou_ocean_permittivity_ad	(	complex(fp), intent(inout)	Permittivity_AD,
		real(fp), intent(in)	Frequency,
		real(fp), intent(inout)	Temperature_AD,
		real(fp), intent(inout)	Salinity_AD,
		type(ivar_type), intent(in)	iVar
	)

Definition at line 539 of file Guillou.f90.

Here is the caller graph for this function:

guillou_ocean_permittivity_tl()

subroutine, public guillou::guillou_ocean_permittivity_tl	(	real(fp), intent(in)	Temperature_TL,
		real(fp), intent(in)	Salinity_TL,
		real(fp), intent(in)	Frequency,
		complex(fp), intent(out)	Permittivity_TL,
		type(ivar_type), intent(in)	iVar
	)

Definition at line 371 of file Guillou.f90.

Here is the caller graph for this function:

Variable Documentation

a1_coeff

real(fp), dimension(0:5), parameter guillou::a1_coeff = (/ 81.820_fp, -6.0503E-02_fp, -3.1661E-02_fp, 3.1097E-03_fp, -1.1791E-04_fp, 1.4838E-06_fp /)

private

Definition at line 81 of file Guillou.f90.

a2_coeff

real(fp), dimension(0:5), parameter guillou::a2_coeff = (/ 0.12544_fp, 9.4037E-03_fp, -9.5551E-04_fp, 9.0888E-05_fp, -3.6011E-06_fp, 4.7130E-08_fp /)

private

Definition at line 87 of file Guillou.f90.

b1_coeff

real(fp), dimension(0:5), parameter guillou::b1_coeff = (/ 6.4587_fp , -0.04203_fp , -0.0065881_fp , 0.00064924_fp, -1.2328E-05_fp, 5.0433E-08_fp /)

private

Definition at line 97 of file Guillou.f90.

c1_coeff

real(fp), dimension(0:5), parameter guillou::c1_coeff = (/ 17.303_fp , -0.66651_fp , 5.1482E-03_fp, 1.2145E-03_fp, -5.0325E-05_fp, 5.8272E-07_fp /)

private

Definition at line 107 of file Guillou.f90.

c2_coeff

real(fp), dimension(0:5), parameter guillou::c2_coeff = (/-6.272E-03_fp , 2.357E-04_fp , 5.075E-04_fp , -6.3983E-05_fp, 2.463E-06_fp , -3.0676E-08_fp /)

private

Definition at line 113 of file Guillou.f90.

d1_coeff

real(fp), dimension(0:2), parameter guillou::d1_coeff = (/ 0.086374_fp, 0.030606_fp, -0.0004121_fp /)

private

Definition at line 71 of file Guillou.f90.

d2_coeff

real(fp), dimension(0:2), parameter guillou::d2_coeff = (/ 0.077454_fp, 0.001687_fp, 0.00001937_fp /)

private

Definition at line 74 of file Guillou.f90.

five

real(fp), parameter guillou::five = 5.0_fp

private

Definition at line 54 of file Guillou.f90.

four

real(fp), parameter guillou::four = 4.0_fp

private

Definition at line 53 of file Guillou.f90.

ghz_to_hz

real(fp), parameter guillou::ghz_to_hz = 1.0e+09_fp

private

Definition at line 62 of file Guillou.f90.

module_version_id

character(*), parameter guillou::module_version_id = '$Id: Guillou.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'

private

Definition at line 46 of file Guillou.f90.

one

real(fp), parameter guillou::one = 1.0_fp

private

Definition at line 50 of file Guillou.f90.

point5

real(fp), parameter guillou::point5 = 0.5_fp

private

Definition at line 49 of file Guillou.f90.

ps_to_s

real(fp), parameter guillou::ps_to_s = 1.0e-12_fp

private

Definition at line 61 of file Guillou.f90.

scale_factor

real(fp), parameter guillou::scale_factor = PS_TO_S * GHZ_TO_HZ

private

Definition at line 63 of file Guillou.f90.

three

real(fp), parameter guillou::three = 3.0_fp

private

Definition at line 52 of file Guillou.f90.

two

real(fp), parameter guillou::two = 2.0_fp

private

Definition at line 51 of file Guillou.f90.

twopi

real(fp), parameter guillou::twopi = TWO*PI

private

Definition at line 55 of file Guillou.f90.

zero

real(fp), parameter guillou::zero = 0.0_fp

private

Definition at line 48 of file Guillou.f90.