| Symbol | Description | Uses |
| qfadj | 4 |
| File | Line number | Procedure | Code |
| ./pkg/atm2d/fixed_flux_add.F | 136 | FIXED_FLUX_ADD |
qfadj = (wght0*qnet0(i,j,1,1) + wght1*qnet1(i,j,1,1)) |
| ./pkg/atm2d/fixed_flux_add.F | 137 | FIXED_FLUX_ADD |
IF ( (qfadj .NE. 0. _d 0) .AND. |
| ./pkg/atm2d/fixed_flux_add.F | 139 | FIXED_FLUX_ADD |
qneto_2D(i,j)= qneto_2D(i,j) + qfadj |
| ./pkg/atm2d/fixed_flux_add.F | 42 | FIXED_FLUX_ADD |
_RL qfadj ! temp variable for qflux adjustment |