Liu.f90 File Reference

Go to the source code of this file.

Data Types
type	liu::ivar_type

Modules
module	liu

Functions/Subroutines
subroutine, public	liu::liu_ocean_permittivity (Temperature, Salinity, Frequency, Permittivity, iVar)
subroutine, public	liu::liu_ocean_permittivity_tl (Temperature_TL, Salinity_TL, Frequency, Permittivity_TL, iVar)
subroutine, public	liu::liu_ocean_permittivity_ad (Permittivity_AD, Frequency, Temperature_AD, Salinity_AD, iVar)

Variables
character(*), parameter	liu::module_version_id = '$Id: Liu.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
real(fp), parameter	liu::zero = 0.0_fp
real(fp), parameter	liu::one = 1.0_fp
real(fp), parameter	liu::two = 2.0_fp
real(fp), parameter	liu::three = 3.0_fp
real(fp), parameter	liu::four = 4.0_fp
real(fp), parameter	liu::ghz_to_hz = 1.0e+09_fp
real(fp), parameter	liu::tau0 = TWO*PI*E0*GHZ_TO_HZ
real(fp), dimension(0:1), parameter	liu::einf_coeff = (/ 3.8_fp, 2.48033e-02_fp /)
real(fp), dimension(0:3), parameter	liu::es_t_coeff = (/ 87.9181727_fp , -4.031592248e-01_fp, 9.493088010e-04_fp, -1.930858348E-06_fp /)
real(fp), dimension(0:2), parameter	liu::es_s_coeff = (/-2.697e-03_fp, -7.3E-06_fp , -8.9E-06_fp /)
real(fp), dimension(0:2), parameter	liu::e1_t_coeff = (/ 5.723_fp , 2.2379e-02_fp, -7.1237e-04_fp /)
real(fp), dimension(0:2), parameter	liu::e1_s_coeff = (/-6.28908E-03_fp, 1.76032E-04_fp, -9.22144E-05_fp /)
real(fp), dimension(0:3), parameter	liu::tau1_t_coeff = (/ 1.124465e-01_fp , -3.9815727e-03_fp, 8.113381e-05_fp , -7.1824242e-07_fp /)
real(fp), dimension(0:2), parameter	liu::tau1_s_coeff = (/-2.39357E-03_fp, 3.1353E-05_fp , -2.52477E-07_fp /)
real(fp), dimension(0:3), parameter	liu::tau2_t_coeff = (/ 3.049979018e-03_fp, -3.010041629E-05_fp, 4.811910733E-06_fp, -4.259775841E-08_fp /)
real(fp), dimension(0:2), parameter	liu::tau2_s_coeff = (/ 1.49e-01_fp, -8.8E-04_fp , -1.05E-04_fp /)
real(fp), parameter	liu::alpha_coeff = -4.259775841E-08_fp
real(fp), dimension(0:5), parameter	liu::beta_coeff = (/ 2.033E-02_fp, 1.266E-04_fp, 2.464E-06_fp, -1.849E-05_fp, 2.551E-07_fp, -2.551E-08_fp /)
real(fp), dimension(0:3), parameter	liu::alpha25_coeff = (/ 1.82521e-01_fp, -1.46192E-03_fp, 2.09324E-05_fp, -1.28205E-07_fp /)