Symbol Description Uses
ioUnit unit number 586


File Line number Procedure Code
./pkg/ecco/ecco_readparms.F 53 ECCO_READPARMS 
      INTEGER IL, kk, gencost_k3d, gencost_msk_k3d, ioUnit
./pkg/ecco/ecco_readparms.F 780 ECCO_READPARMS 
             ioUnit = 0
./pkg/ecco/ecco_readparms.F 781 ECCO_READPARMS 
             call MDS_READVEC_LOC(tempfile,cost_iprec,ioUnit,'RL',
./pkg/exf/exf_interp_read.F 134 EXF_INTERP_READ 
        CALL MDSFINDUNIT( ioUnit, myThid )
./pkg/exf/exf_interp_read.F 136 EXF_INTERP_READ 
        OPEN( ioUnit, file=infile, status='old', access='direct',
./pkg/exf/exf_interp_read.F 140 EXF_INTERP_READ 
          READ(ioUnit,rec=irecord)  buffer_r4
./pkg/exf/exf_interp_read.F 142 EXF_INTERP_READ 
          READ(ioUnit,rec=irecord) (buffer_r4(i),i=1,nx_in*ny_in)
./pkg/exf/exf_interp_read.F 149 EXF_INTERP_READ 
          READ(ioUnit,rec=irecord)  buffer_r8
./pkg/exf/exf_interp_read.F 151 EXF_INTERP_READ 
          READ(ioUnit,rec=irecord) (buffer_r8(i),i=1,nx_in*ny_in)
./pkg/exf/exf_interp_read.F 157 EXF_INTERP_READ 
        CLOSE( ioUnit )
./pkg/exf/exf_interp_read.F 52 EXF_INTERP_READ 
      INTEGER  ioUnit, length_of_rec, IL
./pkg/fizhi/getpwhere.F 100 GETPWHERE 
       WRITE(ioUnit,'(A)') '===== GETPWHERE: CHECK start ====='
./pkg/fizhi/getpwhere.F 101 GETPWHERE 
       WRITE(ioUnit,'(4(A,I6),A)') '  Nr =', Nr,
./pkg/fizhi/getpwhere.F 105 GETPWHERE 
       WRITE(ioUnit,'(10F10.4)') (pref(L),L=1,ntry)
./pkg/fizhi/getpwhere.F 147 GETPWHERE 
       WRITE(ioUnit,'(1(A,I5),A)') ' Up-Bnd=', upperBnd,
./pkg/fizhi/getpwhere.F 149 GETPWHERE 
       WRITE(ioUnit,'(10F10.4)') rF_pmid
./pkg/fizhi/getpwhere.F 151 GETPWHERE 
         WRITE(ioUnit,'(A)')
./pkg/fizhi/getpwhere.F 181 GETPWHERE 
       WRITE(ioUnit,'(3(A,I5),A)') ' dynlev=', dynlev,
./pkg/fizhi/getpwhere.F 184 GETPWHERE 
       WRITE(ioUnit,'(10F10.4)') pressures
./pkg/fizhi/getpwhere.F 185 GETPWHERE 
       WRITE(ioUnit,'(A)') 'pref(ntry:Nrphys):'
./pkg/fizhi/getpwhere.F 186 GETPWHERE 
       WRITE(ioUnit,'(10F10.4)') (pref(L),L=ntry,Nrphys)
./pkg/fizhi/getpwhere.F 187 GETPWHERE 
       WRITE(ioUnit,'(A)') 'levpressures:'
./pkg/fizhi/getpwhere.F 188 GETPWHERE 
       WRITE(ioUnit,'(20I5)') levpressures
./pkg/fizhi/getpwhere.F 189 GETPWHERE 
       WRITE(ioUnit,'(A)') '===== GETPWHERE: CHECK end   ====='
./pkg/fizhi/getpwhere.F 46 GETPWHERE 
       INTEGER ioUnit, upperBnd
./pkg/fizhi/getpwhere.F 99 GETPWHERE 
       ioUnit = errorMessageUnit
./pkg/flt/exch2_recv_get_vec.F 107 EXCH2_RECV_GET_VEC_RL 
          write(ioUnit,'(A,5I6)') 'RECV,0 :',myProcId,bi,bj
./pkg/flt/exch2_recv_get_vec.F 115 EXCH2_RECV_GET_VEC_RL 
           write(ioUnit,'(A,5I5,I8)') 'qq2xW: ',myProcId,bi,bj,
./pkg/flt/exch2_recv_get_vec.F 142 EXCH2_RECV_GET_VEC_RL 
             write(ioUnit,'(A,3I6)') 'LOC,1 :',thisTile,tgT,dir
./pkg/flt/exch2_recv_get_vec.F 143 EXCH2_RECV_GET_VEC_RL 
             write(ioUnit,'(A,8F10.3)') 'LOC,2 :',
./pkg/flt/exch2_recv_get_vec.F 165 EXCH2_RECV_GET_VEC_RL 
          write(ioUnit,'(A,5I6)') 'RECV,1 :',myProcId,bi,bj
./pkg/flt/exch2_recv_get_vec.F 173 EXCH2_RECV_GET_VEC_RL 
       write(ioUnit,'(A,5I6,I12)') 'RECV:',myProcId
./pkg/flt/exch2_recv_get_vec.F 68 EXCH2_RECV_GET_VEC_RL 
      INTEGER ioUnit
./pkg/flt/exch2_recv_get_vec.F 91 EXCH2_RECV_GET_VEC_RL 
      ioUnit = errorMessageUnit
./pkg/flt/exch2_send_put_vec.F 101 EXCH2_SEND_PUT_VEC_RL 
      ioUnit = errorMessageUnit
./pkg/flt/exch2_send_put_vec.F 139 EXCH2_SEND_PUT_VEC_RL 
          write(ioUnit,'(A,5I5,I8)') 'qq1xW: ',myProcId,bi,bj,
./pkg/flt/exch2_send_put_vec.F 73 EXCH2_SEND_PUT_VEC_RL 
      INTEGER ioUnit
./pkg/flt/exch_recv_get_vec.F 104 EXCH_RECV_GET_VEC_X_RL 
          write(ioUnit,'(A,5I5,I8)') 'qq2xW: ',myProcId,bi,bj,
./pkg/flt/exch_recv_get_vec.F 123 EXCH_RECV_GET_VEC_X_RL 
        write(ioUnit,'(A,5I6)') 'RECV_X,1 :',myProcId,bi,bj
./pkg/flt/exch_recv_get_vec.F 134 EXCH_RECV_GET_VEC_X_RL 
          write(ioUnit,'(A,5I5,I8)') 'qq2xE: ',myProcId,bi,bj,
./pkg/flt/exch_recv_get_vec.F 144 EXCH_RECV_GET_VEC_X_RL 
        write(ioUnit,'(A,5I6)') 'RECV_X,2 :',myProcId,bi,bj
./pkg/flt/exch_recv_get_vec.F 149 EXCH_RECV_GET_VEC_X_RL 
      write(ioUnit,'(A,5I6,I12)') 'RECV_X:',myProcId
./pkg/flt/exch_recv_get_vec.F 190 EXCH_RECV_GET_VEC_X_RL 
          write(ioUnit,'(A,5I6,I12)') 'spin:', myProcId,bi,bj,
./pkg/flt/exch_recv_get_vec.F 197 EXCH_RECV_GET_VEC_X_RL 
          write(ioUnit,'(A,5I6,I12)') 'spin:', myProcId,bi,bj,
./pkg/flt/exch_recv_get_vec.F 266 EXCH_RECV_GET_VEC_Y_RL 
      INTEGER ioUnit
./pkg/flt/exch_recv_get_vec.F 285 EXCH_RECV_GET_VEC_Y_RL 
      ioUnit = errorMessageUnit
./pkg/flt/exch_recv_get_vec.F 294 EXCH_RECV_GET_VEC_Y_RL 
        write(ioUnit,'(A,5I6)') 'RECV_Y,0 :',myProcId,bi,bj
./pkg/flt/exch_recv_get_vec.F 314 EXCH_RECV_GET_VEC_Y_RL 
        write(ioUnit,'(A,5I6)') 'RECV_Y,1 :',myProcId,bi,bj
./pkg/flt/exch_recv_get_vec.F 331 EXCH_RECV_GET_VEC_Y_RL 
        write(ioUnit,'(A,5I6)') 'RECV_Y,2 :',myProcId,bi,bj
./pkg/flt/exch_recv_get_vec.F 336 EXCH_RECV_GET_VEC_Y_RL 
      write(ioUnit,'(A,5I6,I12)') 'RECV_Y:',myProcId
./pkg/flt/exch_recv_get_vec.F 378 EXCH_RECV_GET_VEC_Y_RL 
          write(ioUnit,'(A,5I6,I12)') 'spin:', myProcId,bi,bj,
./pkg/flt/exch_recv_get_vec.F 385 EXCH_RECV_GET_VEC_Y_RL 
          write(ioUnit,'(A,5I6,I12)') 'spin:', myProcId,bi,bj,
./pkg/flt/exch_recv_get_vec.F 62 EXCH_RECV_GET_VEC_X_RL 
      INTEGER ioUnit
./pkg/flt/exch_recv_get_vec.F 81 EXCH_RECV_GET_VEC_X_RL 
      ioUnit = errorMessageUnit
./pkg/flt/exch_recv_get_vec.F 90 EXCH_RECV_GET_VEC_X_RL 
        write(ioUnit,'(A,5I6)') 'RECV_X,0 :',myProcId,bi,bj
./pkg/flt/exch_send_put_vec.F 103 EXCH_SEND_PUT_VEC_X_RL 
      ioUnit = errorMessageUnit
./pkg/flt/exch_send_put_vec.F 104 EXCH_SEND_PUT_VEC_X_RL 
      WRITE(ioUnit,'(A,2L5)')
./pkg/flt/exch_send_put_vec.F 130 EXCH_SEND_PUT_VEC_X_RL 
          write(ioUnit,'(A,7I5,I8)') 'qq1xW: ',myProcId,bi,bj,
./pkg/flt/exch_send_put_vec.F 163 EXCH_SEND_PUT_VEC_X_RL 
          write(ioUnit,'(A,7I5,I8)') 'qq1xE: ',myProcId,bi,bj,
./pkg/flt/exch_send_put_vec.F 297 EXCH_SEND_PUT_VEC_Y_RL 
      INTEGER ioUnit
./pkg/flt/exch_send_put_vec.F 328 EXCH_SEND_PUT_VEC_Y_RL 
      ioUnit = errorMessageUnit
./pkg/flt/exch_send_put_vec.F 72 EXCH_SEND_PUT_VEC_X_RL 
      INTEGER ioUnit
./pkg/flt/flt_init_varia.F 123 FLT_INIT_VARIA 
      ioUnit = -2
./pkg/flt/flt_init_varia.F 128 FLT_INIT_VARIA 
        CALL MDS_READVEC_LOC( fn, fp, ioUnit,
./pkg/flt/flt_init_varia.F 133 FLT_INIT_VARIA 
      IF ( ioUnit.GT.0 .AND. mapIniPos2Index ) THEN
./pkg/flt/flt_init_varia.F 143 FLT_INIT_VARIA 
          CALL MDS_READVEC_LOC( fn, fp, ioUnit,
./pkg/flt/flt_init_varia.F 175 FLT_INIT_VARIA 
        CLOSE( ioUnit )
./pkg/flt/flt_init_varia.F 177 FLT_INIT_VARIA 
      ELSEIF ( ioUnit.GT.0 ) THEN
./pkg/flt/flt_init_varia.F 214 FLT_INIT_VARIA 
           ioUnit = -1
./pkg/flt/flt_init_varia.F 216 FLT_INIT_VARIA 
           CALL MDS_READVEC_LOC( fn, fp, ioUnit,
./pkg/flt/flt_init_varia.F 229 FLT_INIT_VARIA 
             CALL MDS_READVEC_LOC( fn, fp, ioUnit,
./pkg/flt/flt_init_varia.F 254 FLT_INIT_VARIA 
           CLOSE( ioUnit )
./pkg/flt/flt_init_varia.F 55 FLT_INIT_VARIA 
      INTEGER fp, ioUnit
./pkg/flt/flt_traj.F 178 FLT_TRAJ 
         ioUnit = -2
./pkg/flt/flt_traj.F 179 FLT_TRAJ 
         CALL MDS_READVEC_LOC(  fn, fp, ioUnit, 'RL', nFlds,
./pkg/flt/flt_traj.F 182 FLT_TRAJ 
         IF ( ioUnit.GT. 0 ) THEN
./pkg/flt/flt_traj.F 199 FLT_TRAJ 
            CLOSE( ioUnit )
./pkg/flt/flt_traj.F 226 FLT_TRAJ 
         ioUnit = -1
./pkg/flt/flt_traj.F 227 FLT_TRAJ 
         CALL MDS_WRITEVEC_LOC( fn, fp, ioUnit, 'RL', nFlds,
./pkg/flt/flt_traj.F 235 FLT_TRAJ 
            CALL MDS_WRITEVEC_LOC( fn, fp, ioUnit, 'RL', nFlds,
./pkg/flt/flt_traj.F 239 FLT_TRAJ 
         CLOSE( ioUnit )
./pkg/flt/flt_traj.F 57 FLT_TRAJ 
      INTEGER fp, ioUnit, irecord
./pkg/flt/flt_up.F 176 FLT_UP 
         ioUnit = -2
./pkg/flt/flt_up.F 177 FLT_UP 
         CALL MDS_READVEC_LOC(  fn, fp, ioUnit, 'RL', nFlds,
./pkg/flt/flt_up.F 180 FLT_UP 
         IF ( ioUnit.GT. 0 ) THEN
./pkg/flt/flt_up.F 197 FLT_UP 
            CLOSE( ioUnit )
./pkg/flt/flt_up.F 224 FLT_UP 
         ioUnit = -1
./pkg/flt/flt_up.F 225 FLT_UP 
         CALL MDS_WRITEVEC_LOC( fn, fp, ioUnit, 'RL', nFlds,
./pkg/flt/flt_up.F 233 FLT_UP 
           CALL MDS_WRITEVEC_LOC( fn, fp, ioUnit, 'RL', nFlds,
./pkg/flt/flt_up.F 237 FLT_UP 
         CLOSE( ioUnit )
./pkg/flt/flt_up.F 54 FLT_UP 
      INTEGER fp, ioUnit, irecord
./pkg/flt/flt_write_pickup.F 43 FLT_WRITE_PICKUP 
      INTEGER ioUnit, irecord
./pkg/flt/flt_write_pickup.F 74 FLT_WRITE_PICKUP 
          ioUnit = -1
./pkg/flt/flt_write_pickup.F 75 FLT_WRITE_PICKUP 
          CALL MDS_WRITEVEC_LOC( fn, precFloat64, ioUnit,
./pkg/flt/flt_write_pickup.F 94 FLT_WRITE_PICKUP 
            CALL MDS_WRITEVEC_LOC( fn, precFloat64, ioUnit,
./pkg/flt/flt_write_pickup.F 99 FLT_WRITE_PICKUP 
          CLOSE( ioUnit )
./pkg/generic_advdiff/gad_read_pickup.F 110 GAD_READ_PICKUP 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/generic_advdiff/gad_read_pickup.F 115 GAD_READ_PICKUP 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/generic_advdiff/gad_read_pickup.F 161 GAD_READ_PICKUP 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/generic_advdiff/gad_read_pickup.F 166 GAD_READ_PICKUP 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/generic_advdiff/gad_read_pickup.F 44 GAD_READ_PICKUP 
      INTEGER ioUnit
./pkg/generic_advdiff/gad_read_pickup.F 51 GAD_READ_PICKUP 
      ioUnit = errorMessageUnit
./pkg/gmredi/gmredi_read_pickup.F 105 GMREDI_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/gmredi/gmredi_read_pickup.F 110 GMREDI_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/gmredi/gmredi_read_pickup.F 219 GMREDI_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/gmredi/gmredi_read_pickup.F 46 GMREDI_READ_PICKUP 
      INTEGER i,j,k,n,nm,ioUnit,bi,bj
./pkg/gmredi/gmredi_read_pickup.F 90 GMREDI_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/gmredi/gmredi_read_pickup.F 99 GMREDI_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 104 GRDCHK_MAIN 
      INTEGER ioUnit
./pkg/grdchk/grdchk_main.F 137 GRDCHK_MAIN 
      ioUnit = standardMessageUnit
./pkg/grdchk/grdchk_main.F 140 GRDCHK_MAIN 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 142 GRDCHK_MAIN 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 145 GRDCHK_MAIN 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 175 GRDCHK_MAIN 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 227 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 256 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 347 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 386 GRDCHK_MAIN 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 475 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 478 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 481 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 485 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 488 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 491 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 497 GRDCHK_MAIN 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mdsio/mdsio_check4file.F 129 MDS_CHECK4FILE 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mdsio/mdsio_check4file.F 131 MDS_CHECK4FILE 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mdsio/mdsio_check4file.F 55 MDS_CHECK4FILE 
      INTEGER lp, ip, is, iL, i, ioUnit
./pkg/mdsio/mdsio_check4file.F 58 MDS_CHECK4FILE 
      ioUnit = errorMessageUnit
./pkg/mdsio/mdsio_readvec_loc.F 123 MDS_READVEC_LOC 
      IF ( ioUnit.GT.0 ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 126 MDS_READVEC_LOC 
         dUnit = ioUnit
./pkg/mdsio/mdsio_readvec_loc.F 127 MDS_READVEC_LOC 
      ELSEIF ( ioUnit.GE.-2 ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 12 MDS_READVEC_LOC 
     U   ioUnit,
./pkg/mdsio/mdsio_readvec_loc.F 189 MDS_READVEC_LOC 
          IF ( ioUnit.GE.-1 ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 199 MDS_READVEC_LOC 
     &         ioUnit, ' = invalid value for ioUnit argument'
./pkg/mdsio/mdsio_readvec_loc.F 223 MDS_READVEC_LOC 
        IF ( ioUnit.EQ.-2 .OR. ioUnit.EQ.-1 ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 224 MDS_READVEC_LOC 
          ioUnit = dUnit
./pkg/mdsio/mdsio_readvec_loc.F 225 MDS_READVEC_LOC 
        ELSEIF ( ioUnit.EQ.0 ) THEN
./pkg/mdsio/mdsio_readvec_loc.F 61 MDS_READVEC_LOC 
      INTEGER ioUnit
./pkg/mdsio/mdsio_writevec_loc.F 12 MDS_WRITEVEC_LOC 
     U   ioUnit,
./pkg/mdsio/mdsio_writevec_loc.F 145 MDS_WRITEVEC_LOC 
        IF ( ioUnit.GT.0 ) THEN
./pkg/mdsio/mdsio_writevec_loc.F 148 MDS_WRITEVEC_LOC 
          dUnit = ioUnit
./pkg/mdsio/mdsio_writevec_loc.F 208 MDS_WRITEVEC_LOC 
        IF ( fileIsOpen .AND. ioUnit.EQ.0 ) THEN
./pkg/mdsio/mdsio_writevec_loc.F 212 MDS_WRITEVEC_LOC 
        IF ( ioUnit.EQ.-1 ) ioUnit = dUnit
./pkg/mdsio/mdsio_writevec_loc.F 62 MDS_WRITEVEC_LOC 
      INTEGER ioUnit
./model/src/check_pickup.F 100 CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 113 CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 123 CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 129 CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 136 CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 143 CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 149 CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 218 CHECK_PICKUP 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 226 CHECK_PICKUP 
          CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 230 CHECK_PICKUP 
          CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 50 CHECK_PICKUP 
      INTEGER ioUnit
./model/src/check_pickup.F 55 CHECK_PICKUP 
      ioUnit = errorMessageUnit
./model/src/check_pickup.F 73 CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 91 CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 102 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 104 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 261 CONFIG_SUMMARY 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 265 CONFIG_SUMMARY 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 268 CONFIG_SUMMARY 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 273 CONFIG_SUMMARY 
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 276 CONFIG_SUMMARY 
     &                   .FALSE., .TRUE., ioUnit )
./model/src/config_summary.F 279 CONFIG_SUMMARY 
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 280 CONFIG_SUMMARY 
       CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 366 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 369 CONFIG_SUMMARY 
     &                   .FALSE., .TRUE., ioUnit )
./model/src/config_summary.F 372 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 373 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 438 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 441 CONFIG_SUMMARY 
     &                   .FALSE., .TRUE., ioUnit )
./model/src/config_summary.F 444 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 445 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 454 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 457 CONFIG_SUMMARY 
     &                   .FALSE., .TRUE., ioUnit )
./model/src/config_summary.F 460 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 461 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 480 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 483 CONFIG_SUMMARY 
     &                   .FALSE., .TRUE., ioUnit )
./model/src/config_summary.F 486 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 488 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 491 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 494 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 497 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 503 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 592 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 595 CONFIG_SUMMARY 
     &                   .FALSE., .TRUE., ioUnit )
./model/src/config_summary.F 598 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 601 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 603 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 604 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 614 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 617 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 620 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 623 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 626 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 629 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 632 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 639 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 642 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 644 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 666 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 669 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 66 CONFIG_SUMMARY 
      INTEGER ioUnit
./model/src/config_summary.F 671 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 77 CONFIG_SUMMARY 
      ioUnit = standardMessageUnit
./model/src/config_summary.F 782 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 785 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 787 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 91 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 93 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 96 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 978 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 980 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 983 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 985 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 99 CONFIG_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mypackage/mypackage_read_pickup.F 104 MYPACKAGE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mypackage/mypackage_read_pickup.F 109 MYPACKAGE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mypackage/mypackage_read_pickup.F 172 MYPACKAGE_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/mypackage/mypackage_read_pickup.F 47 MYPACKAGE_READ_PICKUP 
      INTEGER j, nj, ioUnit
./pkg/mypackage/mypackage_read_pickup.F 89 MYPACKAGE_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/mypackage/mypackage_read_pickup.F 98 MYPACKAGE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 122 OBCS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 124 OBCS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 126 OBCS_CHECK 
     &                     .FALSE., .TRUE., ioUnit )
./pkg/obcs/obcs_check.F 128 OBCS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 130 OBCS_CHECK 
     &                     .FALSE., .TRUE., ioUnit )
./pkg/obcs/obcs_check.F 132 OBCS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 134 OBCS_CHECK 
     &                     .FALSE., .TRUE., ioUnit )
./pkg/obcs/obcs_check.F 136 OBCS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 138 OBCS_CHECK 
     &                     .FALSE., .TRUE., ioUnit )
./pkg/obcs/obcs_check.F 144 OBCS_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 228 OBCS_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 266 OBCS_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 448 OBCS_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 53 OBCS_CHECK 
      INTEGER ioUnit
./pkg/obcs/obcs_check.F 56 OBCS_CHECK 
      ioUnit = standardMessageUnit
./pkg/obcs/obcs_check.F 576 OBCS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 64 OBCS_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 67 OBCS_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_init_fixed.F 166 OBCS_INIT_FIXED 
       ioUnit = standardMessageUnit
./pkg/obcs/obcs_init_fixed.F 169 OBCS_INIT_FIXED 
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_init_fixed.F 187 OBCS_INIT_FIXED 
              CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid )
./pkg/obcs/obcs_init_fixed.F 210 OBCS_INIT_FIXED 
              CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid )
./pkg/obcs/obcs_init_fixed.F 233 OBCS_INIT_FIXED 
              CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid )
./pkg/obcs/obcs_init_fixed.F 256 OBCS_INIT_FIXED 
              CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid )
./pkg/obcs/obcs_init_fixed.F 273 OBCS_INIT_FIXED 
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_init_fixed.F 50 OBCS_INIT_FIXED 
      INTEGER ioUnit
./pkg/profiles/profiles_findunit.F 21 PROFILES_FINDUNIT 
      INTEGER ioUnit
./pkg/profiles/profiles_findunit.F 31 PROFILES_FINDUNIT 
      ioUnit=-1
./pkg/profiles/profiles_findunit.F 33 PROFILES_FINDUNIT 
       IF ( ioUnit.EQ.-1 ) THEN
./pkg/profiles/profiles_findunit.F 53 PROFILES_FINDUNIT 
            ioUnit=ii
./pkg/profiles/profiles_findunit.F 60 PROFILES_FINDUNIT 
      IF ( ioUnit.EQ.-1 ) THEN
./pkg/profiles/profiles_findunit.F 6 PROFILES_FINDUNIT 
      SUBROUTINE PROFILES_FINDUNIT( ioUnit, myThid )
./pkg/ptracers/ptracers_check_pickup.F 102 PTRACERS_CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_check_pickup.F 107 PTRACERS_CHECK_PICKUP 
             CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_check_pickup.F 135 PTRACERS_CHECK_PICKUP 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_check_pickup.F 49 PTRACERS_CHECK_PICKUP 
      INTEGER ioUnit
./pkg/ptracers/ptracers_check_pickup.F 56 PTRACERS_CHECK_PICKUP 
      ioUnit = errorMessageUnit
./pkg/ptracers/ptracers_read_pickup.F 138 PTRACERS_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/ptracers/ptracers_read_pickup.F 147 PTRACERS_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 152 PTRACERS_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 157 PTRACERS_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 162 PTRACERS_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 165 PTRACERS_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 297 PTRACERS_READ_PICKUP 
         ioUnit = standardMessageUnit
./pkg/ptracers/ptracers_read_pickup.F 300 PTRACERS_READ_PICKUP 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 301 PTRACERS_READ_PICKUP 
         CALL PRINT_MESSAGE( fn,     ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 325 PTRACERS_READ_PICKUP 
          ioUnit = errorMessageUnit
./pkg/ptracers/ptracers_read_pickup.F 330 PTRACERS_READ_PICKUP 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 335 PTRACERS_READ_PICKUP 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 54 PTRACERS_READ_PICKUP 
      INTEGER nj, ioUnit
./pkg/rw/read_glvec_rl.F 41 READ_GLVEC_RL 
      INTEGER ioUnit, bi, bj
./pkg/rw/read_glvec_rl.F 59 READ_GLVEC_RL 
      ioUnit = 0
./pkg/rw/read_glvec_rl.F 65 READ_GLVEC_RL 
     &                       fullName, readBinaryPrec, ioUnit,
./pkg/rw/read_glvec_rs.F 41 READ_GLVEC_RS 
      INTEGER ioUnit, bi, bj
./pkg/rw/read_glvec_rs.F 59 READ_GLVEC_RS 
      ioUnit = 0
./pkg/rw/read_glvec_rs.F 65 READ_GLVEC_RS 
     &                       fullName, readBinaryPrec, ioUnit,
./pkg/rw/read_mflds.F 116 READ_MFLDS_SET 
      INTEGER i, j, ioUnit
./pkg/rw/read_mflds.F 190 READ_MFLDS_SET 
        ioUnit = standardMessageUnit
./pkg/rw/read_mflds.F 194 READ_MFLDS_SET 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 199 READ_MFLDS_SET 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 204 READ_MFLDS_SET 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 206 READ_MFLDS_SET 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 209 READ_MFLDS_SET 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 213 READ_MFLDS_SET 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 217 READ_MFLDS_SET 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 221 READ_MFLDS_SET 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 224 READ_MFLDS_SET 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 283 READ_MFLDS_3D_RL 
      INTEGER j, iL, ioUnit
./pkg/rw/read_mflds.F 303 READ_MFLDS_3D_RL 
      ioUnit = standardMessageUnit
./pkg/rw/read_mflds.F 323 READ_MFLDS_3D_RL 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 332 READ_MFLDS_3D_RL 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 341 READ_MFLDS_3D_RL 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 412 READ_MFLDS_LEV_RL 
      INTEGER j, iL, ioUnit
./pkg/rw/read_mflds.F 432 READ_MFLDS_LEV_RL 
      ioUnit = standardMessageUnit
./pkg/rw/read_mflds.F 452 READ_MFLDS_LEV_RL 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 461 READ_MFLDS_LEV_RL 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 470 READ_MFLDS_LEV_RL 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 541 READ_MFLDS_LEV_RS 
      INTEGER j, iL, ioUnit
./pkg/rw/read_mflds.F 561 READ_MFLDS_LEV_RS 
      ioUnit = standardMessageUnit
./pkg/rw/read_mflds.F 581 READ_MFLDS_LEV_RS 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 590 READ_MFLDS_LEV_RS 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 599 READ_MFLDS_LEV_RS 
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 663 READ_MFLDS_CHECK 
      INTEGER i, j, nj, iL, ioUnit
./pkg/rw/read_mflds.F 691 READ_MFLDS_CHECK 
         ioUnit = errorMessageUnit
./pkg/rw/read_mflds.F 695 READ_MFLDS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 698 READ_MFLDS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 702 READ_MFLDS_CHECK 
          CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 706 READ_MFLDS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 711 READ_MFLDS_CHECK 
          CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 731 READ_MFLDS_CHECK 
        ioUnit = standardMessageUnit
./pkg/rw/read_mflds.F 736 READ_MFLDS_CHECK 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/write_glvec_rl.F 39 WRITE_GLVEC_RL 
      INTEGER ioUnit, bi, bj, iRec
./pkg/rw/write_glvec_rl.F 57 WRITE_GLVEC_RL 
      ioUnit = 0
./pkg/rw/write_glvec_rl.F 64 WRITE_GLVEC_RL 
     I                       fullName, writeBinaryPrec, ioUnit,
./pkg/rw/write_glvec_rs.F 39 WRITE_GLVEC_RS 
      INTEGER ioUnit, bi, bj, iRec
./pkg/rw/write_glvec_rs.F 57 WRITE_GLVEC_RS 
      ioUnit = 0
./pkg/rw/write_glvec_rs.F 64 WRITE_GLVEC_RS 
     I                       fullName, writeBinaryPrec, ioUnit,
./pkg/sbo/sbo_output.F 100 SBO_OUTPUT 
     I           fName, precFloat64, ioUnit,
./pkg/sbo/sbo_output.F 119 SBO_OUTPUT 
        ioUnit = standardMessageUnit
./pkg/sbo/sbo_output.F 122 SBO_OUTPUT 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/sbo/sbo_output.F 125 SBO_OUTPUT 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/sbo/sbo_output.F 128 SBO_OUTPUT 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/sbo/sbo_output.F 131 SBO_OUTPUT 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/sbo/sbo_output.F 51 SBO_OUTPUT 
      INTEGER ioUnit
./pkg/sbo/sbo_output.F 98 SBO_OUTPUT 
       ioUnit  = 0
./pkg/seaice/seaice_advection.F 149 SEAICE_ADVECTION 
      INTEGER ioUnit
./pkg/seaice/seaice_advection.F 184 SEAICE_ADVECTION 
      ioUnit = standardMessageUnit
./pkg/seaice/seaice_advection.F 321 SEAICE_ADVECTION 
       IF (dBug.AND.bi.EQ.3 ) WRITE(ioUnit,*)'ICE_adv:',tracerIdentity,
./pkg/seaice/seaice_advection.F 374 SEAICE_ADVECTION 
            WRITE(ioUnit,'(A,1P4E14.6)') 'ICE_adv: xFx=', af(i+1,j),
./pkg/seaice/seaice_advection.F 576 SEAICE_ADVECTION 
            WRITE(ioUnit,'(A,1P4E14.6)') 'ICE_adv: yFx=', af(i,j+1),
./pkg/seaice/seaice_advection.F 741 SEAICE_ADVECTION 
       WRITE(ioUnit,'(A,1P4E14.6)') 'ICE_adv:',
./pkg/seaice/seaice_check.F 458 SEAICE_CHECK 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 461 SEAICE_CHECK 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 468 SEAICE_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 475 SEAICE_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 482 SEAICE_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 485 SEAICE_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 488 SEAICE_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 52 SEAICE_CHECK 
      INTEGER ioUnit
./pkg/seaice/seaice_check.F 71 SEAICE_CHECK 
      ioUnit = errorMessageUnit
./pkg/seaice/seaice_check.F 941 SEAICE_CHECK 
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 985 SEAICE_CHECK 
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 990 SEAICE_CHECK 
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 995 SEAICE_CHECK 
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 106 SEAICE_CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 118 SEAICE_CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 129 SEAICE_CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 173 SEAICE_CHECK_PICKUP 
     &         msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 208 SEAICE_CHECK_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 211 SEAICE_CHECK_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 217 SEAICE_CHECK_PICKUP 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 55 SEAICE_CHECK_PICKUP 
      INTEGER nj, ioUnit
./pkg/seaice/seaice_check_pickup.F 77 SEAICE_CHECK_PICKUP 
        ioUnit = errorMessageUnit
./pkg/seaice/seaice_check_pickup.F 98 SEAICE_CHECK_PICKUP 
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 106 SEAICE_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/seaice/seaice_read_pickup.F 115 SEAICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 120 SEAICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 125 SEAICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 130 SEAICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 133 SEAICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 56 SEAICE_READ_PICKUP 
      INTEGER nj, ioUnit
./pkg/seaice/seaice_summary.F 40 SEAICE_SUMMARY 
      INTEGER ioUnit
./pkg/seaice/seaice_summary.F 442 SEAICE_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 445 SEAICE_SUMMARY 
     &                   .FALSE., .TRUE., ioUnit )
./pkg/seaice/seaice_summary.F 447 SEAICE_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 449 SEAICE_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 450 SEAICE_SUMMARY 
      CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 454 SEAICE_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 457 SEAICE_SUMMARY 
     &                   .FALSE., .TRUE., ioUnit )
./pkg/seaice/seaice_summary.F 460 SEAICE_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 462 SEAICE_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 464 SEAICE_SUMMARY 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 465 SEAICE_SUMMARY 
      CALL PRINT_MESSAGE(endList, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 51 SEAICE_SUMMARY 
      ioUnit = standardMessageUnit
./pkg/shelfice/shelfice_read_pickup.F 100 SHELFICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/shelfice/shelfice_read_pickup.F 105 SHELFICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/shelfice/shelfice_read_pickup.F 155 SHELFICE_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/shelfice/shelfice_read_pickup.F 43 SHELFICE_READ_PICKUP 
      INTEGER j, nj, ioUnit
./pkg/shelfice/shelfice_read_pickup.F 85 SHELFICE_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/shelfice/shelfice_read_pickup.F 94 SHELFICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/streamice/streamice_read_pickup.F 101 STREAMICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/streamice/streamice_read_pickup.F 174 STREAMICE_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/streamice/streamice_read_pickup.F 45 STREAMICE_READ_PICKUP 
      INTEGER j, nj, ioUnit
./pkg/streamice/streamice_read_pickup.F 81 STREAMICE_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/streamice/streamice_read_pickup.F 90 STREAMICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/streamice/streamice_read_pickup.F 96 STREAMICE_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 129 READ_PICKUP 
        ioUnit = errorMessageUnit
./model/src/read_pickup.F 139 READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 144 READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 149 READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 154 READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 157 READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 73 READ_PICKUP 
      INTEGER j, nj, ioUnit
./model/src/solve_for_pressure.F 108 SOLVE_FOR_PRESSURE 
        ioUnit = standardMessageUnit
./model/src/solve_for_pressure.F 111 SOLVE_FOR_PRESSURE 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/solve_for_pressure.F 115 SOLVE_FOR_PRESSURE 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/solve_for_pressure.F 118 SOLVE_FOR_PRESSURE 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/solve_for_pressure.F 65 SOLVE_FOR_PRESSURE 
      INTEGER ioUnit
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 103 ATM_CPL_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 109 ATM_CPL_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 114 ATM_CPL_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 119 ATM_CPL_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 122 ATM_CPL_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 227 ATM_CPL_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 51 ATM_CPL_READ_PICKUP 
      INTEGER j, nj, ioUnit
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 94 ATM_CPL_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/atm_ocn_coupler/cpl_read_params.F 28 CPL_READ_PARAMS 
      INTEGER ioUnit
./pkg/atm_ocn_coupler/cpl_read_params.F 59 CPL_READ_PARAMS 
        ioUnit = 88
./pkg/atm_ocn_coupler/cpl_read_params.F 60 CPL_READ_PARAMS 
        OPEN( ioUnit, FILE='data.cpl',STATUS='old')
./pkg/atm_ocn_coupler/cpl_read_params.F 61 CPL_READ_PARAMS 
        READ( ioUnit, COUPLER_PARAMS )
./pkg/atm_ocn_coupler/cpl_read_params.F 62 CPL_READ_PARAMS 
        CLOSE(ioUnit )
./pkg/atm_phys/atm_phys_read_pickup.F 101 ATM_PHYS_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_phys/atm_phys_read_pickup.F 107 ATM_PHYS_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_phys/atm_phys_read_pickup.F 112 ATM_PHYS_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_phys/atm_phys_read_pickup.F 162 ATM_PHYS_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/atm_phys/atm_phys_read_pickup.F 47 ATM_PHYS_READ_PICKUP 
      INTEGER j, nj, ioUnit
./pkg/atm_phys/atm_phys_read_pickup.F 92 ATM_PHYS_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/autodiff/autodiff_findunit.F 21 AUTODIFF_FINDUNIT 
      INTEGER ioUnit
./pkg/autodiff/autodiff_findunit.F 31 AUTODIFF_FINDUNIT 
      ioUnit=-1
./pkg/autodiff/autodiff_findunit.F 33 AUTODIFF_FINDUNIT 
       IF ( ioUnit.EQ.-1 ) THEN
./pkg/autodiff/autodiff_findunit.F 52 AUTODIFF_FINDUNIT 
            ioUnit=ii
./pkg/autodiff/autodiff_findunit.F 59 AUTODIFF_FINDUNIT 
      IF ( ioUnit.EQ.-1 ) THEN
./pkg/autodiff/autodiff_findunit.F 6 AUTODIFF_FINDUNIT 
      SUBROUTINE AUTODIFF_FINDUNIT( ioUnit, myThid )
./pkg/autodiff/autodiff_whtapeio_sync.F 121 AUTODIFF_WHTAPEIO_SYNC 
          ioUnit=standardMessageUnit
./pkg/autodiff/autodiff_whtapeio_sync.F 122 AUTODIFF_WHTAPEIO_SYNC 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/autodiff/autodiff_whtapeio_sync.F 150 AUTODIFF_WHTAPEIO_SYNC 
          ioUnit=standardMessageUnit
./pkg/autodiff/autodiff_whtapeio_sync.F 151 AUTODIFF_WHTAPEIO_SYNC 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/autodiff/autodiff_whtapeio_sync.F 56 AUTODIFF_WHTAPEIO_SYNC 
      integer ioUnit
./pkg/bbl/bbl_read_pickup.F 101 BBL_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bbl/bbl_read_pickup.F 106 BBL_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bbl/bbl_read_pickup.F 148 BBL_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/bbl/bbl_read_pickup.F 46 BBL_READ_PICKUP 
      INTEGER j, nj, ioUnit
./pkg/bbl/bbl_read_pickup.F 87 BBL_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/bbl/bbl_read_pickup.F 96 BBL_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bling/bling_read_pickup.F 39 BLING_READ_PICKUP 
      INTEGER fp, ioUnit
./pkg/bling/bling_read_pickup.F 43 BLING_READ_PICKUP 
      ioUnit = errorMessageUnit
./pkg/bling/bling_read_pickup.F 93 BLING_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bling/bling_read_pickup.F 98 BLING_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bling/bling_write_pickup.F 42 BLING_WRITE_PICKUP 
      INTEGER ioUnit
./eesupp/src/mds_flush.F 10 MDS_FLUSH 
      SUBROUTINE MDS_FLUSH( ioUnit, myThid )
./eesupp/src/mds_flush.F 22 MDS_FLUSH 
      INTEGER ioUnit
./eesupp/src/mds_flush.F 29 MDS_FLUSH 
      CALL FLUSH( ioUnit )
./eesupp/src/mdsfindunit.F 21 MDSFINDUNIT 
      INTEGER ioUnit
./eesupp/src/mdsfindunit.F 31 MDSFINDUNIT 
      ioUnit=-1
./eesupp/src/mdsfindunit.F 37 MDSFINDUNIT 
       IF ( ioUnit.EQ.-1 ) THEN
./eesupp/src/mdsfindunit.F 56 MDSFINDUNIT 
            ioUnit=ii
./eesupp/src/mdsfindunit.F 63 MDSFINDUNIT 
      IF ( ioUnit.EQ.-1 ) THEN
./eesupp/src/mdsfindunit.F 6 MDSFINDUNIT 
      SUBROUTINE MDSFINDUNIT( ioUnit, myThid )
./pkg/cal/cal_printdate.F 51 CAL_PRINTDATE 
      integer ierr, ioUnit
./pkg/cal/cal_printdate.F 56 CAL_PRINTDATE 
      ioUnit=standardMessageUnit
./pkg/cal/cal_printdate.F 62 CAL_PRINTDATE 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cal/cal_printdate.F 68 CAL_PRINTDATE 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 139 CFC_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 38 CFC_CHECK 
      INTEGER ioUnit
./pkg/cfc/cfc_check.F 45 CFC_CHECK 
      ioUnit = standardMessageUnit
./pkg/cfc/cfc_check.F 47 CFC_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 53 CFC_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 55 CFC_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 58 CFC_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 92 CFC_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 94 CFC_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 97 CFC_CHECK 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/print.F 282 PRINT_LIST_I 
     &                         markEnd, compact, ioUnit )
./eesupp/src/print.F 321 PRINT_LIST_I 
      INTEGER ioUnit
./eesupp/src/print.F 383 PRINT_LIST_I 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 405 PRINT_LIST_I 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 415 PRINT_LIST_L 
     &                         markEnd, compact, ioUnit )
./eesupp/src/print.F 454 PRINT_LIST_L 
      INTEGER ioUnit
./eesupp/src/print.F 516 PRINT_LIST_L 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 538 PRINT_LIST_L 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 548 PRINT_LIST_RL 
     &                          markEnd, compact, ioUnit )
./eesupp/src/print.F 587 PRINT_LIST_RL 
      INTEGER ioUnit
./eesupp/src/print.F 649 PRINT_LIST_RL 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 671 PRINT_LIST_RL 
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./pkg/cheapaml/cheapaml_init_fixed.F 170 CHEAPAML_INIT_FIXED 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_fixed.F 175 CHEAPAML_INIT_FIXED 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_fixed.F 49 CHEAPAML_INIT_FIXED 
      INTEGER iL, ioUnit
./pkg/cheapaml/cheapaml_init_fixed.F 58 CHEAPAML_INIT_FIXED 
      ioUnit = standardMessageUnit
./pkg/cheapaml/cheapaml_init_fixed.F 83 CHEAPAML_INIT_FIXED 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_fixed.F 88 CHEAPAML_INIT_FIXED 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 122 CHEAPAML_INIT_VARIA 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 128 CHEAPAML_INIT_VARIA 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 148 CHEAPAML_INIT_VARIA 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 154 CHEAPAML_INIT_VARIA 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 178 CHEAPAML_INIT_VARIA 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 46 CHEAPAML_INIT_VARIA 
      INTEGER iL, ioUnit
./pkg/cheapaml/cheapaml_init_varia.F 51 CHEAPAML_INIT_VARIA 
      ioUnit = standardMessageUnit
./pkg/cheapaml/cheapaml_init_varia.F 94 CHEAPAML_INIT_VARIA 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 99 CHEAPAML_INIT_VARIA 
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 104 CHEAPAML_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 109 CHEAPAML_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 170 CHEAPAML_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/cheapaml/cheapaml_read_pickup.F 198 CHEAPAML_READ_PICKUP 
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 47 CHEAPAML_READ_PICKUP 
      INTEGER j, nj, ioUnit
./pkg/cheapaml/cheapaml_read_pickup.F 90 CHEAPAML_READ_PICKUP 
        ioUnit = errorMessageUnit
./pkg/cheapaml/cheapaml_read_pickup.F 99 CHEAPAML_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/debug/debug_cs_corner_uv.F 101 DEBUG_CS_CORNER_UV 
        WRITE(ioUnit,'(3A,I3)') 'DEBUG_CS_CORNER_UV: ',
./pkg/debug/debug_cs_corner_uv.F 103 DEBUG_CS_CORNER_UV 
        WRITE(ioUnit,'(2A,I4)') 'DEBUG_CS_CORNER_UV: ',
./pkg/debug/debug_cs_corner_uv.F 105 DEBUG_CS_CORNER_UV 
        WRITE(ioUnit,'(2A)') 'DEBUG_CS_CORNER_UV: ',
./pkg/debug/debug_cs_corner_uv.F 120 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, S:',
./pkg/debug/debug_cs_corner_uv.F 123 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, N:',
./pkg/debug/debug_cs_corner_uv.F 128 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, S:',
./pkg/debug/debug_cs_corner_uv.F 131 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, N:',
./pkg/debug/debug_cs_corner_uv.F 136 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, W:',
./pkg/debug/debug_cs_corner_uv.F 139 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, E:',
./pkg/debug/debug_cs_corner_uv.F 144 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, W:',
./pkg/debug/debug_cs_corner_uv.F 147 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, E:',
./pkg/debug/debug_cs_corner_uv.F 162 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, S:',
./pkg/debug/debug_cs_corner_uv.F 165 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, N:',
./pkg/debug/debug_cs_corner_uv.F 168 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, W:',
./pkg/debug/debug_cs_corner_uv.F 171 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, E:',
./pkg/debug/debug_cs_corner_uv.F 183 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, S:',
./pkg/debug/debug_cs_corner_uv.F 186 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'W edge, N:',
./pkg/debug/debug_cs_corner_uv.F 189 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, W:',
./pkg/debug/debug_cs_corner_uv.F 192 DEBUG_CS_CORNER_UV 
           WRITE(ioUnit,1010) 'DEBUG_CS_CORNER_UV: ', 'S edge, E:',
./pkg/debug/debug_cs_corner_uv.F 199 DEBUG_CS_CORNER_UV 
        WRITE(ioUnit,'(2A)') 'DEBUG_CS_CORNER_UV: ',
./pkg/debug/debug_cs_corner_uv.F 48 DEBUG_CS_CORNER_UV 
      INTEGER k, ioUnit
./pkg/debug/debug_cs_corner_uv.F 98 DEBUG_CS_CORNER_UV 
        WRITE(ioUnit,'(2A)') 'DEBUG_CS_CORNER_UV: ',
./pkg/debug/debug_cs_corner_uv.F 9 DEBUG_CS_CORNER_UV 
     I                 k, ioUnit, bi,bj, myThid )
