File |
Line number |
Procedure |
Code |
./pkg/obcs/obcs_readparms.F |
230 |
OBCS_READPARMS |
OB_indexUnset = 0 |
./pkg/obcs/obcs_readparms.F |
237 |
OBCS_READPARMS |
OB_Jnorth(i) = OB_indexUnset |
./pkg/obcs/obcs_readparms.F |
238 |
OBCS_READPARMS |
OB_Jsouth(i) = OB_indexUnset |
./pkg/obcs/obcs_readparms.F |
241 |
OBCS_READPARMS |
OB_Ieast(j) = OB_indexUnset |
./pkg/obcs/obcs_readparms.F |
242 |
OBCS_READPARMS |
OB_Iwest(j) = OB_indexUnset |
./pkg/obcs/obcs_readparms.F |
244 |
OBCS_READPARMS |
OB_singleJnorth = OB_indexUnset |
./pkg/obcs/obcs_readparms.F |
245 |
OBCS_READPARMS |
OB_singleJsouth = OB_indexUnset |
./pkg/obcs/obcs_readparms.F |
246 |
OBCS_READPARMS |
OB_singleIeast = OB_indexUnset |
./pkg/obcs/obcs_readparms.F |
247 |
OBCS_READPARMS |
OB_singleIwest = OB_indexUnset |
./pkg/obcs/obcs_readparms.F |
461 |
OBCS_READPARMS |
IF ( OB_singleIeast.NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
463 |
OBCS_READPARMS |
IF ( OB_Ieast(j).EQ.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
477 |
OBCS_READPARMS |
IF ( OB_singleIwest.NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
479 |
OBCS_READPARMS |
IF ( OB_Iwest(j).EQ.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
493 |
OBCS_READPARMS |
IF ( OB_singleJnorth.NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
495 |
OBCS_READPARMS |
IF ( OB_Jnorth(i).EQ.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
509 |
OBCS_READPARMS |
IF ( OB_singleJsouth.NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
511 |
OBCS_READPARMS |
IF ( OB_Jsouth(i).EQ.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
527 |
OBCS_READPARMS |
IF ( OB_Ieast(j) .NE.OB_indexUnset .AND. |
./pkg/obcs/obcs_readparms.F |
531 |
OBCS_READPARMS |
IF ( OB_Jnorth(i).NE.OB_indexUnset .AND. |
./pkg/obcs/obcs_readparms.F |
536 |
OBCS_READPARMS |
CALL WRITE_0D_I( OB_indexUnset, INDEX_NONE,' OB_indexUnset =', |
./pkg/obcs/obcs_readparms.F |
599 |
OBCS_READPARMS |
IF ( OB_Jnorth(iG).NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
607 |
OBCS_READPARMS |
IF ( OB_Jsouth(iG).NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
60 |
OBCS_READPARMS |
INTEGER OB_indexUnset |
./pkg/obcs/obcs_readparms.F |
620 |
OBCS_READPARMS |
IF ( OB_Ieast(jG).NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
628 |
OBCS_READPARMS |
IF ( OB_Iwest(jG).NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
650 |
OBCS_READPARMS |
IF ( OB_Ieast(jGm).NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
659 |
OBCS_READPARMS |
IF ( OB_Iwest(jGm).NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
673 |
OBCS_READPARMS |
IF ( OB_Jnorth(iGm).NE.OB_indexUnset ) THEN |
./pkg/obcs/obcs_readparms.F |
681 |
OBCS_READPARMS |
IF ( OB_Jsouth(iGm).NE.OB_indexUnset ) THEN |