IndexRundeck: P1SoM40Created: Mon May 20 03:30:15 EDT 2024

get_canopy_rad
Module: CANOPYRAD
File: canopyradiation.f
Summary:
Author :
Version:
Declaration:
Variables:
pptr : type(patch), pointer

id : real*8

ii : real*8

ffp : real*8, dimension(:), pointer

rdfp : real*8, dimension(:), pointer

rifp : real*8, dimension(:), pointer

sunlit : real*8, dimension(:), pointer

shaded : real*8, dimension(:), pointer

height_levels : real*8, dimension(:), pointer

vz : real*8, dimension(:), pointer

crad_heights : real*8, dimension(:), pointer

t_sun : real*8, dimension(:), pointer

t_sha : real*8, dimension(:), pointer

i_sun : real*8, dimension(:), pointer

i_sha : real*8, dimension(:), pointer

i : integer

n_height_level : integer

n2 : integer

filter_vegsol : integer, dimension(num_vegsol)

ivt : integer, dimension(num_vegsol)

pcolumn : integer, dimension(num_vegsol)

vai : real*8, dimension(num_vegsol)

rho : real*8, dimension(num_vegsol, numrad)

tau : real*8, dimension(num_vegsol, numrad)

coszen : real*8, dimension(num_vegsol)

esai : real*8, dimension(num_vegsol)

elai : real*8, dimension(num_vegsol)

rhol : real*8, dimension(num_pft, numrad)

taul : real*8, dimension(num_pft, numrad)

rhos : real*8, dimension(num_pft, numrad)

taus : real*8, dimension(num_pft, numrad)

sout : type(pft_pstate_type)

fp : integer

g : integer

c : integer

p : integer

ib : integer

len : integer

mpe : real*8, parameter
Initial Value = 1.e-06
wl : real*8, dimension(lbp:ubp)

ws : real*8, dimension(lbp:ubp)

itot : real*8, dimension(2)

reflect : real*8, dimension(2)

tran : real*8, dimension(2)

summ : real*8, dimension(2)

dz : real*8

Simplex Website Curator: Igor Aleinov — NASA Official: Gavin A. Schmidt

Contact GISS — NASA Privacy Policy — Accessibility