Symbol Description Uses
jGm 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 55 OBCS_INIT_FIXED 
         jGm = 1+mod( jG-1+Ny , Ny )
./pkg/obcs/obcs_init_fixed.F 61 OBCS_INIT_FIXED 
          IF (iG.EQ.OB_Ieast(jGm))  OB_Ie(J,bi,bj)=I
./pkg/obcs/obcs_init_fixed.F 62 OBCS_INIT_FIXED 
          IF (iG.EQ.OB_Iwest(jGm))  OB_Iw(J,bi,bj)=I
./pkg/obcs/obcs_init_fixed.F 67 OBCS_INIT_FIXED 
         jGm = 1+mod( jG-1+Ny , Ny )