| File |
Line number |
Procedure |
Code |
|
./pkg/atm2d/ATM2D_VARS.h |
126 |
NO PROCEDURE |
& slp_2D, pCO2_2D, wspeed_2D |
|
./pkg/atm2d/ATM2D_VARS.h |
136 |
NO PROCEDURE |
_RL wspeed_2D(1:sNx,1:sNy) ! windspeed at ocean surface (m/s) |
|
./pkg/atm2d/calc_1dto2d.F |
136 |
CALC_WGHT2D |
wspeed_2D(i,j)= wspeed_2D(i,j) + atm_windspeed(ind)*wgt |
|
./pkg/atm2d/calc_1dto2d.F |
221 |
INIT_2DFLD |
wspeed_2D(i,j)= 0. _d 0 |
|
./pkg/atm2d/fixed_flux_add.F |
133 |
FIXED_FLUX_ADD |
wspeed_2D(i,j)= wspeed_2D(i,j) + |
|
./pkg/atm2d/sum_ocn_fluxes.F |
53 |
SUM_OCN_FLUXES |
wspeed_2D(i,j)= wspeed_2D(i,j) |
|
./pkg/atm2d/sum_ocn_fluxes.F |
67 |
SUM_OCN_FLUXES |
sum_wspeed(i,j)= sum_wspeed(i,j) + wspeed_2D(i,j) |