Symbol Description Uses
vzh 5



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 2696 SFCFLX
         vzh(i) = vz0(i) * 0.5
./pkg/fizhi/fizhi_turb.F 2697 SFCFLX
         if(vz0(i).ge.2.)vzh(i) = 0.9
./pkg/fizhi/fizhi_turb.F 2699 SFCFLX
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)
./pkg/fizhi/fizhi_turb.F 2716 SFCFLX
         vzh(i) = vz0(i) * 0.1
./pkg/fizhi/fizhi_turb.F 2718 SFCFLX
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)