Ellison.f90 File Reference

Go to the source code of this file.

Data Types
type	ellison::ivar_type

Modules
module	ellison

Functions/Subroutines
subroutine, public	ellison::ellison_ocean_permittivity (Temperature, Frequency, Permittivity, iVar)
subroutine, public	ellison::ellison_ocean_permittivity_tl (Temperature_TL, Permittivity_TL, iVar)
subroutine, public	ellison::ellison_ocean_permittivity_ad (Permittivity_AD, Temperature_AD, iVar)

Variables
character(*), parameter	ellison::module_version_id = '$Id: Ellison.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
real(fp), parameter	ellison::zero = 0.0_fp
real(fp), parameter	ellison::point5 = 0.5_fp
real(fp), parameter	ellison::one = 1.0_fp
real(fp), parameter	ellison::two = 2.0_fp
real(fp), parameter	ellison::three = 3.0_fp
real(fp), parameter	ellison::four = 4.0_fp
real(fp), parameter	ellison::five = 5.0_fp
real(fp), parameter	ellison::twopi = TWO*PI
real(fp), parameter	ellison::ps_to_s = 1.0e-12_fp
real(fp), parameter	ellison::ghz_to_hz = 1.0e+09_fp
real(fp), parameter	ellison::scale_factor = PS_TO_S * GHZ_TO_HZ
real(fp), dimension(0:2), parameter	ellison::tau1_coeff = (/ 17.535_fp, -0.61767_fp, 0.0089481_fp /)
real(fp), dimension(0:3), parameter	ellison::tau2_coeff = (/ 3.1842_fp, 0.019189_fp, -0.010873_fp, 0.00025818_fp /)
real(fp), dimension(0:3), parameter	ellison::delta1_coeff = (/ 68.396_fp, -0.40643_fp, 0.022832_fp, -0.00053061_fp /)
real(fp), dimension(0:3), parameter	ellison::delta2_coeff = (/ 4.7629_fp, 0.1541_fp, -0.033717_fp, 0.00084428_fp /)
real(fp), dimension(0:1), parameter	ellison::einf_coeff = (/ 5.31250_fp, -0.0114770_fp /)
real(fp), dimension(0:1), parameter	ellison::sigma_coeff = (/ 2.906_fp, 0.09437_fp /)