Symbol Description Uses
a0 23



File Line number Procedure Code
./pkg/fizhi/update_earth_exports.F 871 GETALB
      _RL one,a0,a1,a2,a3,ocnalb,albsi
./pkg/frazil/frazil_calc_rhs.F 44 FRAZIL_CALC_RHS
      _RL a0, a1, a2, b
./pkg/frazil/frazil_calc_rhs.F 45 FRAZIL_CALC_RHS
      PARAMETER( a0 = -0.0575   _d  0 )
./pkg/frazil/frazil_calc_rhs.F 88 FRAZIL_CALC_RHS
            Tfreezing = (a0 + a1*sqrt(sLoc) + a2*sLoc) * sLoc + b*pLoc
./pkg/icefront/icefront_thermodynamics.F 108 ICEFRONT_THERMODYNAMICS
      aqe  = a0  *(-eps1+eps3)
./pkg/icefront/icefront_thermodynamics.F 134 ICEFRONT_THERMODYNAMICS
            bqe = - eps1*eps6 -sLoc*a0*eps3 + eps3*eps7 + eps2
./pkg/icefront/icefront_thermodynamics.F 140 ICEFRONT_THERMODYNAMICS
            thetaFreeze = a0*saltFreeze + eps4
./pkg/icefront/icefront_thermodynamics.F 69 ICEFRONT_THERMODYNAMICS
      _RL a0, b, c0
./pkg/icefront/icefront_thermodynamics.F 80 ICEFRONT_THERMODYNAMICS
      a0 = -0.0575   _d  0
./pkg/openad/seawater.F 173 SW_ADTG
      _RL a0,a1,a2,a3,b0,b1,c0,c1,c2,c3,d0,d1,e0,e1,e2
./pkg/openad/seawater.F 179 SW_ADTG
      a0 =  3.5803 _d -5
./pkg/openad/seawater.F 199 SW_ADTG
      rv =      a0 + (a1 + (a2 + a3*T)*T)*T
./pkg/shelfice/shelfice_thermodynamics.F 168 SHELFICE_THERMODYNAMICS
      a0 = -0.0575   _d  0
./pkg/shelfice/shelfice_thermodynamics.F 176 SHELFICE_THERMODYNAMICS
       a0 = -0.0575   _d  0
./pkg/shelfice/shelfice_thermodynamics.F 346 SHELFICE_THERMODYNAMICS
     &           sLoc(I,J) * ( a0 + a1*sqrt(sLoc(I,J)) + a2*sLoc(I,J) )
./pkg/shelfice/shelfice_thermodynamics.F 396 SHELFICE_THERMODYNAMICS
            thetaFreeze = a0*sLoc(I,J)+c0+b*pLoc(I,J)
./pkg/shelfice/shelfice_thermodynamics.F 423 SHELFICE_THERMODYNAMICS
            aqe = a0  *(eps1+eps3-eps8)
./pkg/shelfice/shelfice_thermodynamics.F 431 SHELFICE_THERMODYNAMICS
     &           + eps8*( a0*sLoc(I,J) - eps7 )
./pkg/shelfice/shelfice_thermodynamics.F 469 SHELFICE_THERMODYNAMICS
            thetaFreeze = a0*saltFreeze + eps4
./pkg/shelfice/shelfice_thermodynamics.F 86 SHELFICE_THERMODYNAMICS
      _RL a0, a1, a2, b, c0
./model/src/seawater.F 169 NO PROCEDURE
      _RL a0,a1,a2,a3,b0,b1,c0,c1,c2,c3,d0,d1,e0,e1,e2
./model/src/seawater.F 174 NO PROCEDURE
      a0 =  3.5803 _d -5
./model/src/seawater.F 194 NO PROCEDURE
      SW_ADTG =      a0 + (a1 + (a2 + a3*T)*T)*T