| File |
Line number |
Procedure |
Code |
|
./pkg/diagnostics/diag_vegtile_fill.F |
226 |
DIAG_VEGTILE_FILL |
gridFrac(ij)= 0. |
|
./pkg/diagnostics/diag_vegtile_fill.F |
230 |
DIAG_VEGTILE_FILL |
gridFrac(ij)=gridFrac(ij)+chfr(ivt) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
242 |
DIAG_VEGTILE_FILL |
ELSEIF ( gridFrac(ij).GT.0. _d 0 ) THEN |
|
./pkg/diagnostics/diag_vegtile_fill.F |
244 |
DIAG_VEGTILE_FILL |
& + field(ivt,k)*chfr(ivt)/gridFrac(ij) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
250 |
DIAG_VEGTILE_FILL |
IF ( gridFrac(ij).GT.0. _d 0 ) THEN |
|
./pkg/diagnostics/diag_vegtile_fill.F |
252 |
DIAG_VEGTILE_FILL |
& + field(ivt,k)*chfr(ivt)/gridFrac(ij) |
|
./pkg/diagnostics/diag_vegtile_fill.F |
260 |
DIAG_VEGTILE_FILL |
I gridField, gridFrac, |
|
./pkg/diagnostics/diag_vegtile_fill.F |
69 |
DIAG_VEGTILE_FILL |
_RL gridField(sNx*sNy,nlevs), gridFrac(sNx*sNy) |