Symbol Description Uses
recip_aqe 9


File Line number Procedure Code
./pkg/icefront/icefront_thermodynamics.F 131 ICEFRONT_THERMODYNAMICS 
            saltFreeze = (- bqe - SQRT(discrim))*recip_aqe
./pkg/icefront/icefront_thermodynamics.F 133 ICEFRONT_THERMODYNAMICS 
     &           saltFreeze = (- bqe + SQRT(discrim))*recip_aqe
./pkg/icefront/icefront_thermodynamics.F 69 ICEFRONT_THERMODYNAMICS 
      _RL aqe, bqe, cqe, discrim, recip_aqe
./pkg/icefront/icefront_thermodynamics.F 94 ICEFRONT_THERMODYNAMICS 
      recip_aqe = 0.5 _d 0/aqe
./pkg/shelfice/shelfice_thermodynamics.F 226 SHELFICE_THERMODYNAMICS 
            recip_aqe = 0. _d 0
./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 262 SHELFICE_THERMODYNAMICS 
            saltFreeze = (- bqe - SQRT(discrim))*recip_aqe
./pkg/shelfice/shelfice_thermodynamics.F 264 SHELFICE_THERMODYNAMICS 
     &           saltFreeze = (- bqe + SQRT(discrim))*recip_aqe
./pkg/shelfice/shelfice_thermodynamics.F 70 SHELFICE_THERMODYNAMICS 
      _RL aqe, bqe, cqe, discrim, recip_aqe