./pkg/diagnostics/diagnostics_out.F 207 DIAGNOSTICS_OUT 
               WRITE(ioUnit,'(A,I6,3A,I6)')
./pkg/diagnostics/diagnostics_out.F 260 DIAGNOSTICS_OUT 
               WRITE(ioUnit,'(A,I6,7A,I8,2A)')
./pkg/diagnostics/diagnostics_out.F 264 DIAGNOSTICS_OUT 
                WRITE(ioUnit,'(2(3A,I6,A,I8))') '   from diag: ',
./pkg/diagnostics/diagnostics_out.F 267 DIAGNOSTICS_OUT 
                WRITE(ioUnit,'(2(3A,I6,A,I8))') '   from diag: ',
./pkg/diagnostics/diagnostics_out.F 273 DIAGNOSTICS_OUT 
               WRITE(ioUnit,'(A,I6,3A,I8,2A)')
./pkg/diagnostics/diagnostics_out.F 278 DIAGNOSTICS_OUT 
               WRITE(ioUnit,'(3A,I6,2A)')
./pkg/diagnostics/diagnostics_out.F 283 DIAGNOSTICS_OUT 
                 WRITE(ioUnit,'(3A,I6,3A)')
./pkg/diagnostics/diagnostics_out.F 288 DIAGNOSTICS_OUT 
                 WRITE(ioUnit,'(3A,I6,3A)')
