File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_turb.F |
3620 |
TRBITP |
& AAA,BBB,CCC,DDD,CP,irun ) |
./pkg/fizhi/fizhi_turb.F |
3649 |
TRBITP |
_RL CCC(irun,NLEV),DDD(irun,NLEV) |
./pkg/fizhi/fizhi_turb.F |
3678 |
TRBITP |
DDD(I,L) = ( CP *(DTHV(I,L+1)*DPK(I,L) |
./pkg/fizhi/fizhi_turb.F |
3686 |
TRBITP |
AAA(I,L) = AAA(I,L) - DDD(I,L) |
./pkg/fizhi/fizhi_turb.F |
3687 |
TRBITP |
DDD(I,L) = ( DDD(I,L) * DDD(I,L) ) |
./pkg/fizhi/fizhi_turb.F |
3689 |
TRBITP |
DDD(I,L) = DDD(I,L)*CCC(I,L)*CCC(I,L) |
./pkg/fizhi/fizhi_turb.F |
3690 |
TRBITP |
DDD(I,L) = SQRT( DDD(I,L) ) |
./pkg/fizhi/fizhi_turb.F |
3694 |
TRBITP |
DZITRP(I,L) = ( BBB(I,L)*(1.-DDD(I,L)) ) / AAA(I,L) |