Symbol Description Uses
aqe 10



File Line number Procedure Code
./pkg/icefront/icefront_thermodynamics.F 130 ICEFRONT_THERMODYNAMICS
            discrim = bqe*bqe - 4. _d 0*aqe*cqe
./pkg/icefront/icefront_thermodynamics.F 69 ICEFRONT_THERMODYNAMICS
      _RL aqe, bqe, cqe, discrim, recip_aqe
./pkg/icefront/icefront_thermodynamics.F 93 ICEFRONT_THERMODYNAMICS
      aqe  = a0  *(-eps1+eps3)
./pkg/icefront/icefront_thermodynamics.F 94 ICEFRONT_THERMODYNAMICS
      recip_aqe = 0.5 _d 0/aqe
./pkg/shelfice/shelfice_thermodynamics.F 225 SHELFICE_THERMODYNAMICS
            aqe = a0  *(eps1+eps3)
./pkg/shelfice/shelfice_thermodynamics.F 227 SHELFICE_THERMODYNAMICS
            IF ( aqe .NE. 0. _d 0 ) recip_aqe = 0.5 _d 0/aqe
./pkg/shelfice/shelfice_thermodynamics.F 230 SHELFICE_THERMODYNAMICS
            discrim = bqe*bqe - 4. _d 0*aqe*cqe
./pkg/shelfice/shelfice_thermodynamics.F 234 SHELFICE_THERMODYNAMICS
             print *, 'ml-shelfice: discrim = ', discrim,aqe,bqe,cqe
./pkg/shelfice/shelfice_thermodynamics.F 70 SHELFICE_THERMODYNAMICS
      _RL aqe, bqe, cqe, discrim, recip_aqe