Symbol Description Uses
KTemp 6



File Line number Procedure Code
./pkg/kl10/kl10_calc.F 161 KL10_CALC
                  KTemp = 0.5*(KLviscTmp+KLviscold)
./pkg/kl10/kl10_calc.F 164 KL10_CALC
                  KTemp = MIN(KLviscMax,KTemp)
./pkg/kl10/kl10_calc.F 165 KL10_CALC
                  KLviscAr(I,J,K,bi,bj) = MAX(KTemp,viscArNr(K))
./pkg/kl10/kl10_calc.F 166 KL10_CALC
                  KLdiffKr(I,J,K,bi,bj) = MAX(KTemp,
./pkg/kl10/kl10_calc.F 66 KL10_CALC
      _RL     dzp,ec,ep,es,epss(-1:0),epsw(-1:0),dz,KTemp