File |
Line number |
Procedure |
Code |
./pkg/fizhi/fizhi_moist.F |
2585 |
SRCLOUDS |
subroutine SRCLOUDS (th,q,plk,pl,plke,cloud,cldwat,irun,irise, |
./pkg/fizhi/fizhi_moist.F |
2620 |
SRCLOUDS |
_RL cloud(irun,irise) |
./pkg/fizhi/fizhi_moist.F |
2659 |
SRCLOUDS |
if(cloud(i,L).eq. 0.0 .and. ratio.gt.0.0 ) then |
./pkg/fizhi/fizhi_moist.F |
2660 |
SRCLOUDS |
cloud(i,L) = min( ratio,1.0 _d 0) |
./pkg/fizhi/fizhi_moist.F |
2668 |
SRCLOUDS |
call CTEI ( th,q,cloud,cldwat,pl,plk,plke,irun,irise ) |
./pkg/thsice/thsice_get_bulkf.F |
126 |
THSICE_GET_BULKF |
I cloud(i,j,bi,bj), Tsf(i,j), |
./pkg/bulk_force/BULKF.h |
31 |
NO PROCEDURE |
& Qnetch, EmPch, cloud |
./pkg/bulk_force/BULKF.h |
47 |
NO PROCEDURE |
_RL cloud (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/bulk_force/bulkf_forcing.F |
111 |
BULKF_FORCING |
I cloud(i,j,bi,bj),theta(i,j,ks,bi,bj), |
./pkg/bulk_force/bulkf_init_varia.F |
50 |
BULKF_INIT_VARIA |
cloud (i,j,bi,bj) = 0. _d 0 |