Symbol Description Uses
bfsfc 36



File Line number Procedure Code
./pkg/kpp/kpp_routines.F 1153 BLMIX
     I       ustar, bfsfc, hbl, stable, casea, diffus, kbl
./pkg/kpp/kpp_routines.F 1184 BLMIX
      _RL bfsfc (imt)
./pkg/kpp/kpp_routines.F 1234 BLMIX
     I        sigma, hbl, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 1276 BLMIX
         f1 = stable(i) * conc1 * bfsfc(i) /
./pkg/kpp/kpp_routines.F 1327 BLMIX
     I        sigma, hbl, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 132 KPPMIX
      _RL bfsfc  (imt         )
./pkg/kpp/kpp_routines.F 1380 BLMIX
     I        sigma, hbl, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 196 KPPMIX
     O     , hbl, bfsfc, stable, casea, kbl, Rib, sigma
./pkg/kpp/kpp_routines.F 207 KPPMIX
     I       ustar, bfsfc, hbl, stable, casea, diffus, kbl
./pkg/kpp/kpp_routines.F 275 BLDEPTH
     O     , hbl, bfsfc, stable, casea, kbl, Rib, sigma
./pkg/kpp/kpp_routines.F 354 BLDEPTH
      _RL bfsfc  (imt)
./pkg/kpp/kpp_routines.F 437 BLDEPTH
            bfsfc(i) = bo(i) + bosol(i)*(1. - worka(i))
./pkg/kpp/kpp_routines.F 451 BLDEPTH
              bfsfc(i) = bfsfc(i) + boplume(i)*(1. - worka(i))
./pkg/kpp/kpp_routines.F 458 BLDEPTH
            KPPBFSFC(i,kl) = bfsfc(i)
./pkg/kpp/kpp_routines.F 463 BLDEPTH
            stable(i) = p5 + sign(p5,bfsfc(i))
./pkg/kpp/kpp_routines.F 472 BLDEPTH
     I        sigma, casea, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 570 BLDEPTH
         bfsfc(i)  = bo(i) + bosol(i) * (1. - worka(i))
./pkg/kpp/kpp_routines.F 583 BLDEPTH
           bfsfc(i) = bfsfc(i) + boplume(i) * (1. - worka(i))
./pkg/kpp/kpp_routines.F 593 BLDEPTH
         stable(i) = p5 + sign( p5, bfsfc(i) )
./pkg/kpp/kpp_routines.F 594 BLDEPTH
         bfsfc(i) = sign(eins,bfsfc(i))*max(phepsi,abs(bfsfc(i)))
./pkg/kpp/kpp_routines.F 611 BLDEPTH
         if (bfsfc(i) .gt. 0.0) then
./pkg/kpp/kpp_routines.F 614 BLDEPTH
     &           / vonk / bfsfc(i)
./pkg/kpp/kpp_routines.F 666 BLDEPTH
         bfsfc(i) = bo(i) + bosol(i) * (1. - worka(i))
./pkg/kpp/kpp_routines.F 679 BLDEPTH
           bfsfc(i) = bfsfc(i) + boplume(i) * (1. - worka(i))
./pkg/kpp/kpp_routines.F 689 BLDEPTH
         stable(i) = p5 + sign( p5, bfsfc(i) )
./pkg/kpp/kpp_routines.F 690 BLDEPTH
         bfsfc(i) = sign(eins,bfsfc(i))*max(phepsi,abs(bfsfc(i)))
./pkg/kpp/kpp_routines.F 710 WSCALE
     I     sigma, hbl, ustar, bfsfc,
./pkg/kpp/kpp_routines.F 738 WSCALE
      _RL bfsfc(imt)
./pkg/kpp/kpp_routines.F 762 WSCALE
         zehat = vonk*sigma(i)*hbl(i)*bfsfc(i)