radiation_ice_optics_yi Module


Used by

  • module~~radiation_ice_optics_yi~~UsedByGraph module~radiation_ice_optics_yi radiation_ice_optics_yi proc~cloud_optics~2 cloud_optics proc~cloud_optics~2->module~radiation_ice_optics_yi proc~setup_cloud_optics~4 setup_cloud_optics proc~setup_cloud_optics~4->module~radiation_ice_optics_yi proc~setup_cloud_optics setup_cloud_optics proc~setup_cloud_optics->module~radiation_ice_optics_yi proc~cloud_optics~3 cloud_optics proc~cloud_optics~3->module~radiation_ice_optics_yi

Contents

Variables

Subroutines


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)