File |
Line number |
Procedure |
Code |
./pkg/ocn_compon_interf/cpl_register.F |
100 |
CPL_REGISTER |
jG0 = myYGlobalLo+(bj-1)*sNy |
./pkg/ocn_compon_interf/cpl_register.F |
105 |
CPL_REGISTER |
jG0 = exch2_tyGlobalo(tN) |
./pkg/ocn_compon_interf/cpl_register.F |
113 |
CPL_REGISTER |
iReg(6,j) = jG0 |
./pkg/ocn_compon_interf/cpl_register.F |
47 |
CPL_REGISTER |
INTEGER iG0, jG0 |
./model/src/ini_local_grid.F |
121 |
INI_LOCAL_GRID |
jG0 = exch2_tBasey(tN) |
./model/src/ini_local_grid.F |
124 |
INI_LOCAL_GRID |
jG0 = myYGlobalLo - 1 + (bj-1)*sNy |
./model/src/ini_local_grid.F |
139 |
INI_LOCAL_GRID |
DO j=1, jG0 |
./model/src/ini_local_grid.F |
144 |
INI_LOCAL_GRID |
yG0 = yG0 - delY( 1+MOD(jG0-j+OLy*gridNy,gridNy) ) |
./model/src/ini_local_grid.F |
152 |
INI_LOCAL_GRID |
delYloc(j) = delY( 1+MOD(jG0+j-1+OLy*gridNy,gridNy) ) |
./model/src/ini_local_grid.F |
72 |
INI_LOCAL_GRID |
INTEGER iG0, jG0 |
./pkg/atm_compon_interf/cpl_register.F |
105 |
CPL_REGISTER |
jG0 = exch2_tyGlobalo(tN) |
./pkg/atm_compon_interf/cpl_register.F |
113 |
CPL_REGISTER |
iReg(6,j) = jG0 |
./pkg/atm_compon_interf/cpl_register.F |
47 |
CPL_REGISTER |
INTEGER iG0, jG0 |
./pkg/atm_compon_interf/cpl_register.F |
99 |
CPL_REGISTER |
jG0 = myYGlobalLo+(bj-1)*sNy |