Symbol Description Uses
ec 13



File Line number Procedure Code
./pkg/kl10/kl10_calc.F 174 KL10_CALC
                  ec=0.0
./pkg/kl10/kl10_calc.F 186 KL10_CALC
                           ec=ec+epsw(di)*dz
./pkg/kl10/kl10_calc.F 193 KL10_CALC
                        ec=ec+epsw(di)*dz
./pkg/kl10/kl10_calc.F 218 KL10_CALC
                     ec=ec/zsum
./pkg/kl10/kl10_calc.F 225 KL10_CALC
                  ec=es+ec
./pkg/kl10/kl10_calc.F 233 KL10_CALC
                  KLeps(I-1,J-1,Km1,bi,bj) = 0.5*(ep+ec)
./pkg/kl10/kl10_calc.F 235 KL10_CALC
                     KLeps(I-1,J-1,Km1,bi,bj) = ec
./pkg/kl10/kl10_calc.F 237 KL10_CALC
                  ep=ec
./pkg/kl10/kl10_calc.F 66 KL10_CALC
      _RL     dzp,ec,ep,es,epss(-1:0),epsw(-1:0),dz,KTemp