| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_readparms.F |
534 |
OBCS_READPARMS |
jGm = 1+MOD( jG-1+Ny , Ny ) |
|
./pkg/obcs/obcs_readparms.F |
537 |
OBCS_READPARMS |
IF ( OB_Ieast(jGm).NE.OB_indexUnset ) THEN |
|
./pkg/obcs/obcs_readparms.F |
542 |
OBCS_READPARMS |
IF ( iG.EQ.OB_Ieast(jGm) ) OB_Ie(j,bi,bj) = i |
|
./pkg/obcs/obcs_readparms.F |
546 |
OBCS_READPARMS |
IF ( OB_Iwest(jGm).NE.OB_indexUnset ) THEN |
|
./pkg/obcs/obcs_readparms.F |
54 |
OBCS_READPARMS |
INTEGER bi, bj, iG, jG, iGm, jGm |
|
./pkg/obcs/obcs_readparms.F |
550 |
OBCS_READPARMS |
IF ( iG.EQ.OB_Iwest(jGm) ) OB_Iw(j,bi,bj) = i |
|
./pkg/obcs/obcs_readparms.F |
563 |
OBCS_READPARMS |
jGm = 1+MOD( jG-1+Ny , Ny ) |
|
./pkg/obcs/obcs_readparms.F |
571 |
OBCS_READPARMS |
jGm = 1+MOD( jG-1+Ny , Ny ) |