| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_readparms.F |
103 |
OBCS_READPARMS |
INTEGER OB_Ieast(Ny) |
|
./pkg/obcs/obcs_readparms.F |
125 |
OBCS_READPARMS |
& OB_Jnorth,OB_Jsouth,OB_Ieast,OB_Iwest, |
|
./pkg/obcs/obcs_readparms.F |
214 |
OBCS_READPARMS |
OB_Ieast(j) = OB_indexUnset |
|
./pkg/obcs/obcs_readparms.F |
415 |
OBCS_READPARMS |
IF ( OB_Ieast(j) .NE.OB_indexUnset .AND. |
|
./pkg/obcs/obcs_readparms.F |
416 |
OBCS_READPARMS |
& OB_Ieast(j) .LT.0 ) OB_Ieast(j) = OB_Ieast(j)+OBEW_Nx+1 |
|
./pkg/obcs/obcs_readparms.F |
442 |
OBCS_READPARMS |
CALL PRINT_LIST_I( OB_Ieast, 1, OBEW_Ny, INDEX_J, |
|
./pkg/obcs/obcs_readparms.F |
507 |
OBCS_READPARMS |
IF ( OB_Ieast(jG).NE.OB_indexUnset ) THEN |
|
./pkg/obcs/obcs_readparms.F |
511 |
OBCS_READPARMS |
IF ( iG.EQ.OB_Ieast(jG) ) OB_Ie(j,bi,bj) = i |
|
./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 |
98 |
OBCS_READPARMS |
INTEGER OB_Ieast(W2_maxYStackNy) |