| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_moist.F |
387 |
MOISTIO |
nindeces(L) = 0 |
|
./pkg/fizhi/fizhi_moist.F |
389 |
MOISTIO |
if(pbl(i).eq.L) nindeces(L) = nindeces(L) + 1 |
|
./pkg/fizhi/fizhi_moist.F |
391 |
MOISTIO |
if(nindeces(L).gt.0) then |
|
./pkg/fizhi/fizhi_moist.F |
409 |
MOISTIO |
DO 600 I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
416 |
MOISTIO |
DO 602 I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
421 |
MOISTIO |
DO 603 I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
431 |
MOISTIO |
do i = num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
435 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
439 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
443 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
452 |
MOISTIO |
DO 112 I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
456 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
460 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
464 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
468 |
MOISTIO |
DO 113 I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
473 |
MOISTIO |
do i=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
480 |
MOISTIO |
do i=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
502 |
MOISTIO |
do i=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
523 |
MOISTIO |
do i = num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
531 |
MOISTIO |
CALL RAS ( NN,istrip,nindeces(nsubcl),NLRAS,NLTOP,lm,TMSTP |
|
./pkg/fizhi/fizhi_moist.F |
541 |
MOISTIO |
do I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
550 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
556 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
563 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
569 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
579 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
584 |
MOISTIO |
DO I=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
597 |
MOISTIO |
do i=num,num+nindeces(nsubcl)-1 |
|
./pkg/fizhi/fizhi_moist.F |
613 |
MOISTIO |
num = num+nindeces(nsubcl) |
|
./pkg/fizhi/fizhi_moist.F |
92 |
MOISTIO |
integer nindeces(lm) |