| File |
Line number |
Procedure |
Code |
|
./pkg/atm2d/ATM2D_VARS.h |
125 |
NO PROCEDURE |
& precipo_2D, fu_2D, fv_2D, solarnet_ocn_2D, |
|
./pkg/atm2d/ATM2D_VARS.h |
131 |
NO PROCEDURE |
_RL fu_2D(1:sNx,1:sNy) ! zonal mom flux at lower boundary (N/m2) |
|
./pkg/atm2d/calc_1dto2d.F |
137 |
CALC_WGHT2D |
fu_2D(i,j)= fu_2D(i,j) + atm_tauu(ind)*wgt |
|
./pkg/atm2d/calc_1dto2d.F |
222 |
INIT_2DFLD |
fu_2D(i,j)= 0. _d 0 |
|
./pkg/atm2d/fixed_flux_add.F |
129 |
FIXED_FLUX_ADD |
fu_2D(i,j)= fu_2D(i,j) + |
|
./pkg/atm2d/sum_ocn_fluxes.F |
47 |
SUM_OCN_FLUXES |
fu_2D(i,j)= fu_2D(i,j) * (1. _d 0 - |
|
./pkg/atm2d/sum_ocn_fluxes.F |
65 |
SUM_OCN_FLUXES |
sum_fu(i,j)= sum_fu(i,j) + fu_2D(i,j) |