CABLE
Source Files
Modules
Procedures
Derived Types
Namelists
Program
EffectiveExtinctCoeff
Subroutine
21 statements
Source File
cbl_init_radiation.F90
cbl_init_radiation_module
EffectiveExtinctCoeff
Contents
private subroutine EffectiveExtinctCoeff(Eff_ExtCoeff, mp, ExtCoeff, c1, mask)
Arguments
Type
Intent
Optional
Attributes
Name
real,
intent(out)
::
Eff_ExtCoeff
(mp,2)
integer,
intent(in)
::
mp
real,
intent(in)
::
ExtCoeff
(mp)
real,
intent(in)
::
c1
(mp,2)
logical,
intent(in),
optional
::
mask
(mp)