radiation_ice_optics_baran2017 Module


Used by

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

Contents

Variables

Subroutines


Variables

Type Visibility Attributes Name Initial
integer, public, parameter :: NIceOpticsCoeffsBaran2017 = 9
integer, public, parameter :: NIceOpticsGeneralCoeffsBaran2017 = 5

Subroutines

public subroutine calc_ice_optics_baran2017(nb, coeff_gen, coeff, ice_wp, qi, temperature, od, scat_od, g)

Arguments

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