Symbol Description Uses
index_type Flag indicating which type of index to print 45



File Line number Procedure Code
./model/src/read_write.F 105 WRITE_1D_L
      CALL PRINT_LIST_L( fld, lFld, index_type, .FALSE., 
./model/src/read_write.F 117 WRITE_1D_R8
      SUBROUTINE WRITE_1D_R8( fld, lFld, index_type, head, comment )
./model/src/read_write.F 149 WRITE_1D_R8
      INTEGER index_type
./model/src/read_write.F 165 WRITE_1D_R8
      CALL PRINT_LIST_R8( fld, lFld, index_type, .FALSE., 
./model/src/read_write.F 177 WRITE_0D_I
      SUBROUTINE WRITE_0D_I( fld, index_type, head, comment )
./model/src/read_write.F 206 WRITE_0D_I
      INTEGER index_type
./model/src/read_write.F 221 WRITE_0D_I
      CALL PRINT_LIST_I( idummy, 1, index_type, .FALSE., 
./model/src/read_write.F 233 WRITE_0D_L
      SUBROUTINE WRITE_0D_L( fld, index_type, head, comment )
./model/src/read_write.F 262 WRITE_0D_L
      INTEGER index_type
./model/src/read_write.F 276 WRITE_0D_L
      CALL PRINT_LIST_L( ldummy, 1, index_type, .FALSE., 
./model/src/read_write.F 288 WRITE_0D_R8
      SUBROUTINE WRITE_0D_R8( fld, index_type, head, comment )
./model/src/read_write.F 317 WRITE_0D_R8
      INTEGER index_type
./model/src/read_write.F 332 WRITE_0D_R8
      CALL PRINT_LIST_R8( r8dummy, 1, index_type, .FALSE., 
./model/src/read_write.F 39 WRITE_1D_I
      INTEGER index_type
./model/src/read_write.F 51 WRITE_1D_I
      CALL PRINT_LIST_I( fld, lFld, index_type, .FALSE., 
./model/src/read_write.F 63 WRITE_1D_L
      SUBROUTINE WRITE_1D_L( fld, lFld, index_type, head, comment )
./model/src/read_write.F 93 WRITE_1D_L
      INTEGER index_type
./model/src/read_write.F 9 WRITE_1D_I
      SUBROUTINE WRITE_1D_I( fld, lFld, index_type, head, comment )
./eesupp/src/print.F 140 PRINT_LIST_I
      SUBROUTINE PRINT_LIST_I( fld, lFld, index_type, 
./eesupp/src/print.F 173 PRINT_LIST_I
      INTEGER index_type
./eesupp/src/print.F 200 PRINT_LIST_I
      IF     ( index_type .EQ. INDEX_I ) THEN
./eesupp/src/print.F 202 PRINT_LIST_I
      ELSEIF ( index_type .EQ. INDEX_J ) THEN
./eesupp/src/print.F 204 PRINT_LIST_I
      ELSEIF ( index_type .EQ. INDEX_K ) THEN
./eesupp/src/print.F 221 PRINT_LIST_I
         IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 226 PRINT_LIST_I
         IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 243 PRINT_LIST_I
       IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 248 PRINT_LIST_I
       IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 261 PRINT_LIST_L
      SUBROUTINE PRINT_LIST_L( fld, lFld, index_type, markEnd, 
./eesupp/src/print.F 294 PRINT_LIST_L
      INTEGER index_type
./eesupp/src/print.F 321 PRINT_LIST_L
      IF     ( index_type .EQ. INDEX_I ) THEN
./eesupp/src/print.F 323 PRINT_LIST_L
      ELSEIF ( index_type .EQ. INDEX_J ) THEN
./eesupp/src/print.F 325 PRINT_LIST_L
      ELSEIF ( index_type .EQ. INDEX_K ) THEN
./eesupp/src/print.F 342 PRINT_LIST_L
         IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 347 PRINT_LIST_L
         IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 364 PRINT_LIST_L
       IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 369 PRINT_LIST_L
       IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 381 PRINT_LIST_R8
      SUBROUTINE PRINT_LIST_R8( fld, lFld, index_type, 
./eesupp/src/print.F 414 PRINT_LIST_R8
      INTEGER index_type
./eesupp/src/print.F 441 PRINT_LIST_R8
      IF     ( index_type .EQ. INDEX_I ) THEN
./eesupp/src/print.F 443 PRINT_LIST_R8
      ELSEIF ( index_type .EQ. INDEX_J ) THEN
./eesupp/src/print.F 445 PRINT_LIST_R8
      ELSEIF ( index_type .EQ. INDEX_K ) THEN
./eesupp/src/print.F 462 PRINT_LIST_R8
         IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 467 PRINT_LIST_R8
         IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 485 PRINT_LIST_R8
       IF ( index_type .NE. INDEX_NONE ) 
./eesupp/src/print.F 490 PRINT_LIST_R8
       IF ( index_type .NE. INDEX_NONE )