Symbol Description Uses
VRIB 24



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 2494 SFCFLX
       VRIB(I) = ( CP * (VPKE(I)-VPK(I)) ) *
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2543 SFCFLX
       CALL LINADJ(NN,VRIB,VRIB,VWS,
./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 2591 SFCFLX
       VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I))
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2615 SFCFLX
      CALL LINADJ(NN,VRIB1,VRIB,VWS1,
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2629 SFCFLX
     1       VPSIM(I) * VPSIM(I) * VRIB(I) * VCT(I) * RVK
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2675 SFCFLX
       CALL LINADJ(NN,VRIB1,VRIB,VWS,
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2698 SFCFLX
     1        VPSIM(I) * VPSIM(I) * VRIB(I) * VAPSIHG(I)
./verification/fizhi-cs-aqualev10/code/fizhi_turb.F 2730 SFCFLX
         VRIB1(I) = VRIB(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 2455 SFCFLX
       VRIB(I) = ( CP * (VPKE(I)-VPK(I)) ) *
./pkg/fizhi/fizhi_turb.F 2504 SFCFLX
       CALL LINADJ(NN,VRIB,VRIB,VWS,
./pkg/fizhi/fizhi_turb.F 2534 SFCFLX
       VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I))
./pkg/fizhi/fizhi_turb.F 2552 SFCFLX
       VZETA(I) = VK2 * VRIB(I) / (VCU(I) * VCU(I) * VPSIHG(I))
./pkg/fizhi/fizhi_turb.F 2576 SFCFLX
      CALL LINADJ(NN,VRIB1,VRIB,VWS1,
./pkg/fizhi/fizhi_turb.F 2590 SFCFLX
     1       VPSIM(I) * VPSIM(I) * VRIB(I) * VCT(I) * RVK
./pkg/fizhi/fizhi_turb.F 2636 SFCFLX
       CALL LINADJ(NN,VRIB1,VRIB,VWS,
./pkg/fizhi/fizhi_turb.F 2659 SFCFLX
     1        VPSIM(I) * VPSIM(I) * VRIB(I) * VAPSIHG(I)
./pkg/fizhi/fizhi_turb.F 2691 SFCFLX
         VRIB1(I) = VRIB(I)