| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/obcs_readparms.F |
109 |
OBCS_READPARMS |
INTEGER OB_Iwest(W2_maxYStackNy) |
|
./pkg/obcs/obcs_readparms.F |
114 |
OBCS_READPARMS |
INTEGER OB_Iwest(Ny) |
|
./pkg/obcs/obcs_readparms.F |
141 |
OBCS_READPARMS |
& OB_Jnorth,OB_Jsouth,OB_Ieast,OB_Iwest, |
|
./pkg/obcs/obcs_readparms.F |
242 |
OBCS_READPARMS |
OB_Iwest(j) = OB_indexUnset |
|
./pkg/obcs/obcs_readparms.F |
479 |
OBCS_READPARMS |
IF ( OB_Iwest(j).EQ.OB_indexUnset ) THEN |
|
./pkg/obcs/obcs_readparms.F |
480 |
OBCS_READPARMS |
OB_Iwest(j) = OB_singleIwest |
|
./pkg/obcs/obcs_readparms.F |
481 |
OBCS_READPARMS |
ELSEIF ( OB_Iwest(j).NE.OB_singleIwest ) THEN |
|
./pkg/obcs/obcs_readparms.F |
560 |
OBCS_READPARMS |
CALL PRINT_LIST_I( OB_Iwest, 1, OBEW_Ny, INDEX_J, |
|
./pkg/obcs/obcs_readparms.F |
628 |
OBCS_READPARMS |
IF ( OB_Iwest(jG).NE.OB_indexUnset ) THEN |
|
./pkg/obcs/obcs_readparms.F |
631 |
OBCS_READPARMS |
IF ( iG.EQ.OB_Iwest(jG) ) OB_Iw(j,bi,bj) = i |
|
./pkg/obcs/obcs_readparms.F |
659 |
OBCS_READPARMS |
IF ( OB_Iwest(jGm).NE.OB_indexUnset ) THEN |
|
./pkg/obcs/obcs_readparms.F |
663 |
OBCS_READPARMS |
IF ( iG.EQ.OB_Iwest(jGm) ) OB_Iw(j,bi,bj) = i |