Symbol Description Uses
jGm 5


File Line number Procedure Code
./pkg/obcs/obcs_readparms.F 410 OBCS_READPARMS 
         jGm = 1+mod( jG-1+Ny , Ny )
./pkg/obcs/obcs_readparms.F 416 OBCS_READPARMS 
          IF (iG.EQ.OB_Ieast(jGm))  OB_Ie(J,bi,bj)=I
./pkg/obcs/obcs_readparms.F 417 OBCS_READPARMS 
          IF (iG.EQ.OB_Iwest(jGm))  OB_Iw(J,bi,bj)=I
./pkg/obcs/obcs_readparms.F 422 OBCS_READPARMS 
         jGm = 1+mod( jG-1+Ny , Ny )
./pkg/obcs/obcs_readparms.F 51 OBCS_READPARMS 
      INTEGER bi, bj, iG, jG, iGm, jGm