./pkg/diagnostics/diagnostics_out.F 75 DIAGNOSTICS_OUT 
      INTEGER ioUnit
./pkg/diagnostics/diagnostics_out.F 92 DIAGNOSTICS_OUT 
      ioUnit= standardMessageUnit
./pkg/diagnostics/diagstats_output.F 120 DIAGSTATS_OUTPUT 
              WRITE(ioUnit,'(A,I6,3A,I4,A,1PE10.3,2A)')
./pkg/diagnostics/diagstats_output.F 124 DIAGSTATS_OUTPUT 
              WRITE(ioUnit,'(A,I6,3A,I4,2(A,1PE10.3))')
./pkg/diagnostics/diagstats_output.F 55 DIAGSTATS_OUTPUT 
      INTEGER ioUnit
./pkg/diagnostics/diagstats_output.F 60 DIAGSTATS_OUTPUT 
      ioUnit= standardMessageUnit
./pkg/diagnostics/diagstats_set_regions.F 100 DIAGSTATS_SET_REGIONS 
         IF (ioUnit.GE.0 ) WRITE(ioUnit,'(A,I3,A)')
./pkg/diagnostics/diagstats_set_regions.F 42 DIAGSTATS_SET_REGIONS 
      INTEGER ioUnit
./pkg/diagnostics/diagstats_set_regions.F 66 DIAGSTATS_SET_REGIONS 
      ioUnit = -1
