Symbol Description Uses
zoch 12



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 163 TURBIO
      _RL zoch(nchp),cdrc(nchp)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 388 TURBIO
     1       agrn,zoch,z2ch,cdrc,cdsc,sqscat,u2fac,rsoil1,rsoil2,rdc)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 409 TURBIO
        z0(i) = zoch(i)
./pkg/fizhi/fizhi_utils.F 705 CHPPRM
     1       agrn,zoch,z2ch,cdrc,cdsc,sqsc,ufac,rsl1,rsl2,rdcs)
./pkg/fizhi/fizhi_utils.F 712 CHPPRM
       _RL zoch(mxchps), z2ch(mxchps), cdrc(mxchps), cdsc(mxchps)
./pkg/fizhi/fizhi_utils.F 863 CHPPRM
      zoch(i) = vgz0(k2,ityp(i))*facp + vgz0(k1,ityp(i))*facm
./pkg/fizhi/fizhi_utils.F 881 CHPPRM
      ufac(i) = log( (vgz2(ityp(i)) - d) / zoch(i) ) 
./pkg/fizhi/fizhi_utils.F 882 CHPPRM
     *        / log(  pblzet             / zoch(i) )
./pkg/fizhi/fizhi_utils.F 886 CHPPRM
      cdsc(i) = pblzet/zoch(i)+1.
./pkg/fizhi/fizhi_turb.F 163 TURBIO
      _RL zoch(nchp),cdrc(nchp)
./pkg/fizhi/fizhi_turb.F 388 TURBIO
     1       agrn,zoch,z2ch,cdrc,cdsc,sqscat,u2fac,rsoil1,rsoil2,rdc)
./pkg/fizhi/fizhi_turb.F 409 TURBIO
        z0(i) = zoch(i)