Symbol Description Uses
B3 8



File Line number Procedure Code
./pkg/fizhi/fizhi_turb.F 1456 TRBFLX
      PARAMETER ( B3      = 1. / B1  )  
./pkg/fizhi/fizhi_turb.F 2073 TRBFLX
        IF(IBITSTB(I,LMIN).EQ.1 ) P3(I,LMIN) = (2.*B3) *
./pkg/fizhi/fizhi_turb.F 3866 TRBL25
      PARAMETER ( B3      = 1. / B1  )  
./pkg/fizhi/fizhi_turb.F 3900 TRBL25
        P3(I,1) = ZKH(I,1)*STRT(I,1) + B3
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 1456 TRBFLX
      PARAMETER ( B3      = 1. / B1  )  
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 2073 TRBFLX
        IF(IBITSTB(I,LMIN).EQ.1 ) P3(I,LMIN) = (2.*B3) *
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 3848 TRBL25
      PARAMETER ( B3      = 1. / B1  )  
./verification/fizhi-cs-aqualev20/code/fizhi_turb.F 3882 TRBL25
        P3(I,1) = ZKH(I,1)*STRT(I,1) + B3