Symbol Description Uses
INDEX_I Variable used to select an index label 13



File Line number Procedure Code
./model/src/config_summary.F 867 CONFIG_SUMMARY
       CALL WRITE_1D_RL( delX, gridNx, INDEX_I, 'delX = ',
./pkg/obcs/obcs_check.F 106 OBCS_CHECK
      CALL WRITE_1D_RL( tidalPeriod, tidalComponents, INDEX_I,
./pkg/obcs/obcs_check.F 125 OBCS_CHECK
         CALL PRINT_LIST_I( OB_Jn(1-OLx,bi,bj), 1-OLx, sNx+OLx, INDEX_I,
./pkg/obcs/obcs_check.F 129 OBCS_CHECK
         CALL PRINT_LIST_I( OB_Js(1-OLx,bi,bj), 1-OLx, sNx+OLx, INDEX_I,
./pkg/obcs/obcs_readparms.F 545 OBCS_READPARMS
        CALL PRINT_LIST_I( OB_Jnorth, 1, OBNS_Nx, INDEX_I,
./pkg/obcs/obcs_readparms.F 550 OBCS_READPARMS
        CALL PRINT_LIST_I( OB_Jsouth, 1, OBNS_Nx, INDEX_I,
./eesupp/src/print.F 345 PRINT_LIST_I
      IF     ( index_type .EQ. INDEX_I ) THEN
./eesupp/src/print.F 478 PRINT_LIST_L
      IF     ( index_type .EQ. INDEX_I ) THEN
./eesupp/src/print.F 611 PRINT_LIST_RL
      IF     ( index_type .EQ. INDEX_I ) THEN
./eesupp/src/write_utils.F 188 WRITE_1D_RL
      IF ( ( index_type.EQ.INDEX_I .OR. index_type.EQ.INDEX_J )
./eesupp/src/write_utils.F 900 WRITE_XY_XLINE_RS
      CALL WRITE_1D_RL( xcoord, sNx*nSx, INDEX_I,msgBuf1,msgBuf2)
./eesupp/inc/EEPARAMS.h 135 NO PROCEDURE
      INTEGER INDEX_I
./eesupp/inc/EEPARAMS.h 139 NO PROCEDURE
      PARAMETER ( INDEX_I    = 1,