| File |
Line number |
Procedure |
Code |
|
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F |
39 |
ATM_TO_OCN_MAPRUNOFF |
INTEGER n, ijo, ija |
|
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F |
50 |
ATM_TO_OCN_MAPRUNOFF |
ija=ijROatm(n) |
|
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F |
52 |
ATM_TO_OCN_MAPRUNOFF |
& + fld_atm(ija)*arROmap(n) |
|
./pkg/atm_ocn_coupler/atm_to_ocn_maprunoff.F |
54 |
ATM_TO_OCN_MAPRUNOFF |
& - fld_atm(ija)*arROmap(n) |
|
./pkg/atm_ocn_coupler/cpl_check_cplconfig.F |
43 |
CPL_CHECK_CPLCONFIG |
INTEGER ijo, ija |
|
./pkg/atm_ocn_coupler/cpl_check_cplconfig.F |
79 |
CPL_CHECK_CPLCONFIG |
ija = ijROatm(n) - 1 |
|
./pkg/atm_ocn_coupler/cpl_check_cplconfig.F |
80 |
CPL_CHECK_CPLCONFIG |
i = 1 + MOD(ija,Nx_atm) |
|
./pkg/atm_ocn_coupler/cpl_check_cplconfig.F |
81 |
CPL_CHECK_CPLCONFIG |
j = 1 + ija/Nx_atm |
|
./pkg/atm_ocn_coupler/set_runoffmap.F |
109 |
SET_RUNOFFMAP |
ija = NINT(tmpfld(1,n)) |
|
./pkg/atm_ocn_coupler/set_runoffmap.F |
111 |
SET_RUNOFFMAP |
IF ( ija.LT.1 .OR. ija.GT.Nx_atm*Ny_atm ) THEN |
|
./pkg/atm_ocn_coupler/set_runoffmap.F |
116 |
SET_RUNOFFMAP |
ijROatm(n) = ija |
|
./pkg/atm_ocn_coupler/set_runoffmap.F |
32 |
SET_RUNOFFMAP |
INTEGER n, ijo, ija |