./pkg/diagnostics/diagstats_set_regions.F 69 DIAGSTATS_SET_REGIONS 
      ioUnit = standardMessageUnit
./pkg/diagnostics/diagstats_set_regions.F 91 DIAGSTATS_SET_REGIONS 
       IF (ioUnit.GE.0 ) WRITE(ioUnit,'(2A)')
./pkg/diagnostics/diagstats_set_regions.F 96 DIAGSTATS_SET_REGIONS 
         IF (ioUnit.GE.0 )  WRITE(ioUnit,'(A,I3)')
./pkg/dic/dic_atmos.F 147 DIC_ATMOS 
       WRITE(ioUnit,*) 'QQ atmos C, total, pCo2',
./pkg/dic/dic_atmos.F 152 DIC_ATMOS 
       WRITE(ioUnit,*) 'QQ total C, current, old, diff',
./pkg/dic/dic_atmos.F 155 DIC_ATMOS 
       WRITE(ioUnit,*) 'QQ ocean C, current, old, diff',
./pkg/dic/dic_atmos.F 157 DIC_ATMOS 
       WRITE(ioUnit,*) 'QQ air-sea flux, addition diff',
./pkg/dic/dic_atmos.F 172 DIC_ATMOS 
          WRITE(ioUnit,*) 'QQ YEAR END'
