Symbol Description Uses
cqe 7



File Line number Procedure Code
./pkg/icefront/icefront_thermodynamics.F 135 ICEFRONT_THERMODYNAMICS
            cqe = -(eps2+eps3*eps7)*sLoc
./pkg/icefront/icefront_thermodynamics.F 136 ICEFRONT_THERMODYNAMICS
            discrim = bqe*bqe - 4. _d 0*aqe*cqe
./pkg/icefront/icefront_thermodynamics.F 71 ICEFRONT_THERMODYNAMICS
      _RL aqe, bqe, cqe, discrim, recip_aqe
./pkg/shelfice/shelfice_thermodynamics.F 490 SHELFICE_THERMODYNAMICS
            cqe = ( eps2 + eps8*eps7 )*sLoc(I,J)
./pkg/shelfice/shelfice_thermodynamics.F 491 SHELFICE_THERMODYNAMICS
            discrim = bqe*bqe - 4. _d 0*aqe*cqe
./pkg/shelfice/shelfice_thermodynamics.F 495 SHELFICE_THERMODYNAMICS
             print *, 'ml-shelfice: discrim = ', discrim,aqe,bqe,cqe
./pkg/shelfice/shelfice_thermodynamics.F 98 SHELFICE_THERMODYNAMICS
      _RL aqe, bqe, cqe, discrim, recip_aqe