Symbol Description Uses
VCU 40



File Line number Procedure Code
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2384 SFCFLX
     3      VUSTAR,VXX,VYY,VCU,VCT,VRIB,VZETA,VWS,
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2446 SFCFLX
      _RL VYY(IRUN),VCU(IRUN),VCT(IRUN),VRIB(IRUN)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2527 SFCFLX
       VCU(I) = VK * VAPSIM(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2528 SFCFLX
       VUSTAR(I) = VCU(I) * VWS(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2555 SFCFLX
         VCU(I) = VCU(I) * (1. - VDPSIM(I)*VAPSIM(I))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2561 SFCFLX
         VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2573 SFCFLX
       VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2585 SFCFLX
       VCU(I) = VK / VPSIM(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2586 SFCFLX
       VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2591 SFCFLX
       VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2597 SFCFLX
        IF (IVWATER(I).EQ.1) VUSTAR(I) = VCU(I) * VWS(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2655 SFCFLX
        VCU(I) = VK / VPSIM(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2656 SFCFLX
        VUSTAR(I) = VCU(I) * VWS(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2666 SFCFLX
        VAPSIM(I) = VCU(I) * RVK
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2714 SFCFLX
         VCU(I) = VK / VPSIM(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2715 SFCFLX
         VUSTAR(I) = VCU(I) * VWS(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2798 SFCFLX
       VKM(I) = VUSTAR(I) * VCU(I)
./pkg/fizhi/fizhi_turb.F 2345 SFCFLX
     3      VUSTAR,VXX,VYY,VCU,VCT,VRIB,VZETA,VWS,
./pkg/fizhi/fizhi_turb.F 2407 SFCFLX
      _RL VYY(IRUN),VCU(IRUN),VCT(IRUN),VRIB(IRUN)
./pkg/fizhi/fizhi_turb.F 2488 SFCFLX
       VCU(I) = VK * VAPSIM(I)
./pkg/fizhi/fizhi_turb.F 2489 SFCFLX
       VUSTAR(I) = VCU(I) * VWS(I)
./pkg/fizhi/fizhi_turb.F 2516 SFCFLX
         VCU(I) = VCU(I) * (1. - VDPSIM(I)*VAPSIM(I))
./pkg/fizhi/fizhi_turb.F 2522 SFCFLX
         VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S
./pkg/fizhi/fizhi_turb.F 2534 SFCFLX
       VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I))
./pkg/fizhi/fizhi_turb.F 2546 SFCFLX
       VCU(I) = VK / VPSIM(I)
./pkg/fizhi/fizhi_turb.F 2547 SFCFLX
       VPSIG(I) = VH0(I) * VCU(I) * VWS(I) - USTH0S
./pkg/fizhi/fizhi_turb.F 2552 SFCFLX
       VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I))
./pkg/fizhi/fizhi_turb.F 2558 SFCFLX
        IF (IVWATER(I).EQ.1) VUSTAR(I) = VCU(I) * VWS(I)
./pkg/fizhi/fizhi_turb.F 2616 SFCFLX
        VCU(I) = VK / VPSIM(I)
./pkg/fizhi/fizhi_turb.F 2617 SFCFLX
        VUSTAR(I) = VCU(I) * VWS(I)
./pkg/fizhi/fizhi_turb.F 2627 SFCFLX
        VAPSIM(I) = VCU(I) * RVK
./pkg/fizhi/fizhi_turb.F 2675 SFCFLX
         VCU(I) = VK / VPSIM(I)
./pkg/fizhi/fizhi_turb.F 2676 SFCFLX
         VUSTAR(I) = VCU(I) * VWS(I)
./pkg/fizhi/fizhi_turb.F 2759 SFCFLX
       VKM(I) = VUSTAR(I) * VCU(I)