radiation_ice_optics_yi Module


Contents


Variables

Type Visibility Attributes Name Initial
integer, public, parameter :: NIceOpticsCoeffsYiSW = 69
integer, public, parameter :: NIceOpticsCoeffsYiLW = 69
integer, public, parameter :: NSingleCoeffs = 23

Subroutines

public subroutine calc_ice_optics_yi_sw(nb, coeff, ice_wp, re, od, scat_od, g)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nb
real(kind=jprb), intent(in) :: coeff(:,:)
real(kind=jprb), intent(in) :: ice_wp
real(kind=jprb), intent(in) :: re
real(kind=jprb), intent(out) :: od(nb)
real(kind=jprb), intent(out) :: scat_od(nb)
real(kind=jprb), intent(out) :: g(nb)

public subroutine calc_ice_optics_yi_lw(nb, coeff, ice_wp, re, od, scat_od, g)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: nb
real(kind=jprb), intent(in) :: coeff(:,:)
real(kind=jprb), intent(in) :: ice_wp
real(kind=jprb), intent(in) :: re
real(kind=jprb), intent(out) :: od(nb)
real(kind=jprb), intent(out) :: scat_od(nb)
real(kind=jprb), intent(out) :: g(nb)