| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/fizhi_turb.F |
1443 |
TRBFLX |
integer i,iter,init,n,LL,L,Lp,Lp1,lmin,lminq,lminq1,ibit |
|
./pkg/fizhi/fizhi_turb.F |
1593 |
TRBFLX |
DO 100 LL = 2,NLEVM1 |
|
./pkg/fizhi/fizhi_turb.F |
1594 |
TRBFLX |
L = NLEV - LL |
|
./pkg/fizhi/fizhi_turb.F |
1818 |
TRBFLX |
DO LL = 1,NLEVM1 |
|
./pkg/fizhi/fizhi_turb.F |
1820 |
TRBFLX |
call QSAT ( tl(i,LL),pl(i,LL),shsat(i,LL),dum,.false. ) |
|
./pkg/fizhi/fizhi_turb.F |
3407 |
TRBLEN |
integer i,L,LL |
|
./pkg/fizhi/fizhi_turb.F |
3506 |
TRBLEN |
DO 1000 LL = LMIN,NLEV-1 |
|
./pkg/fizhi/fizhi_turb.F |
3507 |
TRBLEN |
L = NLEVM1 + LMIN - LL |
|
./pkg/fizhi/update_chemistry_exports.F |
35 |
UPDATE_CHEMISTRY_EXPORTS |
integer i, j, L, LL, bi, bj |
|
./pkg/fizhi/update_chemistry_exports.F |
58 |
UPDATE_CHEMISTRY_EXPORTS |
LL = Nrphys+2-L |
|
./pkg/fizhi/update_chemistry_exports.F |
59 |
UPDATE_CHEMISTRY_EXPORTS |
pephy(i,j,LL,bi,bj)=pephy(i,j,LL+1,bi,bj)-dpphys(i,j,L-1,bi,bj) |
|
./pkg/ptracers/ptracers_set_iolabel.F |
12 |
NO PROCEDURE |
CHARACTER*2 LL(NLL) |
|
./pkg/ptracers/ptracers_set_iolabel.F |
14 |
NO PROCEDURE |
CALL PTRACERS_SET_IOLABEL( LL, NLL, 1 ) |
|
./pkg/ptracers/ptracers_set_iolabel.F |
16 |
NO PROCEDURE |
PRINT *, LL(I) |