./pkg/dic/dic_atmos.F 173 DIC_ATMOS 
          WRITE(ioUnit,*) 'year diff: ocean, atmos, total',
./pkg/dic/dic_atmos.F 175 DIC_ATMOS 
          WRITE(ioUnit,*) 'start diff: ocean, atmos, total ',
./pkg/dic/dic_atmos.F 58 DIC_ATMOS 
      INTEGER ioUnit
./pkg/dic/dic_atmos.F 72 DIC_ATMOS 
      ioUnit = standardMessageUnit
./pkg/dic/dic_atmos.F 89 DIC_ATMOS 
        WRITE(ioUnit,*) 'weights',ntim, aWght, bWght, atm_pCO2
./pkg/dic/dic_ini_atmos.F 152 DIC_INI_ATMOS 
        WRITE(ioUnit,*) 'QQ atmos C, total, pCo2',
./pkg/dic/dic_ini_atmos.F 157 DIC_INI_ATMOS 
        WRITE(ioUnit,*) 'QQ total C, current, old, diff',
./pkg/dic/dic_ini_atmos.F 160 DIC_INI_ATMOS 
        WRITE(ioUnit,*) 'QQ ocean C, current, old, diff',
./pkg/dic/dic_ini_atmos.F 162 DIC_INI_ATMOS 
        WRITE(ioUnit,*) 'QQ air-sea flux, addition diff',
