Symbol | Description | Uses |
iGm | 5 |
File | Line number | Procedure | Code |
./pkg/obcs/obcs_init_fixed.F | 32 | OBCS_INIT_FIXED |
INTEGER iG, jG, iGm, jGm |
./pkg/obcs/obcs_init_fixed.F | 59 | OBCS_INIT_FIXED |
iGm = 1+mod( iG-1+Nx , Nx ) |
./pkg/obcs/obcs_init_fixed.F | 70 | OBCS_INIT_FIXED |
iGm = 1+mod( iG-1+Nx , Nx ) |
./pkg/obcs/obcs_init_fixed.F | 72 | OBCS_INIT_FIXED |
IF (jG.EQ.OB_Jnorth(iGm)) OB_Jn(I,bi,bj)=J |
./pkg/obcs/obcs_init_fixed.F | 73 | OBCS_INIT_FIXED |
IF (jG.EQ.OB_Jsouth(iGm)) OB_Js(I,bi,bj)=J |