Symbol Description Uses
bfsfc 42



File Line number Procedure Code
./pkg/kpp/kpp_routines.F 1296 BLMIX
     I       ustar, bfsfc, hbl, stable, casea, diffus, kbl
./pkg/kpp/kpp_routines.F 1327 BLMIX
      _RL bfsfc (imt)
./pkg/kpp/kpp_routines.F 1379 BLMIX
     I        sigma, hbl, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 1425 BLMIX
         f1 = stable(i) * conc1 * bfsfc(i) /
./pkg/kpp/kpp_routines.F 1478 BLMIX
     I        sigma, hbl, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 147 KPPMIX
      _RL bfsfc  (imt         )
./pkg/kpp/kpp_routines.F 1536 BLMIX
     I        sigma, hbl, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 218 KPPMIX
     O     , hbl, bfsfc, stable, casea, kbl, Rib, sigma
./pkg/kpp/kpp_routines.F 231 KPPMIX
     I       ustar, bfsfc, hbl, stable, casea, diffus, kbl
./pkg/kpp/kpp_routines.F 306 BLDEPTH
     O     , hbl, bfsfc, stable, casea, kbl, Rib, sigma
./pkg/kpp/kpp_routines.F 389 BLDEPTH
      _RL bfsfc  (imt)
./pkg/kpp/kpp_routines.F 482 BLDEPTH
            bfsfc(i) = bo(i) + bosol(i)*(1. - worka(i))
./pkg/kpp/kpp_routines.F 501 BLDEPTH
              bfsfc(i) = bfsfc(i) + boplume(i,1)*(worka(i))
./pkg/kpp/kpp_routines.F 513 BLDEPTH
            bfsfc(i) = bfsfc(i) + temp
./pkg/kpp/kpp_routines.F 521 BLDEPTH
            KPPBFSFC(i,kl) = bfsfc(i)
./pkg/kpp/kpp_routines.F 526 BLDEPTH
            stable(i) = p5 + sign(p5,bfsfc(i))
./pkg/kpp/kpp_routines.F 535 BLDEPTH
     I        sigma, casea, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 647 BLDEPTH
         bfsfc(i)  = bo(i) + bosol(i) * (1. - worka(i))
./pkg/kpp/kpp_routines.F 664 BLDEPTH
           bfsfc(i) = bfsfc(i) + boplume(i,1) * (worka(i))
./pkg/kpp/kpp_routines.F 674 BLDEPTH
            bfsfc(i) = bfsfc(i) + temp
./pkg/kpp/kpp_routines.F 687 BLDEPTH
         stable(i) = p5 + sign( p5, bfsfc(i) )
./pkg/kpp/kpp_routines.F 688 BLDEPTH
         bfsfc(i) = sign(eins,bfsfc(i))*max(phepsi,abs(bfsfc(i)))
./pkg/kpp/kpp_routines.F 707 BLDEPTH
         if (bfsfc(i) .gt. 0.0) then
./pkg/kpp/kpp_routines.F 710 BLDEPTH
     &           / vonk / bfsfc(i)
./pkg/kpp/kpp_routines.F 770 BLDEPTH
         bfsfc(i) = bo(i) + bosol(i) * (1. - worka(i))
./pkg/kpp/kpp_routines.F 787 BLDEPTH
           bfsfc(i) = bfsfc(i) + boplume(i,1) * (worka(i))
./pkg/kpp/kpp_routines.F 797 BLDEPTH
            bfsfc(i) = bfsfc(i) + temp
./pkg/kpp/kpp_routines.F 810 BLDEPTH
         stable(i) = p5 + sign( p5, bfsfc(i) )
./pkg/kpp/kpp_routines.F 811 BLDEPTH
         bfsfc(i) = sign(eins,bfsfc(i))*max(phepsi,abs(bfsfc(i)))
./pkg/kpp/kpp_routines.F 832 WSCALE
     I     sigma, hbl, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 860 WSCALE
      _RL bfsfc(imt)
./pkg/kpp/kpp_routines.F 884 WSCALE
         zehat = vonk*sigma(i)*hbl(i)*bfsfc(i)