./pkg/dic/dic_ini_atmos.F 56 DIC_INI_ATMOS 
      INTEGER ioUnit
./pkg/dic/dic_ini_atmos.F 67 DIC_INI_ATMOS 
      ioUnit = standardMessageUnit
./pkg/dic/dic_ini_atmos.F 94 DIC_INI_ATMOS 
        WRITE(ioUnit,*) 'weights',ntim, aWght, bWght, atm_pCO2
./pkg/dic/dic_read_co2_pickup.F 30 DIC_READ_CO2_PICKUP 
      INTEGER fp, ioUnit
./pkg/dic/dic_read_co2_pickup.F 70 DIC_READ_CO2_PICKUP 
        CALL MDSFINDUNIT( ioUnit, myThid )
./pkg/dic/dic_read_co2_pickup.F 72 DIC_READ_CO2_PICKUP 
        OPEN( ioUnit, file=filNam, status='old',
./pkg/dic/dic_read_co2_pickup.F 74 DIC_READ_CO2_PICKUP 
        READ(ioUnit,rec=1) tmpFld
./pkg/dic/dic_read_pickup.F 33 DIC_READ_PICKUP 
      INTEGER fp, ioUnit
./pkg/dic/dic_read_pickup.F 37 DIC_READ_PICKUP 
      ioUnit = errorMessageUnit
./pkg/dic/dic_read_pickup.F 75 DIC_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/dic/dic_read_pickup.F 80 DIC_READ_PICKUP 
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/dic/dic_write_pickup.F 44 DIC_WRITE_PICKUP 
      INTEGER ioUnit
./pkg/dic/dic_write_pickup.F 62 DIC_WRITE_PICKUP 
          ioUnit = 0
./pkg/dic/dic_write_pickup.F 72 DIC_WRITE_PICKUP 
     I                         fn, prec, ioUnit,
./pkg/ecco/cost_gencost_boxmean.F 130 COST_GENCOST_BOXMEAN 
       ioUnit = 0
./pkg/ecco/cost_gencost_boxmean.F 131 COST_GENCOST_BOXMEAN 
       call MDS_READVEC_LOC(tempfile,cost_iprec,ioUnit,'RL',
./pkg/ecco/cost_gencost_boxmean.F 51 COST_GENCOST_BOXMEAN 
      integer nrecloc,irec,il,ioUnit
./pkg/ecco/cost_gencost_sstv4.F 119 COST_GENCOST_SSTV4 
      ioUnit=standardMessageUnit
./pkg/ecco/cost_gencost_sstv4.F 228 COST_GENCOST_SSTV4 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ecco/cost_gencost_sstv4.F 386 COST_GENCOST_SSTV4 
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ecco/cost_gencost_sstv4.F 84 COST_GENCOST_SSTV4 
      INTEGER ioUnit
./pkg/ecco/ecco_check.F 47 ECCO_CHECK 
      INTEGER igen_etaday, il, k2, ioUnit