Symbol Description Uses
stable 67


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 1186 BLMIX 
      _RL stable(imt)
./pkg/kpp/kpp_routines.F 1229 BLMIX 
         sigma(i) = stable(i) * 1.0 + (1. - stable(i)) * epsilon
./pkg/kpp/kpp_routines.F 1276 BLMIX 
         f1 = stable(i) * conc1 * bfsfc(i) /
./pkg/kpp/kpp_routines.F 1319 BLMIX 
            sigma(i) = stable(i)*sig + (1.-stable(i))*min(sig,epsilon)
./pkg/kpp/kpp_routines.F 134 KPPMIX 
      _RL stable (imt         )
./pkg/kpp/kpp_routines.F 1359 BLMIX 
            ghat(i,ki) = (1.-stable(i)) * cg / max(phepsi,tempVar)
./pkg/kpp/kpp_routines.F 1370 BLMIX 
         sigma(i) = stable(i) * sig
./pkg/kpp/kpp_routines.F 1371 BLMIX 
     &            + (1. - stable(i)) * min(sig,epsilon)
./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 355 BLDEPTH 
      _RL stable (imt)
./pkg/kpp/kpp_routines.F 463 BLDEPTH 
            stable(i) = p5 + sign(p5,bfsfc(i))
./pkg/kpp/kpp_routines.F 464 BLDEPTH 
            sigma(i) = stable(i) + (1. - stable(i)) * epsilon
./pkg/kpp/kpp_routines.F 593 BLDEPTH 
         stable(i) = p5 + sign( p5, bfsfc(i) )
./pkg/kpp/kpp_routines.F 615 BLDEPTH 
            hlimit = stable(i) * min(hekman,hmonob)
./pkg/kpp/kpp_routines.F 616 BLDEPTH 
     &             + (stable(i)-1.) * zgrid(Nr)
./pkg/kpp/kpp_routines.F 689 BLDEPTH 
         stable(i) = p5 + sign( p5, bfsfc(i) )
./pkg/thsice/thsice_get_exf.F 110 THSICE_GET_EXF 
      _RL stable             ! = 1 if stable ; = 0 if unstable
./pkg/thsice/thsice_get_exf.F 282 THSICE_GET_EXF 
          stable     = exf_half + SIGN(exf_half, deltap(i,j))
./pkg/thsice/thsice_get_exf.F 293 THSICE_GET_EXF 
          rhn        = (exf_one-stable)*cstanton_1 + stable*cstanton_2
./pkg/thsice/thsice_get_exf.F 336 THSICE_GET_EXF 
           stable = exf_half + SIGN(exf_half, huol)
./pkg/thsice/thsice_get_exf.F 347 THSICE_GET_EXF 
           psimh  = -psim_fac*huol*stable
./pkg/thsice/thsice_get_exf.F 348 THSICE_GET_EXF 
     &             + (exf_one-stable)
./pkg/thsice/thsice_get_exf.F 359 THSICE_GET_EXF 
           psixh  = -psim_fac*htol*stable
./pkg/thsice/thsice_get_exf.F 360 THSICE_GET_EXF 
     &            + (exf_one-stable)
./pkg/thsice/thsice_get_exf.F 379 THSICE_GET_EXF 
           rhn    = (exf_one-stable)*cstanton_1 + stable*cstanton_2
./pkg/bulk_force/bulkf_formula_lanl.F 170 BULKF_FORMULA_LANL 
                 stable = 5. _d -1 + sign(5. _d -1 , huol)
./pkg/bulk_force/bulkf_formula_lanl.F 173 BULKF_FORMULA_LANL 
                 psimh = -5. _d 0*huol*stable + (1. _d 0-stable)*
./pkg/bulk_force/bulkf_formula_lanl.F 177 BULKF_FORMULA_LANL 
                 psixh  = -5. _d 0*huol*stable + (1. _d 0-stable)*
./pkg/bulk_force/bulkf_formula_lanl.F 90 BULKF_FORMULA_LANL 
      _RL stable             ! = 1 if stable ; = 0 if unstable
./pkg/bulk_force/bulkf_formula_lay.F 173 BULKF_FORMULA_LAY 
              stable = half + SIGN(half, delth)
./pkg/bulk_force/bulkf_formula_lay.F 176 BULKF_FORMULA_LAY 
              rhn = stable*cStantonS + (one-stable)*cStantonU
./pkg/bulk_force/bulkf_formula_lay.F 193 BULKF_FORMULA_LAY 
                 stable = half + SIGN(half, huol)
./pkg/bulk_force/bulkf_formula_lay.F 196 BULKF_FORMULA_LAY 
                 psimh = -5. _d 0*huol*stable
./pkg/bulk_force/bulkf_formula_lay.F 197 BULKF_FORMULA_LAY 
     &             + (one-stable)*
./pkg/bulk_force/bulkf_formula_lay.F 202 BULKF_FORMULA_LAY 
                 psixh  = -5. _d 0*htol*stable
./pkg/bulk_force/bulkf_formula_lay.F 203 BULKF_FORMULA_LAY 
     &             + (one-stable)*( two*LOG(half*(one+xsq)) )
./pkg/bulk_force/bulkf_formula_lay.F 212 BULKF_FORMULA_LAY 
                 rhn = stable*cStantonS + (one-stable)*cStantonU
./pkg/bulk_force/bulkf_formula_lay.F 99 BULKF_FORMULA_LAY 
      _RL stable             ! = 1 if stable ; = 0 if unstable
./pkg/cheapaml/cheapaml.F 309 CHEAPAML 
                 stable = 5. _d -1 + sign(5. _d -1 , huol)
./pkg/cheapaml/cheapaml.F 312 CHEAPAML 
                 psimh = -5. _d 0*huol*stable + (1. _d 0-stable)*
./pkg/cheapaml/cheapaml.F 316 CHEAPAML 
                 psixh  = -5. _d 0*huol*stable + (1. _d 0-stable)*
./pkg/cheapaml/cheapaml.F 94 CHEAPAML 
        _RL huol,stable,xsq,x,psimh,psixh
./pkg/exf/exf_bulkformulae.F 198 EXF_BULKFORMULAE 
      _RL stable                ! = 1 if stable ; = 0 if unstable
./pkg/exf/exf_bulkformulae.F 299 EXF_BULKFORMULAE 
           stable = exf_half + SIGN(exf_half, deltap(i,j))
./pkg/exf/exf_bulkformulae.F 324 EXF_BULKFORMULAE 
           rhn = (exf_one-stable)*cstanton_1 + stable*cstanton_2
./pkg/exf/exf_bulkformulae.F 376 EXF_BULKFORMULAE 
            stable = exf_half + sign(exf_half, huol)
./pkg/exf/exf_bulkformulae.F 390 EXF_BULKFORMULAE 
             psimh  = -psim_fac*huol*stable
./pkg/exf/exf_bulkformulae.F 391 EXF_BULKFORMULAE 
     &               +(exf_one-stable)*
./pkg/exf/exf_bulkformulae.F 407 EXF_BULKFORMULAE 
            psixh = -psim_fac*htol*stable + (exf_one-stable)*
./pkg/exf/exf_bulkformulae.F 445 EXF_BULKFORMULAE 
            rhn = (exf_one-stable)*cstanton_1 + stable*cstanton_2