| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
179 |
TURBIO |
_RL zoch(nchp),cdrc(nchp) |
|
./pkg/fizhi/fizhi_turb.F |
361 |
TURBIO |
1 agrn,zoch,z2ch,cdrc,cdsc,sqscat,u2fac,rsoil1,rsoil2,rdc) |
|
./pkg/fizhi/fizhi_turb.F |
382 |
TURBIO |
z0(i) = zoch(i) |
|
./pkg/fizhi/fizhi_utils.F |
712 |
CHPPRM |
1 agrn,zoch,z2ch,cdrc,cdsc,sqsc,ufac,rsl1,rsl2,rdcs) |
|
./pkg/fizhi/fizhi_utils.F |
719 |
CHPPRM |
_RL zoch(mxchps), z2ch(mxchps), cdrc(mxchps), cdsc(mxchps) |
|
./pkg/fizhi/fizhi_utils.F |
870 |
CHPPRM |
zoch(i) = vgz0(k2,ityp(i))*facp + vgz0(k1,ityp(i))*facm |
|
./pkg/fizhi/fizhi_utils.F |
888 |
CHPPRM |
ufac(i) = log( (vgz2(ityp(i)) - d) / zoch(i) ) |
|
./pkg/fizhi/fizhi_utils.F |
889 |
CHPPRM |
* / log( pblzet / zoch(i) ) |
|
./pkg/fizhi/fizhi_utils.F |
893 |
CHPPRM |
cdsc(i) = pblzet/zoch(i)+1. |