File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
1136 |
TURBIO |
qliqtmp(i,1,L) = 0. |
./pkg/fizhi/fizhi_turb.F |
1165 |
TURBIO |
& qliqtmp(1,1,L),im,jm) |
./pkg/fizhi/fizhi_turb.F |
1170 |
TURBIO |
call CTEI ( tz,qz,fcctmp,qliqtmp,plz,pkz,pkht,im*jm,nlay ) |
./pkg/fizhi/fizhi_turb.F |
1178 |
TURBIO |
qliqavelw(i,1,L) = qliqavelw(i,1,L) + qliqtmp(i,1,L) |
./pkg/fizhi/fizhi_turb.F |
1179 |
TURBIO |
qliqavesw(i,1,L) = qliqavesw(i,1,L) + qliqtmp(i,1,L) |
./pkg/fizhi/fizhi_turb.F |
1184 |
TURBIO |
CALL DIAGNOSTICS_SCALE_FILL( qliqtmp,tmpFac,1, |
./pkg/fizhi/fizhi_turb.F |
160 |
TURBIO |
_RL qliqtmp(im*jm,1,nlay) |