| File |
Line number |
Procedure |
Code |
|
./pkg/aim_ocn_coupler/ocn_to_atm_mapxyr8.F |
11 |
OCN_TO_ATM_MAPXYR8 |
O fld_atm ) |
|
./pkg/aim_ocn_coupler/ocn_to_atm_mapxyr8.F |
29 |
OCN_TO_ATM_MAPXYR8 |
Real*8 fld_atm(aNx, aNy) |
|
./pkg/aim_ocn_coupler/ocn_to_atm_mapxyr8.F |
41 |
OCN_TO_ATM_MAPXYR8 |
fld_atm(I,J)=0. |
|
./pkg/aim_ocn_coupler/ocn_to_atm_mapxyr8.F |
48 |
OCN_TO_ATM_MAPXYR8 |
fld_atm(I,J)=fld_ocn(I,J) |
|
./pkg/aim_ocn_coupler/atm_to_ocn_maprunoff.F |
24 |
ATM_TO_OCN_MAPRUNOFF |
_RL fld_atm(Nx_atm*Ny_atm) |
|
./pkg/aim_ocn_coupler/atm_to_ocn_maprunoff.F |
42 |
ATM_TO_OCN_MAPRUNOFF |
& -fld_atm(ija)*arROmap(n) |
|
./pkg/aim_ocn_coupler/atm_to_ocn_maprunoff.F |
8 |
ATM_TO_OCN_MAPRUNOFF |
I fld_atm, |
|
./pkg/aim_ocn_coupler/atm_to_ocn_mapxyr8.F |
29 |
ATM_TO_OCN_MAPXYR8 |
Real*8 fld_atm(aNx, aNy) |
|
./pkg/aim_ocn_coupler/atm_to_ocn_mapxyr8.F |
48 |
ATM_TO_OCN_MAPXYR8 |
fld_ocn(I,J)=fld_atm(I,J) |
|
./pkg/aim_ocn_coupler/atm_to_ocn_mapxyr8.F |
9 |
ATM_TO_OCN_MAPXYR8 |
I fld_atm, |