FV3 Bundle
CRTM_IR_Water_SfcOptics.f90 File Reference

Go to the source code of this file.

Data Types

type  crtm_ir_water_sfcoptics::ivar_type
 

Modules

module  crtm_ir_water_sfcoptics
 

Functions/Subroutines

integer function, public crtm_ir_water_sfcoptics::compute_ir_water_sfcoptics (Surface, GeometryInfo, SensorIndex, ChannelIndex, SfcOptics, iVar)
 
integer function, public crtm_ir_water_sfcoptics::compute_ir_water_sfcoptics_tl (Surface, SfcOptics, Surface_TL, GeometryInfo, SensorIndex, ChannelIndex, SfcOptics_TL, iVar)
 
integer function, public crtm_ir_water_sfcoptics::compute_ir_water_sfcoptics_ad (Surface, SfcOptics, SfcOptics_AD, GeometryInfo, SensorIndex, ChannelIndex, Surface_AD, iVar)
 
subroutine crtm_ir_water_sfcoptics::brdf_rough_sea (Frequency, theta_s, dphi, theta_r, Wind_Speed, brdf, iVar)
 
subroutine crtm_ir_water_sfcoptics::brdf_rough_sea_tl (Wind_Speed, Wind_Speed_TL, brdf_TL, iVar)
 
subroutine crtm_ir_water_sfcoptics::brdf_rough_sea_ad (Wind_Speed, brdf_AD, Wind_Speed_AD, iVar)
 
subroutine crtm_ir_water_sfcoptics::slope_pdf (tan2_theta_f, Wind_Speed, pdf)
 
subroutine crtm_ir_water_sfcoptics::slope_pdf_tl (tan2_theta_f, Wind_Speed, pdf, Wind_Speed_TL, pdf_TL)
 
subroutine crtm_ir_water_sfcoptics::slope_pdf_ad (tan2_theta_f, Wind_Speed, pdf, pdf_AD, Wind_Speed_AD)
 
real(fp) function crtm_ir_water_sfcoptics::fresnel_reflectance (Frequency, Ang_i)
 
complex(fp) function crtm_ir_water_sfcoptics::ref_index (Frequency)
 

Variables

character(*), parameter crtm_ir_water_sfcoptics::module_version_id = '$Id: CRTM_IR_Water_SfcOptics.f90 60152 2015-08-13 19:19:13Z paul.vandelst@noaa.gov $'
 
real(fp), parameter crtm_ir_water_sfcoptics::cm_1 = 0.003_fp
 
real(fp), parameter crtm_ir_water_sfcoptics::cm_2 = 5.12e-3_fp