Symbol Description Uses
jGm 5


File Line number Procedure Code
./pkg/obcs/obcs_readparms.F 255 OBCS_READPARMS 
         jGm = 1+mod( jG-1+Ny , Ny )
./pkg/obcs/obcs_readparms.F 261 OBCS_READPARMS 
          IF (iG.EQ.OB_Ieast(jGm))  OB_Ie(J,bi,bj)=I
./pkg/obcs/obcs_readparms.F 262 OBCS_READPARMS 
          IF (iG.EQ.OB_Iwest(jGm))  OB_Iw(J,bi,bj)=I
./pkg/obcs/obcs_readparms.F 267 OBCS_READPARMS 
         jGm = 1+mod( jG-1+Ny , Ny )
./pkg/obcs/obcs_readparms.F 38 OBCS_READPARMS 
      INTEGER bi, bj, iG, jG, iGm, jGm