Symbol | Description | Uses |
rhoS | 15 |
File | Line number | Procedure | Code |
./pkg/kl10/kl10_calc.F | 105 | KL10_CALC |
IF ( (rhoS(K).LT.rhoS(K-1)).AND.(maskC(I,J,K,bi |
./pkg/kl10/kl10_calc.F | 108 | KL10_CALC |
DO WHILE ( (JJ.GT.0).AND.(rhoS(K).LT.rhoS(JJ)) ) |
./pkg/kl10/kl10_calc.F | 112 | KL10_CALC |
rhoS(JJ+1:K)=cshift(rhoS(JJ+1:K),-1) |
./pkg/kl10/kl10_calc.F | 130 | KL10_CALC |
& (rhoS(1) - rhoS(2))*recip_drC(2),0. _d 0) |
./pkg/kl10/kl10_calc.F | 140 | KL10_CALC |
& (rhoS(K) - rhoS(K+1))*recip_drC(K+1) |
./pkg/kl10/kl10_calc.F | 144 | KL10_CALC |
& (rhoS(K-1) - rhoS(K))*recip_drC(K) |
./pkg/kl10/kl10_calc.F | 65 | KL10_CALC |
_RL rhoS(1:Nr),RS(1:Nr) |
./pkg/kl10/kl10_calc.F | 84 | KL10_CALC |
rhoS(1)=rhot |
./pkg/kl10/kl10_calc.F | 99 | KL10_CALC |
rhoS(K)=rhot |