crtm_ir_water_sfcoptics Module Reference

Data Types
type	ivar_type

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

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

Function/Subroutine Documentation

brdf_rough_sea()

subroutine crtm_ir_water_sfcoptics::brdf_rough_sea ( real(fp), intent(in)  Frequency, real(fp), intent(in)  theta_s, real(fp), intent(in)  dphi, real(fp), intent(in)  theta_r, real(fp), intent(in)  Wind_Speed, real(fp), intent(out)  brdf, type(ivar_type), intent(inout)  iVar  )

private

Definition at line 664 of file CRTM_IR_Water_SfcOptics.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

brdf_rough_sea_ad()

subroutine crtm_ir_water_sfcoptics::brdf_rough_sea_ad ( real(fp), intent(in)  Wind_Speed, real(fp), intent(inout)  brdf_AD, real(fp), intent(inout)  Wind_Speed_AD, type(ivar_type), intent(in)  iVar  )

private

Definition at line 730 of file CRTM_IR_Water_SfcOptics.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

brdf_rough_sea_tl()

subroutine crtm_ir_water_sfcoptics::brdf_rough_sea_tl ( real(fp), intent(in)  Wind_Speed, real(fp), intent(in)  Wind_Speed_TL, real(fp), intent(out)  brdf_TL, type(ivar_type), intent(in)  iVar  )

private

Definition at line 714 of file CRTM_IR_Water_SfcOptics.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

compute_ir_water_sfcoptics()

integer function, public crtm_ir_water_sfcoptics::compute_ir_water_sfcoptics	(	type(crtm_surface_type), intent(in)	Surface,
		type(crtm_geometryinfo_type), intent(in)	GeometryInfo,
		integer, intent(in)	SensorIndex,
		integer, intent(in)	ChannelIndex,
		type(crtm_sfcoptics_type), intent(inout)	SfcOptics,
		type(ivar_type), intent(inout)	iVar
	)

Definition at line 186 of file CRTM_IR_Water_SfcOptics.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

compute_ir_water_sfcoptics_ad()

integer function, public crtm_ir_water_sfcoptics::compute_ir_water_sfcoptics_ad	(	type(crtm_surface_type), intent(in)	Surface,
		type(crtm_sfcoptics_type), intent(in)	SfcOptics,
		type(crtm_sfcoptics_type), intent(inout)	SfcOptics_AD,
		type(crtm_geometryinfo_type), intent(in)	GeometryInfo,
		integer, intent(in)	SensorIndex,
		integer, intent(in)	ChannelIndex,
		type(crtm_surface_type), intent(inout)	Surface_AD,
		type(ivar_type), intent(in)	iVar
	)

Definition at line 556 of file CRTM_IR_Water_SfcOptics.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

compute_ir_water_sfcoptics_tl()

integer function, public crtm_ir_water_sfcoptics::compute_ir_water_sfcoptics_tl	(	type(crtm_surface_type), intent(in)	Surface,
		type(crtm_sfcoptics_type), intent(in)	SfcOptics,
		type(crtm_surface_type), intent(in)	Surface_TL,
		type(crtm_geometryinfo_type), intent(in)	GeometryInfo,
		integer, intent(in)	SensorIndex,
		integer, intent(in)	ChannelIndex,
		type(crtm_sfcoptics_type), intent(inout)	SfcOptics_TL,
		type(ivar_type), intent(in)	iVar
	)

Definition at line 373 of file CRTM_IR_Water_SfcOptics.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

fresnel_reflectance()

real(fp) function crtm_ir_water_sfcoptics::fresnel_reflectance ( real(fp), intent(in)  Frequency, real(fp), intent(in)  Ang_i  )

private

Definition at line 807 of file CRTM_IR_Water_SfcOptics.f90.

Here is the call graph for this function:

Here is the caller graph for this function:

ref_index()

complex(fp) function crtm_ir_water_sfcoptics::ref_index ( real(fp), intent(in)  Frequency )

private

Definition at line 840 of file CRTM_IR_Water_SfcOptics.f90.

Here is the caller graph for this function:

slope_pdf()

subroutine crtm_ir_water_sfcoptics::slope_pdf ( real(fp), intent(in)  tan2_theta_f, real(fp), intent(in)  Wind_Speed, real(fp), intent(out)  pdf  )

private

Definition at line 751 of file CRTM_IR_Water_SfcOptics.f90.

Here is the caller graph for this function:

slope_pdf_ad()

subroutine crtm_ir_water_sfcoptics::slope_pdf_ad ( real(fp), intent(in)  tan2_theta_f, real(fp), intent(in)  Wind_Speed, real(fp), intent(in)  pdf, real(fp), intent(inout)  pdf_AD, real(fp), intent(inout)  Wind_Speed_AD  )

private

Definition at line 781 of file CRTM_IR_Water_SfcOptics.f90.

Here is the caller graph for this function:

slope_pdf_tl()

subroutine crtm_ir_water_sfcoptics::slope_pdf_tl ( real(fp), intent(in)  tan2_theta_f, real(fp), intent(in)  Wind_Speed, real(fp), intent(in)  pdf, real(fp), intent(in)  Wind_Speed_TL, real(fp), intent(out)  pdf_TL  )

private

Definition at line 765 of file CRTM_IR_Water_SfcOptics.f90.

Here is the caller graph for this function:

Variable Documentation

cm_1

real(fp), parameter crtm_ir_water_sfcoptics::cm_1 = 0.003_fp

private

Definition at line 59 of file CRTM_IR_Water_SfcOptics.f90.

cm_2

real(fp), parameter crtm_ir_water_sfcoptics::cm_2 = 5.12e-3_fp

private

Definition at line 59 of file CRTM_IR_Water_SfcOptics.f90.

module_version_id

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 $'

private

Definition at line 56 of file CRTM_IR_Water_SfcOptics.f90.