Symbol Description Uses
epsw 5



File Line number Procedure Code
./pkg/kl10/kl10_calc.F 134 KL10_CALC
               epsw(di)=0.0
./pkg/kl10/kl10_calc.F 193 KL10_CALC
                           epsw(di)=tempu*tempu*KLviscAr(I+di,J-1,K,bi
./pkg/kl10/kl10_calc.F 195 KL10_CALC
                           ec=ec+epsw(di)*dz
./pkg/kl10/kl10_calc.F 202 KL10_CALC
                        ec=ec+epsw(di)*dz
./pkg/kl10/kl10_calc.F 66 KL10_CALC
      _RL     dzp,ec,ep,es,epss(-1:0),epsw(-1:0),dz,KTemp