Symbol Description Uses
krd 4



File Line number Procedure Code
./pkg/fizhi/fizhi_moist.F 2680 CTEI
      _RL    k,krd,kmm,f
./pkg/fizhi/fizhi_moist.F 2697 CTEI
      krd = ( cpoel*t*(1+elocp*dqsdt) )/( 1 + 1.608*dqsdt*t )
./pkg/fizhi/fizhi_moist.F 2702 CTEI
      s = ( (k-krd)/(kmm-krd) )