Symbol Description Uses
stable 57


File Line number Procedure Code
./pkg/exf/exf_bulkformulae.F 159 EXF_BULKFORMULAE 
      _RL     stable
./pkg/exf/exf_bulkformulae.F 248 EXF_BULKFORMULAE 
             stable = exf_half + sign(exf_half, deltap)
./pkg/exf/exf_bulkformulae.F 255 EXF_BULKFORMULAE 
             tmpbulk= exf_BulkRhn(stable)
./pkg/exf/exf_bulkformulae.F 282 EXF_BULKFORMULAE 
                  stable = exf_half + sign(exf_half, huol)
./pkg/exf/exf_bulkformulae.F 289 EXF_BULKFORMULAE 
                  psimh  = -psim_fac*huol*stable +
./pkg/exf/exf_bulkformulae.F 290 EXF_BULKFORMULAE 
     &                     (exf_one - stable)*
./pkg/exf/exf_bulkformulae.F 295 EXF_BULKFORMULAE 
                  psixh  = -psim_fac*htol*stable + (exf_one - stable)*
./pkg/exf/exf_bulkformulae.F 315 EXF_BULKFORMULAE 
                  tmpbulk= exf_BulkRhn(stable)
./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/kpp/kpp_routines.F 1066 BLMIX 
     I       ustar, bfsfc, hbl, stable, casea, diffus, kbl
./pkg/kpp/kpp_routines.F 1094 BLMIX 
      _KPP_RL stable(imt)
./pkg/kpp/kpp_routines.F 1134 BLMIX 
         sigma(i) = stable(i) * 1.0 + (1. - stable(i)) * epsilon
./pkg/kpp/kpp_routines.F 113 KPPMIX 
      _KPP_RL stable(imt         )
./pkg/kpp/kpp_routines.F 1181 BLMIX 
         f1 = stable(i) * conc1 * bfsfc(i) /
./pkg/kpp/kpp_routines.F 1224 BLMIX 
            sigma(i) = stable(i)*sig + (1.-stable(i))*min(sig,epsilon)
./pkg/kpp/kpp_routines.F 1264 BLMIX 
            ghat(i,ki) = (1.-stable(i)) * cg / max(phepsi,tempVar)
./pkg/kpp/kpp_routines.F 1275 BLMIX 
         sigma(i) = stable(i) * sig
./pkg/kpp/kpp_routines.F 1276 BLMIX 
     &            + (1. - stable(i)) * min(sig,epsilon)
./pkg/kpp/kpp_routines.F 171 KPPMIX 
     O     , hbl, bfsfc, stable, casea, kbl, Rib, sigma
./pkg/kpp/kpp_routines.F 181 KPPMIX 
     I       ustar, bfsfc, hbl, stable, casea, diffus, kbl
./pkg/kpp/kpp_routines.F 233 BLDEPTH 
     O     , hbl, bfsfc, stable, casea, kbl, Rib, sigma
./pkg/kpp/kpp_routines.F 302 BLDEPTH 
      _KPP_RL stable(imt)
./pkg/kpp/kpp_routines.F 369 BLDEPTH 
            stable(i) = p5 + sign(p5,bfsfc(i))
./pkg/kpp/kpp_routines.F 370 BLDEPTH 
            sigma(i) = stable(i) + (1. - stable(i)) * epsilon
./pkg/kpp/kpp_routines.F 471 BLDEPTH 
         stable(i) = p5 + sign( p5, bfsfc(i) )
./pkg/kpp/kpp_routines.F 491 BLDEPTH 
            hlimit = stable(i) * min(hekman,hmonob)
./pkg/kpp/kpp_routines.F 492 BLDEPTH 
     &             + (stable(i)-1.) * zgrid(Nr)
./pkg/kpp/kpp_routines.F 543 BLDEPTH 
         stable(i) = p5 + sign( p5, bfsfc(i) )
./pkg/thsice/thsice_get_exf.F 154 THSICE_GET_EXF 
           stable = exf_half + sign(exf_half, deltap)
./pkg/thsice/thsice_get_exf.F 158 THSICE_GET_EXF 
           tmpbulk= exf_BulkRhn(stable)
./pkg/thsice/thsice_get_exf.F 168 THSICE_GET_EXF 
            stable = exf_half + sign(exf_half, huol)
./pkg/thsice/thsice_get_exf.F 175 THSICE_GET_EXF 
            psimh  = -psim_fac*huol*stable +
./pkg/thsice/thsice_get_exf.F 176 THSICE_GET_EXF 
     &           (exf_one - stable)*
./pkg/thsice/thsice_get_exf.F 181 THSICE_GET_EXF 
            psixh  = -psim_fac*htol*stable + (exf_one - stable)*
./pkg/thsice/thsice_get_exf.F 201 THSICE_GET_EXF 
            tmpbulk= exf_BulkRhn(stable)
./pkg/thsice/thsice_get_exf.F 81 THSICE_GET_EXF 
      _RL     stable