Symbol Description Uses
vzh 5



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 3148 SFCFLX
         vzh(i) = vz0(i) * 0.5
./pkg/fizhi/fizhi_turb.F 3149 SFCFLX
         if(vz0(i).ge.2.)vzh(i) = 0.9
./pkg/fizhi/fizhi_turb.F 3151 SFCFLX
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)
./pkg/fizhi/fizhi_turb.F 3168 SFCFLX
         vzh(i) = vz0(i) * 0.1
./pkg/fizhi/fizhi_turb.F 3170 SFCFLX
        call PSI(vtemp,vzh,psimdiag,psihdiag,irun,vhz,vhz,vhz,vhz,1)