CCPP SciDoc v7.0.0  v7.0.0
Common Community Physics Package Developed at DTC
 
Loading...
Searching...
No Matches
flake_paramoptic_ref Module Reference

Variables

integer(kind=iintegers), private i
 
type(opticpar_medium), parameter opticpar_water_ref = opticpar_medium(1, (/1., (0.,i=2,nband_optic_max)/), (/3., (1.E+10,i=2,nband_optic_max)/))
 
type(opticpar_medium), parameter opticpar_water_trans = opticpar_medium(2, (/0.10, 0.90, (0.,i=3,nband_optic_max)/), (/2.0, 0.20, (1.E+10,i=3,nband_optic_max)/))
 
type(opticpar_medium), parameter opticpar_whiteice_ref = opticpar_medium(1, (/1., (0.,i=2,nband_optic_max)/), (/17.1, (1.E+10,i=2,nband_optic_max)/))
 
type(opticpar_medium), parameter opticpar_blueice_ref = opticpar_medium(1, (/1., (0.,i=2,nband_optic_max)/), (/8.4, (1.E+10,i=2,nband_optic_max)/))
 
type(opticpar_medium), parameter opticpar_drysnow_ref = opticpar_medium(1, (/1., (0.,i=2,nband_optic_max)/), (/25.0, (1.E+10,i=2,nband_optic_max)/))
 
type(opticpar_medium), parameter opticpar_meltingsnow_ref = opticpar_medium(1, (/1., (0.,i=2,nband_optic_max)/), (/15.0, (1.E+10,i=2,nband_optic_max)/))
 
type(opticpar_medium), parameter opticpar_ice_opaque = opticpar_medium(1, (/1., (0.,i=2,nband_optic_max)/), (/1.0E+07, (1.E+10,i=2,nband_optic_max)/))
 
type(opticpar_medium), parameter opticpar_snow_opaque = opticpar_medium(1, (/1., (0.,i=2,nband_optic_max)/), (/1.0E+07, (1.E+10,i=2,nband_optic_max)/))