radiation_liquid_optics_socrates Module


Uses

  • module~~radiation_liquid_optics_socrates~2~~UsesGraph module~radiation_liquid_optics_socrates~2 radiation_liquid_optics_socrates module~parkind1~2 PARKIND1 module~radiation_liquid_optics_socrates~2->module~parkind1~2

Contents

Variables

Subroutines


Variables

Type Visibility Attributes Name Initial
integer, public, parameter :: NLiqOpticsCoeffsSOCRATES = 16
real(kind=jprb), public, parameter :: MinEffectiveRadius = 1.2e-6
real(kind=jprb), public, parameter :: MaxEffectiveRadius = 50.0e-6

Subroutines

public subroutine calc_liq_optics_socrates(nb, coeff, lwp, re_in, od, scat_od, g)

Arguments

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