Symbol Description Uses
msgBuf I/O Buffer 7703



File Line number Procedure Code
./pkg/ecco/ecco_readparms.F 507 ECCO_READPARMS
        WRITE(msgBuf,'(A)') 'ECCO_READPARMS: opening data.ecco'
./pkg/ecco/ecco_readparms.F 508 ECCO_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_readparms.F 50 ECCO_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ecco/ecco_readparms.F 518 ECCO_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ecco/ecco_readparms.F 520 ECCO_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_readparms.F 530 ECCO_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/ecco/ecco_readparms.F 533 ECCO_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ecco/ecco_readparms.F 534 ECCO_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ecco/ecco_readparms.F 536 ECCO_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ecco/ecco_readparms.F 540 ECCO_READPARMS
       WRITE(msgBuf,'(2A)') 'S/R ECCO_READPARMS: ',
./pkg/ecco/ecco_readparms.F 542 ECCO_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ecco/ecco_readparms.F 543 ECCO_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ecco/ecco_readparms.F 545 ECCO_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ecco/ecco_readparms.F 644 ECCO_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ecco/ecco_readparms.F 646 ECCO_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_readparms.F 675 ECCO_READPARMS
           WRITE(msgBuf,'(A,I3,3A,L5)') 'gencost k_boxmean/horflux=',
./pkg/ecco/ecco_readparms.F 677 ECCO_READPARMS
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_readparms.F 690 ECCO_READPARMS
           WRITE(msgBuf,'(A,i3,3A,L5)') 'gencost k_transp=',
./pkg/ecco/ecco_readparms.F 692 ECCO_READPARMS
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_readparms.F 795 ECCO_READPARMS
          WRITE(msgBuf,'(A,A)') 'm_',gencost_barfile(k)(1:il)
./pkg/ecco/ecco_readparms.F 796 ECCO_READPARMS
          gencost_barfile(k)=msgBuf(1:il+2)
./pkg/ecco/ecco_readparms.F 800 ECCO_READPARMS
          WRITE(msgBuf,'(A,A)') 'm_ustress',gencost_barfile(k)(9:il)
./pkg/ecco/ecco_readparms.F 801 ECCO_READPARMS
          gencost_barfile(k)=msgBuf(1:il+1)
./pkg/ecco/ecco_readparms.F 805 ECCO_READPARMS
          WRITE(msgBuf,'(A,A)') 'm_vstress',gencost_barfile(k)(9:il)
./pkg/ecco/ecco_readparms.F 806 ECCO_READPARMS
          gencost_barfile(k)=msgBuf(1:il+1)
./pkg/ecco/ecco_readparms.F 829 ECCO_READPARMS
            WRITE(msgBuf,'(A,I2,2A)')
./pkg/ecco/ecco_readparms.F 832 ECCO_READPARMS
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_readparms.F 841 ECCO_READPARMS
            WRITE(msgBuf,'(A,I2,2A)')
./pkg/ecco/ecco_readparms.F 844 ECCO_READPARMS
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_readparms.F 852 ECCO_READPARMS
            WRITE(msgBuf,'(A,I2,2A)')
./pkg/ecco/ecco_readparms.F 855 ECCO_READPARMS
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_readparms.F 877 ECCO_READPARMS
              WRITE(msgBuf,'(A,I2,2A)')
./pkg/ecco/ecco_readparms.F 880 ECCO_READPARMS
              CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_readparms.F 904 ECCO_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ecco/ecco_readparms.F 906 ECCO_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exch2/exch2_check_depths.F 110 EXCH2_CHECK_DEPTHS
          WRITE(msgBuf,'(2A,I6,A,2(I4,A))')
./pkg/exch2/exch2_check_depths.F 113 EXCH2_CHECK_DEPTHS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exch2/exch2_check_depths.F 116 EXCH2_CHECK_DEPTHS
           WRITE(msgBuf,'(A,I5,A)') ' N.Edge has', errN,
./pkg/exch2/exch2_check_depths.F 118 EXCH2_CHECK_DEPTHS
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exch2/exch2_check_depths.F 122 EXCH2_CHECK_DEPTHS
           WRITE(msgBuf,'(A,I5,A)') ' S.Edge has', errS,
./pkg/exch2/exch2_check_depths.F 124 EXCH2_CHECK_DEPTHS
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exch2/exch2_check_depths.F 128 EXCH2_CHECK_DEPTHS
           WRITE(msgBuf,'(A,I5,A)') ' E.Edge has', errE,
./pkg/exch2/exch2_check_depths.F 130 EXCH2_CHECK_DEPTHS
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exch2/exch2_check_depths.F 134 EXCH2_CHECK_DEPTHS
           WRITE(msgBuf,'(A,I5,A)') ' W.Edge has', errW,
./pkg/exch2/exch2_check_depths.F 136 EXCH2_CHECK_DEPTHS
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exch2/exch2_check_depths.F 139 EXCH2_CHECK_DEPTHS
          WRITE( msgBuf,'(A)') 'S/R EXCH2_CHECK_DEPTHS: Fatal Error'
./pkg/exch2/exch2_check_depths.F 152 EXCH2_CHECK_DEPTHS
          WRITE( msgBuf,'(2A)') '** WARNING ** EXCH2_CHECK_DEPTHS:',
./pkg/exch2/exch2_check_depths.F 154 EXCH2_CHECK_DEPTHS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exch2/exch2_check_depths.F 156 EXCH2_CHECK_DEPTHS
          WRITE( msgBuf,'(2A)') '** WARNING ** EXCH2_CHECK_DEPTHS:',
./pkg/exch2/exch2_check_depths.F 158 EXCH2_CHECK_DEPTHS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exch2/exch2_check_depths.F 47 EXCH2_CHECK_DEPTHS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_e2setup.F 100 W2_E2SETUP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_e2setup.F 101 W2_E2SETUP
        WRITE(msgBuf,'(2A)') 'Must increase "W2_maxNbTiles"',
./pkg/exch2/w2_e2setup.F 103 W2_E2SETUP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_e2setup.F 110 W2_E2SETUP
         WRITE(msgBuf,'(A,I5,A,I8)')
./pkg/exch2/w2_e2setup.F 113 W2_E2SETUP
         WRITE(msgBuf,'(A,I7,A,I4,A)') 'W2_E2SETUP:', blankList(i),
./pkg/exch2/w2_e2setup.F 115 W2_E2SETUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_e2setup.F 133 W2_E2SETUP
      WRITE(msgBuf,'(A,I8)')
./pkg/exch2/w2_e2setup.F 135 W2_E2SETUP
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_e2setup.F 41 W2_E2SETUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_e2setup.F 71 W2_E2SETUP
           WRITE(msgBuf,'(A,I5,A,2I3,A)')
./pkg/exch2/w2_e2setup.F 74 W2_E2SETUP
           CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_e2setup.F 75 W2_E2SETUP
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exch2/w2_e2setup.F 87 W2_E2SETUP
      WRITE(msgBuf,'(A,I8)')
./pkg/exch2/w2_e2setup.F 89 W2_E2SETUP
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_e2setup.F 90 W2_E2SETUP
      WRITE(msgBuf,'(A,I8)')
./pkg/exch2/w2_e2setup.F 92 W2_E2SETUP
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_e2setup.F 93 W2_E2SETUP
      WRITE(msgBuf,'(A,I8)')
./pkg/exch2/w2_e2setup.F 95 W2_E2SETUP
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_e2setup.F 98 W2_E2SETUP
        WRITE(msgBuf,'(3(A,I7))') 'W2_E2SETUP: Number of Tiles=',
./pkg/exch2/w2_eeboot.F 112 W2_EEBOOT
        WRITE(msgBuf,'(A)') '===  End TOPOLOGY report ==='
./pkg/exch2/w2_eeboot.F 113 W2_EEBOOT
        CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_BOTH, myThid )
./pkg/exch2/w2_eeboot.F 116 W2_EEBOOT
      WRITE(msgBuf,'(A)') '=====       setting W2 TOPOLOGY: Done'
./pkg/exch2/w2_eeboot.F 117 W2_EEBOOT
      CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_eeboot.F 118 W2_EEBOOT
      WRITE(msgBuf,'(A)') ' '
./pkg/exch2/w2_eeboot.F 119 W2_EEBOOT
      CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_eeboot.F 36 W2_EEBOOT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_eeboot.F 82 W2_EEBOOT
      WRITE(msgBuf,'(A)') '===== Start setting W2 TOPOLOGY:'
./pkg/exch2/w2_eeboot.F 83 W2_EEBOOT
      CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_eeboot.F 93 W2_EEBOOT
        WRITE(msgBuf,'(2A)') ' write to log-file: ', fName(1:iLen)
./pkg/exch2/w2_eeboot.F 94 W2_EEBOOT
        CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_map_procs.F 115 W2_MAP_PROCS
         WRITE(msgBuf,'(3(A,I5))')
./pkg/exch2/w2_map_procs.F 118 W2_MAP_PROCS
         CALL PRINT_MESSAGE(msgBuf,
./pkg/exch2/w2_map_procs.F 123 W2_MAP_PROCS
         WRITE(msgBuf,'(3(A,I5))')
./pkg/exch2/w2_map_procs.F 126 W2_MAP_PROCS
         CALL PRINT_MESSAGE(msgBuf,
./pkg/exch2/w2_map_procs.F 137 W2_MAP_PROCS
      WRITE(msgBuf,'(A)') '===== W2 TILE TOPOLOGY ====='
./pkg/exch2/w2_map_procs.F 138 W2_MAP_PROCS
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_BOTH, myThid )
./pkg/exch2/w2_map_procs.F 142 W2_MAP_PROCS
        WRITE(msgBuf,'(A,I5,A,2I4,2A,I3)')
./pkg/exch2/w2_map_procs.F 148 W2_MAP_PROCS
        CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_map_procs.F 154 W2_MAP_PROCS
          WRITE(msgBuf,'(A,I3,A,I5,A,I3,2A,I5,A)')
./pkg/exch2/w2_map_procs.F 158 W2_MAP_PROCS
          CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_map_procs.F 161 W2_MAP_PROCS
          WRITE(msgBuf,'(A,I3,A,I5,A,I3,2A,I5,A)')
./pkg/exch2/w2_map_procs.F 165 W2_MAP_PROCS
          CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_map_procs.F 42 W2_MAP_PROCS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_print_comm_sequence.F 101 W2_PRINT_COMM_SEQUENCE
         CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_print_comm_sequence.F 103 W2_PRINT_COMM_SEQUENCE
         iLen = ILNBLNK(msgBuf)
./pkg/exch2/w2_print_comm_sequence.F 104 W2_PRINT_COMM_SEQUENCE
         WRITE(W2_oUnit,'(A)') msgBuf(1:iLen)
./pkg/exch2/w2_print_comm_sequence.F 106 W2_PRINT_COMM_SEQUENCE
         WRITE(msgBuf,'(4(A,I4),A,I6,A,I4,A)')
./pkg/exch2/w2_print_comm_sequence.F 111 W2_PRINT_COMM_SEQUENCE
         CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_print_comm_sequence.F 113 W2_PRINT_COMM_SEQUENCE
         iLen = ILNBLNK(msgBuf)
./pkg/exch2/w2_print_comm_sequence.F 114 W2_PRINT_COMM_SEQUENCE
         WRITE(W2_oUnit,'(A)') msgBuf(1:iLen)
./pkg/exch2/w2_print_comm_sequence.F 139 W2_PRINT_COMM_SEQUENCE
         WRITE(msgBuf,'(A,I6,A,I4,A,4(A,I4),A,I6,A,I4,A)')
./pkg/exch2/w2_print_comm_sequence.F 145 W2_PRINT_COMM_SEQUENCE
         CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_print_comm_sequence.F 147 W2_PRINT_COMM_SEQUENCE
         iLen = ILNBLNK(msgBuf)
./pkg/exch2/w2_print_comm_sequence.F 148 W2_PRINT_COMM_SEQUENCE
         WRITE(W2_oUnit,'(A)') msgBuf(1:iLen)
./pkg/exch2/w2_print_comm_sequence.F 58 W2_PRINT_COMM_SEQUENCE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_print_comm_sequence.F 96 W2_PRINT_COMM_SEQUENCE
         WRITE(msgBuf,'(A,I6,A,I4,A,4(A,I4))')
./pkg/exch2/w2_print_e2setup.F 153 W2_PRINT_E2SETUP
      WRITE(msgBuf,'(2A)') 'W2_PRINT_E2SETUP:',
./pkg/exch2/w2_print_e2setup.F 155 W2_PRINT_E2SETUP
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_print_e2setup.F 162 W2_PRINT_E2SETUP
      WRITE(msgBuf,'(A,2(A,I8))') ' Global Map (IO):',
./pkg/exch2/w2_print_e2setup.F 164 W2_PRINT_E2SETUP
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_print_e2setup.F 168 W2_PRINT_E2SETUP
      WRITE(msgBuf,'(2A)') 'W2_PRINT_E2SETUP:',
./pkg/exch2/w2_print_e2setup.F 170 W2_PRINT_E2SETUP
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_print_e2setup.F 197 W2_PRINT_E2SETUP
      WRITE(msgBuf,'(2A)') 'W2_PRINT_E2SETUP:',
./pkg/exch2/w2_print_e2setup.F 199 W2_PRINT_E2SETUP
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_print_e2setup.F 223 W2_PRINT_E2SETUP
       WRITE(msgBuf,'(A,I5,A,I3)')
./pkg/exch2/w2_print_e2setup.F 226 W2_PRINT_E2SETUP
       CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_print_e2setup.F 37 W2_PRINT_E2SETUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_print_e2setup.F 54 W2_PRINT_E2SETUP
      WRITE(msgBuf,'(2A)') 'W2_PRINT_E2SETUP:',
./pkg/exch2/w2_print_e2setup.F 56 W2_PRINT_E2SETUP
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_readparms.F 114 W2_READPARMS
        WRITE(msgBuf,'(A)') 'W2_READPARMS: opening data.exch2'
./pkg/exch2/w2_readparms.F 115 W2_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid )
./pkg/exch2/w2_readparms.F 123 W2_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/exch2/w2_readparms.F 125 W2_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid )
./pkg/exch2/w2_readparms.F 133 W2_READPARMS
        WRITE(msgBuf,'(A)') 'W2_READPARMS: file data.exch2 not found'
./pkg/exch2/w2_readparms.F 134 W2_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid )
./pkg/exch2/w2_readparms.F 136 W2_READPARMS
          WRITE(msgBuf,'(2A,I3)') '=> use W2_EXCH2 default:',
./pkg/exch2/w2_readparms.F 139 W2_READPARMS
          WRITE(msgBuf,'(2A,I3)') '=> use W2_EXCH2 default:',
./pkg/exch2/w2_readparms.F 142 W2_READPARMS
          WRITE(msgBuf,'(2A,I3)') '=> use W2_EXCH2 default:',
./pkg/exch2/w2_readparms.F 145 W2_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid )
./pkg/exch2/w2_readparms.F 169 W2_READPARMS
        WRITE(msgBuf,'(2A)') ' W2_READPARMS:',
./pkg/exch2/w2_readparms.F 171 W2_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_readparms.F 172 W2_READPARMS
        WRITE(msgBuf,'(A,2(A,I3))') ' W2_READPARMS:',
./pkg/exch2/w2_readparms.F 174 W2_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_readparms.F 185 W2_READPARMS
        WRITE(msgBuf,'(2A)') ' W2_READPARMS:',
./pkg/exch2/w2_readparms.F 187 W2_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_readparms.F 188 W2_READPARMS
        WRITE(msgBuf,'(A,2(A,I3))') ' W2_READPARMS:',
./pkg/exch2/w2_readparms.F 190 W2_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_readparms.F 197 W2_READPARMS
      WRITE(msgBuf,'(A,L5,A)') 'W2_useE2ioLayOut=', W2_useE2ioLayOut,
./pkg/exch2/w2_readparms.F 199 W2_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid )
./pkg/exch2/w2_readparms.F 200 W2_READPARMS
      WRITE(msgBuf,'(A,I4,A)') 'W2_mapIO        =', W2_mapIO,
./pkg/exch2/w2_readparms.F 202 W2_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid )
./pkg/exch2/w2_readparms.F 203 W2_READPARMS
      WRITE(msgBuf,'(A,I4,A)') 'W2_printMsg     =', W2_printMsg,
./pkg/exch2/w2_readparms.F 205 W2_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT , myThid )
./pkg/exch2/w2_readparms.F 35 W2_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_set_cs6_facets.F 111 W2_SET_CS6_FACETS
          WRITE(msgBuf,'(2A,I5)') 'W2_SET_CS6_FACETS:',
./pkg/exch2/w2_set_cs6_facets.F 113 W2_SET_CS6_FACETS
          CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_cs6_facets.F 115 W2_SET_CS6_FACETS
          WRITE(msgBuf,'(3(A,I4),A,I10,A,I6,A)')
./pkg/exch2/w2_set_cs6_facets.F 117 W2_SET_CS6_FACETS
          CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_cs6_facets.F 118 W2_SET_CS6_FACETS
          WRITE(msgBuf,'(A,I6,A,I10)')
./pkg/exch2/w2_set_cs6_facets.F 120 W2_SET_CS6_FACETS
          CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_cs6_facets.F 121 W2_SET_CS6_FACETS
          WRITE(msgBuf,'(2A,I5)') 'W2_SET_CS6_FACETS:',
./pkg/exch2/w2_set_cs6_facets.F 123 W2_SET_CS6_FACETS
          CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_cs6_facets.F 124 W2_SET_CS6_FACETS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_cs6_facets.F 157 W2_SET_CS6_FACETS
              WRITE(msgBuf,'(A,I3,3A,2(I4,A),I3,3A,I8)')
./pkg/exch2/w2_set_cs6_facets.F 160 W2_SET_CS6_FACETS
              CALL PRINT_MESSAGE(msgBuf,W2_oUnit,SQUEEZE_RIGHT,myThid)
./pkg/exch2/w2_set_cs6_facets.F 170 W2_SET_CS6_FACETS
        WRITE(msgBuf,'(A,I3,A)') ' W2_SET_CS6_FACETS:',
./pkg/exch2/w2_set_cs6_facets.F 172 W2_SET_CS6_FACETS
        CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_cs6_facets.F 173 W2_SET_CS6_FACETS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_cs6_facets.F 179 W2_SET_CS6_FACETS
          CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_cs6_facets.F 180 W2_SET_CS6_FACETS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_cs6_facets.F 38 W2_SET_CS6_FACETS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_set_cs6_facets.F 48 W2_SET_CS6_FACETS
      WRITE(msgBuf,'(2A,I3,A)') 'W2_SET_CS6_FACETS:',
./pkg/exch2/w2_set_cs6_facets.F 50 W2_SET_CS6_FACETS
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_cs6_facets.F 90 W2_SET_CS6_FACETS
         WRITE(msgBuf,'(2A,I5)') 'W2_SET_CS6_FACETS:',
./pkg/exch2/w2_set_cs6_facets.F 92 W2_SET_CS6_FACETS
         CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_cs6_facets.F 93 W2_SET_CS6_FACETS
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 114 W2_SET_F2F_INDEX
           WRITE(msgBuf,'(3A,I3,A,I8,A)') 'Length of connection: ',
./pkg/exch2/w2_set_f2f_index.F 116 W2_SET_F2F_INDEX
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 117 W2_SET_F2F_INDEX
           WRITE(msgBuf,'(3A,I3,A,I8,A)') '  to: ',
./pkg/exch2/w2_set_f2f_index.F 119 W2_SET_F2F_INDEX
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 189 W2_SET_F2F_INDEX
           WRITE(msgBuf,'(2(3A,I3),A)') ' connect ',
./pkg/exch2/w2_set_f2f_index.F 192 W2_SET_F2F_INDEX
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 193 W2_SET_F2F_INDEX
           WRITE(msgBuf,'(A)')
./pkg/exch2/w2_set_f2f_index.F 195 W2_SET_F2F_INDEX
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 208 W2_SET_F2F_INDEX
        WRITE(msgBuf,'(A,I3,A)')
./pkg/exch2/w2_set_f2f_index.F 210 W2_SET_F2F_INDEX
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 249 W2_SET_F2F_INDEX
           WRITE(msgBuf,'(2(3A,I3),A)') ' connect ',
./pkg/exch2/w2_set_f2f_index.F 252 W2_SET_F2F_INDEX
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 253 W2_SET_F2F_INDEX
           WRITE(msgBuf,'(A,4I4,2I8)')
./pkg/exch2/w2_set_f2f_index.F 255 W2_SET_F2F_INDEX
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 262 W2_SET_F2F_INDEX
        WRITE(msgBuf,'(A,I3,A)')
./pkg/exch2/w2_set_f2f_index.F 264 W2_SET_F2F_INDEX
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 35 W2_SET_F2F_INDEX
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_set_f2f_index.F 44 W2_SET_F2F_INDEX
      WRITE(msgBuf,'(2A)') 'W2_SET_F2F_INDEX:',
./pkg/exch2/w2_set_f2f_index.F 46 W2_SET_F2F_INDEX
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_f2f_index.F 58 W2_SET_F2F_INDEX
          WRITE(msgBuf,'(3A,I3,A,F6.2,A)')
./pkg/exch2/w2_set_f2f_index.F 61 W2_SET_F2F_INDEX
          CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_f2f_index.F 62 W2_SET_F2F_INDEX
          CALL PRINT_MESSAGE( msgBuf,errorMessageUnit,SQUEEZE_RIGHT,1 )
./pkg/exch2/w2_set_f2f_index.F 65 W2_SET_F2F_INDEX
          WRITE(msgBuf,'(2A,I3,A,F6.2,A)') edge(i), '.Edge of facet #',
./pkg/exch2/w2_set_f2f_index.F 67 W2_SET_F2F_INDEX
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 74 W2_SET_F2F_INDEX
           WRITE(msgBuf,'(2(2A,I3,A),F5.2,A)')
./pkg/exch2/w2_set_f2f_index.F 77 W2_SET_F2F_INDEX
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 79 W2_SET_F2F_INDEX
           WRITE(msgBuf,'(A,2(2A,I3,A),F5.2,A)') ' but ',
./pkg/exch2/w2_set_f2f_index.F 83 W2_SET_F2F_INDEX
           WRITE(msgBuf,'(A,2(2A,I3,A),F5.2,A)') ' but ',
./pkg/exch2/w2_set_f2f_index.F 87 W2_SET_F2F_INDEX
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_f2f_index.F 94 W2_SET_F2F_INDEX
        WRITE(msgBuf,'(A,I3,A)')
./pkg/exch2/w2_set_f2f_index.F 96 W2_SET_F2F_INDEX
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_gen_facets.F 101 W2_SET_GEN_FACETS
         WRITE(msgBuf,'(A,I2,A,I3,A,I6,A)') 'dimension', i,
./pkg/exch2/w2_set_gen_facets.F 103 W2_SET_GEN_FACETS
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_gen_facets.F 107 W2_SET_GEN_FACETS
        WRITE(msgBuf,'(A,I3,A)') 'W2_SET_GEN_FACETS: found', errCnt,
./pkg/exch2/w2_set_gen_facets.F 109 W2_SET_GEN_FACETS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_gen_facets.F 119 W2_SET_GEN_FACETS
          WRITE(msgBuf,'(3A,I3,A,F6.2,A)')
./pkg/exch2/w2_set_gen_facets.F 122 W2_SET_GEN_FACETS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_gen_facets.F 123 W2_SET_GEN_FACETS
          WRITE(msgBuf,'(A,I3,A)')
./pkg/exch2/w2_set_gen_facets.F 125 W2_SET_GEN_FACETS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_gen_facets.F 130 W2_SET_GEN_FACETS
        WRITE(msgBuf,'(A,I3,A)') 'W2_SET_GEN_FACETS: found', errCnt,
./pkg/exch2/w2_set_gen_facets.F 132 W2_SET_GEN_FACETS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_gen_facets.F 36 W2_SET_GEN_FACETS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_set_gen_facets.F 43 W2_SET_GEN_FACETS
      WRITE(msgBuf,'(2A,I3,A)') 'W2_SET_GEN_FACETS:',
./pkg/exch2/w2_set_gen_facets.F 45 W2_SET_GEN_FACETS
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_gen_facets.F 60 W2_SET_GEN_FACETS
          WRITE(msgBuf,'(A,I3,A,2I6)')
./pkg/exch2/w2_set_gen_facets.F 63 W2_SET_GEN_FACETS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_gen_facets.F 68 W2_SET_GEN_FACETS
        WRITE(msgBuf,'(A)')
./pkg/exch2/w2_set_gen_facets.F 70 W2_SET_GEN_FACETS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_gen_facets.F 73 W2_SET_GEN_FACETS
        WRITE(msgBuf,'(A,I3,A)') 'W2_SET_GEN_FACETS: found', errCnt,
./pkg/exch2/w2_set_gen_facets.F 75 W2_SET_GEN_FACETS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_gen_facets.F 80 W2_SET_GEN_FACETS
      WRITE(msgBuf,'(A,I3,A)')
./pkg/exch2/w2_set_gen_facets.F 83 W2_SET_GEN_FACETS
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_gen_facets.F 90 W2_SET_GEN_FACETS
          WRITE(msgBuf,'(A,I3,A,I5,A)') ' dimsFacets(j=',jj,') =',
./pkg/exch2/w2_set_gen_facets.F 92 W2_SET_GEN_FACETS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_map_cumsum.F 212 W2_SET_MAP_CUMSUM
          WRITE(msgBuf,'(2A,3(I4,A),I2,A)') 'W2_SET_MAP_CUMSUM: ',
./pkg/exch2/w2_set_map_cumsum.F 215 W2_SET_MAP_CUMSUM
          CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_map_cumsum.F 223 W2_SET_MAP_CUMSUM
        WRITE(msgBuf,'(2A,2(I4,A))') 'W2_SET_MAP_CUMSUM: ',
./pkg/exch2/w2_set_map_cumsum.F 225 W2_SET_MAP_CUMSUM
        CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_map_cumsum.F 226 W2_SET_MAP_CUMSUM
        WRITE(msgBuf,'(2A)') '** WARNING ** W2_SET_MAP_CUMSUM: ',
./pkg/exch2/w2_set_map_cumsum.F 228 W2_SET_MAP_CUMSUM
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exch2/w2_set_map_cumsum.F 360 W2_SET_MAP_CUMSUM
      WRITE(msgBuf,'(2A)') 'W2_SET_MAP_CUMSUM: ',
./pkg/exch2/w2_set_map_cumsum.F 362 W2_SET_MAP_CUMSUM
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_map_cumsum.F 365 W2_SET_MAP_CUMSUM
      WRITE(msgBuf,'(2A)') 'W2_SET_MAP_CUMSUM: ',
./pkg/exch2/w2_set_map_cumsum.F 367 W2_SET_MAP_CUMSUM
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_map_cumsum.F 48 W2_SET_MAP_CUMSUM
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_set_map_cumsum.F 52 W2_SET_MAP_CUMSUM
      WRITE(msgBuf,'(2A)') 'W2_SET_MAP_CUMSUM: ',
./pkg/exch2/w2_set_map_cumsum.F 54 W2_SET_MAP_CUMSUM
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_map_tiles.F 101 W2_SET_MAP_TILES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_map_tiles.F 119 W2_SET_MAP_TILES
        WRITE(msgBuf,'(A,2(I5,A))') ' W2_mapIO =', W2_mapIO,
./pkg/exch2/w2_set_map_tiles.F 121 W2_SET_MAP_TILES
        CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_map_tiles.F 149 W2_SET_MAP_TILES
      WRITE(msgBuf,'(A,2(A,I8))') ' Global Map (IO):',
./pkg/exch2/w2_set_map_tiles.F 151 W2_SET_MAP_TILES
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_map_tiles.F 154 W2_SET_MAP_TILES
      WRITE(msgBuf,'(2A)') 'W2_SET_MAP_TILES:',
./pkg/exch2/w2_set_map_tiles.F 156 W2_SET_MAP_TILES
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_map_tiles.F 44 W2_SET_MAP_TILES
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_set_map_tiles.F 54 W2_SET_MAP_TILES
      WRITE(msgBuf,'(2A)') 'W2_SET_MAP_TILES:',
./pkg/exch2/w2_set_map_tiles.F 56 W2_SET_MAP_TILES
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_map_tiles.F 72 W2_SET_MAP_TILES
          WRITE(msgBuf,'(A,I3,2(A,I7))') 'Facet',j,
./pkg/exch2/w2_set_map_tiles.F 74 W2_SET_MAP_TILES
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_map_tiles.F 78 W2_SET_MAP_TILES
          WRITE(msgBuf,'(A,I3,2(A,I7))') 'Facet',j,
./pkg/exch2/w2_set_map_tiles.F 80 W2_SET_MAP_TILES
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_map_tiles.F 89 W2_SET_MAP_TILES
        WRITE(msgBuf,'(A,I3,A)')
./pkg/exch2/w2_set_map_tiles.F 91 W2_SET_MAP_TILES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_map_tiles.F 96 W2_SET_MAP_TILES
        WRITE(msgBuf,'(A,I6,A)')
./pkg/exch2/w2_set_map_tiles.F 98 W2_SET_MAP_TILES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_map_tiles.F 99 W2_SET_MAP_TILES
        WRITE(msgBuf,'(A,I6)')
./pkg/exch2/w2_set_single_facet.F 35 W2_SET_SINGLE_FACET
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_set_single_facet.F 39 W2_SET_SINGLE_FACET
      WRITE(msgBuf,'(2A,I3,A)') 'W2_SET_SINGLE_FACET:',
./pkg/exch2/w2_set_single_facet.F 41 W2_SET_SINGLE_FACET
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_single_facet.F 64 W2_SET_SINGLE_FACET
         WRITE(msgBuf,'(2A,2I5)') 'W2_SET_SINGLE_FACET:',
./pkg/exch2/w2_set_single_facet.F 66 W2_SET_SINGLE_FACET
         CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_single_facet.F 67 W2_SET_SINGLE_FACET
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_single_facet.F 73 W2_SET_SINGLE_FACET
         WRITE(msgBuf,'(2A,I5)') 'W2_SET_SINGLE_FACET:',
./pkg/exch2/w2_set_single_facet.F 75 W2_SET_SINGLE_FACET
         CALL PRINT_MESSAGE( msgBuf, W2_oUnit,SQUEEZE_RIGHT,myThid )
./pkg/exch2/w2_set_single_facet.F 76 W2_SET_SINGLE_FACET
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 252 W2_SET_TILE2TILES
      WRITE(msgBuf,'(A,I5,A,I3)')
./pkg/exch2/w2_set_tile2tiles.F 254 W2_SET_TILE2TILES
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exch2/w2_set_tile2tiles.F 256 W2_SET_TILE2TILES
        WRITE(msgBuf,'(2(A,I4),A)')
./pkg/exch2/w2_set_tile2tiles.F 259 W2_SET_TILE2TILES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 260 W2_SET_TILE2TILES
        WRITE(msgBuf,'(2A)') 'Must increase "W2_maxNeighbours"',
./pkg/exch2/w2_set_tile2tiles.F 262 W2_SET_TILE2TILES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 286 W2_SET_TILE2TILES
            WRITE(msgBuf,'(A,I5,2(A,I3),A,I5)') 'Tile',is,' neighb:',
./pkg/exch2/w2_set_tile2tiles.F 288 W2_SET_TILE2TILES
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 289 W2_SET_TILE2TILES
            WRITE(msgBuf,'(A,I5,5(A,I3))') ' with tile', it, ' :',
./pkg/exch2/w2_set_tile2tiles.F 292 W2_SET_TILE2TILES
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 298 W2_SET_TILE2TILES
            WRITE(msgBuf,'(A,I5,2(A,I3),A,I5)') 'Tile',is,' neighb:',
./pkg/exch2/w2_set_tile2tiles.F 300 W2_SET_TILE2TILES
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 307 W2_SET_TILE2TILES
        WRITE(msgBuf,'(A,I3,A)')
./pkg/exch2/w2_set_tile2tiles.F 309 W2_SET_TILE2TILES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 321 W2_SET_TILE2TILES
          WRITE(msgBuf,'(A,I5,2(A,I3),A)') 'Tile',is,' neighb:',
./pkg/exch2/w2_set_tile2tiles.F 323 W2_SET_TILE2TILES
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 324 W2_SET_TILE2TILES
          WRITE(msgBuf,'(A,I5,5(A,I3))') ' with tile', it, ' :',
./pkg/exch2/w2_set_tile2tiles.F 326 W2_SET_TILE2TILES
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 327 W2_SET_TILE2TILES
          WRITE(msgBuf,'(A,I5,2(A,I3),A)') ' but',it,' neighb:',
./pkg/exch2/w2_set_tile2tiles.F 329 W2_SET_TILE2TILES
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 330 W2_SET_TILE2TILES
          WRITE(msgBuf,'(A,I5,3(A,I3))') ' with tile', ii, ' :',
./pkg/exch2/w2_set_tile2tiles.F 332 W2_SET_TILE2TILES
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 338 W2_SET_TILE2TILES
        WRITE(msgBuf,'(A,I3,A)')
./pkg/exch2/w2_set_tile2tiles.F 340 W2_SET_TILE2TILES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exch2/w2_set_tile2tiles.F 41 W2_SET_TILE2TILES
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exch2/w2_set_tile2tiles.F 55 W2_SET_TILE2TILES
      WRITE(msgBuf,'(2A)') 'W2_SET_TILE2TILES:',
./pkg/exch2/w2_set_tile2tiles.F 57 W2_SET_TILE2TILES
      CALL PRINT_MESSAGE( msgBuf, W2_oUnit, SQUEEZE_RIGHT, myThid )
./pkg/exf/exf_adjoint_snapshots_ad.F 72 ADEXF_ADJOINT_SNAPSHOTS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_check.F 111 EXF_CHECK
        WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 113 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 119 EXF_CHECK
        WRITE(msgBuf,'(2A)') 'EXF_CHECK: useRelativeWind ',
./pkg/exf/exf_check.F 121 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 128 EXF_CHECK
        WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 130 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 137 EXF_CHECK
        WRITE(msgBuf,'(3A)') '** WARNING ** EXF_CHECK: "wspeed" ',
./pkg/exf/exf_check.F 139 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 148 EXF_CHECK
        WRITE(msgBuf,'(3A)') '** WARNING ** EXF_CHECK: "hflux" ',
./pkg/exf/exf_check.F 150 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 154 EXF_CHECK
        WRITE(msgBuf,'(3A)') '** WARNING ** EXF_CHECK: "sflux" ',
./pkg/exf/exf_check.F 156 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 169 EXF_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** EXF_CHECK: "aqh" ',
./pkg/exf/exf_check.F 171 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 177 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 179 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 183 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 185 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 193 EXF_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** EXF_CHECK: "hs" ',
./pkg/exf/exf_check.F 195 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 199 EXF_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** EXF_CHECK: "hl" ',
./pkg/exf/exf_check.F 201 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 207 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 209 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 213 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 215 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 222 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 224 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 231 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 233 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 237 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 239 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 244 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 246 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 250 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 252 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 257 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 259 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 263 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 265 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 273 EXF_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** EXF_CHECK: "swdown" ',
./pkg/exf/exf_check.F 275 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 281 EXF_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** EXF_CHECK: "lwdown" ',
./pkg/exf/exf_check.F 283 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 289 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 291 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 295 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 297 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 304 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 306 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 313 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 315 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 322 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 324 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 331 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 333 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 340 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 342 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 346 EXF_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** EXF_CHECK: "runoftemp" ',
./pkg/exf/exf_check.F 348 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 355 EXF_CHECK
        WRITE(msgBuf,'(3A)') 'EXF_CHECK: Cannot read-in field ',
./pkg/exf/exf_check.F 357 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 361 EXF_CHECK
        WRITE(msgBuf,'(2A)') 'EXF_CHECK: exf salt flux is not',
./pkg/exf/exf_check.F 363 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 373 EXF_CHECK
       WRITE(msgBuf,'(A,A)') 'EXF_CHECK: ZENITHANGLE code ',
./pkg/exf/exf_check.F 375 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 379 EXF_CHECK
       WRITE(msgBuf,'(A,A)') 'EXF_CHECK: unsupported ',
./pkg/exf/exf_check.F 381 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 385 EXF_CHECK
       WRITE(msgBuf,'(A,A)')
./pkg/exf/exf_check.F 388 EXF_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_check.F 392 EXF_CHECK
       WRITE(msgBuf,'(A,A)') 'EXF_CHECK: using diurnal albedo ',
./pkg/exf/exf_check.F 394 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 398 EXF_CHECK
       WRITE(msgBuf,'(3A)') '** WARNING ** EXF_CHECK: ',
./pkg/exf/exf_check.F 401 EXF_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_check.F 406 EXF_CHECK
        WRITE(msgBuf,'(A,A)') 'EXF_CHECK: unsupported option',
./pkg/exf/exf_check.F 408 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 415 EXF_CHECK
       WRITE(msgBuf,'(A,A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 417 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 418 EXF_CHECK
       WRITE(msgBuf,'(A,A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 420 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 421 EXF_CHECK
       WRITE(msgBuf,'(A,A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 423 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 42 EXF_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_check.F 49 EXF_CHECK
      WRITE(msgBuf,'(A)') 'EXF_CHECK: #define ALLOW_EXF'
./pkg/exf/exf_check.F 500 EXF_CHECK
         WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 502 EXF_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 508 EXF_CHECK
         WRITE(msgBuf,'(A,A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 50 EXF_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_check.F 510 EXF_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 511 EXF_CHECK
         WRITE(msgBuf,'(A,A,A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 514 EXF_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 522 EXF_CHECK
        WRITE(msgBuf,'(A,A)')
./pkg/exf/exf_check.F 525 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 532 EXF_CHECK
         WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 534 EXF_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 540 EXF_CHECK
         WRITE(msgBuf,'(A,A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 542 EXF_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 543 EXF_CHECK
         WRITE(msgBuf,'(A,A,A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 546 EXF_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 559 EXF_CHECK
        WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 561 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 565 EXF_CHECK
        WRITE(msgBuf,'(2A)') 'EXF_CHECK: rotateStressOnAgrid ',
./pkg/exf/exf_check.F 567 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 573 EXF_CHECK
        WRITE(msgBuf,'(2A)') 'EXF_CHECK: rotateStressOnAgrid ',
./pkg/exf/exf_check.F 575 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 582 EXF_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** EXF_CHECK: ',
./pkg/exf/exf_check.F 584 EXF_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_check.F 58 EXF_CHECK
       WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 590 EXF_CHECK
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 592 EXF_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 593 EXF_CHECK
      WRITE(msgBuf,'(A,A)')
./pkg/exf/exf_check.F 596 EXF_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 601 EXF_CHECK
      WRITE(msgBuf,'(A,A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 603 EXF_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 608 EXF_CHECK
      WRITE(msgBuf,'(A,A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 60 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 610 EXF_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 616 EXF_CHECK
       WRITE(msgBuf,'(A)') 'EXF_CHECK: climsstTauRelax > 0'
./pkg/exf/exf_check.F 617 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 618 EXF_CHECK
       WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 620 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 624 EXF_CHECK
        WRITE(msgBuf,'(A)') 'EXF_CHECK: climsstTauRelax > 0 but'
./pkg/exf/exf_check.F 625 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 626 EXF_CHECK
        WRITE(msgBuf,'(A)') 'EXF_CHECK: climsstfile is not set'
./pkg/exf/exf_check.F 627 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 634 EXF_CHECK
       WRITE(msgBuf,'(A)') 'EXF_CHECK: climsssTauRelax > 0'
./pkg/exf/exf_check.F 635 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 636 EXF_CHECK
       WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 638 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 642 EXF_CHECK
        WRITE(msgBuf,'(A)') 'EXF_CHECK: climsssTauRelax > 0 but'
./pkg/exf/exf_check.F 643 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 644 EXF_CHECK
        WRITE(msgBuf,'(A)') 'EXF_CHECK: climsssfile is not set'
./pkg/exf/exf_check.F 645 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 653 EXF_CHECK
        WRITE(msgBuf,'(A,I3,A)')
./pkg/exf/exf_check.F 655 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 66 EXF_CHECK
       WRITE(msgBuf,'(A)')
./pkg/exf/exf_check.F 68 EXF_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 712 EXF_CHECK_INTERP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_check.F 717 EXF_CHECK_INTERP
        WRITE(msgBuf,'(3A)') 'EXF_CHECK_INTERP: ',loc_name,
./pkg/exf/exf_check.F 719 EXF_CHECK_INTERP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 725 EXF_CHECK_INTERP
        WRITE(msgBuf,'(3A)') 'EXF_CHECK_INTERP: ',loc_name,
./pkg/exf/exf_check.F 727 EXF_CHECK_INTERP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 731 EXF_CHECK_INTERP
        WRITE(msgBuf,'(3A)') 'EXF_CHECK_INTERP: ',loc_name,
./pkg/exf/exf_check.F 733 EXF_CHECK_INTERP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 737 EXF_CHECK_INTERP
        WRITE(msgBuf,'(6A)') 'EXF_CHECK_INTERP: ',
./pkg/exf/exf_check.F 740 EXF_CHECK_INTERP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 745 EXF_CHECK_INTERP
        WRITE(msgBuf,'(4A,1PE16.8)') 'EXF_CHECK_INTERP: ',
./pkg/exf/exf_check.F 747 EXF_CHECK_INTERP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 748 EXF_CHECK_INTERP
        WRITE(msgBuf,'(4A)') 'EXF_CHECK_INTERP: Fix it ',
./pkg/exf/exf_check.F 74 EXF_CHECK
        WRITE(msgBuf,'(2A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 750 EXF_CHECK_INTERP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 76 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 81 EXF_CHECK
        WRITE(msgBuf,'(2A)') 'EXF_CHECK: The use of ',
./pkg/exf/exf_check.F 83 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 89 EXF_CHECK
        WRITE(msgBuf,'(2A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 91 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_check.F 96 EXF_CHECK
        WRITE(msgBuf,'(2A)') 'EXF_CHECK: ',
./pkg/exf/exf_check.F 98 EXF_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffield_start.F 114 EXF_GETFFIELD_START
         WRITE(msgBuf,'(8A)') 'S/R EXF_GETFFIELD_START: ',
./pkg/exf/exf_getffield_start.F 117 EXF_GETFFIELD_START
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffield_start.F 120 EXF_GETFFIELD_START
         WRITE(msgBuf,'(8A)') 'S/R EXF_GETFFIELD_START: ',
./pkg/exf/exf_getffield_start.F 123 EXF_GETFFIELD_START
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffield_start.F 126 EXF_GETFFIELD_START
        WRITE(msgBuf,'(5A)') '    ',
./pkg/exf/exf_getffield_start.F 129 EXF_GETFFIELD_START
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffield_start.F 134 EXF_GETFFIELD_START
        WRITE(msgBuf,'(6A)') 'S/R EXF_GETFFIELD_START: ',
./pkg/exf/exf_getffield_start.F 137 EXF_GETFFIELD_START
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffield_start.F 139 EXF_GETFFIELD_START
        WRITE(msgBuf,'(3A,F14.2,A)') '    ',
./pkg/exf/exf_getffield_start.F 142 EXF_GETFFIELD_START
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffield_start.F 56 EXF_GETFFIELD_START
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_getffield_start.F 70 EXF_GETFFIELD_START
        WRITE(msgBuf,'(8A)') 'S/R EXF_GETFFIELD_START: ',
./pkg/exf/exf_getffield_start.F 73 EXF_GETFFIELD_START
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffield_start.F 75 EXF_GETFFIELD_START
        WRITE(msgBuf,'(5A)') '    ',
./pkg/exf/exf_getffield_start.F 78 EXF_GETFFIELD_START
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffieldrec.F 125 EXF_GETFFIELDREC
           WRITE(msgBuf,'(4A,1P1E17.10,A)') 'EXF_GetFFieldRec ',
./pkg/exf/exf_getffieldrec.F 127 EXF_GETFFIELDREC
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffieldrec.F 128 EXF_GETFFIELDREC
           WRITE(msgBuf,'(2A,1P1E18.10,A)') 'EXF_GetFFieldRec: ',
./pkg/exf/exf_getffieldrec.F 130 EXF_GETFFIELDREC
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffieldrec.F 237 EXF_GETFFIELDREC
           WRITE(msgBuf,'(3A,I10,A,1P1E17.10)')
./pkg/exf/exf_getffieldrec.F 240 EXF_GETFFIELDREC
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_getffieldrec.F 242 EXF_GETFFIELDREC
           WRITE(msgBuf,'(2(A,1P1E18.10))')
./pkg/exf/exf_getffieldrec.F 245 EXF_GETFFIELDREC
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_getffieldrec.F 247 EXF_GETFFIELDREC
           WRITE(msgBuf,'(3(A,I8))') 'EXF_GetFFieldRec:  intimeP=',
./pkg/exf/exf_getffieldrec.F 249 EXF_GETFFIELDREC
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_getffieldrec.F 251 EXF_GETFFIELDREC
           WRITE(msgBuf,'(2(A,1P1E14.7),A,1P1E16.9)')
./pkg/exf/exf_getffieldrec.F 254 EXF_GETFFIELDREC
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/exf/exf_getffieldrec.F 256 EXF_GETFFIELDREC
           WRITE(msgBuf,'(2A)') 'EXF_GetFFieldRec: ',
./pkg/exf/exf_getffieldrec.F 258 EXF_GETFFIELDREC
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffieldrec.F 259 EXF_GETFFIELDREC
           WRITE(msgBuf,'(2A,1P2E18.10)') 'EXF_GetFFieldRec: ',
./pkg/exf/exf_getffieldrec.F 261 EXF_GETFFIELDREC
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_getffieldrec.F 90 EXF_GETFFIELDREC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_init_fixed.F 38 EXF_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_init_fixed.F 590 EXF_INIT_FIXED
        WRITE(msgBuf,'(A,I3,A)')
./pkg/exf/exf_init_fixed.F 592 EXF_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_init_fld.F 106 EXF_INIT_FLD
           WRITE(msgBuf,'(4A,I3,2A)') 'EXF_INIT_FLD: ',
./pkg/exf/exf_init_fld.F 109 EXF_INIT_FLD
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_init_fld.F 80 EXF_INIT_FLD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_interp.F 107 EXF_INTERP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_interp.F 320 EXF_INTERP
        WRITE(msgBuf,'(3A,I6,A,2L5)')
./pkg/exf/exf_interp.F 323 EXF_INTERP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_interp.F 325 EXF_INTERP
        WRITE(msgBuf,'(2A,3F4.1,A,3F12.6)') ' S.edge (j=-1,0,1) :',
./pkg/exf/exf_interp.F 327 EXF_INTERP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_interp.F 329 EXF_INTERP
        WRITE(msgBuf,'(2A,3F4.1,A,3F12.6)') ' N.edge (j=+0,+1,+2)',
./pkg/exf/exf_interp.F 331 EXF_INTERP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_interp.F 360 EXF_INTERP
            WRITE(msgBuf,'(3A,I6)')
./pkg/exf/exf_interp.F 362 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp.F 363 EXF_INTERP
            WRITE(msgBuf,'(A)')
./pkg/exf/exf_interp.F 365 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp.F 366 EXF_INTERP
            WRITE(msgBuf,'(A,2I8,2I6,A,1P2E14.6)') 'i,j,bi,bj=',
./pkg/exf/exf_interp.F 368 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp.F 369 EXF_INTERP
            WRITE(msgBuf,'(A,I9,A,1P2E14.6)') 'nxIn=', nxIn,
./pkg/exf/exf_interp.F 371 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp.F 372 EXF_INTERP
            WRITE(msgBuf,'(A,I9,A,1P2E14.6)') 'nyIn=', nyIn,
./pkg/exf/exf_interp.F 374 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp.F 420 EXF_INTERP
            WRITE(msgBuf,'(3A,I4,A,I4)')
./pkg/exf/exf_interp.F 423 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp.F 424 EXF_INTERP
            WRITE(msgBuf,'(A)')
./pkg/exf/exf_interp.F 426 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp.F 427 EXF_INTERP
            WRITE(msgBuf,'(A,2I8,2I6,A,1PE16.8)')
./pkg/exf/exf_interp.F 429 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp.F 430 EXF_INTERP
            WRITE(msgBuf,'(A,I8,A,1PE16.8)')
./pkg/exf/exf_interp.F 432 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp.F 433 EXF_INTERP
            WRITE(msgBuf,'(A,I8,A,1PE16.8)')
./pkg/exf/exf_interp.F 435 EXF_INTERP
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_read.F 115 EXF_INTERP_READ
          WRITE(msgBuf,'(A,A)')
./pkg/exf/exf_interp_read.F 117 EXF_INTERP_READ
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_interp_read.F 121 EXF_INTERP_READ
         WRITE(msgBuf,'(2A)')
./pkg/exf/exf_interp_read.F 123 EXF_INTERP_READ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_interp_read.F 125 EXF_INTERP_READ
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_read.F 126 EXF_INTERP_READ
         WRITE(msgBuf,'(A)')
./pkg/exf/exf_interp_read.F 128 EXF_INTERP_READ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_interp_read.F 130 EXF_INTERP_READ
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_read.F 53 EXF_INTERP_READ
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_interp_uv.F 121 EXF_INTERP_UV
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_interp_uv.F 342 EXF_INTERP_UV
        WRITE(msgBuf,'(3A,I6,A,2L5)')
./pkg/exf/exf_interp_uv.F 345 EXF_INTERP_UV
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_interp_uv.F 347 EXF_INTERP_UV
        WRITE(msgBuf,'(2A,3F4.1,A,3F12.6)') ' S.edge (j=-1,0,1) :',
./pkg/exf/exf_interp_uv.F 349 EXF_INTERP_UV
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_interp_uv.F 351 EXF_INTERP_UV
        WRITE(msgBuf,'(2A,3F4.1,A,3F12.6)') ' N.edge (j=+0,+1,+2)',
./pkg/exf/exf_interp_uv.F 353 EXF_INTERP_UV
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_interp_uv.F 386 EXF_INTERP_UV
            WRITE(msgBuf,'(3A,I6)')
./pkg/exf/exf_interp_uv.F 388 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_uv.F 389 EXF_INTERP_UV
            WRITE(msgBuf,'(A)')
./pkg/exf/exf_interp_uv.F 391 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_uv.F 392 EXF_INTERP_UV
            WRITE(msgBuf,'(A,2I8,2I6,A,1P2E14.6)') 'i,j,bi,bj=',
./pkg/exf/exf_interp_uv.F 394 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_uv.F 395 EXF_INTERP_UV
            WRITE(msgBuf,'(A,I9,A,1P2E14.6)') 'nxIn=', nxIn,
./pkg/exf/exf_interp_uv.F 397 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_uv.F 398 EXF_INTERP_UV
            WRITE(msgBuf,'(A,I9,A,1P2E14.6)') 'nyIn=', nyIn,
./pkg/exf/exf_interp_uv.F 400 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_uv.F 446 EXF_INTERP_UV
            WRITE(msgBuf,'(3A,I4,A,I4)')
./pkg/exf/exf_interp_uv.F 449 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_uv.F 450 EXF_INTERP_UV
            WRITE(msgBuf,'(A)')
./pkg/exf/exf_interp_uv.F 452 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_uv.F 453 EXF_INTERP_UV
            WRITE(msgBuf,'(A,2I8,2I6,A,1PE16.8)')
./pkg/exf/exf_interp_uv.F 455 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_uv.F 456 EXF_INTERP_UV
            WRITE(msgBuf,'(A,I8,A,1PE16.8)')
./pkg/exf/exf_interp_uv.F 458 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interp_uv.F 459 EXF_INTERP_UV
            WRITE(msgBuf,'(A,I8,A,1PE16.8)')
./pkg/exf/exf_interp_uv.F 461 EXF_INTERP_UV
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interpolate.F 129 EXF_INTERPOLATE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_interpolate.F 237 EXF_INTERPOLATE
         WRITE(msgBuf,'(3A,I6)')
./pkg/exf/exf_interpolate.F 239 EXF_INTERPOLATE
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_interpolate.F 240 EXF_INTERPOLATE
         WRITE(msgBuf,'(A,I8,A)')
./pkg/exf/exf_interpolate.F 242 EXF_INTERPOLATE
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_monitor.F 101 EXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor.F 247 EXF_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/exf/exf_monitor.F 249 EXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor.F 250 EXF_MONITOR
            WRITE(msgBuf,'(A)') '// End MONITOR EXF statistics'
./pkg/exf/exf_monitor.F 251 EXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor.F 252 EXF_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/exf/exf_monitor.F 254 EXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor.F 52 EXF_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_monitor.F 94 EXF_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/exf/exf_monitor.F 96 EXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor.F 97 EXF_MONITOR
            WRITE(msgBuf,'(A)') '// Begin MONITOR EXF statistics'
./pkg/exf/exf_monitor.F 98 EXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor.F 99 EXF_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/exf/exf_monitor_ad.F 100 ADEXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor_ad.F 206 ADEXF_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/exf/exf_monitor_ad.F 208 ADEXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor_ad.F 209 ADEXF_MONITOR
            WRITE(msgBuf,'(A,I2)')
./pkg/exf/exf_monitor_ad.F 212 ADEXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor_ad.F 213 ADEXF_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/exf/exf_monitor_ad.F 215 ADEXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor_ad.F 57 ADEXF_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_monitor_ad.F 91 ADEXF_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/exf/exf_monitor_ad.F 93 ADEXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor_ad.F 94 ADEXF_MONITOR
            WRITE(msgBuf,'(A,I2)')
./pkg/exf/exf_monitor_ad.F 97 ADEXF_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/exf/exf_monitor_ad.F 98 ADEXF_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/exf/exf_readparms.F 1000 EXF_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_readparms.F 1002 EXF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_readparms.F 1006 EXF_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_readparms.F 1008 EXF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_readparms.F 1015 EXF_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/exf/exf_readparms.F 1017 EXF_READPARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_readparms.F 1041 EXF_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_readparms.F 1043 EXF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_readparms.F 1083 EXF_READPARMS
        WRITE(msgBuf,'(2A)') 'EXF_READPARMS: ',
./pkg/exf/exf_readparms.F 1085 EXF_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_readparms.F 1086 EXF_READPARMS
        WRITE(msgBuf,'(2A)') 'since SST relax. is handled by EXF',
./pkg/exf/exf_readparms.F 1088 EXF_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_readparms.F 1097 EXF_READPARMS
        WRITE(msgBuf,'(2A)') 'EXF_READPARMS: ',
./pkg/exf/exf_readparms.F 1099 EXF_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_readparms.F 1100 EXF_READPARMS
        WRITE(msgBuf,'(2A)') 'since SSS relax. is handled by EXF',
./pkg/exf/exf_readparms.F 1102 EXF_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_readparms.F 75 EXF_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_readparms.F 943 EXF_READPARMS
      WRITE(msgBuf,'(A)') 'EXF_READPARMS: opening data.exf'
./pkg/exf/exf_readparms.F 944 EXF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_readparms.F 952 EXF_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_readparms.F 954 EXF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_readparms.F 995 EXF_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_readparms.F 997 EXF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_fld.F 101 EXF_SET_FLD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_set_fld.F 121 EXF_SET_FLD
           WRITE(msgBuf,'(5A)') 'EXF_SET_FLD: ',
./pkg/exf/exf_set_fld.F 123 EXF_SET_FLD
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_fld.F 139 EXF_SET_FLD
           WRITE(msgBuf,'(4A,1PE16.8,2A)') 'EXF_SET_FLD: ',
./pkg/exf/exf_set_fld.F 142 EXF_SET_FLD
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_set_fld.F 156 EXF_SET_FLD
           WRITE(msgBuf,'(2A,I10,2I7)') 'EXF_SET_FLD: ',
./pkg/exf/exf_set_fld.F 158 EXF_SET_FLD
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_fld.F 160 EXF_SET_FLD
           WRITE(msgBuf,'(2A,2(L2,2X),E16.9)') 'EXF_SET_FLD: ',
./pkg/exf/exf_set_fld.F 162 EXF_SET_FLD
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_fld.F 176 EXF_SET_FLD
              WRITE(msgBuf,'(4A,I10,A,I6)') 'EXF_SET_FLD: ',
./pkg/exf/exf_set_fld.F 179 EXF_SET_FLD
              CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_fld.F 181 EXF_SET_FLD
              WRITE(msgBuf,'(4A)') 'EXF_SET_FLD: ',
./pkg/exf/exf_set_fld.F 183 EXF_SET_FLD
              CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_fld.F 235 EXF_SET_FLD
              WRITE(msgBuf,'(4A,I10,A,I6)') 'EXF_SET_FLD: ',
./pkg/exf/exf_set_fld.F 238 EXF_SET_FLD
              CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_fld.F 240 EXF_SET_FLD
              WRITE(msgBuf,'(4A)') 'EXF_SET_FLD: ',
./pkg/exf/exf_set_fld.F 242 EXF_SET_FLD
              CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 113 EXF_SET_UV
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_set_uv.F 140 EXF_SET_UV
           WRITE(msgBuf,'(6A)') 'EXF_SET_UV: ',
./pkg/exf/exf_set_uv.F 142 EXF_SET_UV
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 144 EXF_SET_UV
           WRITE(msgBuf,'(6A)') 'EXF_SET_UV: ',
./pkg/exf/exf_set_uv.F 146 EXF_SET_UV
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 161 EXF_SET_UV
          WRITE(msgBuf,'(4A,1PE16.8,2A)') 'EXF_SET_UV: ',
./pkg/exf/exf_set_uv.F 164 EXF_SET_UV
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/exf/exf_set_uv.F 177 EXF_SET_UV
           WRITE(msgBuf,'(2A,I10,2I7)') 'EXF_SET_UV:  ',
./pkg/exf/exf_set_uv.F 179 EXF_SET_UV
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 181 EXF_SET_UV
           WRITE(msgBuf,'(2A,2(L2,2X),E16.9)') 'EXF_SET_UV:  ',
./pkg/exf/exf_set_uv.F 183 EXF_SET_UV
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 203 EXF_SET_UV
            WRITE(msgBuf,'(6A,I10)') 'EXF_SET_UV: ',
./pkg/exf/exf_set_uv.F 205 EXF_SET_UV
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 208 EXF_SET_UV
            WRITE(msgBuf,'(2A,I6,3A)') 'EXF_SET_UV:   ',
./pkg/exf/exf_set_uv.F 210 EXF_SET_UV
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 213 EXF_SET_UV
            WRITE(msgBuf,'(2A,I6,3A)') 'EXF_SET_UV:   ',
./pkg/exf/exf_set_uv.F 215 EXF_SET_UV
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 368 EXF_SET_UV
            WRITE(msgBuf,'(6A,I10)') 'EXF_SET_UV: ',
./pkg/exf/exf_set_uv.F 370 EXF_SET_UV
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 373 EXF_SET_UV
            WRITE(msgBuf,'(2A,I6,3A)') 'EXF_SET_UV:   ',
./pkg/exf/exf_set_uv.F 375 EXF_SET_UV
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_set_uv.F 378 EXF_SET_UV
            WRITE(msgBuf,'(2A,I6,3A)') 'EXF_SET_UV:   ',
./pkg/exf/exf_set_uv.F 380 EXF_SET_UV
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 211 EXF_SUMMARY
      WRITE(msgBuf,'(A)') ' EXF main CPP flags:'
./pkg/exf/exf_summary.F 212 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 218 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 220 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 223 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 225 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 230 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 232 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 235 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 237 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 242 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 244 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 247 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 249 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 254 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 256 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 259 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 261 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 266 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 268 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 271 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 273 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 306 EXF_SUMMARY
       WRITE(msgBuf,'(2A,L5)') '    Interp. U & V comp. together:',
./pkg/exf/exf_summary.F 308 EXF_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 377 EXF_SUMMARY
       WRITE(msgBuf,'(2A,L5)') '    Interp. U & V comp. together:',
./pkg/exf/exf_summary.F 379 EXF_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 432 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 434 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 464 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 466 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 491 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 493 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 511 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 513 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 553 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 555 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 576 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 578 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 587 EXF_SUMMARY
       WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 589 EXF_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 591 EXF_SUMMARY
       WRITE(msgBuf,'(3A)') '   >> ', runoftempfile(1:il), ' <<'
./pkg/exf/exf_summary.F 592 EXF_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 597 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 599 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 603 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 605 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 616 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 618 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 632 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 634 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 64 EXF_SUMMARY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_summary.F 715 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 717 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 719 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 721 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 723 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 725 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 72 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 740 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 742 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 74 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 756 EXF_SUMMARY
       WRITE(msgBuf,'(A)') '   climsst relaxation is NOT used'
./pkg/exf/exf_summary.F 757 EXF_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 761 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 763 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 76 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 774 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 776 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 78 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 790 EXF_SUMMARY
       WRITE(msgBuf,'(A)') '   climsss relaxation is NOT used'
./pkg/exf/exf_summary.F 791 EXF_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 795 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 797 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 803 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 805 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 807 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 809 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 80 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 811 EXF_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/exf/exf_summary.F 813 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 82 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 864 EXF_FLD_SUMMARY
      CHARACTER*(MAX_LEN_MBUF) tmpBuf, msgBuf
./pkg/exf/exf_summary.F 877 EXF_FLD_SUMMARY
       WRITE(msgBuf,'(A,F12.0)') tmpBuf(1:jL), fld_start_time
./pkg/exf/exf_summary.F 878 EXF_FLD_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 882 EXF_FLD_SUMMARY
       WRITE(msgBuf,'(A,F12.0)') tmpBuf(1:jL), fld_period
./pkg/exf/exf_summary.F 883 EXF_FLD_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 88 EXF_SUMMARY
      WRITE(msgBuf,'(A)') ' EXF general parameters:'
./pkg/exf/exf_summary.F 893 EXF_FLD_SUMMARY
       WRITE(msgBuf,'(A,F12.0)') tmpBuf(1:jL), fld_repeatCycle
./pkg/exf/exf_summary.F 894 EXF_FLD_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 897 EXF_FLD_SUMMARY
       WRITE(msgBuf,'(3A)') '   ', fld_fullName, ' is read from file:'
./pkg/exf/exf_summary.F 898 EXF_FLD_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 89 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 901 EXF_FLD_SUMMARY
       WRITE(msgBuf,'(3A)') '   >> ', fld_file(1:iL), ' <<'
./pkg/exf/exf_summary.F 902 EXF_FLD_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 91 EXF_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/exf/exf_summary.F 92 EXF_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 940 EXF_PRINT_INTERP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/exf/exf_summary.F 944 EXF_PRINT_INTERP
        WRITE(msgBuf,'(3X,A,A,A)')
./pkg/exf/exf_summary.F 946 EXF_PRINT_INTERP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 949 EXF_PRINT_INTERP
        WRITE(msgBuf,'(3X,A,A,A,I3,A)')
./pkg/exf/exf_summary.F 951 EXF_PRINT_INTERP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 956 EXF_PRINT_INTERP
          WRITE(msgBuf,'(3X,A,F10.5,A,I6,A,F10.7)')
./pkg/exf/exf_summary.F 960 EXF_PRINT_INTERP
          WRITE(msgBuf,'(3X,A,1PE10.3,A,I6,A,1PE10.3)')
./pkg/exf/exf_summary.F 964 EXF_PRINT_INTERP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/exf/exf_summary.F 976 EXF_PRINT_INTERP
          WRITE(msgBuf,'(3X,A,F10.5,A,I6,A,F10.7)')
./pkg/exf/exf_summary.F 980 EXF_PRINT_INTERP
          WRITE(msgBuf,'(3X,A,F10.5,A,I6,A,2F8.5)')
./pkg/exf/exf_summary.F 986 EXF_PRINT_INTERP
          WRITE(msgBuf,'(3X,A,1PE10.3,A,I6,A,1PE10.3)')
./pkg/exf/exf_summary.F 990 EXF_PRINT_INTERP
          WRITE(msgBuf,'(3X,A,1PE10.3,A,I6,A,1P2E10.3)')
./pkg/exf/exf_summary.F 995 EXF_PRINT_INTERP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/fizhi/fizhi_readparms.F 101 FIZHI_READPARMS
       WRITE(msgBuf,'(A,I10)')
./pkg/fizhi/fizhi_readparms.F 103 FIZHI_READPARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/fizhi/fizhi_readparms.F 104 FIZHI_READPARMS
       WRITE(msgBuf,'(A,F12.2)') ' CHANGING END TIME TO',endtime
./pkg/fizhi/fizhi_readparms.F 105 FIZHI_READPARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/fizhi/fizhi_readparms.F 31 FIZHI_READPARMS
      character*(MAX_LEN_MBUF) msgBuf
./pkg/fizhi/fizhi_readparms.F 68 FIZHI_READPARMS
      WRITE(msgBuf,'(A)') ' FIZHI_READPARMS: opening data.fizhi'
./pkg/fizhi/fizhi_readparms.F 69 FIZHI_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/flt/flt_exch2.F 170 FLT_EXCH2
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') ' FLT_EXCH2:',
./pkg/flt/flt_exch2.F 174 FLT_EXCH2
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exch2.F 177 FLT_EXCH2
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') ' FLT_EXCH2:',
./pkg/flt/flt_exch2.F 181 FLT_EXCH2
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exch2.F 307 FLT_EXCH2
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') ' FLT_EXCH2:',
./pkg/flt/flt_exch2.F 311 FLT_EXCH2
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exch2.F 314 FLT_EXCH2
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') ' FLT_EXCH2:',
./pkg/flt/flt_exch2.F 318 FLT_EXCH2
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exch2.F 410 FLT_EXCH2
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') 'FLT_EXCH2:+E',
./pkg/flt/flt_exch2.F 414 FLT_EXCH2
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exch2.F 439 FLT_EXCH2
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') 'FLT_EXCH2:+W',
./pkg/flt/flt_exch2.F 443 FLT_EXCH2
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exch2.F 468 FLT_EXCH2
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') 'FLT_EXCH2:+N',
./pkg/flt/flt_exch2.F 472 FLT_EXCH2
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exch2.F 497 FLT_EXCH2
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') 'FLT_EXCH2:+S',
./pkg/flt/flt_exch2.F 501 FLT_EXCH2
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exch2.F 52 FLT_EXCH2
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/flt/flt_exchg.F 166 FLT_EXCHG
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') ' FLT_EXCHG:',
./pkg/flt/flt_exchg.F 170 FLT_EXCHG
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exchg.F 173 FLT_EXCHG
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') ' FLT_EXCHG:',
./pkg/flt/flt_exchg.F 177 FLT_EXCHG
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exchg.F 255 FLT_EXCHG
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') 'FLT_EXCHG:+E',
./pkg/flt/flt_exchg.F 259 FLT_EXCHG
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exchg.F 284 FLT_EXCHG
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') 'FLT_EXCHG:+W',
./pkg/flt/flt_exchg.F 288 FLT_EXCHG
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exchg.F 409 FLT_EXCHG
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') ' FLT_EXCHG:',
./pkg/flt/flt_exchg.F 413 FLT_EXCHG
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exchg.F 416 FLT_EXCHG
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') ' FLT_EXCHG:',
./pkg/flt/flt_exchg.F 420 FLT_EXCHG
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exchg.F 498 FLT_EXCHG
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') 'FLT_EXCHG:+N',
./pkg/flt/flt_exchg.F 502 FLT_EXCHG
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_exchg.F 51 FLT_EXCHG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/flt/flt_exchg.F 527 FLT_EXCHG
             WRITE(msgBuf,'(2A,2I4,2(A,I8))') 'FLT_EXCHG:+S',
./pkg/flt/flt_exchg.F 531 FLT_EXCHG
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_init_fixed.F 35 FLT_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/flt/flt_init_fixed.F 62 FLT_INIT_FIXED
       WRITE(msgBuf,'(A,2F18.8)')
./pkg/flt/flt_init_fixed.F 64 FLT_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_init_fixed.F 66 FLT_INIT_FIXED
         WRITE(msgBuf,'(A,2F18.8)')
./pkg/flt/flt_init_fixed.F 68 FLT_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_init_fixed.F 75 FLT_INIT_FIXED
        WRITE(msgBuf,'(2A)') 'FLT_INIT_FIXED:',
./pkg/flt/flt_init_fixed.F 77 FLT_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_init_varia.F 106 FLT_INIT_VARIA
        WRITE(msgBuf,'(2A,I3,A)') 'FLT_INIT_VARIA:',
./pkg/flt/flt_init_varia.F 108 FLT_INIT_VARIA
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_init_varia.F 109 FLT_INIT_VARIA
        WRITE(msgBuf,'(2A,I3,A)') 'FLT_INIT_VARIA:',
./pkg/flt/flt_init_varia.F 111 FLT_INIT_VARIA
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_init_varia.F 115 FLT_INIT_VARIA
      WRITE(msgBuf,'(2A)')
./pkg/flt/flt_init_varia.F 117 FLT_INIT_VARIA
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_init_varia.F 135 FLT_INIT_VARIA
        WRITE(msgBuf,'(A,2I4,A,1P2E15.8)')
./pkg/flt/flt_init_varia.F 137 FLT_INIT_VARIA
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_init_varia.F 178 FLT_INIT_VARIA
         WRITE(msgBuf,'(2A)') 'FLT_INIT_VARIA:',
./pkg/flt/flt_init_varia.F 180 FLT_INIT_VARIA
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/flt/flt_init_varia.F 191 FLT_INIT_VARIA
          WRITE(msgBuf,'(A,I4,A,I4)') 'iG,jG=',iG,',',jG
./pkg/flt/flt_init_varia.F 192 FLT_INIT_VARIA
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_init_varia.F 219 FLT_INIT_VARIA
           WRITE(msgBuf,'(A,2I4,A,1P2E15.8)')
./pkg/flt/flt_init_varia.F 221 FLT_INIT_VARIA
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_init_varia.F 267 FLT_INIT_VARIA
           WRITE(msgBuf,'(2A,2I4,2(A,I8))') 'FLT_INIT_VARIA:',
./pkg/flt/flt_init_varia.F 271 FLT_INIT_VARIA
           CALL PRINT_ERROR( msgBuf , myThid)
./pkg/flt/flt_init_varia.F 282 FLT_INIT_VARIA
        WRITE(msgBuf,'(A,2(A,I9))') 'FLT_INIT_VARIA:',
./pkg/flt/flt_init_varia.F 285 FLT_INIT_VARIA
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_init_varia.F 287 FLT_INIT_VARIA
        WRITE(msgBuf,'(A)') ' '
./pkg/flt/flt_init_varia.F 288 FLT_INIT_VARIA
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_init_varia.F 57 FLT_INIT_VARIA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/flt/flt_readparms.F 28 FLT_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/flt/flt_readparms.F 61 FLT_READPARMS
      WRITE(msgBuf,'(A)') ' FLT_READPARMS: opening data.flt'
./pkg/flt/flt_readparms.F 62 FLT_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_readparms.F 71 FLT_READPARMS
      WRITE(msgBuf,'(A)') ' FLT_READPARMS: finished reading data.flt'
./pkg/flt/flt_readparms.F 72 FLT_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_traj.F 124 FLT_TRAJ
                WRITE(msgBuf,'(2A,I8)') '** WARNING ** FLT_TRAJ: ',
./pkg/flt/flt_traj.F 126 FLT_TRAJ
                CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/flt/flt_traj.F 128 FLT_TRAJ
                WRITE(msgBuf,'(A,1P5E20.13)')
./pkg/flt/flt_traj.F 130 FLT_TRAJ
                CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/flt/flt_traj.F 189 FLT_TRAJ
              WRITE(msgBuf,'(A,I4,A)')
./pkg/flt/flt_traj.F 191 FLT_TRAJ
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_traj.F 192 FLT_TRAJ
              WRITE(msgBuf,'(3A,I4,A)')
./pkg/flt/flt_traj.F 194 FLT_TRAJ
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_traj.F 59 FLT_TRAJ
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/flt/flt_traj.F 75 FLT_TRAJ
         WRITE(msgBuf,'(3(A,I4))') ' FLT_TRAJ: fltBufDim=', fltBufDim,
./pkg/flt/flt_traj.F 77 FLT_TRAJ
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_traj.F 78 FLT_TRAJ
         WRITE(msgBuf,'(2A)')     ' FLT_TRAJ: => increase fltBufDim',
./pkg/flt/flt_traj.F 80 FLT_TRAJ
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_up.F 187 FLT_UP
              WRITE(msgBuf,'(A,I4,A)')
./pkg/flt/flt_up.F 189 FLT_UP
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_up.F 190 FLT_UP
              WRITE(msgBuf,'(3A,I4,A)')
./pkg/flt/flt_up.F 192 FLT_UP
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_up.F 56 FLT_UP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/flt/flt_up.F 69 FLT_UP
         WRITE(msgBuf,'(3(A,I4))') ' FLT_UP: fltBufDim=', fltBufDim,
./pkg/flt/flt_up.F 71 FLT_UP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_up.F 72 FLT_UP
         WRITE(msgBuf,'(2A)')     ' FLT_UP: => increase fltBufDim',
./pkg/flt/flt_up.F 74 FLT_UP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/flt/flt_write_pickup.F 109 FLT_WRITE_PICKUP
        WRITE(msgBuf,'(A,F16.2,A)') ' FLT_WRITE_PICKUP:',
./pkg/flt/flt_write_pickup.F 111 FLT_WRITE_PICKUP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/flt/flt_write_pickup.F 42 FLT_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/gchem/gchem_check.F 100 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 106 GCHEM_CHECK
        WRITE(msgBuf,'(A)')
./pkg/gchem/gchem_check.F 108 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 114 GCHEM_CHECK
        WRITE(msgBuf,'(A)')
./pkg/gchem/gchem_check.F 116 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 122 GCHEM_CHECK
        WRITE(msgBuf,'(2A,I5,A)') 'GCHEM_CHECK: ',
./pkg/gchem/gchem_check.F 124 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/gchem/gchem_check.F 125 GCHEM_CHECK
        WRITE(msgBuf,'(2A,I5,A)') 'GCHEM_CHECK: ',
./pkg/gchem/gchem_check.F 128 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 132 GCHEM_CHECK
        WRITE(msgBuf,'(2A,I5,A)') 'GCHEM_CHECK: ',
./pkg/gchem/gchem_check.F 134 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 135 GCHEM_CHECK
        WRITE(msgBuf,'(2A,I5,A)') 'GCHEM_CHECK: ',
./pkg/gchem/gchem_check.F 138 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 143 GCHEM_CHECK
        WRITE(msgBuf,'(A,I3,A)')
./pkg/gchem/gchem_check.F 145 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 170 GCHEM_CHECK
      WRITE(msgBuf,'(2A)') 'GCHEM_CHECK ',
./pkg/gchem/gchem_check.F 172 GCHEM_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gchem/gchem_check.F 174 GCHEM_CHECK
      WRITE(msgBuf,'(2A)') ' '
./pkg/gchem/gchem_check.F 175 GCHEM_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gchem/gchem_check.F 44 GCHEM_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/gchem/gchem_check.F 54 GCHEM_CHECK
      WRITE(msgBuf,'(2A)') 'GCHEM_CHECK ',
./pkg/gchem/gchem_check.F 56 GCHEM_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gchem/gchem_check.F 63 GCHEM_CHECK
        WRITE(msgBuf,'(A)') 'GCHEM_ADD2TR_TENDENCY needed to use CFC'
./pkg/gchem/gchem_check.F 64 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 71 GCHEM_CHECK
        WRITE(msgBuf,'(A)') 'GCHEM_SEPARATE_FORCING needed to use DIC'
./pkg/gchem/gchem_check.F 72 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 76 GCHEM_CHECK
        WRITE(msgBuf,'(A)')
./pkg/gchem/gchem_check.F 78 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 82 GCHEM_CHECK
        WRITE(msgBuf,'(A)')
./pkg/gchem/gchem_check.F 84 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 91 GCHEM_CHECK
        WRITE(msgBuf,'(A)') 'usePTRACERS has to be .TRUE. for GCHEM'
./pkg/gchem/gchem_check.F 92 GCHEM_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_check.F 98 GCHEM_CHECK
        WRITE(msgBuf,'(A)')
./pkg/gchem/gchem_readparms.F 100 GCHEM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gchem/gchem_readparms.F 107 GCHEM_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/gchem/gchem_readparms.F 109 GCHEM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gchem/gchem_readparms.F 122 GCHEM_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/gchem/gchem_readparms.F 125 GCHEM_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_readparms.F 126 GCHEM_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/gchem/gchem_readparms.F 129 GCHEM_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gchem/gchem_readparms.F 37 GCHEM_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/gchem/gchem_readparms.F 99 GCHEM_READPARMS
      WRITE(msgBuf,'(A)') ' GCHEM_READPARMS: opening data.gchem'
./pkg/gchem/gchem_tr_register.F 35 GCHEM_TR_REGISTER
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/gchem/gchem_tr_register.F 42 GCHEM_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') 'GCHEM_TR_REGISTER: ',
./pkg/gchem/gchem_tr_register.F 44 GCHEM_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gchem/gchem_tr_register.F 93 GCHEM_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') 'GCHEM_TR_REGISTER: ',
./pkg/gchem/gchem_tr_register.F 96 GCHEM_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gchem/gchem_tr_register.F 98 GCHEM_TR_REGISTER
      WRITE(msgBuf,'(A)') ' '
./pkg/gchem/gchem_tr_register.F 99 GCHEM_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/generic_advdiff/gad_advection.F 161 GAD_ADVECTION
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/generic_advdiff/gad_advection.F 189 GAD_ADVECTION
           WRITE(msgBuf,'(A,2I3)')
./pkg/generic_advdiff/gad_advection.F 192 GAD_ADVECTION
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_advscheme.F 102 GAD_ADVSCHEME_SET
        WRITE(msgBuf,'(2A,I6,A)') 'GAD_ADVSCHEME_SET: ',
./pkg/generic_advdiff/gad_advscheme.F 104 GAD_ADVSCHEME_SET
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_advscheme.F 105 GAD_ADVSCHEME_SET
        WRITE(msgBuf,'(2A,I4,A)') 'GAD_ADVSCHEME_SET: ',
./pkg/generic_advdiff/gad_advscheme.F 107 GAD_ADVSCHEME_SET
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_advscheme.F 94 GAD_ADVSCHEME_SET
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/generic_advdiff/gad_check.F 107 GAD_CHECK
        WRITE(msgBuf,'(A,2I3,A)') 'GAD_CHECK: Overlap Size OLx,OLy=',
./pkg/generic_advdiff/gad_check.F 109 GAD_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_check.F 110 GAD_CHECK
        WRITE(msgBuf,'(2A)') 'GAD_CHECK: ',
./pkg/generic_advdiff/gad_check.F 112 GAD_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_check.F 113 GAD_CHECK
        WRITE(msgBuf,'(2A,I3,A,3I2,A)') 'GAD_CHECK: ',
./pkg/generic_advdiff/gad_check.F 116 GAD_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_check.F 124 GAD_CHECK
        WRITE(msgBuf,'(A,I3,A)') 'GAD_CHECK: advection scheme OS7MP ',
./pkg/generic_advdiff/gad_check.F 127 GAD_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_check.F 37 GAD_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/generic_advdiff/gad_check.F 43 GAD_CHECK
       WRITE(msgBuf,'(A)') 'GAD_CHECK: #define ALLOW_GENERIC_ADVDIFF'
./pkg/generic_advdiff/gad_check.F 44 GAD_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/generic_advdiff/gad_check.F 56 GAD_CHECK
        WRITE(msgBuf,'(2A)') 'GAD_CHECK: ',
./pkg/generic_advdiff/gad_check.F 58 GAD_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/generic_advdiff/gad_check.F 59 GAD_CHECK
        WRITE(msgBuf,'(2A)') 'GAD_CHECK: ',
./pkg/generic_advdiff/gad_check.F 61 GAD_CHECK
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/generic_advdiff/gad_check.F 71 GAD_CHECK
        WRITE(msgBuf,'(2A)') 'GAD_CHECK: ',
./pkg/generic_advdiff/gad_check.F 73 GAD_CHECK
        WRITE(msgBuf,'(2A)') 'GAD_CHECK: ',
./pkg/generic_advdiff/gad_check.F 75 GAD_CHECK
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/generic_advdiff/gad_check.F 87 GAD_CHECK
           WRITE(msgBuf,'(2A)') '** WARNING ** GAD_CHECK: ',
./pkg/generic_advdiff/gad_check.F 89 GAD_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/generic_advdiff/gad_check.F 91 GAD_CHECK
           WRITE(msgBuf,'(2A)') '** WARNING ** GAD_CHECK: ',
./pkg/generic_advdiff/gad_check.F 93 GAD_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/generic_advdiff/gad_implicit_r.F 347 GAD_IMPLICIT_R
           WRITE(msgBuf,'(4A)') 'GAD_IMPLICIT_R: ',
./pkg/generic_advdiff/gad_implicit_r.F 349 GAD_IMPLICIT_R
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/generic_advdiff/gad_implicit_r.F 351 GAD_IMPLICIT_R
           WRITE(msgBuf,'(4A)') 'GAD_IMPLICIT_R: ',
./pkg/generic_advdiff/gad_implicit_r.F 353 GAD_IMPLICIT_R
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/generic_advdiff/gad_implicit_r.F 99 GAD_IMPLICIT_R
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/generic_advdiff/gad_init_fixed.F 100 GAD_INIT_FIXED
        WRITE(msgBuf,'(2A,I6)') 'GAD_INIT_FIXED: ',
./pkg/generic_advdiff/gad_init_fixed.F 102 GAD_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 107 GAD_INIT_FIXED
        WRITE(msgBuf,'(2A,I6)') 'GAD_INIT_FIXED: ',
./pkg/generic_advdiff/gad_init_fixed.F 109 GAD_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 114 GAD_INIT_FIXED
        WRITE(msgBuf,'(2A,I6)') 'GAD_INIT_FIXED: ',
./pkg/generic_advdiff/gad_init_fixed.F 116 GAD_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 185 GAD_INIT_FIXED
      WRITE(msgBuf,'(A,9I3)')
./pkg/generic_advdiff/gad_init_fixed.F 187 GAD_INIT_FIXED
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/generic_advdiff/gad_init_fixed.F 205 GAD_INIT_FIXED
      WRITE(msgBuf,'(A)') ' '
./pkg/generic_advdiff/gad_init_fixed.F 206 GAD_INIT_FIXED
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/generic_advdiff/gad_init_fixed.F 207 GAD_INIT_FIXED
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/generic_advdiff/gad_init_fixed.F 208 GAD_INIT_FIXED
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/generic_advdiff/gad_init_fixed.F 209 GAD_INIT_FIXED
      WRITE(msgBuf,'(A)')'// GAD parameters :'
./pkg/generic_advdiff/gad_init_fixed.F 210 GAD_INIT_FIXED
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/generic_advdiff/gad_init_fixed.F 211 GAD_INIT_FIXED
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/generic_advdiff/gad_init_fixed.F 212 GAD_INIT_FIXED
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/generic_advdiff/gad_init_fixed.F 257 GAD_INIT_FIXED
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/generic_advdiff/gad_init_fixed.F 258 GAD_INIT_FIXED
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/generic_advdiff/gad_init_fixed.F 35 GAD_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/generic_advdiff/gad_init_fixed.F 65 GAD_INIT_FIXED
        WRITE(msgBuf,'(A)')
./pkg/generic_advdiff/gad_init_fixed.F 67 GAD_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_init_fixed.F 93 GAD_INIT_FIXED
        WRITE(msgBuf,'(2A,I6)') 'GAD_INIT_FIXED: ',
./pkg/generic_advdiff/gad_init_fixed.F 95 GAD_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_read_pickup.F 107 GAD_READ_PICKUP
            WRITE(msgBuf,'(4A)') 'GAD_READ_PICKUP: ',
./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 113 GAD_READ_PICKUP
            WRITE(msgBuf,'(2A)') 'WARNING >> GAD_READ_PICKUP: ',
./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 158 GAD_READ_PICKUP
            WRITE(msgBuf,'(4A)') 'GAD_READ_PICKUP: ',
./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 164 GAD_READ_PICKUP
            WRITE(msgBuf,'(2A)') 'WARNING >> GAD_READ_PICKUP: ',
./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 43 GAD_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/generic_advdiff/gad_som_advect.F 138 GAD_SOM_ADVECT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/generic_advdiff/gad_som_advect.F 200 GAD_SOM_ADVECT
        WRITE(msgBuf,'(2A)') 'S/R GAD_SOM_ADVECT: ',
./pkg/generic_advdiff/gad_som_advect.F 202 GAD_SOM_ADVECT
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_som_advect.F 206 GAD_SOM_ADVECT
        WRITE(msgBuf,'(2A)') 'S/R GAD_SOM_ADVECT: ',
./pkg/generic_advdiff/gad_som_advect.F 208 GAD_SOM_ADVECT
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/generic_advdiff/gad_write_pickup.F 54 GAD_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/generic_advdiff/gad_write_pickup.F 61 GAD_WRITE_PICKUP
        WRITE(msgBuf,'(A)') 'GAD_WRITE_PICKUP: MNC not yet coded',
./pkg/generic_advdiff/gad_write_pickup.F 63 GAD_WRITE_PICKUP
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ggl90/ggl90_check.F 27 GGL90_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ggl90/ggl90_check.F 29 GGL90_CHECK
      WRITE(msgBuf,'(A)') 'GGL90_CHECK: #define ALLOW_GGL90'
./pkg/ggl90/ggl90_check.F 30 GGL90_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_check.F 35 GGL90_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_check.F 37 GGL90_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ggl90/ggl90_check.F 43 GGL90_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_check.F 45 GGL90_CHECK
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_check.F 52 GGL90_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_check.F 54 GGL90_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ggl90/ggl90_check.F 60 GGL90_CHECK
         WRITE(msgBuf,'(2A)')
./pkg/ggl90/ggl90_check.F 63 GGL90_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ggl90/ggl90_check.F 69 GGL90_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_check.F 71 GGL90_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ggl90/ggl90_check.F 76 GGL90_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_check.F 78 GGL90_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ggl90/ggl90_check.F 83 GGL90_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_check.F 85 GGL90_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ggl90/ggl90_check.F 91 GGL90_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_check.F 93 GGL90_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ggl90/ggl90_check.F 97 GGL90_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_check.F 99 GGL90_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ggl90/ggl90_readparms.F 146 GGL90_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 148 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 153 GGL90_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 155 GGL90_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 156 GGL90_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 158 GGL90_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 159 GGL90_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 161 GGL90_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 162 GGL90_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 164 GGL90_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 167 GGL90_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 169 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 174 GGL90_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 176 GGL90_READPARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 181 GGL90_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 183 GGL90_READPARMS
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 184 GGL90_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 186 GGL90_READPARMS
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 187 GGL90_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 189 GGL90_READPARMS
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 190 GGL90_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 192 GGL90_READPARMS
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 195 GGL90_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 197 GGL90_READPARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 208 GGL90_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 210 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 216 GGL90_READPARMS
        WRITE(msgBuf,'(A)') 'OLx/OLy must be greater than 2'
./pkg/ggl90/ggl90_readparms.F 217 GGL90_READPARMS
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 232 GGL90_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 234 GGL90_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 238 GGL90_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 240 GGL90_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 244 GGL90_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 246 GGL90_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 250 GGL90_READPARMS
       WRITE(msgBuf,'(A)') 'GGL90viscMax must be greater than zero'
./pkg/ggl90/ggl90_readparms.F 251 GGL90_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 255 GGL90_READPARMS
       WRITE(msgBuf,'(A)') 'GGL90diffMax must be greater than zero'
./pkg/ggl90/ggl90_readparms.F 256 GGL90_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/ggl90/ggl90_readparms.F 261 GGL90_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 263 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 265 GGL90_READPARMS
      WRITE(msgBuf,'(A)') '// GGL90 configuration'
./pkg/ggl90/ggl90_readparms.F 266 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 268 GGL90_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 270 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 316 GGL90_READPARMS
      WRITE(msgBuf,'(A,A)')'GGL90: GGL90TKEFile = ',GGL90TKEFile(1:iL)
./pkg/ggl90/ggl90_readparms.F 317 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 360 GGL90_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 362 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 364 GGL90_READPARMS
      WRITE(msgBuf,'(A)') '// End of GGL90 config. summary'
./pkg/ggl90/ggl90_readparms.F 365 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 367 GGL90_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ggl90/ggl90_readparms.F 369 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 371 GGL90_READPARMS
      WRITE(msgBuf,'(A)') ' '
./pkg/ggl90/ggl90_readparms.F 372 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ggl90/ggl90_readparms.F 44 GGL90_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ggl90/ggl90_readparms.F 84 GGL90_READPARMS
      WRITE(msgBuf,'(A)') ' GGL90_READPARMS: opening data.ggl90'
./pkg/ggl90/ggl90_readparms.F 85 GGL90_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gmredi/gmredi_calc_eigs.F 184 GMREDI_CALC_EIGS
            WRITE(msgBuf,'(A,x,2(A1,I2),A1,x,A,I4)') 
./pkg/gmredi/gmredi_calc_eigs.F 187 GMREDI_CALC_EIGS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/gmredi/gmredi_calc_eigs.F 190 GMREDI_CALC_EIGS
            WRITE(msgBuf,'(A,x,2(A1,I2),A1,x,A,I4)') 
./pkg/gmredi/gmredi_calc_eigs.F 193 GMREDI_CALC_EIGS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/gmredi/gmredi_calc_eigs.F 96 GMREDI_CALC_EIGS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/gmredi/gmredi_calc_psi_bvp.F 166 GMREDI_CALC_PSI_BVP
        WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_calc_psi_bvp.F 168 GMREDI_CALC_PSI_BVP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_calc_psi_bvp.F 238 GMREDI_CALC_PSI_BVP
        WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_calc_psi_bvp.F 240 GMREDI_CALC_PSI_BVP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_calc_psi_bvp.F 64 GMREDI_CALC_PSI_BVP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/gmredi/gmredi_check.F 126 GMREDI_CHECK
        WRITE(msgBuf,'(A)') 'GM/Redi needs implicitDiffusion=.true.'
./pkg/gmredi/gmredi_check.F 127 GMREDI_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/gmredi/gmredi_check.F 134 GMREDI_CHECK
       WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 136 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 137 GMREDI_CHECK
       WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 139 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 147 GMREDI_CHECK
       WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 149 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 150 GMREDI_CHECK
       WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 152 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 159 GMREDI_CHECK
      WRITE(msgBuf, '(A)')
./pkg/gmredi/gmredi_check.F 161 GMREDI_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 197 GMREDI_CHECK
        WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 199 GMREDI_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 200 GMREDI_CHECK
        WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 202 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 211 GMREDI_CHECK
       WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 213 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 214 GMREDI_CHECK
       WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 216 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 224 GMREDI_CHECK
       WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 226 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 227 GMREDI_CHECK
       WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 229 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 236 GMREDI_CHECK
        WRITE(msgBuf,'(2A)') ' GMREDI_CHECK: ',
./pkg/gmredi/gmredi_check.F 238 GMREDI_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 239 GMREDI_CHECK
        WRITE(msgBuf,'(2A)') ' GMREDI_CHECK: ',
./pkg/gmredi/gmredi_check.F 241 GMREDI_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 247 GMREDI_CHECK
        WRITE(msgBuf,'(2A)') ' GMREDI_CHECK: ',
./pkg/gmredi/gmredi_check.F 249 GMREDI_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 256 GMREDI_CHECK
          WRITE(msgBuf,'(2A)') ' GMREDI_CHECK: ',
./pkg/gmredi/gmredi_check.F 258 GMREDI_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 262 GMREDI_CHECK
          WRITE(msgBuf,'(3A)')
./pkg/gmredi/gmredi_check.F 268 GMREDI_CHECK
       WRITE(msgBuf,'(2A)')
./pkg/gmredi/gmredi_check.F 271 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 276 GMREDI_CHECK
       WRITE(msgBuf,'(A)')
./pkg/gmredi/gmredi_check.F 278 GMREDI_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 289 GMREDI_CHECK
          WRITE(msgBuf,'(2A,I3,A,L5)') ' GMREDI_CHECK:',
./pkg/gmredi/gmredi_check.F 291 GMREDI_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 295 GMREDI_CHECK
          WRITE(msgBuf,'(2A)') ' GMREDI_CHECK:',
./pkg/gmredi/gmredi_check.F 297 GMREDI_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_check.F 314 GMREDI_CHECK
        WRITE(msgBuf,'(A,9I3)')
./pkg/gmredi/gmredi_check.F 316 GMREDI_CHECK
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gmredi/gmredi_check.F 47 GMREDI_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/gmredi/gmredi_check.F 56 GMREDI_CHECK
       WRITE(msgBuf,'(A)') 'GMREDI_CHECK: #define GMREDI'
./pkg/gmredi/gmredi_check.F 57 GMREDI_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gmredi/gmredi_read_pickup.F 103 GMREDI_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> GMREDI_READ_PICKUP: ',
./pkg/gmredi/gmredi_read_pickup.F 105 GMREDI_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/gmredi/gmredi_read_pickup.F 108 GMREDI_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/gmredi/gmredi_read_pickup.F 110 GMREDI_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/gmredi/gmredi_read_pickup.F 119 GMREDI_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'GMREDI_READ_PICKUP: ',
./pkg/gmredi/gmredi_read_pickup.F 121 GMREDI_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_read_pickup.F 212 GMREDI_READ_PICKUP
        WRITE(msgBuf,'(2A,I4)') 'GMREDI_READ_PICKUP: ',
./pkg/gmredi/gmredi_read_pickup.F 214 GMREDI_READ_PICKUP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_read_pickup.F 221 GMREDI_READ_PICKUP
         WRITE(msgBuf,'(4A)') 'GMREDI_READ_PICKUP: ',
./pkg/gmredi/gmredi_read_pickup.F 223 GMREDI_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_read_pickup.F 51 GMREDI_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/gmredi/gmredi_read_pickup.F 77 GMREDI_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'GMREDI_READ_PICKUP: ',
./pkg/gmredi/gmredi_read_pickup.F 79 GMREDI_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_read_pickup.F 80 GMREDI_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'GMREDI_READ_PICKUP: ',
./pkg/gmredi/gmredi_read_pickup.F 82 GMREDI_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_read_pickup.F 92 GMREDI_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'GMREDI_READ_PICKUP: ',
./pkg/gmredi/gmredi_read_pickup.F 95 GMREDI_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_read_pickup.F 96 GMREDI_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'GMREDI_READ_PICKUP: ',
./pkg/gmredi/gmredi_read_pickup.F 99 GMREDI_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/gmredi/gmredi_readparms.F 168 GMREDI_READPARMS
      WRITE(msgBuf,'(A)') ' GM_READPARMS: opening data.gmredi'
./pkg/gmredi/gmredi_readparms.F 169 GMREDI_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gmredi/gmredi_readparms.F 178 GMREDI_READPARMS
      WRITE(msgBuf,'(A)') ' GM_READPARMS: finished reading data.gmredi'
./pkg/gmredi/gmredi_readparms.F 179 GMREDI_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/gmredi/gmredi_readparms.F 39 GMREDI_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/gmredi/gmredi_write_pickup.F 151 GMREDI_WRITE_PICKUP
        WRITE(msgBuf,'(2A,I5,A)') 'GMREDI_WRITE_PICKUP: ',
./pkg/gmredi/gmredi_write_pickup.F 153 GMREDI_WRITE_PICKUP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_write_pickup.F 154 GMREDI_WRITE_PICKUP
        WRITE(msgBuf,'(2A,I5,A)') 'GMREDI_WRITE_PICKUP: ',
./pkg/gmredi/gmredi_write_pickup.F 156 GMREDI_WRITE_PICKUP
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/gmredi/gmredi_write_pickup.F 61 GMREDI_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/grdchk/grdchk_check.F 39 GRDCHK_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/grdchk/grdchk_check.F 43 GRDCHK_CHECK
      WRITE(msgBuf,'(A)') 'GRDCHK_CHECK: grdchk package'
./pkg/grdchk/grdchk_check.F 44 GRDCHK_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/grdchk/grdchk_check.F 48 GRDCHK_CHECK
         WRITE(msgBuf,'(A,I4)')
./pkg/grdchk/grdchk_check.F 51 GRDCHK_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/grdchk/grdchk_main.F 105 GRDCHK_MAIN
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/grdchk/grdchk_main.F 138 GRDCHK_MAIN
      WRITE(msgBuf,'(A)')
./pkg/grdchk/grdchk_main.F 140 GRDCHK_MAIN
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 141 GRDCHK_MAIN
      WRITE(msgBuf,'(A)') '// Gradient-check starts (grdchk_main)'
./pkg/grdchk/grdchk_main.F 142 GRDCHK_MAIN
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 143 GRDCHK_MAIN
      WRITE(msgBuf,'(A)')
./pkg/grdchk/grdchk_main.F 145 GRDCHK_MAIN
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 173 GRDCHK_MAIN
      WRITE(msgBuf,'(A,1PE22.14)')
./pkg/grdchk/grdchk_main.F 175 GRDCHK_MAIN
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 224 GRDCHK_MAIN
          WRITE(msgBuf,'(A,I4,A)')
./pkg/grdchk/grdchk_main.F 227 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 252 GRDCHK_MAIN
          WRITE(msgBuf,'(A,3I5,A,2I4,A,I3,A,I4)')
./pkg/grdchk/grdchk_main.F 256 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 345 GRDCHK_MAIN
          WRITE(msgBuf,'(A,1PE22.14)')
./pkg/grdchk/grdchk_main.F 347 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 384 GRDCHK_MAIN
            WRITE(msgBuf,'(A,1PE22.14)')
./pkg/grdchk/grdchk_main.F 386 GRDCHK_MAIN
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 473 GRDCHK_MAIN
          WRITE(msgBuf,'(A30,1PE22.14)')
./pkg/grdchk/grdchk_main.F 475 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 476 GRDCHK_MAIN
          WRITE(msgBuf,'(A30,1PE22.14)')
./pkg/grdchk/grdchk_main.F 478 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 479 GRDCHK_MAIN
          WRITE(msgBuf,'(A30,1PE22.14)')
./pkg/grdchk/grdchk_main.F 481 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 483 GRDCHK_MAIN
          WRITE(msgBuf,'(A30,1PE22.14)')
./pkg/grdchk/grdchk_main.F 485 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 486 GRDCHK_MAIN
          WRITE(msgBuf,'(A30,1PE22.14)')
./pkg/grdchk/grdchk_main.F 488 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 489 GRDCHK_MAIN
          WRITE(msgBuf,'(A30,1PE22.14)')
./pkg/grdchk/grdchk_main.F 491 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_main.F 494 GRDCHK_MAIN
          WRITE(msgBuf,'(A,I4,A,I3,A)')
./pkg/grdchk/grdchk_main.F 497 GRDCHK_MAIN
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/grdchk/grdchk_readparms.F 124 GRDCHK_READPARMS
        WRITE(msgBuf,'(A)') 'GRDCHK_READPARMS: opening data.grdchk'
./pkg/grdchk/grdchk_readparms.F 125 GRDCHK_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/grdchk/grdchk_readparms.F 135 GRDCHK_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/grdchk/grdchk_readparms.F 137 GRDCHK_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/grdchk/grdchk_readparms.F 147 GRDCHK_READPARMS
           WRITE(msgBuf,'(A)') 'i/j GloPos must be <= sNx/y'
./pkg/grdchk/grdchk_readparms.F 148 GRDCHK_READPARMS
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/grdchk/grdchk_readparms.F 152 GRDCHK_READPARMS
           WRITE(msgBuf,'(A)') 'i/j GloTile must be <= nSx*nPx/y'
./pkg/grdchk/grdchk_readparms.F 153 GRDCHK_READPARMS
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/grdchk/grdchk_readparms.F 157 GRDCHK_READPARMS
           WRITE(msgBuf,'(2A)') 'S/R GRDCHK_READPARMS: ',
./pkg/grdchk/grdchk_readparms.F 159 GRDCHK_READPARMS
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/icefront/icefront_check.F 27 ICEFRONT_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/icefront/icefront_check.F 31 ICEFRONT_CHECK
      WRITE(msgBuf,'(A)') 'ICEFRONT_CHECK: #define ALLOW_ICEFRONT'
./pkg/icefront/icefront_check.F 32 ICEFRONT_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/icefront/icefront_check.F 37 ICEFRONT_CHECK
         WRITE(msgBuf,'(A)')
./pkg/icefront/icefront_check.F 39 ICEFRONT_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/icefront/icefront_init_fixed.F 43 ICEFRONT_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/icefront/icefront_init_fixed.F 59 ICEFRONT_INIT_FIXED
        WRITE(msgBuf,'(A,I3,A)')
./pkg/icefront/icefront_init_fixed.F 61 ICEFRONT_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/icefront/icefront_readparms.F 115 ICEFRONT_READPARMS
      WRITE(msgBuf,'(A)') ' ICEFRONT_READPARMS: opening data.icefront'
./pkg/icefront/icefront_readparms.F 116 ICEFRONT_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/icefront/icefront_readparms.F 123 ICEFRONT_READPARMS
      WRITE(msgBuf,'(A)') ' ICEFRONT_READPARMS: reading ICEFRONT_PARM01'
./pkg/icefront/icefront_readparms.F 124 ICEFRONT_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/icefront/icefront_readparms.F 130 ICEFRONT_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/icefront/icefront_readparms.F 132 ICEFRONT_READPARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/icefront/icefront_readparms.F 138 ICEFRONT_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/icefront/icefront_readparms.F 140 ICEFRONT_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/icefront/icefront_readparms.F 38 ICEFRONT_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/kl10/kl10_check.F 27 KL10_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/kl10/kl10_check.F 29 KL10_CHECK
      WRITE(msgBuf,'(A)') 'KL10_CHECK: #define ALLOW_KL10'
./pkg/kl10/kl10_check.F 30 KL10_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/kl10/kl10_check.F 35 KL10_CHECK
         WRITE(msgBuf,'(A)')
./pkg/kl10/kl10_check.F 37 KL10_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/kl10/kl10_check.F 44 KL10_CHECK
         WRITE(msgBuf,'(A)') 'Some form of convection has been enabled'
./pkg/kl10/kl10_check.F 45 KL10_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/kl10/kl10_check.F 60 KL10_CHECK
         WRITE(msgBuf,'(A)')
./pkg/kl10/kl10_check.F 62 KL10_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/kl10/kl10_check.F 66 KL10_CHECK
         WRITE(msgBuf,'(A)')
./pkg/kl10/kl10_check.F 68 KL10_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/kl10/kl10_readparms.F 35 KL10_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/kl10/kl10_readparms.F 68 KL10_READPARMS
      WRITE(msgBuf,'(A)') ' KL10_READPARMS: opening data.kl10'
./pkg/kl10/kl10_readparms.F 69 KL10_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/kl10/kl10_readparms.F 76 KL10_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/kl10/kl10_readparms.F 78 KL10_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/kl10/kl10_readparms.F 94 KL10_READPARMS
       WRITE(msgBuf,'(A)') 'KLviscMax must be greater than zero'
./pkg/kl10/kl10_readparms.F 95 KL10_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./model/src/calc_3d_diffusivity.F 159 CALC_3D_DIFFUSIVITY
        WRITE(msgBuf,'(A,I4)')
./model/src/calc_3d_diffusivity.F 161 CALC_3D_DIFFUSIVITY
        CALL PRINT_ERROR(msgBuf, myThid)
./model/src/calc_3d_diffusivity.F 190 CALC_3D_DIFFUSIVITY
        WRITE(msgBuf,'(A,I4)')
./model/src/calc_3d_diffusivity.F 192 CALC_3D_DIFFUSIVITY
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/calc_3d_diffusivity.F 72 CALC_3D_DIFFUSIVITY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/kpp/kpp_check.F 132 KPP_CHECK
         WRITE(msgBuf,'(A)') 'Some form of convection has been enabled'
./pkg/kpp/kpp_check.F 133 KPP_CHECK
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/kpp/kpp_check.F 139 KPP_CHECK
         WRITE(msgBuf,'(A)') 'KPP needs implicitDiffusion to be enabled'
./pkg/kpp/kpp_check.F 140 KPP_CHECK
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/kpp/kpp_check.F 144 KPP_CHECK
         WRITE(msgBuf,'(A)') 'KPP needs implicitViscosity to be enabled'
./pkg/kpp/kpp_check.F 145 KPP_CHECK
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/kpp/kpp_check.F 151 KPP_CHECK
      WRITE(msgBuf,'(A)') 'KPP needs CPP flag SHORTWAVE_HEATING enabled'
./pkg/kpp/kpp_check.F 152 KPP_CHECK
      CALL PRINT_ERROR( msgBuf , myThid )
./pkg/kpp/kpp_check.F 172 KPP_CHECK
       WRITE(msgBuf,'(A)') 'KPP horizontal smoothing requires OLx=OLy=4'
./pkg/kpp/kpp_check.F 173 KPP_CHECK
       CALL PRINT_ERROR( msgBuf , myThid )
./pkg/kpp/kpp_check.F 181 KPP_CHECK
       WRITE(msgBuf,'(A,A)') 'KPPuseDoubleDiff=.TRUE. requires ',
./pkg/kpp/kpp_check.F 183 KPP_CHECK
       CALL PRINT_ERROR( msgBuf , myThid )
./pkg/kpp/kpp_check.F 188 KPP_CHECK
      WRITE(msgBuf,'(A)') ' '
./pkg/kpp/kpp_check.F 189 KPP_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/kpp/kpp_check.F 28 KPP_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/kpp/kpp_check.F 32 KPP_CHECK
      WRITE(msgBuf,'(A)') 'KPP_CHECK: #define ALLOW_KPP'
./pkg/kpp/kpp_check.F 33 KPP_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/kpp/kpp_readparms.F 160 KPP_READPARMS
      WRITE(msgBuf,'(A)') ' KPP_READPARMS ; starts to read KPP_PARM01'
./pkg/kpp/kpp_readparms.F 161 KPP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/kpp/kpp_readparms.F 170 KPP_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/kpp/kpp_readparms.F 172 KPP_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/kpp/kpp_readparms.F 173 KPP_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/kpp/kpp_readparms.F 175 KPP_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/kpp/kpp_readparms.F 178 KPP_READPARMS
       WRITE(msgBuf,'(A)') ' KPP_READPARMS ; read KPP_PARM01 : OK'
./pkg/kpp/kpp_readparms.F 179 KPP_READPARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/kpp/kpp_readparms.F 189 KPP_READPARMS
      WRITE(msgBuf,'(A)') ' KPP_READPARMS: finished reading data.kpp'
./pkg/kpp/kpp_readparms.F 190 KPP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/kpp/kpp_readparms.F 196 KPP_READPARMS
        WRITE(msgBuf,'(2A)') 'S/R KPP_READPARMS: "KPPmixingMaps"',
./pkg/kpp/kpp_readparms.F 198 KPP_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/kpp/kpp_readparms.F 202 KPP_READPARMS
        WRITE(msgBuf,'(2A)') 'S/R KPP_READPARMS: "num_v_smooth_BV"',
./pkg/kpp/kpp_readparms.F 204 KPP_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/kpp/kpp_readparms.F 208 KPP_READPARMS
        WRITE(msgBuf,'(2A)') 'S/R KPP_READPARMS: "num_z_smooth_sh"',
./pkg/kpp/kpp_readparms.F 210 KPP_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/kpp/kpp_readparms.F 214 KPP_READPARMS
        WRITE(msgBuf,'(2A)') 'S/R KPP_READPARMS: "num_m_smooth_sh"',
./pkg/kpp/kpp_readparms.F 216 KPP_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/kpp/kpp_readparms.F 220 KPP_READPARMS
       WRITE(msgBuf,'(2A)') 'S/R KPP_READPARMS: ',
./pkg/kpp/kpp_readparms.F 222 KPP_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/kpp/kpp_readparms.F 223 KPP_READPARMS
       WRITE(msgBuf,'(I4,A)') nRetired,
./pkg/kpp/kpp_readparms.F 225 KPP_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/kpp/kpp_readparms.F 31 KPP_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/kpp/kpp_readparms.F 72 KPP_READPARMS
      WRITE(msgBuf,'(A)') ' KPP_READPARMS: opening data.kpp'
./pkg/kpp/kpp_readparms.F 73 KPP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/land/land_check.F 103 LAND_CHECK
       WRITE(msgBuf,'(A,A)') 'land_snow_iniFile= ',
./pkg/land/land_check.F 105 LAND_CHECK
       CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 106 LAND_CHECK
       WRITE(msgBuf,'(16X,A)') land_grW_iniFile(1:iL)
./pkg/land/land_check.F 107 LAND_CHECK
       CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 108 LAND_CHECK
       msgBuf='    ;'
./pkg/land/land_check.F 109 LAND_CHECK
       CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 181 LAND_CHECK
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/land/land_check.F 182 LAND_CHECK
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 189 LAND_CHECK
        WRITE(msgBuf,'(A)')
./pkg/land/land_check.F 191 LAND_CHECK
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/land/land_check.F 192 LAND_CHECK
        WRITE(msgBuf,'(A)')
./pkg/land/land_check.F 194 LAND_CHECK
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/land/land_check.F 199 LAND_CHECK
        WRITE(msgBuf,'(2A,I3)') 'LAND_CHECK: ',
./pkg/land/land_check.F 201 LAND_CHECK
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/land/land_check.F 202 LAND_CHECK
        WRITE(msgBuf,'(A)')
./pkg/land/land_check.F 204 LAND_CHECK
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/land/land_check.F 211 LAND_CHECK
        WRITE(msgBuf,'(2A)') 'LAND_CHECK:',
./pkg/land/land_check.F 213 LAND_CHECK
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/land/land_check.F 214 LAND_CHECK
        WRITE(msgBuf,'(2A)') 'Re-compile setting: ',
./pkg/land/land_check.F 216 LAND_CHECK
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/land/land_check.F 224 LAND_CHECK
        WRITE(msgBuf,'(2A)') 'LAND_CHECK:',
./pkg/land/land_check.F 226 LAND_CHECK
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/land/land_check.F 227 LAND_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/land/land_check.F 229 LAND_CHECK
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/land/land_check.F 45 LAND_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/land/land_check.F 54 LAND_CHECK
      WRITE(msgBuf,'(A)') 'LAND_CHECK: #define ALLOW_LAND'
./pkg/land/land_check.F 55 LAND_CHECK
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 58 LAND_CHECK
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/land/land_check.F 59 LAND_CHECK
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 60 LAND_CHECK
      WRITE(msgBuf,'(A)') '// Land package parameters :'
./pkg/land/land_check.F 61 LAND_CHECK
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 62 LAND_CHECK
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/land/land_check.F 63 LAND_CHECK
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 83 LAND_CHECK
       WRITE(msgBuf,'(A,A)') 'land_grT_iniFile = ',
./pkg/land/land_check.F 85 LAND_CHECK
       CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 86 LAND_CHECK
       WRITE(msgBuf,'(16X,A)') land_grT_iniFile(1:iL)
./pkg/land/land_check.F 87 LAND_CHECK
       CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 88 LAND_CHECK
       msgBuf='    ;'
./pkg/land/land_check.F 89 LAND_CHECK
       CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 93 LAND_CHECK
       WRITE(msgBuf,'(A,A)') 'land_grW_iniFile = ',
./pkg/land/land_check.F 95 LAND_CHECK
       CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 96 LAND_CHECK
       WRITE(msgBuf,'(16X,A)') land_grW_iniFile(1:iL)
./pkg/land/land_check.F 97 LAND_CHECK
       CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_check.F 98 LAND_CHECK
       msgBuf='    ;'
./pkg/land/land_check.F 99 LAND_CHECK
       CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/land/land_impl_temp.F 194 LAND_IMPL_TEMP
             WRITE(msgBuf,'(A,2I4,2I3,I10)')
./pkg/land/land_impl_temp.F 197 LAND_IMPL_TEMP
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/land/land_impl_temp.F 199 LAND_IMPL_TEMP
             WRITE(msgBuf,'(A,1P4E12.4)')
./pkg/land/land_impl_temp.F 203 LAND_IMPL_TEMP
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/land/land_impl_temp.F 205 LAND_IMPL_TEMP
             WRITE(msgBuf,'(A,1P4E12.4)')
./pkg/land/land_impl_temp.F 208 LAND_IMPL_TEMP
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/land/land_impl_temp.F 210 LAND_IMPL_TEMP
             WRITE(msgBuf,'(A,1P4E14.6)')
./pkg/land/land_impl_temp.F 212 LAND_IMPL_TEMP
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/land/land_impl_temp.F 247 LAND_IMPL_TEMP
             WRITE(msgBuf,'(A,2I4,2I3,I10)')
./pkg/land/land_impl_temp.F 250 LAND_IMPL_TEMP
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/land/land_impl_temp.F 252 LAND_IMPL_TEMP
             WRITE(msgBuf,'(A,4F11.6)')
./pkg/land/land_impl_temp.F 256 LAND_IMPL_TEMP
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/land/land_impl_temp.F 258 LAND_IMPL_TEMP
             WRITE(msgBuf,'(A,4F12.7)')
./pkg/land/land_impl_temp.F 261 LAND_IMPL_TEMP
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/land/land_impl_temp.F 263 LAND_IMPL_TEMP
             WRITE(msgBuf,'(A,1P4E14.6)')
./pkg/land/land_impl_temp.F 265 LAND_IMPL_TEMP
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/land/land_impl_temp.F 267 LAND_IMPL_TEMP
             WRITE(msgBuf,'(A)')  
./pkg/land/land_impl_temp.F 269 LAND_IMPL_TEMP
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/land/land_impl_temp.F 91 LAND_IMPL_TEMP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/land/land_monitor.F 111 LAND_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/land/land_monitor.F 113 LAND_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/land/land_monitor.F 114 LAND_MONITOR
            WRITE(msgBuf,'(A)') '// Begin MONITOR Land statistics'
./pkg/land/land_monitor.F 115 LAND_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/land/land_monitor.F 116 LAND_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/land/land_monitor.F 118 LAND_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/land/land_monitor.F 158 LAND_MONITOR
          WRITE(msgBuf,'(A,1PE16.9,A,0P9F7.2)') '%MON LAND : Area=',
./pkg/land/land_monitor.F 160 LAND_MONITOR
          CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/land/land_monitor.F 161 LAND_MONITOR
          WRITE(msgBuf,'(A,1P9E16.9)') '%MON LAND : LatA=',
./pkg/land/land_monitor.F 163 LAND_MONITOR
          CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/land/land_monitor.F 304 LAND_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/land/land_monitor.F 306 LAND_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/land/land_monitor.F 307 LAND_MONITOR
            WRITE(msgBuf,'(A)') '// End MONITOR Land statistics'
./pkg/land/land_monitor.F 308 LAND_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/land/land_monitor.F 309 LAND_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/land/land_monitor.F 311 LAND_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/land/land_monitor.F 66 LAND_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/land/land_output.F 270 LAND_OUTPUT
       WRITE(msgBuf,'(A,I10)')
./pkg/land/land_output.F 272 LAND_OUTPUT
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/land/land_output.F 274 LAND_OUTPUT
       WRITE(msgBuf,'(A)') ' '
./pkg/land/land_output.F 275 LAND_OUTPUT
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/land/land_output.F 53 LAND_OUTPUT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/land/land_readparms.F 168 LAND_READPARMS
      WRITE(msgBuf,'(A)') ' LAND_READPARMS: opening data.land'
./pkg/land/land_readparms.F 169 LAND_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/land/land_readparms.F 183 LAND_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/land/land_readparms.F 185 LAND_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/land/land_readparms.F 42 LAND_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/layers/layers_check.F 102 LAYERS_CHECK
          WRITE(msgBuf,'(2A,I3,A,I9)') 'LAYERS_CHECK: ',
./pkg/layers/layers_check.F 104 LAYERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_check.F 112 LAYERS_CHECK
        WRITE(msgBuf,'(A,I3,A)')
./pkg/layers/layers_check.F 114 LAYERS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_check.F 118 LAYERS_CHECK
       WRITE(msgBuf,'(A)') 'LAYERS_CHECK: done'
./pkg/layers/layers_check.F 119 LAYERS_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/layers/layers_check.F 25 LAYERS_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/layers/layers_check.F 34 LAYERS_CHECK
       WRITE(msgBuf,'(A)') 'LAYERS_CHECK: #define LAYERS'
./pkg/layers/layers_check.F 35 LAYERS_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/layers/layers_check.F 79 LAYERS_CHECK
          WRITE(msgBuf,'(A,I2,A,I4)') 'LAYERS_CHECK(iLa=', iLa,
./pkg/layers/layers_check.F 81 LAYERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_check.F 92 LAYERS_CHECK
          WRITE(msgBuf,'(A,I2,A)') 'LAYERS_CHECK(iLa=', iLa,
./pkg/layers/layers_check.F 94 LAYERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_check.F 95 LAYERS_CHECK
          WRITE(msgBuf,'(A,I2,A)') 'LAYERS_CHECK(iLa=', iLa,
./pkg/layers/layers_check.F 97 LAYERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_fluxcalc.F 118 LAYERS_FLUXCALC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/layers/layers_fluxcalc.F 200 LAYERS_FLUXCALC
           WRITE(msgBuf,'(2A,I3,A,I3,A,1E14.6)')
./pkg/layers/layers_fluxcalc.F 203 LAYERS_FLUXCALC
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_fluxcalc.F 280 LAYERS_FLUXCALC
           WRITE(msgBuf,'(2A,I3,A,I3,A,1E14.6)')
./pkg/layers/layers_fluxcalc.F 283 LAYERS_FLUXCALC
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_fluxcalc.F 460 LAYERS_DIAPYCNAL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/layers/layers_fluxcalc.F 573 LAYERS_DIAPYCNAL
           WRITE(msgBuf,'(2A,I3,A,I3,A,1E14.6)')
./pkg/layers/layers_fluxcalc.F 576 LAYERS_DIAPYCNAL
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_fluxcalc.F 597 LAYERS_DIAPYCNAL
           WRITE(msgBuf,'(2A,I3,A,I3,A,1E14.6)')
./pkg/layers/layers_fluxcalc.F 600 LAYERS_DIAPYCNAL
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_init_fixed.F 115 LAYERS_INIT_FIXED
          WRITE(msgBuf,'(A,I4,A,I4,A,1E14.6,A,2E14.6)')
./pkg/layers/layers_init_fixed.F 118 LAYERS_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_init_fixed.F 134 LAYERS_INIT_FIXED
          WRITE(msgBuf,'(A,1F6.1,A,I3,A,I3,A,I3,A,1F6.4,A,I3,A,I3)')
./pkg/layers/layers_init_fixed.F 139 LAYERS_INIT_FIXED
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/layers/layers_init_fixed.F 41 LAYERS_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/layers/layers_readparms.F 105 LAYERS_READPARMS
        WRITE(msgBuf,'(2A,I2,A,I9)') 'LAYERS_READPARMS: ',
./pkg/layers/layers_readparms.F 107 LAYERS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_readparms.F 134 LAYERS_READPARMS
        WRITE(msgBuf,'(2A)') 'LAYERS_READPARMS: ',
./pkg/layers/layers_readparms.F 136 LAYERS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_readparms.F 137 LAYERS_READPARMS
        WRITE(msgBuf,'(2A)') 'LAYERS_READPARMS: ',
./pkg/layers/layers_readparms.F 139 LAYERS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_readparms.F 140 LAYERS_READPARMS
        WRITE(msgBuf,'(2A,I4,A)') 'LAYERS_READPARMS: ',
./pkg/layers/layers_readparms.F 142 LAYERS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_readparms.F 155 LAYERS_READPARMS
          WRITE(msgBuf,'(2A,I2,3A)') 'LAYERS_READPARMS: ',
./pkg/layers/layers_readparms.F 157 LAYERS_READPARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_readparms.F 169 LAYERS_READPARMS
          WRITE(msgBuf,'(2A,I4,A,I3,A)') 'LAYERS_READPARMS: ',
./pkg/layers/layers_readparms.F 171 LAYERS_READPARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_readparms.F 187 LAYERS_READPARMS
        WRITE(msgBuf,'(A,I3,A)')
./pkg/layers/layers_readparms.F 189 LAYERS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/layers/layers_readparms.F 27 LAYERS_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/layers/layers_readparms.F 82 LAYERS_READPARMS
      WRITE(msgBuf,'(A)') 'LAYERS_READPARMS: opening data.layers'
./pkg/layers/layers_readparms.F 83 LAYERS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/layers/layers_readparms.F 92 LAYERS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/layers/layers_readparms.F 94 LAYERS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/layers/layers_save.F 65 LAYERS_FILL
       CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/layers/layers_save.F 94 LAYERS_FILL
         WRITE(msgBuf,'(2A)')
./pkg/layers/layers_save.F 97 LAYERS_FILL
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/calc_grad_phi_hyd.F 116 CALC_GRAD_PHI_HYD
           WRITE(msgBuf,'(3A)') 'CALC_GRAD_PHI_HYD: ',
./model/src/calc_grad_phi_hyd.F 119 CALC_GRAD_PHI_HYD
           CALL PRINT_ERROR( msgBuf , myThid)
./model/src/calc_grad_phi_hyd.F 64 CALC_GRAD_PHI_HYD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/longstep/longstep_check_iters.F 34 LONGSTEP_CHECK_ITERS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/longstep/longstep_check_iters.F 39 LONGSTEP_CHECK_ITERS
        WRITE(msgBuf,'(2A,2I10)')
./pkg/longstep/longstep_check_iters.F 42 LONGSTEP_CHECK_ITERS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/longstep/longstep_check_iters.F 49 LONGSTEP_CHECK_ITERS
        WRITE(msgBuf,'(3A)') '**WARNING** ',
./pkg/longstep/longstep_check_iters.F 52 LONGSTEP_CHECK_ITERS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/longstep/longstep_check_iters.F 54 LONGSTEP_CHECK_ITERS
        WRITE(msgBuf,'(2A,2I10)') '**WARNING** ',
./pkg/longstep/longstep_check_iters.F 56 LONGSTEP_CHECK_ITERS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/longstep/longstep_check_iters.F 62 LONGSTEP_CHECK_ITERS
        WRITE(msgBuf,'(2A)') '**WARNING** ',
./pkg/longstep/longstep_check_iters.F 64 LONGSTEP_CHECK_ITERS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/longstep/longstep_check_iters.F 66 LONGSTEP_CHECK_ITERS
        WRITE(msgBuf,'(2A,I10)') '**WARNING** ',
./pkg/longstep/longstep_check_iters.F 68 LONGSTEP_CHECK_ITERS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/longstep/longstep_check_iters.F 70 LONGSTEP_CHECK_ITERS
        WRITE(msgBuf,'(2A,I10)') '**WARNING** ',
./pkg/longstep/longstep_check_iters.F 72 LONGSTEP_CHECK_ITERS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/longstep/longstep_check_iters.F 74 LONGSTEP_CHECK_ITERS
        WRITE(msgBuf,'(2A,1PE23.15)') '**WARNING** ',
./pkg/longstep/longstep_check_iters.F 76 LONGSTEP_CHECK_ITERS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/longstep/longstep_check_iters.F 79 LONGSTEP_CHECK_ITERS
        WRITE(msgBuf,'(2A)') 'S/R LONGSTEP_CHECK_ITERS: ',
./pkg/longstep/longstep_check_iters.F 81 LONGSTEP_CHECK_ITERS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/longstep/longstep_init_fixed.F 29 LONGSTEP_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/longstep/longstep_init_fixed.F 38 LONGSTEP_INIT_FIXED
          WRITE(msgBuf,'(2A)')
./pkg/longstep/longstep_init_fixed.F 41 LONGSTEP_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/longstep/longstep_init_fixed.F 42 LONGSTEP_INIT_FIXED
          WRITE(msgBuf,'(2A)')
./pkg/longstep/longstep_init_fixed.F 45 LONGSTEP_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/longstep/longstep_readparms.F 105 LONGSTEP_READPARMS
      WRITE(msgBuf,'(A)') ' -----------------------------------'
./pkg/longstep/longstep_readparms.F 106 LONGSTEP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/longstep/longstep_readparms.F 33 LONGSTEP_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/longstep/longstep_readparms.F 68 LONGSTEP_READPARMS
      WRITE(msgBuf,'(A)') ' LONGSTEP_READPARMS: opening data.longstep'
./pkg/longstep/longstep_readparms.F 69 LONGSTEP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/longstep/longstep_readparms.F 76 LONGSTEP_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/longstep/longstep_readparms.F 78 LONGSTEP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/longstep/longstep_readparms.F 93 LONGSTEP_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/longstep/longstep_readparms.F 94 LONGSTEP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid )
./pkg/longstep/longstep_readparms.F 95 LONGSTEP_READPARMS
      WRITE(msgBuf,'(A)') '// longstep parameters '
./pkg/longstep/longstep_readparms.F 96 LONGSTEP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid )
./pkg/longstep/longstep_readparms.F 97 LONGSTEP_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/longstep/longstep_readparms.F 98 LONGSTEP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid )
./pkg/matrix/matrix_readparms.F 32 MATRIX_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/matrix/matrix_readparms.F 53 MATRIX_READPARMS
      WRITE(msgBuf,'(A)') ' MATRIX_READPARMS: opening data.matrix'
./pkg/matrix/matrix_readparms.F 54 MATRIX_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/matrix/matrix_readparms.F 61 MATRIX_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/matrix/matrix_readparms.F 63 MATRIX_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/matrix/matrix_write_tendency.F 119 MATRIX_WRITE_TENDENCY
          WRITE(msgBuf,'(A,I4,2I6)') 'Writing implicit matrix :',
./pkg/matrix/matrix_write_tendency.F 121 MATRIX_WRITE_TENDENCY
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/matrix/matrix_write_tendency.F 31 MATRIX_WRITE_TENDENCY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/matrix/matrix_write_tendency.F 60 MATRIX_WRITE_TENDENCY
          WRITE(msgBuf,'(A,I4,2I6)') 'Writing explicit matrix :',
./pkg/matrix/matrix_write_tendency.F 62 MATRIX_WRITE_TENDENCY
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_check4file.F 127 MDS_CHECK4FILE
        WRITE(msgBuf,'(7A)') msgPfx(1:iL), ': file: ',
./pkg/mdsio/mdsio_check4file.F 129 MDS_CHECK4FILE
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mdsio/mdsio_check4file.F 130 MDS_CHECK4FILE
        WRITE(msgBuf,'(2A)') msgPfx(1:iL), ': Files DO not exist'
./pkg/mdsio/mdsio_check4file.F 131 MDS_CHECK4FILE
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mdsio/mdsio_check4file.F 53 MDS_CHECK4FILE
      CHARACTER*(MAX_LEN_MBUF) msgBuf, msgPfx
./pkg/mdsio/mdsio_check4file.F 69 MDS_CHECK4FILE
        WRITE(msgBuf,'(A,I6,A,I6)')
./pkg/mdsio/mdsio_check4file.F 72 MDS_CHECK4FILE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_facef_read.F 108 MDS_FACEF_READ_RS
        WRITE(msgBuf,'(A,I8,A)')  ' MDS_FACEF_READ_RS:',
./pkg/mdsio/mdsio_facef_read.F 110 MDS_FACEF_READ_RS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_facef_read.F 142 MDS_FACEF_READ_RS
        WRITE(msgBuf,'(A,I8,A)')  ' MDS_FACEF_READ_RS:',
./pkg/mdsio/mdsio_facef_read.F 144 MDS_FACEF_READ_RS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_facef_read.F 58 MDS_FACEF_READ_RS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_rd_rec_rl.F 46 MDS_RD_REC_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_rd_rec_rl.F 51 MDS_RD_REC_RL
        WRITE(msgBuf,'(A,I9,2x,I9)')
./pkg/mdsio/mdsio_rd_rec_rl.F 53 MDS_RD_REC_RL
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_rd_rec_rl.F 74 MDS_RD_REC_RL
        WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_rd_rec_rl.F 76 MDS_RD_REC_RL
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_rd_rec_rs.F 46 MDS_RD_REC_RS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_rd_rec_rs.F 51 MDS_RD_REC_RS
        WRITE(msgBuf,'(A,I9,2x,I9)')
./pkg/mdsio/mdsio_rd_rec_rs.F 53 MDS_RD_REC_RS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_rd_rec_rs.F 74 MDS_RD_REC_RS
        WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_rd_rec_rs.F 76 MDS_RD_REC_RS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 104 MDS_READ_FIELD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_read_field.F 148 MDS_READ_FIELD
        WRITE(msgBuf,'(2A,2(I4,A))') 'MDS_READ_FIELD: ',
./pkg/mdsio/mdsio_read_field.F 150 MDS_READ_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 155 MDS_READ_FIELD
        WRITE(msgBuf,'(2A,2(I4,A))') 'MDS_READ_FIELD: ',
./pkg/mdsio/mdsio_read_field.F 157 MDS_READ_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 165 MDS_READ_FIELD
        WRITE(msgBuf,'(3A,I10)')
./pkg/mdsio/mdsio_read_field.F 167 MDS_READ_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_read_field.F 169 MDS_READ_FIELD
        WRITE(msgBuf,'(A,I9.8)')
./pkg/mdsio/mdsio_read_field.F 171 MDS_READ_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_read_field.F 173 MDS_READ_FIELD
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 175 MDS_READ_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 181 MDS_READ_FIELD
        WRITE(msgBuf,'(3A,I10)')
./pkg/mdsio/mdsio_read_field.F 183 MDS_READ_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_read_field.F 185 MDS_READ_FIELD
        WRITE(msgBuf,'(3(A,I6))')
./pkg/mdsio/mdsio_read_field.F 188 MDS_READ_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_read_field.F 190 MDS_READ_FIELD
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 192 MDS_READ_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 198 MDS_READ_FIELD
        WRITE(msgBuf,'(3A,I10)')
./pkg/mdsio/mdsio_read_field.F 200 MDS_READ_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_read_field.F 202 MDS_READ_FIELD
        WRITE(msgBuf,'(3(A,I6))')
./pkg/mdsio/mdsio_read_field.F 205 MDS_READ_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_read_field.F 207 MDS_READ_FIELD
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 209 MDS_READ_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 210 MDS_READ_FIELD
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 212 MDS_READ_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_read_field.F 237 MDS_READ_FIELD
            WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_field.F 239 MDS_READ_FIELD
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_field.F 251 MDS_READ_FIELD
            WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_field.F 253 MDS_READ_FIELD
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_field.F 276 MDS_READ_FIELD
          WRITE(msgBuf,'(2A)')
./pkg/mdsio/mdsio_read_field.F 278 MDS_READ_FIELD
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_field.F 280 MDS_READ_FIELD
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 281 MDS_READ_FIELD
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 283 MDS_READ_FIELD
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_field.F 285 MDS_READ_FIELD
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 329 MDS_READ_FIELD
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 331 MDS_READ_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 350 MDS_READ_FIELD
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 352 MDS_READ_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 357 MDS_READ_FIELD
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 359 MDS_READ_FIELD
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 462 MDS_READ_FIELD
             WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_field.F 464 MDS_READ_FIELD
             CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_field.F 473 MDS_READ_FIELD
            WRITE(msgBuf,'(4A)') ' MDS_READ_FIELD: filename: ',
./pkg/mdsio/mdsio_read_field.F 475 MDS_READ_FIELD
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_field.F 477 MDS_READ_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 478 MDS_READ_FIELD
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 480 MDS_READ_FIELD
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_field.F 482 MDS_READ_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 537 MDS_READ_FIELD
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 539 MDS_READ_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 551 MDS_READ_FIELD
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 553 MDS_READ_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_field.F 558 MDS_READ_FIELD
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_field.F 560 MDS_READ_FIELD
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_meta.F 172 MDS_READ_META
        WRITE(msgBuf,'(4A)') 'WARNING >> MDS_READ_META: file: ',
./pkg/mdsio/mdsio_read_meta.F 175 MDS_READ_META
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_read_meta.F 177 MDS_READ_META
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_meta.F 179 MDS_READ_META
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_read_meta.F 186 MDS_READ_META
          WRITE(msgBuf,'(2A)') ' MDS_READ_META: opening file: ',
./pkg/mdsio/mdsio_read_meta.F 188 MDS_READ_META
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_meta.F 200 MDS_READ_META
          WRITE(msgBuf,'(A,A)') 'MDS_READ_META: Unable to open file: ',
./pkg/mdsio/mdsio_read_meta.F 202 MDS_READ_META
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/mdsio/mdsio_read_meta.F 227 MDS_READ_META
            WRITE(msgBuf,'(2(A,I3),A)') ' MDS_READ_META: nDims=',
./pkg/mdsio/mdsio_read_meta.F 229 MDS_READ_META
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_meta.F 280 MDS_READ_META
            WRITE(msgBuf,'(A)') ' MDS_READ_META: invalid dataprec'
./pkg/mdsio/mdsio_read_meta.F 281 MDS_READ_META
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_meta.F 295 MDS_READ_META
            WRITE(msgBuf,'(A)') ' MDS_READ_META: invalid dataprec'
./pkg/mdsio/mdsio_read_meta.F 296 MDS_READ_META
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_meta.F 325 MDS_READ_META
             WRITE(msgBuf,'(2(A,I6),A)') ' MDS_READ_META: nTimRec=',
./pkg/mdsio/mdsio_read_meta.F 327 MDS_READ_META
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_meta.F 359 MDS_READ_META
            WRITE(msgBuf,'(2(A,I6),A)') ' MDS_READ_META: nFlds=',
./pkg/mdsio/mdsio_read_meta.F 361 MDS_READ_META
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_meta.F 381 MDS_READ_META
        WRITE(msgBuf,'(2(A,I4),A)')
./pkg/mdsio/mdsio_read_meta.F 384 MDS_READ_META
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_meta.F 387 MDS_READ_META
        WRITE(msgBuf,'(2(A,I4),A)')
./pkg/mdsio/mdsio_read_meta.F 390 MDS_READ_META
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_meta.F 394 MDS_READ_META
        WRITE(msgBuf,'(3(A,I3),A)')
./pkg/mdsio/mdsio_read_meta.F 397 MDS_READ_META
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_meta.F 94 MDS_READ_META
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_read_section.F 101 MDS_READ_SEC_XZ
       WRITE(msgBuf,'(A,I9.8)')
./pkg/mdsio/mdsio_read_section.F 103 MDS_READ_SEC_XZ
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 105 MDS_READ_SEC_XZ
       WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 107 MDS_READ_SEC_XZ
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 133 MDS_READ_SEC_XZ
        WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_section.F 135 MDS_READ_SEC_XZ
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 147 MDS_READ_SEC_XZ
         WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_section.F 149 MDS_READ_SEC_XZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 178 MDS_READ_SEC_XZ
           WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_section.F 180 MDS_READ_SEC_XZ
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 189 MDS_READ_SEC_XZ
          WRITE(msgBuf,'(4A)') ' MDS_READ_SEC_XZ: filename: ',
./pkg/mdsio/mdsio_read_section.F 191 MDS_READ_SEC_XZ
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 193 MDS_READ_SEC_XZ
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 195 MDS_READ_SEC_XZ
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 237 MDS_READ_SEC_XZ
             WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 239 MDS_READ_SEC_XZ
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 254 MDS_READ_SEC_XZ
             WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 256 MDS_READ_SEC_XZ
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 260 MDS_READ_SEC_XZ
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 262 MDS_READ_SEC_XZ
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 367 MDS_READ_SEC_YZ
      CHARACTER*(max_len_mbuf) msgBuf
./pkg/mdsio/mdsio_read_section.F 379 MDS_READ_SEC_YZ
       WRITE(msgBuf,'(A,I9.8)')
./pkg/mdsio/mdsio_read_section.F 381 MDS_READ_SEC_YZ
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 383 MDS_READ_SEC_YZ
       WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 385 MDS_READ_SEC_YZ
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 411 MDS_READ_SEC_YZ
        WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_section.F 413 MDS_READ_SEC_YZ
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 425 MDS_READ_SEC_YZ
         WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_section.F 427 MDS_READ_SEC_YZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 456 MDS_READ_SEC_YZ
           WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_section.F 458 MDS_READ_SEC_YZ
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 467 MDS_READ_SEC_YZ
          WRITE(msgBuf,'(4A)') ' MDS_READ_SEC_YZ: filename: ',
./pkg/mdsio/mdsio_read_section.F 469 MDS_READ_SEC_YZ
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_section.F 471 MDS_READ_SEC_YZ
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 473 MDS_READ_SEC_YZ
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 515 MDS_READ_SEC_YZ
             WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 517 MDS_READ_SEC_YZ
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 532 MDS_READ_SEC_YZ
             WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 534 MDS_READ_SEC_YZ
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 538 MDS_READ_SEC_YZ
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_section.F 540 MDS_READ_SEC_YZ
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_section.F 90 MDS_READ_SEC_XZ
      CHARACTER*(max_len_mbuf) msgBuf
./pkg/mdsio/mdsio_read_tape.F 128 MDS_READ_TAPE
           WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_tape.F 130 MDS_READ_TAPE
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_tape.F 138 MDS_READ_TAPE
          WRITE(msgBuf,'(2A)')
./pkg/mdsio/mdsio_read_tape.F 141 MDS_READ_TAPE
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_tape.F 143 MDS_READ_TAPE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_tape.F 144 MDS_READ_TAPE
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_tape.F 146 MDS_READ_TAPE
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_tape.F 148 MDS_READ_TAPE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_tape.F 176 MDS_READ_TAPE
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_tape.F 178 MDS_READ_TAPE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_tape.F 191 MDS_READ_TAPE
           WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_tape.F 193 MDS_READ_TAPE
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_tape.F 213 MDS_READ_TAPE
           WRITE(msgBuf,'(A,A)')
./pkg/mdsio/mdsio_read_tape.F 215 MDS_READ_TAPE
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_read_tape.F 224 MDS_READ_TAPE
          WRITE(msgBuf,'(4A)')
./pkg/mdsio/mdsio_read_tape.F 227 MDS_READ_TAPE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_tape.F 250 MDS_READ_TAPE
           WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_tape.F 252 MDS_READ_TAPE
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_tape.F 289 MDS_READ_TAPE
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_tape.F 291 MDS_READ_TAPE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_tape.F 67 MDS_READ_TAPE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_read_tape.F 88 MDS_READ_TAPE
       WRITE(msgBuf,'(A,I10)')
./pkg/mdsio/mdsio_read_tape.F 90 MDS_READ_TAPE
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_tape.F 91 MDS_READ_TAPE
       WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_read_tape.F 93 MDS_READ_TAPE
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_read_whalos.F 84 MDS_READ_WHALOS
      character*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_readvec_loc.F 101 MDS_READVEC_LOC
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_readvec_loc.F 108 MDS_READVEC_LOC
         WRITE(msgBuf,'(3A)')
./pkg/mdsio/mdsio_readvec_loc.F 110 MDS_READVEC_LOC
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_readvec_loc.F 111 MDS_READVEC_LOC
         WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_readvec_loc.F 113 MDS_READVEC_LOC
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_readvec_loc.F 114 MDS_READVEC_LOC
         WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_readvec_loc.F 116 MDS_READVEC_LOC
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_readvec_loc.F 117 MDS_READVEC_LOC
         WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_readvec_loc.F 119 MDS_READVEC_LOC
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_readvec_loc.F 176 MDS_READVEC_LOC
            WRITE(msgBuf,'(2A)')
./pkg/mdsio/mdsio_readvec_loc.F 178 MDS_READVEC_LOC
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_readvec_loc.F 187 MDS_READVEC_LOC
          WRITE(msgBuf,'(3A)')
./pkg/mdsio/mdsio_readvec_loc.F 190 MDS_READVEC_LOC
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_readvec_loc.F 193 MDS_READVEC_LOC
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_readvec_loc.F 198 MDS_READVEC_LOC
         WRITE(msgBuf,'(A,I9,A)')  ' MDS_READVEC_LOC:',
./pkg/mdsio/mdsio_readvec_loc.F 200 MDS_READVEC_LOC
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_readvec_loc.F 214 MDS_READVEC_LOC
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_readvec_loc.F 216 MDS_READVEC_LOC
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_readvec_loc.F 79 MDS_READVEC_LOC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_readvec_loc.F 96 MDS_READVEC_LOC
         WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_readvec_loc.F 98 MDS_READVEC_LOC
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_readvec_loc.F 99 MDS_READVEC_LOC
         WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_wr_rec_rl.F 46 MDS_WR_REC_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_wr_rec_rl.F 51 MDS_WR_REC_RL
        WRITE(msgBuf,'(A,I9,2x,I9)')
./pkg/mdsio/mdsio_wr_rec_rl.F 53 MDS_WR_REC_RL
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_wr_rec_rl.F 74 MDS_WR_REC_RL
        WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_wr_rec_rl.F 76 MDS_WR_REC_RL
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_wr_rec_rs.F 46 MDS_WR_REC_RS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_wr_rec_rs.F 51 MDS_WR_REC_RS
        WRITE(msgBuf,'(A,I9,2x,I9)')
./pkg/mdsio/mdsio_wr_rec_rs.F 53 MDS_WR_REC_RS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_wr_rec_rs.F 74 MDS_WR_REC_RS
        WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_wr_rec_rs.F 76 MDS_WR_REC_RS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 119 MDS_WRITE_FIELD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_write_field.F 176 MDS_WRITE_FIELD
        WRITE(msgBuf,'(2A,2(I4,A))') 'MDS_WRITE_FIELD: ',
./pkg/mdsio/mdsio_write_field.F 178 MDS_WRITE_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 183 MDS_WRITE_FIELD
        WRITE(msgBuf,'(2A,2(I4,A))') 'MDS_WRITE_FIELD: ',
./pkg/mdsio/mdsio_write_field.F 185 MDS_WRITE_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 193 MDS_WRITE_FIELD
        WRITE(msgBuf,'(3A,I10)')
./pkg/mdsio/mdsio_write_field.F 195 MDS_WRITE_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_write_field.F 197 MDS_WRITE_FIELD
        WRITE(msgBuf,'(A,I9.8)')
./pkg/mdsio/mdsio_write_field.F 199 MDS_WRITE_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_write_field.F 201 MDS_WRITE_FIELD
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_field.F 203 MDS_WRITE_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 209 MDS_WRITE_FIELD
        WRITE(msgBuf,'(3A,I10)')
./pkg/mdsio/mdsio_write_field.F 211 MDS_WRITE_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_write_field.F 213 MDS_WRITE_FIELD
        WRITE(msgBuf,'(3(A,I6))')
./pkg/mdsio/mdsio_write_field.F 216 MDS_WRITE_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_write_field.F 218 MDS_WRITE_FIELD
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_field.F 220 MDS_WRITE_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 226 MDS_WRITE_FIELD
        WRITE(msgBuf,'(3A,I10)')
./pkg/mdsio/mdsio_write_field.F 228 MDS_WRITE_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_write_field.F 230 MDS_WRITE_FIELD
        WRITE(msgBuf,'(3(A,I6))')
./pkg/mdsio/mdsio_write_field.F 233 MDS_WRITE_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_write_field.F 235 MDS_WRITE_FIELD
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_field.F 237 MDS_WRITE_FIELD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 238 MDS_WRITE_FIELD
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_field.F 240 MDS_WRITE_FIELD
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_write_field.F 257 MDS_WRITE_FIELD
          WRITE(msgBuf,'(A,I8,I6,3I4,2A)')
./pkg/mdsio/mdsio_write_field.F 260 MDS_WRITE_FIELD
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_write_field.F 299 MDS_WRITE_FIELD
            WRITE(msgBuf,'(2A)')
./pkg/mdsio/mdsio_write_field.F 301 MDS_WRITE_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 320 MDS_WRITE_FIELD
            WRITE(msgBuf,'(2A)')
./pkg/mdsio/mdsio_write_field.F 322 MDS_WRITE_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 334 MDS_WRITE_FIELD
          WRITE(msgBuf,'(A,I6)')
./pkg/mdsio/mdsio_write_field.F 336 MDS_WRITE_FIELD
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 384 MDS_WRITE_FIELD
            WRITE(msgBuf,'(2A)')
./pkg/mdsio/mdsio_write_field.F 386 MDS_WRITE_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 398 MDS_WRITE_FIELD
            WRITE(msgBuf,'(2A)')
./pkg/mdsio/mdsio_write_field.F 400 MDS_WRITE_FIELD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_field.F 405 MDS_WRITE_FIELD
          WRITE(msgBuf,'(A,I6)')
./pkg/mdsio/mdsio_write_field.F 407 MDS_WRITE_FIELD
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_meta.F 151 MDS_WRITE_META
       WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_meta.F 153 MDS_WRITE_META
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_meta.F 177 MDS_WRITE_META
       WRITE(msgBuf,'(1P20E20.12)') (timList(i),i=1,ii)
./pkg/mdsio/mdsio_write_meta.F 178 MDS_WRITE_META
       WRITE(mUnit,'(1X,3A)') 'timeInterval = [', msgBuf(1:20*ii),' ];'
./pkg/mdsio/mdsio_write_meta.F 80 MDS_WRITE_META
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_write_section.F 108 MDS_WRITE_SEC_XZ
       WRITE(msgBuf,'(A,I9.8)')
./pkg/mdsio/mdsio_write_section.F 110 MDS_WRITE_SEC_XZ
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_write_section.F 112 MDS_WRITE_SEC_XZ
       WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 114 MDS_WRITE_SEC_XZ
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 204 MDS_WRITE_SEC_XZ
             WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 206 MDS_WRITE_SEC_XZ
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 221 MDS_WRITE_SEC_XZ
             WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 223 MDS_WRITE_SEC_XZ
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 231 MDS_WRITE_SEC_XZ
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 233 MDS_WRITE_SEC_XZ
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 239 MDS_WRITE_SEC_XZ
         WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 241 MDS_WRITE_SEC_XZ
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 350 MDS_WRITE_SEC_YZ
      CHARACTER*(max_len_mbuf) msgBuf
./pkg/mdsio/mdsio_write_section.F 361 MDS_WRITE_SEC_YZ
       WRITE(msgBuf,'(A,I9.8)')
./pkg/mdsio/mdsio_write_section.F 363 MDS_WRITE_SEC_YZ
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_write_section.F 365 MDS_WRITE_SEC_YZ
       WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 367 MDS_WRITE_SEC_YZ
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 457 MDS_WRITE_SEC_YZ
             WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 459 MDS_WRITE_SEC_YZ
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 474 MDS_WRITE_SEC_YZ
             WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 476 MDS_WRITE_SEC_YZ
             CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 484 MDS_WRITE_SEC_YZ
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 486 MDS_WRITE_SEC_YZ
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 492 MDS_WRITE_SEC_YZ
         WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_section.F 494 MDS_WRITE_SEC_YZ
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_section.F 96 MDS_WRITE_SEC_XZ
      CHARACTER*(max_len_mbuf) msgBuf
./pkg/mdsio/mdsio_write_tape.F 117 MDS_WRITE_TAPE
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_tape.F 119 MDS_WRITE_TAPE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_tape.F 130 MDS_WRITE_TAPE
       WRITE(msgBuf,'(A,I10)')
./pkg/mdsio/mdsio_write_tape.F 132 MDS_WRITE_TAPE
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_tape.F 133 MDS_WRITE_TAPE
       WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_tape.F 135 MDS_WRITE_TAPE
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_tape.F 152 MDS_WRITE_TAPE
        WRITE(msgBuf,'(A,I8,2A)')
./pkg/mdsio/mdsio_write_tape.F 154 MDS_WRITE_TAPE
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_write_tape.F 171 MDS_WRITE_TAPE
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_tape.F 173 MDS_WRITE_TAPE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_tape.F 280 MDS_WRITE_TAPE
           WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_write_tape.F 282 MDS_WRITE_TAPE
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_write_tape.F 73 MDS_WRITE_TAPE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_write_whalos.F 86 MDS_WRITE_WHALOS
      character*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_writelocal.F 109 MDS_WRITELOCAL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mdsio/mdsio_writelocal.F 166 MDS_WRITELOCAL
         WRITE(msgBuf,'(A,I10,A,2I5,A)')
./pkg/mdsio/mdsio_writelocal.F 169 MDS_WRITELOCAL
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_writelocal.F 171 MDS_WRITELOCAL
         WRITE(msgBuf,'(2A)')
./pkg/mdsio/mdsio_writelocal.F 173 MDS_WRITELOCAL
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_writelocal.F 180 MDS_WRITELOCAL
        WRITE(msgBuf,'(3A,I10)')
./pkg/mdsio/mdsio_writelocal.F 182 MDS_WRITELOCAL
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_writelocal.F 184 MDS_WRITELOCAL
        WRITE(msgBuf,'(A,I9.8)')
./pkg/mdsio/mdsio_writelocal.F 186 MDS_WRITELOCAL
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_writelocal.F 188 MDS_WRITELOCAL
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writelocal.F 190 MDS_WRITELOCAL
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writelocal.F 196 MDS_WRITELOCAL
        WRITE(msgBuf,'(3A,I10)')
./pkg/mdsio/mdsio_writelocal.F 198 MDS_WRITELOCAL
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_writelocal.F 200 MDS_WRITELOCAL
        WRITE(msgBuf,'(3(A,I6))')
./pkg/mdsio/mdsio_writelocal.F 203 MDS_WRITELOCAL
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_writelocal.F 205 MDS_WRITELOCAL
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writelocal.F 207 MDS_WRITELOCAL
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writelocal.F 208 MDS_WRITELOCAL
        WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writelocal.F 210 MDS_WRITELOCAL
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mdsio/mdsio_writelocal.F 230 MDS_WRITELOCAL
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writelocal.F 232 MDS_WRITELOCAL
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writelocal.F 244 MDS_WRITELOCAL
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writelocal.F 246 MDS_WRITELOCAL
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writelocal.F 251 MDS_WRITELOCAL
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writelocal.F 253 MDS_WRITELOCAL
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writevec_loc.F 108 MDS_WRITEVEC_LOC
          WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_writevec_loc.F 110 MDS_WRITEVEC_LOC
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writevec_loc.F 111 MDS_WRITEVEC_LOC
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writevec_loc.F 113 MDS_WRITEVEC_LOC
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writevec_loc.F 120 MDS_WRITEVEC_LOC
          WRITE(msgBuf,'(3A)')
./pkg/mdsio/mdsio_writevec_loc.F 122 MDS_WRITEVEC_LOC
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writevec_loc.F 123 MDS_WRITEVEC_LOC
          WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_writevec_loc.F 125 MDS_WRITEVEC_LOC
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writevec_loc.F 126 MDS_WRITEVEC_LOC
          WRITE(msgBuf,'(A,I9)')
./pkg/mdsio/mdsio_writevec_loc.F 128 MDS_WRITEVEC_LOC
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writevec_loc.F 129 MDS_WRITEVEC_LOC
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writevec_loc.F 131 MDS_WRITEVEC_LOC
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writevec_loc.F 179 MDS_WRITEVEC_LOC
            WRITE(msgBuf,'(2A)')
./pkg/mdsio/mdsio_writevec_loc.F 181 MDS_WRITEVEC_LOC
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mdsio/mdsio_writevec_loc.F 195 MDS_WRITEVEC_LOC
            WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writevec_loc.F 197 MDS_WRITEVEC_LOC
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writevec_loc.F 201 MDS_WRITEVEC_LOC
          WRITE(msgBuf,'(A)')
./pkg/mdsio/mdsio_writevec_loc.F 203 MDS_WRITEVEC_LOC
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mdsio/mdsio_writevec_loc.F 81 MDS_WRITEVEC_LOC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mnc/mnc_readparms.F 128 MNC_READPARMS
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./pkg/mnc/mnc_readparms.F 140 MNC_READPARMS
      WRITE(msgBuf,'(a)') ' MNC_READPARMS: finished reading data.mnc'
./pkg/mnc/mnc_readparms.F 141 MNC_READPARMS
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./pkg/mnc/mnc_readparms.F 185 MNC_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** MNC_READPARMS: ',
./pkg/mnc/mnc_readparms.F 187 MNC_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mnc/mnc_readparms.F 191 MNC_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** MNC_READPARMS: ',
./pkg/mnc/mnc_readparms.F 193 MNC_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mnc/mnc_readparms.F 197 MNC_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** MNC_READPARMS: ',
./pkg/mnc/mnc_readparms.F 199 MNC_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mnc/mnc_readparms.F 42 MNC_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mnc/mnc_readparms.F 72 MNC_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** MNC_READPARMS: ',
./pkg/mnc/mnc_readparms.F 74 MNC_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mnc/mnc_readparms.F 76 MNC_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** MNC_READPARMS: ',
./pkg/mnc/mnc_readparms.F 78 MNC_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/mnc/mnc_var.F 147 MNC_VAR_INIT_ANY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mnc/mnc_var.F 160 MNC_VAR_INIT_ANY
        WRITE(msgBuf,'(3A)') 'MNC ERROR: file ''', fname(1:nf),
./pkg/mnc/mnc_var.F 162 MNC_VAR_INIT_ANY
        CALL PRINT_ERROR(msgBuf, myThid)
./pkg/mnc/mnc_var.F 170 MNC_VAR_INIT_ANY
        WRITE(msgBuf,'(2A,I7,A)') 'MNC ERROR: MNC_MAX_INFO exceeded',
./pkg/mnc/mnc_var.F 173 MNC_VAR_INIT_ANY
        CALL PRINT_ERROR(msgBuf, myThid)
./pkg/mnc/mnc_var.F 180 MNC_VAR_INIT_ANY
        WRITE(msgBuf,'(3A)') 'MNC ERROR: file ''', fname(1:lenf),
./pkg/mnc/mnc_var.F 182 MNC_VAR_INIT_ANY
        CALL PRINT_ERROR(msgBuf, myThid)
./pkg/mnc/mnc_var.F 202 MNC_VAR_INIT_ANY
      WRITE(msgBuf,'(5A)') 'MNC ERROR: file ''', fname(1:lenf),
./pkg/mnc/mnc_var.F 204 MNC_VAR_INIT_ANY
      CALL PRINT_ERROR(msgBuf, myThid)
./pkg/mnc/mnc_var.F 215 MNC_VAR_INIT_ANY
            WRITE(msgBuf,'(5A)') 'MNC ERROR: variable ''',
./pkg/mnc/mnc_var.F 218 MNC_VAR_INIT_ANY
            CALL PRINT_ERROR(msgBuf, myThid)
./pkg/mnc/mnc_var.F 234 MNC_VAR_INIT_ANY
        WRITE(msgBuf,'(2A)') 'ERROR:  MNC will not ',
./pkg/mnc/mnc_var.F 236 MNC_VAR_INIT_ANY
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mnc/mnc_var.F 237 MNC_VAR_INIT_ANY
        WRITE(msgBuf,'(2A)') '        files.  Please',
./pkg/mnc/mnc_var.F 239 MNC_VAR_INIT_ANY
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mnc/mnc_var.F 240 MNC_VAR_INIT_ANY
        WRITE(msgBuf,'(2A)') '        overwrite output',
./pkg/mnc/mnc_var.F 242 MNC_VAR_INIT_ANY
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mnc/mnc_var.F 243 MNC_VAR_INIT_ANY
        WRITE(msgBuf,'(5A)') 'defining variable ''', vname(1:lenv),
./pkg/mnc/mnc_var.F 245 MNC_VAR_INIT_ANY
        CALL MNC_HANDLE_ERR(err, msgBuf, myThid)
./pkg/mnc/mnc_var.F 441 MNC_VAR_ADD_ATTR_ANY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mnc/mnc_var.F 452 MNC_VAR_ADD_ATTR_ANY
        WRITE(msgBuf,'(5A)') 'MNC ERROR: file ''', fname(1:lenf),
./pkg/mnc/mnc_var.F 455 MNC_VAR_ADD_ATTR_ANY
        CALL PRINT_ERROR(msgBuf, myThid)
./pkg/mnc/mnc_var.F 472 MNC_VAR_ADD_ATTR_ANY
        WRITE(msgBuf,'(A,I10,A)') 'MNC ERROR: atype = ''', atype,
./pkg/mnc/mnc_var.F 474 MNC_VAR_ADD_ATTR_ANY
        n = ILNBLNK(msgBuf)
./pkg/mnc/mnc_var.F 475 MNC_VAR_ADD_ATTR_ANY
        CALL PRINT_ERROR(msgBuf(1:n), myThid)
./pkg/mnc/mnc_var.F 478 MNC_VAR_ADD_ATTR_ANY
      WRITE(msgBuf,'(5A)') 'adding attribute ''', atname(1:lenat),
./pkg/mnc/mnc_var.F 480 MNC_VAR_ADD_ATTR_ANY
      CALL MNC_HANDLE_ERR(err, msgBuf, myThid)
./pkg/mnc/mnc_var.F 681 MNC_VAR_WRITE_ANY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mnc/mnc_var.F 691 MNC_VAR_WRITE_ANY
        WRITE(msgBuf,'(5A)') 'MNC ERROR: file ''', fname(1:lenf),
./pkg/mnc/mnc_var.F 694 MNC_VAR_WRITE_ANY
        CALL PRINT_ERROR(msgBuf, myThid)
./pkg/mnc/mnc_var.F 716 MNC_VAR_WRITE_ANY
        WRITE(msgBuf,'(A)') 'reading current length of unlimited dim'
./pkg/mnc/mnc_var.F 717 MNC_VAR_WRITE_ANY
        CALL MNC_HANDLE_ERR(err, msgBuf, myThid)
./pkg/mnc/mnc_var.F 734 MNC_VAR_WRITE_ANY
        WRITE(msgBuf,'(A,I10,A)') 'MNC ERROR: vtype = ''', vtype,
./pkg/mnc/mnc_var.F 736 MNC_VAR_WRITE_ANY
        n = ILNBLNK(msgBuf)
./pkg/mnc/mnc_var.F 737 MNC_VAR_WRITE_ANY
        CALL PRINT_ERROR(msgBuf(1:n), myThid)
./pkg/mnc/mnc_var.F 740 MNC_VAR_WRITE_ANY
      WRITE(msgBuf,'(5A)') 'writing variable ''', vname(1:lenv),
./pkg/mnc/mnc_var.F 742 MNC_VAR_WRITE_ANY
      CALL MNC_HANDLE_ERR(err, msgBuf, myThid)
./model/src/cg2d.F 106 CG2D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/cg2d.F 340 CG2D
         WRITE(msgBuf,'(A,I6,A,1PE21.14)')
./model/src/cg2d.F 342 CG2D
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/cg2d_ex0.F 278 CG2D_EX0
           WRITE(msgBuf,'(A,2I4,A,I6,A,1PE21.14)') ' cg2d(bi,bj=', bi,
./model/src/cg2d_ex0.F 280 CG2D_EX0
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/cg2d_ex0.F 97 CG2D_EX0
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/cg2d_nsa.F 111 CG2D_NSA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/cg2d_nsa.F 117 CG2D_NSA
        WRITE(msgBuf,'(A,I10)')
./model/src/cg2d_nsa.F 119 CG2D_NSA
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/cg2d_nsa.F 123 CG2D_NSA
        WRITE(msgBuf,'(A)') 'CG2D_NSA: cg2dNormaliseRHS is disabled'
./model/src/cg2d_nsa.F 124 CG2D_NSA
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/cg2d_nsa.F 125 CG2D_NSA
        WRITE(msgBuf,'(A)')
./model/src/cg2d_nsa.F 127 CG2D_NSA
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/cg2d_nsa.F 354 CG2D_NSA
         WRITE(msgBuf,'(A,I6,A,1PE21.14)')
./model/src/cg2d_nsa.F 356 CG2D_NSA
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/cg2d_sr.F 111 CG2D_SR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/cg2d_sr.F 360 CG2D_SR
         WRITE(msgBuf,'(A,I6,A,1PE21.14)')
./model/src/cg2d_sr.F 362 CG2D_SR
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/cg3d.F 109 CG3D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/cg3d.F 505 CG3D
         WRITE(msgBuf,'(A,I6,A,1PE21.14)')
./model/src/cg3d.F 507 CG3D
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mom_vecinv/mom_vi_u_coriolis.F 181 MOM_VI_U_CORIOLIS
        WRITE(msgBuf,'(A,I5,A)')
./pkg/mom_vecinv/mom_vi_u_coriolis.F 184 MOM_VI_U_CORIOLIS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mom_vecinv/mom_vi_u_coriolis.F 47 MOM_VI_U_CORIOLIS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 209 MOM_VI_U_CORIOLIS_C4
        WRITE(msgBuf,'(A,I5,A)')
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 212 MOM_VI_U_CORIOLIS_C4
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mom_vecinv/mom_vi_u_coriolis_c4.F 50 MOM_VI_U_CORIOLIS_C4
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mom_vecinv/mom_vi_v_coriolis.F 181 MOM_VI_V_CORIOLIS
        WRITE(msgBuf,'(A,I5,A)')
./pkg/mom_vecinv/mom_vi_v_coriolis.F 184 MOM_VI_V_CORIOLIS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mom_vecinv/mom_vi_v_coriolis.F 47 MOM_VI_V_CORIOLIS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 209 MOM_VI_V_CORIOLIS_C4
        WRITE(msgBuf,'(A,I5,A)')
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 212 MOM_VI_V_CORIOLIS_C4
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mom_vecinv/mom_vi_v_coriolis_c4.F 50 MOM_VI_V_CORIOLIS_C4
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/cg3d_ex0.F 101 CG3D_EX0
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/cg3d_ex0.F 477 CG3D_EX0
           WRITE(msgBuf,'(A,2I4,A,I6,A,1PE21.14)') ' cg3d(bi,bj=', bi,
./model/src/cg3d_ex0.F 479 CG3D_EX0
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/monitor/mon_out.F 122 MON_OUT_ALL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/monitor/mon_out.F 135 MON_OUT_ALL
        msgBuf = ' '
./pkg/monitor/mon_out.F 146 MON_OUT_ALL
          msgBuf(1:IL) = mon_head
./pkg/monitor/mon_out.F 148 MON_OUT_ALL
          msgBuf(lBuf:lBuf) = ' '
./pkg/monitor/mon_out.F 154 MON_OUT_ALL
          msgBuf(lBuf:lBuf+mon_prefL-1) = mon_pref(1:mon_prefL)
./pkg/monitor/mon_out.F 169 MON_OUT_ALL
            msgBuf(lBuf:lBuf+IL-1) = pref(I0:I1)
./pkg/monitor/mon_out.F 183 MON_OUT_ALL
            msgBuf(lBuf:lBuf+IL-1) = foot(I0:I1)
./pkg/monitor/mon_out.F 194 MON_OUT_ALL
        msgBuf(35:35) = '='
./pkg/monitor/mon_out.F 198 MON_OUT_ALL
     &         WRITE(msgBuf(36:57),'(1X,I21)')       ival
./pkg/monitor/mon_out.F 200 MON_OUT_ALL
     &         WRITE(msgBuf(36:57),'(1X,1P1E21.13)') dval
./pkg/monitor/mon_out.F 210 MON_OUT_ALL
          CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./model/src/check_pickup.F 100 CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 111 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** CHECK_PICKUP: ',
./model/src/check_pickup.F 113 CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 121 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** CHECK_PICKUP: ',
./model/src/check_pickup.F 123 CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 127 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** CHECK_PICKUP: ',
./model/src/check_pickup.F 129 CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 134 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** CHECK_PICKUP: ',
./model/src/check_pickup.F 136 CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 141 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** CHECK_PICKUP: ',
./model/src/check_pickup.F 143 CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 147 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** CHECK_PICKUP: ',
./model/src/check_pickup.F 149 CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 159 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') 'CHECK_PICKUP: ',
./model/src/check_pickup.F 161 CHECK_PICKUP
           CALL PRINT_ERROR( msgBuf, myThid )
./model/src/check_pickup.F 169 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') 'CHECK_PICKUP: ',
./model/src/check_pickup.F 171 CHECK_PICKUP
           CALL PRINT_ERROR( msgBuf, myThid )
./model/src/check_pickup.F 201 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') 'CHECK_PICKUP: ',
./model/src/check_pickup.F 203 CHECK_PICKUP
           CALL PRINT_ERROR( msgBuf, myThid )
./model/src/check_pickup.F 210 CHECK_PICKUP
         WRITE(msgBuf,'(4A)') 'CHECK_PICKUP: ',
./model/src/check_pickup.F 213 CHECK_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/check_pickup.F 216 CHECK_PICKUP
         WRITE(msgBuf,'(4A)') '** WARNING ** CHECK_PICKUP: ',
./model/src/check_pickup.F 218 CHECK_PICKUP
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 223 CHECK_PICKUP
          WRITE(msgBuf,'(2(A,I10))')
./model/src/check_pickup.F 226 CHECK_PICKUP
          CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 227 CHECK_PICKUP
          WRITE(msgBuf,'(2(A,I10))')
./model/src/check_pickup.F 230 CHECK_PICKUP
          CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 53 CHECK_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/check_pickup.F 71 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** CHECK_PICKUP: ',
./model/src/check_pickup.F 73 CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 89 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') ' CHECK_PICKUP: ',
./model/src/check_pickup.F 91 CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/check_pickup.F 98 CHECK_PICKUP
           WRITE(msgBuf,'(4A)') ' CHECK_PICKUP: ',
./pkg/monitor/mon_solution.F 35 MON_SOLUTION
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/monitor/mon_solution.F 52 MON_SOLUTION
        WRITE(msgBuf,'(A,1P2E11.3)')
./pkg/monitor/mon_solution.F 54 MON_SOLUTION
        CALL PRINT_MESSAGE(msgBuf,errorMessageUnit,SQUEEZE_RIGHT,myThid)
./pkg/monitor/mon_solution.F 55 MON_SOLUTION
        WRITE(msgBuf,'(2A,1PE11.3,A)') '  exceeds allowed range ',
./pkg/monitor/mon_solution.F 57 MON_SOLUTION
        CALL PRINT_MESSAGE(msgBuf,errorMessageUnit,SQUEEZE_RIGHT,myThid)
./pkg/monitor/mon_solution.F 58 MON_SOLUTION
        WRITE(msgBuf,'(A,I10)')
./pkg/monitor/mon_solution.F 60 MON_SOLUTION
        CALL PRINT_MESSAGE(msgBuf,errorMessageUnit,SQUEEZE_RIGHT,myThid)
./pkg/monitor/mon_stats_latbnd_rl.F 50 MON_STATS_LATBND_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/monitor/mon_stats_latbnd_rl.F 64 MON_STATS_LATBND_RL
        WRITE(msgBuf,'(A,I6,A)')
./pkg/monitor/mon_stats_latbnd_rl.F 67 MON_STATS_LATBND_RL
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/monitor/mon_stats_latbnd_rl.F 68 MON_STATS_LATBND_RL
        WRITE(msgBuf,'(A,I6)')
./pkg/monitor/mon_stats_latbnd_rl.F 70 MON_STATS_LATBND_RL
        CALL PRINT_ERROR( msgBuf , myThid)
./model/src/config_check.F 1001 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 1010 CONFIG_CHECK
      WRITE(msgBuf,'(A)') '// CONFIG_CHECK : Normal End'
./model/src/config_check.F 1011 CONFIG_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/config_check.F 1013 CONFIG_CHECK
      WRITE(msgBuf,'(A)')
./model/src/config_check.F 1015 CONFIG_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/config_check.F 1017 CONFIG_CHECK
      WRITE(msgBuf,'(A)') ' '
./model/src/config_check.F 1018 CONFIG_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/config_check.F 102 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 104 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 105 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 107 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 114 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 116 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 117 CONFIG_CHECK
       IF ( implicitIntGravWave ) WRITE(msgBuf,'(A)')
./model/src/config_check.F 119 CONFIG_CHECK
       IF ( nonHydrostatic ) WRITE(msgBuf,'(A)')
./model/src/config_check.F 121 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 128 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 130 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 131 CONFIG_CHECK
        WRITE(msgBuf,'(A,1P2E20.7)')
./model/src/config_check.F 133 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 140 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 142 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 143 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 145 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 149 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 151 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 152 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 154 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 158 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 160 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 161 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 163 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 169 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 171 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 172 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 174 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 178 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 180 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 181 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 183 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 190 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 192 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 193 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 195 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 202 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 204 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 205 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 207 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 211 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 213 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 214 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 216 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 223 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 225 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 232 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 234 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 235 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 237 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 244 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 246 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 247 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 249 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 256 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 258 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 259 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 261 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 268 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 270 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 271 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 273 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 280 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 282 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 283 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 285 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 291 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 293 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 294 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 296 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 302 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 304 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 305 CONFIG_CHECK
        WRITE(msgBuf,'(A,I4,A)') 'CONFIG_CHECK: selectAddFluid=',
./model/src/config_check.F 307 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 316 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 318 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 319 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 321 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 322 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 324 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 328 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 330 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 331 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 333 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 334 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 336 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 344 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 346 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 347 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')' is missing.',
./model/src/config_check.F 349 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 354 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 356 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 357 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')' is not compiled.',
./model/src/config_check.F 359 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 367 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 369 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 370 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')' is missing.',
./model/src/config_check.F 372 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 379 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: addFrictionHeating=T',
./model/src/config_check.F 381 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 382 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: Re-compile with:',
./model/src/config_check.F 384 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 391 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/config_check.F 394 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 395 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 397 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 404 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/config_check.F 407 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 408 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 40 CONFIG_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/config_check.F 410 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 417 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/config_check.F 420 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 421 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 423 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 436 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/config_check.F 439 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 445 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/config_check.F 448 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 453 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/config_check.F 456 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 45 CONFIG_CHECK
      WRITE(msgBuf,'(A)')
./model/src/config_check.F 464 CONFIG_CHECK
       WRITE(msgBuf,'(A)')
./model/src/config_check.F 466 CONFIG_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 470 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 472 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 478 CONFIG_CHECK
       WRITE(msgBuf,'(A)')
./model/src/config_check.F 47 CONFIG_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/config_check.F 480 CONFIG_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 484 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 486 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 494 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)') 'CONFIG_CHECK: Variable gravity',
./model/src/config_check.F 496 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 49 CONFIG_CHECK
      WRITE(msgBuf,'(A)') '// Check Model config. (CONFIG_CHECK):'
./model/src/config_check.F 500 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)') 'CONFIG_CHECK: Variable gravity',
./model/src/config_check.F 502 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 509 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/config_check.F 50 CONFIG_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/config_check.F 512 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 518 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/config_check.F 521 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 527 CONFIG_CHECK
        WRITE(msgBuf,'(A,I10,A)')
./model/src/config_check.F 530 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 535 CONFIG_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/config_check.F 538 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 543 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 545 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 546 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 548 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 553 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 555 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 556 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 558 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 563 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 565 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 566 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 568 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 573 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 575 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 576 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 578 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 583 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 585 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 586 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 588 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 593 CONFIG_CHECK
        WRITE(msgBuf,'(2A,I3,A)') 'CONFIG_CHECK: r* Coordinate',
./model/src/config_check.F 595 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 596 CONFIG_CHECK
        WRITE(msgBuf,'(2A,I3,A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 598 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 605 CONFIG_CHECK
        WRITE(msgBuf,'(2A,I3)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 607 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 613 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 615 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 619 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 621 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 625 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 627 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 630 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 632 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 643 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 645 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 647 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** ',
./model/src/config_check.F 649 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 656 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 658 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 659 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 65 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 661 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 667 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 669 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 671 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** works better',
./model/src/config_check.F 673 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 67 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 680 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 682 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 683 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 685 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 68 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 691 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 693 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 695 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 697 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 703 CONFIG_CHECK
        WRITE(msgBuf,'(A,I10,A)') 'CONFIG_CHECK: selectAddFluid=',
./model/src/config_check.F 705 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 706 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 708 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 70 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 712 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 714 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 715 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 717 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 721 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 723 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 725 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** ',
./model/src/config_check.F 727 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 734 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 736 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 741 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 743 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 749 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 751 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 752 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 754 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 760 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: implicitIntGravWave',
./model/src/config_check.F 762 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 763 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: To by-pass this',
./model/src/config_check.F 765 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 770 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 772 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 773 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 775 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 780 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: Needs exactConserv=T',
./model/src/config_check.F 782 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 787 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 789 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 791 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 793 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 798 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: selectImplicitDrag=2',
./model/src/config_check.F 79 CONFIG_CHECK
          WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 800 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 805 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 807 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 809 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** => not consistent with',
./model/src/config_check.F 811 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 815 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 817 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 819 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 81 CONFIG_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 821 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 828 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 830 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 836 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 838 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 842 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: momAdvection ',
./model/src/config_check.F 844 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 849 CONFIG_CHECK
        WRITE(msgBuf,'(2A,I4)') 'CONFIG_CHECK: ',
./model/src/config_check.F 84 CONFIG_CHECK
          WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 851 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 855 CONFIG_CHECK
        WRITE(msgBuf,'(2A,I8,A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 858 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 865 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: ',
./model/src/config_check.F 867 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 86 CONFIG_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 879 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** CONFIG_CHECK: ',
./model/src/config_check.F 881 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 883 CONFIG_CHECK
        WRITE(msgBuf,'(3A)') '** WARNING ** to turn ON CD-scheme:',
./model/src/config_check.F 885 CONFIG_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/config_check.F 888 CONFIG_CHECK
        WRITE(msgBuf,'(A)')
./model/src/config_check.F 890 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 891 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/config_check.F 894 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 89 CONFIG_CHECK
          WRITE(msgBuf,'(2A,I6)') 'CONFIG_CHECK: ',
./model/src/config_check.F 900 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/config_check.F 902 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 906 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')'CONFIG_CHECK: ',
./model/src/config_check.F 908 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 912 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')'CONFIG_CHECK: ',
./model/src/config_check.F 914 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 91 CONFIG_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 920 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: staggerTimeStep',
./model/src/config_check.F 922 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 926 CONFIG_CHECK
        WRITE(msgBuf,'(A,I10,A)') 'CONFIG_CHECK: momForcingOutAB=',
./model/src/config_check.F 928 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 929 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: momForcingOutAB ',
./model/src/config_check.F 931 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 935 CONFIG_CHECK
        WRITE(msgBuf,'(A,I10,A)') 'CONFIG_CHECK: tracForcingOutAB=',
./model/src/config_check.F 937 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 938 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: tracForcingOutAB ',
./model/src/config_check.F 93 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: when compiled ',
./model/src/config_check.F 940 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 944 CONFIG_CHECK
        WRITE(msgBuf,'(2A,I4)') 'CONFIG_CHECK: ',
./model/src/config_check.F 946 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 950 CONFIG_CHECK
        WRITE(msgBuf,'(2A)') 'CONFIG_CHECK: selectImplicitDrag=1',
./model/src/config_check.F 952 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 959 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/config_check.F 95 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 962 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 966 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/config_check.F 969 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 976 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/config_check.F 978 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 983 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/config_check.F 986 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 991 CONFIG_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/config_check.F 994 CONFIG_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/config_check.F 999 CONFIG_CHECK
        WRITE(msgBuf,'(A,I3,A)')
./pkg/monitor/monitor.F 186 MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor.F 188 MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor.F 189 MONITOR
            WRITE(msgBuf,'(A)')
./pkg/monitor/monitor.F 191 MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor.F 192 MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor.F 194 MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor.F 44 MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/monitor/monitor.F 81 MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor.F 83 MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor.F 84 MONITOR
            WRITE(msgBuf,'(A)')
./pkg/monitor/monitor.F 86 MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor.F 87 MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor.F 89 MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_ad.F 101 ADMONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_ad.F 102 ADMONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor_ad.F 104 ADMONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_ad.F 227 ADMONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor_ad.F 229 ADMONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_ad.F 230 ADMONITOR
            WRITE(msgBuf,'(A)')
./pkg/monitor/monitor_ad.F 232 ADMONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_ad.F 233 ADMONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor_ad.F 235 ADMONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_ad.F 56 ADMONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/monitor/monitor_ad.F 96 ADMONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor_ad.F 98 ADMONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_ad.F 99 ADMONITOR
            WRITE(msgBuf,'(A)')
./pkg/monitor/monitor_g.F 100 G_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_g.F 168 G_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor_g.F 170 G_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_g.F 171 G_MONITOR
            WRITE(msgBuf,'(A)')
./pkg/monitor/monitor_g.F 173 G_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_g.F 174 G_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor_g.F 176 G_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_g.F 57 G_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/monitor/monitor_g.F 92 G_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/monitor/monitor_g.F 94 G_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_g.F 95 G_MONITOR
            WRITE(msgBuf,'(A)')
./pkg/monitor/monitor_g.F 97 G_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/monitor/monitor_g.F 98 G_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./model/src/config_summary.F 100 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/config_summary.F 102 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 103 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '//  '
./model/src/config_summary.F 104 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 259 CONFIG_SUMMARY
        WRITE(msgBuf,'(A)')
./model/src/config_summary.F 261 CONFIG_SUMMARY
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 263 CONFIG_SUMMARY
         WRITE(msgBuf,'(I3,13F8.3)')
./model/src/config_summary.F 265 CONFIG_SUMMARY
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 267 CONFIG_SUMMARY
        WRITE(msgBuf,'(A)') '    ;'
./model/src/config_summary.F 268 CONFIG_SUMMARY
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 271 CONFIG_SUMMARY
       WRITE(msgBuf,'(2A)') 'selectP_inEOS_Zc =',
./model/src/config_summary.F 273 CONFIG_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 277 CONFIG_SUMMARY
       WRITE(msgBuf,'(2A)') '    0= -g*rhoConst*z ; ',
./model/src/config_summary.F 279 CONFIG_SUMMARY
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 364 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') 'nonlinFreeSurf =',
./model/src/config_summary.F 366 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 370 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '     -1,0= Off ; 1,2,3= On,',
./model/src/config_summary.F 372 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 436 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)')
./model/src/config_summary.F 438 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 442 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '    0= Expl. ; 1= Impl. on provis. Vel ;',
./model/src/config_summary.F 444 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 452 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)')
./model/src/config_summary.F 454 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 458 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '    0= f-Plane ; 1= Beta-Plane ;',
./model/src/config_summary.F 460 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 478 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') 'selectVortScheme=',
./model/src/config_summary.F 480 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 484 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '   = 0 : enstrophy (Shallow-Water Eq.)',
./model/src/config_summary.F 486 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 487 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '   = 1 : same as 0 with modified hFac'
./model/src/config_summary.F 488 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 489 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '   = 2 : energy conserving scheme',
./model/src/config_summary.F 491 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 492 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '   = 3 : energy (general)',
./model/src/config_summary.F 494 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 495 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '         from Sadourny',
./model/src/config_summary.F 497 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 590 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') ' rwSuffixType =  ',
./model/src/config_summary.F 592 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 596 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '   = 0 : myIter (I10.10) ;',
./model/src/config_summary.F 598 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 599 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '   = 2 : myTime (seconds);',
./model/src/config_summary.F 601 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 602 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '   = 4 : myTime/3600 (hours)'
./model/src/config_summary.F 603 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 612 CONFIG_SUMMARY
      WRITE(msgBuf,'(2A)') '/* debLev[*]  :',
./model/src/config_summary.F 614 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 615 CONFIG_SUMMARY
      WRITE(msgBuf,'(A,I3,A)') 'debLevZero =', debLevZero,
./model/src/config_summary.F 617 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 618 CONFIG_SUMMARY
      WRITE(msgBuf,'(A,I3,A)') '   debLevA =', debLevA,
./model/src/config_summary.F 620 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 621 CONFIG_SUMMARY
      WRITE(msgBuf,'(A,I3,A)') '   debLevB =', debLevB,
./model/src/config_summary.F 623 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 624 CONFIG_SUMMARY
      WRITE(msgBuf,'(A,I3,A)') '   debLevC =', debLevC,
./model/src/config_summary.F 626 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 627 CONFIG_SUMMARY
      WRITE(msgBuf,'(A,I3,A)') '   debLevD =', debLevD,
./model/src/config_summary.F 629 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 630 CONFIG_SUMMARY
      WRITE(msgBuf,'(A,I3,A)') '   debLevE =', debLevE,
./model/src/config_summary.F 632 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 638 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '//  '
./model/src/config_summary.F 639 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 63 CONFIG_SUMMARY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/config_summary.F 640 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/config_summary.F 642 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 643 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '//  '
./model/src/config_summary.F 644 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 665 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '//  '
./model/src/config_summary.F 666 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 667 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/config_summary.F 669 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 670 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '//  '
./model/src/config_summary.F 671 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 781 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '//  '
./model/src/config_summary.F 782 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 783 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/config_summary.F 785 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 786 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '//  '
./model/src/config_summary.F 787 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 89 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/config_summary.F 91 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 92 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '// Model configuration'
./model/src/config_summary.F 93 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 94 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/config_summary.F 96 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 976 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/config_summary.F 978 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 979 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '// End of Model config. summary'
./model/src/config_summary.F 980 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 981 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/config_summary.F 983 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 984 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./model/src/config_summary.F 985 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/config_summary.F 98 CONFIG_SUMMARY
      WRITE(msgBuf,'(A)') '//  '
./model/src/config_summary.F 99 CONFIG_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/my82/my82_check.F 26 MY82_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/my82/my82_check.F 28 MY82_CHECK
      WRITE(msgBuf,'(A)') 'MY82_CHECK: #define ALLOW_MY82'
./pkg/my82/my82_check.F 29 MY82_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/my82/my82_check.F 34 MY82_CHECK
         WRITE(msgBuf,'(A)')
./pkg/my82/my82_check.F 36 MY82_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/my82/my82_check.F 43 MY82_CHECK
         WRITE(msgBuf,'(A)') 'Some form of convection has been enabled'
./pkg/my82/my82_check.F 44 MY82_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/my82/my82_check.F 49 MY82_CHECK
         WRITE(msgBuf,'(A)')
./pkg/my82/my82_check.F 51 MY82_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/my82/my82_check.F 56 MY82_CHECK
         WRITE(msgBuf,'(A)') 
./pkg/my82/my82_check.F 58 MY82_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/my82/my82_check.F 64 MY82_CHECK
         WRITE(msgBuf,'(A)') 
./pkg/my82/my82_check.F 66 MY82_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/my82/my82_check.F 70 MY82_CHECK
         WRITE(msgBuf,'(A)') 
./pkg/my82/my82_check.F 72 MY82_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/my82/my82_readparms.F 102 MY82_READPARMS
       WRITE(msgBuf,'(A)') 'MYviscMax must be greater than zero'
./pkg/my82/my82_readparms.F 103 MY82_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/my82/my82_readparms.F 107 MY82_READPARMS
       WRITE(msgBuf,'(A)') 'MYdiffMax must be greater than zero'
./pkg/my82/my82_readparms.F 108 MY82_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/my82/my82_readparms.F 35 MY82_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/my82/my82_readparms.F 76 MY82_READPARMS
      WRITE(msgBuf,'(A)') ' MY82_READPARMS: opening data.my82'
./pkg/my82/my82_readparms.F 77 MY82_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/my82/my82_readparms.F 84 MY82_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/my82/my82_readparms.F 86 MY82_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/mypackage/mypackage_check.F 31 MYPACKAGE_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mypackage/mypackage_check.F 35 MYPACKAGE_CHECK
       WRITE(msgBuf,'(A)') 'MYPACKAGE_CHECK: #define MYPACKAGE'
./pkg/mypackage/mypackage_check.F 36 MYPACKAGE_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mypackage/mypackage_check.F 69 MYPACKAGE_CHECK
        WRITE(msgBuf,'(A)') 'An example requirement is:'
./pkg/mypackage/mypackage_check.F 70 MYPACKAGE_CHECK
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/mypackage/mypackage_check.F 71 MYPACKAGE_CHECK
        WRITE(msgBuf,'(A)') 'myPa_applyTendT needs tempStepping=.true.'
./pkg/mypackage/mypackage_check.F 72 MYPACKAGE_CHECK
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/mypackage/mypackage_read_pickup.F 102 MYPACKAGE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> MYPACKAGE_READ_PICKUP: ',
./pkg/mypackage/mypackage_read_pickup.F 104 MYPACKAGE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mypackage/mypackage_read_pickup.F 107 MYPACKAGE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/mypackage/mypackage_read_pickup.F 109 MYPACKAGE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mypackage/mypackage_read_pickup.F 118 MYPACKAGE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'MYPACKAGE_READ_PICKUP: ',
./pkg/mypackage/mypackage_read_pickup.F 120 MYPACKAGE_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mypackage/mypackage_read_pickup.F 165 MYPACKAGE_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'MYPACKAGE_READ_PICKUP: ',
./pkg/mypackage/mypackage_read_pickup.F 167 MYPACKAGE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mypackage/mypackage_read_pickup.F 174 MYPACKAGE_READ_PICKUP
         WRITE(msgBuf,'(4A)') 'MYPACKAGE_READ_PICKUP: ',
./pkg/mypackage/mypackage_read_pickup.F 176 MYPACKAGE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mypackage/mypackage_read_pickup.F 52 MYPACKAGE_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mypackage/mypackage_read_pickup.F 76 MYPACKAGE_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'MYPACKAGE_READ_PICKUP: ',
./pkg/mypackage/mypackage_read_pickup.F 78 MYPACKAGE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mypackage/mypackage_read_pickup.F 79 MYPACKAGE_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'MYPACKAGE_READ_PICKUP: ',
./pkg/mypackage/mypackage_read_pickup.F 81 MYPACKAGE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mypackage/mypackage_read_pickup.F 91 MYPACKAGE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'MYPACKAGE_READ_PICKUP: ',
./pkg/mypackage/mypackage_read_pickup.F 94 MYPACKAGE_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mypackage/mypackage_read_pickup.F 95 MYPACKAGE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'MYPACKAGE_READ_PICKUP: ',
./pkg/mypackage/mypackage_read_pickup.F 98 MYPACKAGE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/mypackage/mypackage_readparms.F 32 MYPACKAGE_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/mypackage/mypackage_readparms.F 85 MYPACKAGE_READPARMS
      WRITE(msgBuf,'(A)') 'MYPACKAGE_READPARMS: opening data.mypackage'
./pkg/mypackage/mypackage_readparms.F 86 MYPACKAGE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mypackage/mypackage_readparms.F 95 MYPACKAGE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/mypackage/mypackage_readparms.F 97 MYPACKAGE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/mypackage/mypackage_write_pickup.F 118 MYPACKAGE_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'MYPACKAGE_WRITE_PICKUP: ',
./pkg/mypackage/mypackage_write_pickup.F 120 MYPACKAGE_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mypackage/mypackage_write_pickup.F 121 MYPACKAGE_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'MYPACKAGE_WRITE_PICKUP: ',
./pkg/mypackage/mypackage_write_pickup.F 123 MYPACKAGE_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/mypackage/mypackage_write_pickup.F 62 MYPACKAGE_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_balance_flow.F 125 OBCS_BALANCE_FLOW
            WRITE(msgBuf,'(A,I9,A,1P2E16.8)') 'OBCS_balance (it=',
./pkg/obcs/obcs_balance_flow.F 127 OBCS_BALANCE_FLOW
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_balance_flow.F 174 OBCS_BALANCE_FLOW
            WRITE(msgBuf,'(A,I9,A,1P2E16.8)') 'OBCS_balance (it=',
./pkg/obcs/obcs_balance_flow.F 176 OBCS_BALANCE_FLOW
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_balance_flow.F 223 OBCS_BALANCE_FLOW
            WRITE(msgBuf,'(A,I9,A,1P2E16.8)') 'OBCS_balance (it=',
./pkg/obcs/obcs_balance_flow.F 225 OBCS_BALANCE_FLOW
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_balance_flow.F 272 OBCS_BALANCE_FLOW
            WRITE(msgBuf,'(A,I9,A,1P2E16.8)') 'OBCS_balance (it=',
./pkg/obcs/obcs_balance_flow.F 274 OBCS_BALANCE_FLOW
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_balance_flow.F 290 OBCS_BALANCE_FLOW
          WRITE(msgBuf,'(A,I9,A,1P2E16.8)') 'OBCS_balance (it=',
./pkg/obcs/obcs_balance_flow.F 292 OBCS_BALANCE_FLOW
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_balance_flow.F 303 OBCS_BALANCE_FLOW
          WRITE(msgBuf,'(A,1P2E16.8)')
./pkg/obcs/obcs_balance_flow.F 305 OBCS_BALANCE_FLOW
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_balance_flow.F 307 OBCS_BALANCE_FLOW
          WRITE(msgBuf,'(A,1P2E16.8)')
./pkg/obcs/obcs_balance_flow.F 309 OBCS_BALANCE_FLOW
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_balance_flow.F 49 OBCS_BALANCE_FLOW
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_calc.F 274 OBCS_CALC
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_calc.F 276 OBCS_CALC
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_calc.F 277 OBCS_CALC
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_calc.F 279 OBCS_CALC
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_calc.F 306 OBCS_CALC
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_calc.F 308 OBCS_CALC
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_calc.F 309 OBCS_CALC
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_calc.F 311 OBCS_CALC
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_calc.F 338 OBCS_CALC
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_calc.F 340 OBCS_CALC
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_calc.F 341 OBCS_CALC
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_calc.F 343 OBCS_CALC
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_calc.F 370 OBCS_CALC
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_calc.F 372 OBCS_CALC
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_calc.F 373 OBCS_CALC
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_calc.F 375 OBCS_CALC
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_calc.F 64 OBCS_CALC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_check.F 120 OBCS_CHECK
         WRITE(msgBuf,'(A,2(I4,A))')
./pkg/obcs/obcs_check.F 122 OBCS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 123 OBCS_CHECK
         WRITE(msgBuf,'(A)') ' OB_Jn = /* Northern OB local indices */'
./pkg/obcs/obcs_check.F 124 OBCS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 127 OBCS_CHECK
         WRITE(msgBuf,'(A)') ' OB_Js = /* Southern OB local indices */'
./pkg/obcs/obcs_check.F 128 OBCS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 131 OBCS_CHECK
         WRITE(msgBuf,'(A)') ' OB_Ie = /* Eastern OB local indices */'
./pkg/obcs/obcs_check.F 132 OBCS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 135 OBCS_CHECK
         WRITE(msgBuf,'(A)') ' OB_Iw = /* Western OB local indices */'
./pkg/obcs/obcs_check.F 136 OBCS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 143 OBCS_CHECK
      WRITE(msgBuf,'(A)') 'OBCS_CHECK: end summary.'
./pkg/obcs/obcs_check.F 144 OBCS_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 158 OBCS_CHECK
           WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 160 OBCS_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 161 OBCS_CHECK
           WRITE(msgBuf,'(A,2I4,A)')
./pkg/obcs/obcs_check.F 163 OBCS_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 169 OBCS_CHECK
           WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 171 OBCS_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 172 OBCS_CHECK
           WRITE(msgBuf,'(A,2I4,A)')
./pkg/obcs/obcs_check.F 174 OBCS_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 180 OBCS_CHECK
           WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 182 OBCS_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 183 OBCS_CHECK
           WRITE(msgBuf,'(A,2I4,A)')
./pkg/obcs/obcs_check.F 185 OBCS_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 191 OBCS_CHECK
           WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 193 OBCS_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 194 OBCS_CHECK
           WRITE(msgBuf,'(A,2I4,A)')
./pkg/obcs/obcs_check.F 196 OBCS_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 205 OBCS_CHECK
        WRITE(msgBuf,'(A,I6,A)')
./pkg/obcs/obcs_check.F 207 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 219 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 221 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 227 OBCS_CHECK
      WRITE(msgBuf,'(A)') 'OBCS_CHECK: #define ALLOW_ORLANSKI'
./pkg/obcs/obcs_check.F 228 OBCS_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 232 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 234 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 235 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 237 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 245 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 247 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 251 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 253 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 257 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 259 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 265 OBCS_CHECK
      WRITE(msgBuf,'(A)') 'OBCS_CHECK: #define ALLOW_OBCS_STEVENS'
./pkg/obcs/obcs_check.F 266 OBCS_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 272 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 274 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 275 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 277 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 283 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 285 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 288 OBCS_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 290 OBCS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/obcs/obcs_check.F 292 OBCS_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 294 OBCS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/obcs/obcs_check.F 298 OBCS_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 300 OBCS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/obcs/obcs_check.F 302 OBCS_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 304 OBCS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/obcs/obcs_check.F 323 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 325 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 326 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 328 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 335 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 337 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 338 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 340 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 347 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 349 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 350 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 352 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 359 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 361 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 362 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 364 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 371 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 373 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 374 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 376 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 383 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 385 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 386 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 388 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 397 OBCS_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/obcs/obcs_check.F 399 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 406 OBCS_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/obcs/obcs_check.F 408 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 413 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 415 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 416 OBCS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_check.F 418 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 428 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 430 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 431 OBCS_CHECK
        WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 433 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 440 OBCS_CHECK
        WRITE(msgBuf,'(A,I3,A)')
./pkg/obcs/obcs_check.F 442 OBCS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 447 OBCS_CHECK
      WRITE(msgBuf,'(A)') 'OBCS_CHECK: set-up OK'
./pkg/obcs/obcs_check.F 448 OBCS_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 456 OBCS_CHECK
       WRITE(msgBuf,'(2A)') 'S/R OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 466 OBCS_CHECK
            IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 467 OBCS_CHECK
            WRITE(msgBuf,'(2(A,I3),2(A,I5))')
./pkg/obcs/obcs_check.F 470 OBCS_CHECK
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 478 OBCS_CHECK
            IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 479 OBCS_CHECK
            WRITE(msgBuf,'(2(A,I3),2(A,I5))')
./pkg/obcs/obcs_check.F 482 OBCS_CHECK
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 490 OBCS_CHECK
            IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 491 OBCS_CHECK
            WRITE(msgBuf,'(2(A,I3),2(A,I5))')
./pkg/obcs/obcs_check.F 494 OBCS_CHECK
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 49 OBCS_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_check.F 502 OBCS_CHECK
            IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 503 OBCS_CHECK
            WRITE(msgBuf,'(2(A,I3),2(A,I5))')
./pkg/obcs/obcs_check.F 506 OBCS_CHECK
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 517 OBCS_CHECK
            IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 518 OBCS_CHECK
            WRITE(msgBuf,'(2(A,I3),2(A,I5))')
./pkg/obcs/obcs_check.F 521 OBCS_CHECK
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 529 OBCS_CHECK
            IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 530 OBCS_CHECK
            WRITE(msgBuf,'(2(A,I3),2(A,I5))')
./pkg/obcs/obcs_check.F 533 OBCS_CHECK
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 541 OBCS_CHECK
            IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 542 OBCS_CHECK
            WRITE(msgBuf,'(2(A,I3),2(A,I5))')
./pkg/obcs/obcs_check.F 545 OBCS_CHECK
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 553 OBCS_CHECK
            IF ( errCount.EQ.0 ) CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 554 OBCS_CHECK
            WRITE(msgBuf,'(2(A,I3),2(A,I5))')
./pkg/obcs/obcs_check.F 557 OBCS_CHECK
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 567 OBCS_CHECK
         WRITE(msgBuf,'(A,I6,A)')
./pkg/obcs/obcs_check.F 569 OBCS_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_check.F 574 OBCS_CHECK
         WRITE(msgBuf,'(2A)') 'OBCS_CHECK: ',
./pkg/obcs/obcs_check.F 576 OBCS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 63 OBCS_CHECK
      WRITE(msgBuf,'(A)') 'OBCS_CHECK: #define ALLOW_OBCS'
./pkg/obcs/obcs_check.F 64 OBCS_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check.F 66 OBCS_CHECK
      WRITE(msgBuf,'(A)') 'OBCS_CHECK: start summary:'
./pkg/obcs/obcs_check.F 67 OBCS_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_check_depths.F 101 OBCS_CHECK_DEPTHS
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_check_depths.F 114 OBCS_CHECK_DEPTHS
       WRITE(msgBuf,'(2A,I7,A)') 'OBCS_CHECK_DEPTHS: ',
./pkg/obcs/obcs_check_depths.F 116 OBCS_CHECK_DEPTHS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_check_depths.F 118 OBCS_CHECK_DEPTHS
       WRITE(msgBuf,'(2A,I7,A)') 'OBCS_CHECK_DEPTHS: ',
./pkg/obcs/obcs_check_depths.F 124 OBCS_CHECK_DEPTHS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_check_depths.F 31 OBCS_CHECK_DEPTHS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_check_depths.F 49 OBCS_CHECK_DEPTHS
           WRITE(msgBuf,'(2A,2I6,2I4)')
./pkg/obcs/obcs_check_depths.F 52 OBCS_CHECK_DEPTHS
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_check_depths.F 65 OBCS_CHECK_DEPTHS
           WRITE(msgBuf,'(2A,2I6,2I4)')
./pkg/obcs/obcs_check_depths.F 68 OBCS_CHECK_DEPTHS
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_check_depths.F 81 OBCS_CHECK_DEPTHS
           WRITE(msgBuf,'(2A,2I6,2I4)')
./pkg/obcs/obcs_check_depths.F 84 OBCS_CHECK_DEPTHS
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_check_depths.F 98 OBCS_CHECK_DEPTHS
           WRITE(msgBuf,'(2A,2I6,2I4)')
./pkg/obcs/obcs_diag_balance.F 187 OBCS_DIAG_BALANCE
          WRITE(msgBuf,'(A,I9,2I4,A,1P2E16.8)')
./pkg/obcs/obcs_diag_balance.F 190 OBCS_DIAG_BALANCE
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_diag_balance.F 64 OBCS_DIAG_BALANCE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_exf_load.F 276 OBCS_EXF_READ_XZ
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_exf_load.F 297 OBCS_EXF_READ_XZ
        WRITE(msgBuf,'(A,1PE16.8,3A)')
./pkg/obcs/obcs_exf_load.F 300 OBCS_EXF_READ_XZ
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_exf_load.F 314 OBCS_EXF_READ_XZ
         WRITE(msgBuf,'(4A)') ' OBCS_EXF_READ_XZ: ',
./pkg/obcs/obcs_exf_load.F 316 OBCS_EXF_READ_XZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 318 OBCS_EXF_READ_XZ
         WRITE(msgBuf,'(2A,I10,2I7)') ' OBCS_EXF_READ_XZ: ',
./pkg/obcs/obcs_exf_load.F 320 OBCS_EXF_READ_XZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 322 OBCS_EXF_READ_XZ
         WRITE(msgBuf,'(2A,2(L2,2X),E16.9)') ' OBCS_EXF_READ_XZ: ',
./pkg/obcs/obcs_exf_load.F 324 OBCS_EXF_READ_XZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 377 OBCS_EXF_READ_XZ
        WRITE(msgBuf,'(A,1PE16.8,3A)')
./pkg/obcs/obcs_exf_load.F 380 OBCS_EXF_READ_XZ
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_exf_load.F 394 OBCS_EXF_READ_XZ
         WRITE(msgBuf,'(4A)') ' OBCS_EXF_READ_XZ: ',
./pkg/obcs/obcs_exf_load.F 396 OBCS_EXF_READ_XZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 398 OBCS_EXF_READ_XZ
         WRITE(msgBuf,'(2A,I10,2I7)') ' OBCS_EXF_READ_XZ: ',
./pkg/obcs/obcs_exf_load.F 400 OBCS_EXF_READ_XZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 402 OBCS_EXF_READ_XZ
         WRITE(msgBuf,'(2A,2(L2,2X),E16.9)') ' OBCS_EXF_READ_XZ: ',
./pkg/obcs/obcs_exf_load.F 404 OBCS_EXF_READ_XZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 551 OBCS_EXF_READ_YZ
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_exf_load.F 572 OBCS_EXF_READ_YZ
        WRITE(msgBuf,'(A,1PE16.8,3A)')
./pkg/obcs/obcs_exf_load.F 575 OBCS_EXF_READ_YZ
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_exf_load.F 589 OBCS_EXF_READ_YZ
         WRITE(msgBuf,'(4A)') ' OBCS_EXF_READ_XZ: ',
./pkg/obcs/obcs_exf_load.F 591 OBCS_EXF_READ_YZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 593 OBCS_EXF_READ_YZ
         WRITE(msgBuf,'(2A,I10,2I7)') ' OBCS_EXF_READ_YZ: ',
./pkg/obcs/obcs_exf_load.F 595 OBCS_EXF_READ_YZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 597 OBCS_EXF_READ_YZ
         WRITE(msgBuf,'(2A,2(L2,2X),E16.9)') ' OBCS_EXF_READ_YZ: ',
./pkg/obcs/obcs_exf_load.F 599 OBCS_EXF_READ_YZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 652 OBCS_EXF_READ_YZ
        WRITE(msgBuf,'(A,1PE16.8,3A)')
./pkg/obcs/obcs_exf_load.F 655 OBCS_EXF_READ_YZ
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_exf_load.F 669 OBCS_EXF_READ_YZ
         WRITE(msgBuf,'(4A)') ' OBCS_EXF_READ_XZ: ',
./pkg/obcs/obcs_exf_load.F 671 OBCS_EXF_READ_YZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 673 OBCS_EXF_READ_YZ
         WRITE(msgBuf,'(2A,I10,2I7)') ' OBCS_EXF_READ_YZ: ',
./pkg/obcs/obcs_exf_load.F 675 OBCS_EXF_READ_YZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_exf_load.F 677 OBCS_EXF_READ_YZ
         WRITE(msgBuf,'(2A,2(L2,2X),E16.9)') ' OBCS_EXF_READ_YZ: ',
./pkg/obcs/obcs_exf_load.F 679 OBCS_EXF_READ_YZ
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_fields_load.F 355 OBCS_FIELDS_LOAD
        WRITE(msgBuf,'(1X,A,I10,1P1E20.12)')
./pkg/obcs/obcs_fields_load.F 358 OBCS_FIELDS_LOAD
        CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./pkg/obcs/obcs_fields_load.F 87 OBCS_FIELDS_LOAD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_init_fixed.F 167 OBCS_INIT_FIXED
       WRITE(msgBuf,'(2A)')
./pkg/obcs/obcs_init_fixed.F 169 OBCS_INIT_FIXED
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_init_fixed.F 185 OBCS_INIT_FIXED
              WRITE(msgBuf,'(A,I5,2(A,I3),2(A,I5))')
./pkg/obcs/obcs_init_fixed.F 187 OBCS_INIT_FIXED
              CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid )
./pkg/obcs/obcs_init_fixed.F 191 OBCS_INIT_FIXED
              WRITE(msgBuf,'(A,I5,2(A,I3),2(A,I5))')
./pkg/obcs/obcs_init_fixed.F 194 OBCS_INIT_FIXED
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_init_fixed.F 208 OBCS_INIT_FIXED
              WRITE(msgBuf,'(A,I5,2(A,I3),2(A,I5))')
./pkg/obcs/obcs_init_fixed.F 210 OBCS_INIT_FIXED
              CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid )
./pkg/obcs/obcs_init_fixed.F 214 OBCS_INIT_FIXED
              WRITE(msgBuf,'(A,I5,2(A,I3),2(A,I5))')
./pkg/obcs/obcs_init_fixed.F 217 OBCS_INIT_FIXED
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_init_fixed.F 231 OBCS_INIT_FIXED
              WRITE(msgBuf,'(A,I5,2(A,I3),2(A,I5))')
./pkg/obcs/obcs_init_fixed.F 233 OBCS_INIT_FIXED
              CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid )
./pkg/obcs/obcs_init_fixed.F 237 OBCS_INIT_FIXED
              WRITE(msgBuf,'(A,I5,2(A,I3),2(A,I5))')
./pkg/obcs/obcs_init_fixed.F 240 OBCS_INIT_FIXED
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_init_fixed.F 254 OBCS_INIT_FIXED
              WRITE(msgBuf,'(A,I5,2(A,I3),2(A,I5))')
./pkg/obcs/obcs_init_fixed.F 256 OBCS_INIT_FIXED
              CALL PRINT_MESSAGE( msgBuf,ioUnit,SQUEEZE_RIGHT,myThid )
./pkg/obcs/obcs_init_fixed.F 260 OBCS_INIT_FIXED
              WRITE(msgBuf,'(A,I5,2(A,I3),2(A,I5))')
./pkg/obcs/obcs_init_fixed.F 263 OBCS_INIT_FIXED
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_init_fixed.F 271 OBCS_INIT_FIXED
       WRITE(msgBuf,'(2A)')
./pkg/obcs/obcs_init_fixed.F 273 OBCS_INIT_FIXED
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/obcs/obcs_init_fixed.F 42 OBCS_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf, errMsg
./pkg/obcs/obcs_monitor.F 176 OBCS_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/obcs/obcs_monitor.F 178 OBCS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/obcs/obcs_monitor.F 179 OBCS_MONITOR
            WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_monitor.F 181 OBCS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/obcs/obcs_monitor.F 182 OBCS_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/obcs/obcs_monitor.F 184 OBCS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/obcs/obcs_monitor.F 56 OBCS_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_monitor.F 81 OBCS_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/obcs/obcs_monitor.F 83 OBCS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/obcs/obcs_monitor.F 84 OBCS_MONITOR
            WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_monitor.F 86 OBCS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/obcs/obcs_monitor.F 87 OBCS_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/obcs/obcs_monitor.F 89 OBCS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/obcs/obcs_readparms.F 361 OBCS_READPARMS
      WRITE(msgBuf,'(A)') ' OBCS_READPARMS: opening data.obcs'
./pkg/obcs/obcs_readparms.F 362 OBCS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_readparms.F 375 OBCS_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/obcs/obcs_readparms.F 378 OBCS_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_readparms.F 379 OBCS_READPARMS
       WRITE(msgBuf,'(A,A)') 'OBCS_READPARMS: ',
./pkg/obcs/obcs_readparms.F 381 OBCS_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_readparms.F 437 OBCS_READPARMS
      WRITE(msgBuf,'(A)') ' OBCS_READPARMS: finished reading data.obcs'
./pkg/obcs/obcs_readparms.F 438 OBCS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_readparms.F 450 OBCS_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_readparms.F 452 OBCS_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_readparms.F 453 OBCS_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/obcs/obcs_readparms.F 455 OBCS_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_readparms.F 471 OBCS_READPARMS
        WRITE(msgBuf,'(2A)') 'OBCS_READPARMS: ',
./pkg/obcs/obcs_readparms.F 473 OBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_readparms.F 487 OBCS_READPARMS
        WRITE(msgBuf,'(2A)') 'OBCS_READPARMS: ',
./pkg/obcs/obcs_readparms.F 489 OBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_readparms.F 503 OBCS_READPARMS
        WRITE(msgBuf,'(2A)') 'OBCS_READPARMS: ',
./pkg/obcs/obcs_readparms.F 505 OBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_readparms.F 519 OBCS_READPARMS
        WRITE(msgBuf,'(2A)') 'OBCS_READPARMS: ',
./pkg/obcs/obcs_readparms.F 521 OBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_readparms.F 542 OBCS_READPARMS
        WRITE(msgBuf,'(A)') ' Northern OB global indices : OB_Jnorth ='
./pkg/obcs/obcs_readparms.F 543 OBCS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_readparms.F 547 OBCS_READPARMS
        WRITE(msgBuf,'(A)') ' Southern OB global indices : OB_Jsouth ='
./pkg/obcs/obcs_readparms.F 548 OBCS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_readparms.F 552 OBCS_READPARMS
        WRITE(msgBuf,'(A)') ' Eastern  OB global indices : OB_Ieast ='
./pkg/obcs/obcs_readparms.F 553 OBCS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_readparms.F 557 OBCS_READPARMS
        WRITE(msgBuf,'(A)') ' Western  OB global indices : OB_Iwest ='
./pkg/obcs/obcs_readparms.F 558 OBCS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_readparms.F 55 OBCS_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_readparms.F 562 OBCS_READPARMS
        WRITE(msgBuf,'(A)') ' '
./pkg/obcs/obcs_readparms.F 563 OBCS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_set_connect.F 212 OBCS_SET_CONNECT
            WRITE(msgBuf,'(A,3(A,I4),2(A,I10))') 'OBCS_SET_CONNECT: ',
./pkg/obcs/obcs_set_connect.F 215 OBCS_SET_CONNECT
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_set_connect.F 220 OBCS_SET_CONNECT
            WRITE(msgBuf,'(A,2I4,A,I8)') 'OBCS_SET_CONNECT: bi,bj=',
./pkg/obcs/obcs_set_connect.F 223 OBCS_SET_CONNECT
            WRITE(msgBuf,'(A,2I4,2(A,I8))') 'OBCS_SET_CONNECT: bi,bj=',
./pkg/obcs/obcs_set_connect.F 227 OBCS_SET_CONNECT
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_set_connect.F 231 OBCS_SET_CONNECT
              WRITE(msgBuf,'(A,15I8)')
./pkg/obcs/obcs_set_connect.F 233 OBCS_SET_CONNECT
              CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_set_connect.F 267 OBCS_SET_CONNECT
          WRITE(msgBuf,'(A,I4,2(A,I10))') 'OBCS_SET_CONNECT: @ k=', k,
./pkg/obcs/obcs_set_connect.F 270 OBCS_SET_CONNECT
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/obcs/obcs_set_connect.F 275 OBCS_SET_CONNECT
          WRITE(msgBuf,'(A,I4,2(A,I10))') 'OBCS_SET_CONNECT: @ k=', k,
./pkg/obcs/obcs_set_connect.F 277 OBCS_SET_CONNECT
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_set_connect.F 281 OBCS_SET_CONNECT
            WRITE(msgBuf,'(A,15I8)')
./pkg/obcs/obcs_set_connect.F 283 OBCS_SET_CONNECT
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/obcs/obcs_set_connect.F 40 OBCS_SET_CONNECT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_u1_adv_tracer.F 66 OBCS_U1_ADV_TRACER
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/obcs/obcs_u1_adv_tracer.F 83 OBCS_U1_ADV_TRACER
        WRITE(msgBuf,'(A,I4)')
./pkg/obcs/obcs_u1_adv_tracer.F 85 OBCS_U1_ADV_TRACER
        CALL PRINT_ERROR(msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_export_import_data.F 46 CPL_EXPORT_IMPORT_DATA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ocn_compon_interf/cpl_export_import_data.F 57 CPL_EXPORT_IMPORT_DATA
         WRITE(msgBuf,'(A,I10)')
./pkg/ocn_compon_interf/cpl_export_import_data.F 59 CPL_EXPORT_IMPORT_DATA
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ocn_compon_interf/cpl_export_import_data.F 77 CPL_EXPORT_IMPORT_DATA
         WRITE(msgBuf,'(A,I10)')
./pkg/ocn_compon_interf/cpl_export_import_data.F 79 CPL_EXPORT_IMPORT_DATA
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ocn_compon_interf/cpl_import_cplparms.F 42 CPL_IMPORT_CPLPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ocn_compon_interf/cpl_import_cplparms.F 84 CPL_IMPORT_CPLPARMS
        WRITE(msgBuf,'(2A,I4,A)') 'CPL_IMPORT_CPLPARMS: ',
./pkg/ocn_compon_interf/cpl_import_cplparms.F 86 CPL_IMPORT_CPLPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_import_cplparms.F 87 CPL_IMPORT_CPLPARMS
        WRITE(msgBuf,'(2A,I4,A)') 'CPL_IMPORT_CPLPARMS: ',
./pkg/ocn_compon_interf/cpl_import_cplparms.F 89 CPL_IMPORT_CPLPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 120 CPL_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ocn_compon_interf/cpl_readparms.F 122 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./pkg/ocn_compon_interf/cpl_readparms.F 134 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 136 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 137 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 139 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 147 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: needs',
./pkg/ocn_compon_interf/cpl_readparms.F 149 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 150 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 152 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 158 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: needs',
./pkg/ocn_compon_interf/cpl_readparms.F 160 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 161 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 163 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 169 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: needs',
./pkg/ocn_compon_interf/cpl_readparms.F 171 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 172 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 174 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 180 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: needs',
./pkg/ocn_compon_interf/cpl_readparms.F 182 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 183 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 185 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 193 CPL_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ocn_compon_interf/cpl_readparms.F 195 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 196 CPL_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ocn_compon_interf/cpl_readparms.F 198 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 206 CPL_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** CPL_READPARMS:',
./pkg/ocn_compon_interf/cpl_readparms.F 208 CPL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 210 CPL_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** CPL_READPARMS:',
./pkg/ocn_compon_interf/cpl_readparms.F 212 CPL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 215 CPL_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** CPL_READPARMS:',
./pkg/ocn_compon_interf/cpl_readparms.F 217 CPL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 225 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: useImportRunOff',
./pkg/ocn_compon_interf/cpl_readparms.F 227 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 228 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 230 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 236 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: useImport',
./pkg/ocn_compon_interf/cpl_readparms.F 238 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 239 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 241 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 245 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: useImportThSIce',
./pkg/ocn_compon_interf/cpl_readparms.F 247 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 248 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 250 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 253 CPL_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 255 CPL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ocn_compon_interf/cpl_readparms.F 257 CPL_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 259 CPL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ocn_compon_interf/cpl_readparms.F 263 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: useImportSltPlm',
./pkg/ocn_compon_interf/cpl_readparms.F 265 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 266 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 268 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 274 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: useImport',
./pkg/ocn_compon_interf/cpl_readparms.F 276 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 277 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/ocn_compon_interf/cpl_readparms.F 279 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ocn_compon_interf/cpl_readparms.F 301 CPL_READPARMS
      WRITE(msgBuf,'(A)') ' '
./pkg/ocn_compon_interf/cpl_readparms.F 302 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 303 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/ocn_compon_interf/cpl_readparms.F 304 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 305 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// Coupling set-up summary :'
./pkg/ocn_compon_interf/cpl_readparms.F 306 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 307 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/ocn_compon_interf/cpl_readparms.F 308 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 311 CPL_READPARMS
       WRITE(msgBuf,'(A)') '// -------'
./pkg/ocn_compon_interf/cpl_readparms.F 312 CPL_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 313 CPL_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ocn_compon_interf/cpl_readparms.F 315 CPL_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 338 CPL_READPARMS
       WRITE(msgBuf,'(A)') '// -------'
./pkg/ocn_compon_interf/cpl_readparms.F 339 CPL_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 340 CPL_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/ocn_compon_interf/cpl_readparms.F 342 CPL_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 387 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/ocn_compon_interf/cpl_readparms.F 388 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 389 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// End of Coupling set-up summary'
./pkg/ocn_compon_interf/cpl_readparms.F 390 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 391 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/ocn_compon_interf/cpl_readparms.F 392 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ocn_compon_interf/cpl_readparms.F 52 CPL_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ocn_compon_interf/cpl_readparms.F 85 CPL_READPARMS
      WRITE(msgBuf,'(A)') ' CPL_READPARMS: opening data.cpl'
./pkg/ocn_compon_interf/cpl_readparms.F 86 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 46 OCN_CHECK_CPLCONFIG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 66 OCN_CHECK_CPLCONFIG
        WRITE(msgBuf,'(2A,I4,A)') 'OCN_CHECK_CPLCONFIG: ',
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 68 OCN_CHECK_CPLCONFIG
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 87 OCN_CHECK_CPLCONFIG
           WRITE(msgBuf,'(2(A,I6),2(A,I4),A)')
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 90 OCN_CHECK_CPLCONFIG
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 91 OCN_CHECK_CPLCONFIG
           WRITE(msgBuf,'(A,E30.15)')
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 93 OCN_CHECK_CPLCONFIG
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 94 OCN_CHECK_CPLCONFIG
           WRITE(msgBuf,'(A,E30.15)')
./pkg/ocn_compon_interf/ocn_check_cplconfig.F 96 OCN_CHECK_CPLCONFIG
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ocn_compon_interf/ocn_export_data.F 48 OCN_EXPORT_DATA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ocn_compon_interf/ocn_export_data.F 59 OCN_EXPORT_DATA
         WRITE(msgBuf,'(A,I10)')
./pkg/ocn_compon_interf/ocn_export_data.F 61 OCN_EXPORT_DATA
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/offline/offline_check.F 103 OFFLINE_CHECK
        WRITE(msgBuf,'(A)') 'some GMxxFile are set but not used'
./pkg/offline/offline_check.F 104 OFFLINE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_check.F 108 OFFLINE_CHECK
        WRITE(msgBuf,'(A)') 'some KPP_xxxxxFile are set but not used'
./pkg/offline/offline_check.F 109 OFFLINE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_check.F 113 OFFLINE_CHECK
        WRITE(msgBuf,'(A)') 'ConvFile is set but not used'
./pkg/offline/offline_check.F 114 OFFLINE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_check.F 119 OFFLINE_CHECK
        WRITE(msgBuf,'(A,I3,A)')
./pkg/offline/offline_check.F 121 OFFLINE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_check.F 126 OFFLINE_CHECK
       WRITE(msgBuf,'(A)') 'OFFLINE_CHECK: done'
./pkg/offline/offline_check.F 127 OFFLINE_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/offline/offline_check.F 38 OFFLINE_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/offline/offline_check.F 43 OFFLINE_CHECK
       WRITE(msgBuf,'(A)') 'OFFLINE_CHECK: #define OFFLINE'
./pkg/offline/offline_check.F 44 OFFLINE_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/offline/offline_check.F 79 OFFLINE_CHECK
        WRITE(msgBuf,'(A)') 'allowFreezing=T not allowed if useOffLine'
./pkg/offline/offline_check.F 80 OFFLINE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_check.F 86 OFFLINE_CHECK
        WRITE(msgBuf,'(A)') 'HFluxFile is set but not used'
./pkg/offline/offline_check.F 87 OFFLINE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_check.F 92 OFFLINE_CHECK
        WRITE(msgBuf,'(A)') 'SFluxFile is set but not used'
./pkg/offline/offline_check.F 93 OFFLINE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_check.F 98 OFFLINE_CHECK
        WRITE(msgBuf,'(A)') 'IceFile is set but not used'
./pkg/offline/offline_check.F 99 OFFLINE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_fields_load.F 124 OFFLINE_FIELDS_LOAD
        WRITE(msgBuf,'(2A,I5,A)') 'OFFLINE_FIELDS_LOAD: ',
./pkg/offline/offline_fields_load.F 126 OFFLINE_FIELDS_LOAD
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_fields_load.F 70 OFFLINE_FIELDS_LOAD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/offline/offline_readparms.F 102 OFFLINE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/offline/offline_readparms.F 104 OFFLINE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/offline/offline_readparms.F 118 OFFLINE_READPARMS
        WRITE(msgBuf,'(A,A)') 'S/R OFFLINE_READPARMS: "KPP_ghatFile"',
./pkg/offline/offline_readparms.F 120 OFFLINE_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_readparms.F 121 OFFLINE_READPARMS
        WRITE(msgBuf,'(A,A)') 'S/R OFFLINE_READPARMS: read instead ',
./pkg/offline/offline_readparms.F 123 OFFLINE_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_readparms.F 127 OFFLINE_READPARMS
        WRITE(msgBuf,'(A,A)') 'S/R OFFLINE_READPARMS: ',
./pkg/offline/offline_readparms.F 129 OFFLINE_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_readparms.F 130 OFFLINE_READPARMS
        WRITE(msgBuf,'(A,A)') 'S/R OFFLINE_READPARMS: ',
./pkg/offline/offline_readparms.F 132 OFFLINE_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/offline/offline_readparms.F 28 OFFLINE_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/offline/offline_readparms.F 61 OFFLINE_READPARMS
      WRITE(msgBuf,'(A)') ' OFFLINE_READPARMS: opening data.off'
./pkg/offline/offline_readparms.F 62 OFFLINE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/offline/offline_reset_parms.F 30 OFFLINE_RESET_PARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/offline/offline_reset_parms.F 35 OFFLINE_RESET_PARMS
      WRITE(msgBuf,'(A,A)') ' OFFLINE_RESET_PARMS: ',
./pkg/offline/offline_reset_parms.F 37 OFFLINE_RESET_PARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/offline/offline_reset_parms.F 55 OFFLINE_RESET_PARMS
          WRITE(msgBuf,'(A,A)') '** WARNING ** OFFLINE_RESET_PARMS: ',
./pkg/offline/offline_reset_parms.F 57 OFFLINE_RESET_PARMS
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/offline/offline_reset_parms.F 59 OFFLINE_RESET_PARMS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/offline/offline_reset_parms.F 66 OFFLINE_RESET_PARMS
          WRITE(msgBuf,'(A,A)') '** WARNING ** OFFLINE_RESET_PARMS: ',
./pkg/offline/offline_reset_parms.F 68 OFFLINE_RESET_PARMS
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/offline/offline_reset_parms.F 70 OFFLINE_RESET_PARMS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/opps/opps_calc.F 165 OPPS_CALC
        WRITE(msgBuf,'(A,I3)')
./pkg/opps/opps_calc.F 167 OPPS_CALC
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_calc.F 205 OPPS_CALC
           WRITE(msgBuf,'(A,I3)')
./pkg/opps/opps_calc.F 207 OPPS_CALC
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_calc.F 240 OPPS_CALC
          WRITE(msgBuf,'(A,3E12.4,I3)')
./pkg/opps/opps_calc.F 242 OPPS_CALC
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_calc.F 257 OPPS_CALC
           WRITE(msgBuf,'(A,I3)')
./pkg/opps/opps_calc.F 259 OPPS_CALC
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_calc.F 261 OPPS_CALC
           WRITE(msgBuf,'(A,4A14)')
./pkg/opps/opps_calc.F 264 OPPS_CALC
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_calc.F 266 OPPS_CALC
           WRITE(msgBuf,'(A,4E14.6)')
./pkg/opps/opps_calc.F 269 OPPS_CALC
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_calc.F 310 OPPS_CALC
          WRITE(msgBuf,'(A,2E12.4,I3)')
./pkg/opps/opps_calc.F 312 OPPS_CALC
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_calc.F 357 OPPS_CALC
         WRITE(msgBuf,'(A,F14.4)')
./pkg/opps/opps_calc.F 359 OPPS_CALC
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_calc.F 95 OPPS_CALC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/opps/opps_check.F 26 OPPS_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/opps/opps_check.F 28 OPPS_CHECK
      WRITE(msgBuf,'(A)') 'OPPS_CHECK: #define ALLOW_OPPS'
./pkg/opps/opps_check.F 29 OPPS_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_check.F 34 OPPS_CHECK
         WRITE(msgBuf,'(A)')
./pkg/opps/opps_check.F 36 OPPS_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/opps/opps_check.F 43 OPPS_CHECK
         WRITE(msgBuf,'(A)') 'Some form of convection has been enabled'
./pkg/opps/opps_check.F 44 OPPS_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/opps/opps_check.F 49 OPPS_CHECK
         WRITE(msgBuf,'(A)')
./pkg/opps/opps_check.F 51 OPPS_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/opps/opps_check.F 56 OPPS_CHECK
         WRITE(msgBuf,'(A)') 
./pkg/opps/opps_check.F 58 OPPS_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/opps/opps_check.F 63 OPPS_CHECK
         WRITE(msgBuf,'(A)') 
./pkg/opps/opps_check.F 65 OPPS_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/opps/opps_check.F 70 OPPS_CHECK
         WRITE(msgBuf,'(A)') 
./pkg/opps/opps_check.F 72 OPPS_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/opps/opps_interface.F 161 OPPS_INTERFACE
           WRITE(msgBuf,'(A,A)') 'OPPS_INTERFACE: theta or S-range is',
./pkg/opps/opps_interface.F 163 OPPS_INTERFACE
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_interface.F 165 OPPS_INTERFACE
           WRITE(msgBuf,'(A,2I5)') '                for (i,j) = ', I,J
./pkg/opps/opps_interface.F 166 OPPS_INTERFACE
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/opps/opps_interface.F 75 OPPS_INTERFACE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/opps/opps_readparms.F 35 OPPS_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/opps/opps_readparms.F 85 OPPS_READPARMS
      WRITE(msgBuf,'(A)') ' OPPS_READPARMS: opening data.opps'
./pkg/opps/opps_readparms.F 86 OPPS_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/opps/opps_readparms.F 93 OPPS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/opps/opps_readparms.F 95 OPPS_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/pp81/pp81_check.F 26 PP81_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/pp81/pp81_check.F 28 PP81_CHECK
      WRITE(msgBuf,'(A)') 'PP81_CHECK: #define ALLOW_PP81'
./pkg/pp81/pp81_check.F 29 PP81_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/pp81/pp81_check.F 34 PP81_CHECK
         WRITE(msgBuf,'(A)')
./pkg/pp81/pp81_check.F 36 PP81_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/pp81/pp81_check.F 43 PP81_CHECK
         WRITE(msgBuf,'(A)') 'Some form of convection has been enabled'
./pkg/pp81/pp81_check.F 44 PP81_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/pp81/pp81_check.F 49 PP81_CHECK
         WRITE(msgBuf,'(A)')
./pkg/pp81/pp81_check.F 51 PP81_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/pp81/pp81_check.F 57 PP81_CHECK
         WRITE(msgBuf,'(A)') 
./pkg/pp81/pp81_check.F 59 PP81_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/pp81/pp81_check.F 63 PP81_CHECK
         WRITE(msgBuf,'(A)') 
./pkg/pp81/pp81_check.F 65 PP81_CHECK
         CALL PRINT_ERROR( msgBuf , 1)
./model/src/do_oceanic_phys.F 216 DO_OCEANIC_PHYS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/do_oceanic_phys.F 825 DO_OCEANIC_PHYS
          WRITE(msgBuf,'(A,2(I4,A))')
./model/src/do_oceanic_phys.F 827 DO_OCEANIC_PHYS
          CALL DEBUG_MSG(msgBuf(1:43),myThid)
./pkg/pp81/pp81_readparms.F 108 PP81_READPARMS
       WRITE(msgBuf,'(A)') 'PPviscMax must be greater than zero'
./pkg/pp81/pp81_readparms.F 109 PP81_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/pp81/pp81_readparms.F 113 PP81_READPARMS
       WRITE(msgBuf,'(A)') 'PPalpha must not be zero'
./pkg/pp81/pp81_readparms.F 114 PP81_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/pp81/pp81_readparms.F 118 PP81_READPARMS
       WRITE(msgBuf,'(A)') 'PPnRi must not be zero'
./pkg/pp81/pp81_readparms.F 119 PP81_READPARMS
       CALL PRINT_ERROR( msgBuf , 1)
./pkg/pp81/pp81_readparms.F 35 PP81_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/pp81/pp81_readparms.F 82 PP81_READPARMS
      WRITE(msgBuf,'(A)') ' PP81_READPARMS: opening data.pp81'
./pkg/pp81/pp81_readparms.F 83 PP81_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/pp81/pp81_readparms.F 90 PP81_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/pp81/pp81_readparms.F 92 PP81_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/profiles/profiles_findunit.F 27 PROFILES_FINDUNIT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/profiles/profiles_findunit.F 42 PROFILES_FINDUNIT
            WRITE(msgBuf,'(A,I4)')
./pkg/profiles/profiles_findunit.F 44 PROFILES_FINDUNIT
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/profiles/profiles_findunit.F 46 PROFILES_FINDUNIT
            WRITE(msgBuf,'(A)')
./pkg/profiles/profiles_findunit.F 48 PROFILES_FINDUNIT
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/profiles/profiles_findunit.F 61 PROFILES_FINDUNIT
        WRITE(msgBuf,'(A)')
./pkg/profiles/profiles_findunit.F 63 PROFILES_FINDUNIT
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/profiles/profiles_ini_io.F 37 PROFILES_INI_IO
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/profiles/profiles_ini_io.F 60 PROFILES_INI_IO
       WRITE(msgBuf,'(2A)') '** WARNING ** PROFILES_INI_IO: cannot ',
./pkg/profiles/profiles_ini_io.F 62 PROFILES_INI_IO
       CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/profiles/profiles_init_fixed.F 110 PROFILES_INIT_FIXED
        WRITE(msgBuf,'(2A)') 'PROFILES_INIT_FIXED: ',
./pkg/profiles/profiles_init_fixed.F 112 PROFILES_INIT_FIXED
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/profiles/profiles_init_fixed.F 113 PROFILES_INIT_FIXED
        WRITE(msgBuf,'(2A)') 'PROFILES_INIT_FIXED: ',
./pkg/profiles/profiles_init_fixed.F 115 PROFILES_INIT_FIXED
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/profiles/profiles_init_fixed.F 231 PROFILES_INIT_FIXED
        WRITE(msgBuf,'(3A)')
./pkg/profiles/profiles_init_fixed.F 234 PROFILES_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 253 PROFILES_INIT_FIXED
        WRITE(msgBuf,'(3A)')
./pkg/profiles/profiles_init_fixed.F 256 PROFILES_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 271 PROFILES_INIT_FIXED
        WRITE(msgBuf,'(3A)')
./pkg/profiles/profiles_init_fixed.F 274 PROFILES_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 319 PROFILES_INIT_FIXED
        WRITE(msgBuf,'(3A)')
./pkg/profiles/profiles_init_fixed.F 322 PROFILES_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 340 PROFILES_INIT_FIXED
        WRITE(msgBuf,'(3A)')
./pkg/profiles/profiles_init_fixed.F 343 PROFILES_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 543 PROFILES_INIT_FIXED
          WRITE(msgBuf,'(4A)')
./pkg/profiles/profiles_init_fixed.F 547 PROFILES_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 556 PROFILES_INIT_FIXED
          WRITE(msgBuf,'(4A)')
./pkg/profiles/profiles_init_fixed.F 560 PROFILES_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 567 PROFILES_INIT_FIXED
          WRITE(msgBuf,'(4A)')
./pkg/profiles/profiles_init_fixed.F 571 PROFILES_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 578 PROFILES_INIT_FIXED
          WRITE(msgBuf,'(4A)')
./pkg/profiles/profiles_init_fixed.F 582 PROFILES_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 596 PROFILES_INIT_FIXED
         WRITE(msgBuf,'(3A)')
./pkg/profiles/profiles_init_fixed.F 599 PROFILES_INIT_FIXED
         CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 841 PROFILES_INIT_FIXED
            WRITE(msgBuf,'(A)')
./pkg/profiles/profiles_init_fixed.F 843 PROFILES_INIT_FIXED
            CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 855 PROFILES_INIT_FIXED
            WRITE(msgBuf,'(A,2i6)')
./pkg/profiles/profiles_init_fixed.F 858 PROFILES_INIT_FIXED
            CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 862 PROFILES_INIT_FIXED
      WRITE(msgBuf,'(A, i6,d20.5)')
./pkg/profiles/profiles_init_fixed.F 918 PROFILES_INIT_FIXED
       WRITE(msgBuf,'(3A)')
./pkg/profiles/profiles_init_fixed.F 922 PROFILES_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 923 PROFILES_INIT_FIXED
       WRITE(msgBuf,'(2A)')
./pkg/profiles/profiles_init_fixed.F 926 PROFILES_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_init_fixed.F 927 PROFILES_INIT_FIXED
       WRITE(msgBuf,'(A)')
./pkg/profiles/profiles_init_fixed.F 929 PROFILES_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/profiles/profiles_readparms.F 118 PROFILES_READPARMS
        WRITE(msgBuf,'(A)') 'PROFILES_READPARMS: opening data.profiles'
./pkg/profiles/profiles_readparms.F 119 PROFILES_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/profiles/profiles_readparms.F 129 PROFILES_READPARMS
        WRITE(msgBuf,'(2A)') 'PROFILES_READPARMS: ',
./pkg/profiles/profiles_readparms.F 131 PROFILES_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/profiles/profiles_readparms.F 192 PROFILES_READPARMS
             WRITE(msgBuf,'(3A)')
./pkg/profiles/profiles_readparms.F 195 PROFILES_READPARMS
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/profiles/profiles_readparms.F 38 PROFILES_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/all_proc_die.F 44 ALL_PROC_DIE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/all_proc_die.F 53 ALL_PROC_DIE
      WRITE(msgBuf,'(A)') 'S/R ALL_PROC_DIE: ending the run'
./eesupp/src/all_proc_die.F 54 ALL_PROC_DIE
      CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/all_proc_die.F 83 ALL_PROC_DIE
          WRITE(msgBuf,'(A,I5)')
./eesupp/src/all_proc_die.F 85 ALL_PROC_DIE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_ad_dump.F 63 PTRACERS_AD_DUMP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_check.F 100 PTRACERS_CHECK
        WRITE(msgBuf,'(A,I4)') ' tracer number : ',iTracer
./pkg/ptracers/ptracers_check.F 101 PTRACERS_CHECK
        CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_check.F 146 PTRACERS_CHECK
      WRITE(msgBuf,'(A)') ' -----------------------------------'
./pkg/ptracers/ptracers_check.F 147 PTRACERS_CHECK
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_check.F 152 PTRACERS_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** PTRACERS_CHECK:',
./pkg/ptracers/ptracers_check.F 154 PTRACERS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ptracers/ptracers_check.F 156 PTRACERS_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** PTRACERS_CHECK:',
./pkg/ptracers/ptracers_check.F 158 PTRACERS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ptracers/ptracers_check.F 161 PTRACERS_CHECK
        WRITE(msgBuf,'(2A,I3,A)') 'PTRACERS_CHECK:',
./pkg/ptracers/ptracers_check.F 163 PTRACERS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 164 PTRACERS_CHECK
        WRITE(msgBuf,'(2A,I3,A)') 'PTRACERS_CHECK:',
./pkg/ptracers/ptracers_check.F 166 PTRACERS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 173 PTRACERS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/ptracers/ptracers_check.F 175 PTRACERS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 176 PTRACERS_CHECK
        WRITE(msgBuf,'(2A,I3,A)') 'PTRACERS_CHECK:',
./pkg/ptracers/ptracers_check.F 178 PTRACERS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 184 PTRACERS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/ptracers/ptracers_check.F 186 PTRACERS_CHECK
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/ptracers/ptracers_check.F 187 PTRACERS_CHECK
        WRITE(msgBuf,'(2A)') 'PTRACERS_CHECK: ',
./pkg/ptracers/ptracers_check.F 189 PTRACERS_CHECK
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/ptracers/ptracers_check.F 195 PTRACERS_CHECK
          WRITE(msgBuf,'(2A,I3,A)') 'PTRACERS_CHECK:',
./pkg/ptracers/ptracers_check.F 197 PTRACERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 198 PTRACERS_CHECK
          WRITE(msgBuf,'(A,L5,A)')
./pkg/ptracers/ptracers_check.F 200 PTRACERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 204 PTRACERS_CHECK
          WRITE(msgBuf,'(2A,I3,A)') 'PTRACERS_CHECK:',
./pkg/ptracers/ptracers_check.F 206 PTRACERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 207 PTRACERS_CHECK
          WRITE(msgBuf,'(2A,L5,A)') 'PTRACERS_CHECK:',
./pkg/ptracers/ptracers_check.F 209 PTRACERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 213 PTRACERS_CHECK
          WRITE(msgBuf,'(2A,I3,A)') 'PTRACERS_CHECK:',
./pkg/ptracers/ptracers_check.F 215 PTRACERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 216 PTRACERS_CHECK
          WRITE(msgBuf,'(A,L5,A)')
./pkg/ptracers/ptracers_check.F 218 PTRACERS_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check.F 38 PTRACERS_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_check.F 44 PTRACERS_CHECK
      WRITE(msgBuf,'(A)') 'PTRACERS_CHECK: #define ALLOW_PTRACERS'
./pkg/ptracers/ptracers_check.F 45 PTRACERS_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_check.F 50 PTRACERS_CHECK
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/ptracers/ptracers_check.F 51 PTRACERS_CHECK
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid )
./pkg/ptracers/ptracers_check.F 52 PTRACERS_CHECK
      WRITE(msgBuf,'(A)') '// PTRACERS parameters '
./pkg/ptracers/ptracers_check.F 53 PTRACERS_CHECK
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid )
./pkg/ptracers/ptracers_check.F 54 PTRACERS_CHECK
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/ptracers/ptracers_check.F 55 PTRACERS_CHECK
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT , myThid )
./pkg/ptracers/ptracers_check.F 98 PTRACERS_CHECK
        WRITE(msgBuf,'(A)') ' -----------------------------------'
./pkg/ptracers/ptracers_check.F 99 PTRACERS_CHECK
        CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, 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 104 PTRACERS_CHECK_PICKUP
             WRITE(msgBuf,'(3A,I4)') '** WARNING ** ',
./pkg/ptracers/ptracers_check_pickup.F 107 PTRACERS_CHECK_PICKUP
             CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_check_pickup.F 118 PTRACERS_CHECK_PICKUP
           WRITE(msgBuf,'(4A)') 'PTRACERS_CHECK_PICKUP: ',
./pkg/ptracers/ptracers_check_pickup.F 120 PTRACERS_CHECK_PICKUP
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check_pickup.F 127 PTRACERS_CHECK_PICKUP
         WRITE(msgBuf,'(4A)') 'PTRACERS_CHECK_PICKUP: ',
./pkg/ptracers/ptracers_check_pickup.F 130 PTRACERS_CHECK_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check_pickup.F 133 PTRACERS_CHECK_PICKUP
         WRITE(msgBuf,'(4A)') '** WARNING ** PTRACERS_CHECK_PICKUP: ',
./pkg/ptracers/ptracers_check_pickup.F 135 PTRACERS_CHECK_PICKUP
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_check_pickup.F 54 PTRACERS_CHECK_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_check_pickup.F 84 PTRACERS_CHECK_PICKUP
           WRITE(msgBuf,'(2A,I4,3A)') 'PTRACERS_CHECK_PICKUP: ',
./pkg/ptracers/ptracers_check_pickup.F 87 PTRACERS_CHECK_PICKUP
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_check_pickup.F 96 PTRACERS_CHECK_PICKUP
           IF ( fldName(1:4).EQ.'gPtr' ) WRITE(msgBuf,'(2A,I4)')
./pkg/ptracers/ptracers_check_pickup.F 99 PTRACERS_CHECK_PICKUP
           IF ( fldName(1:3).EQ.'pTr' )  WRITE(msgBuf,'(2A,I4)')
./pkg/ptracers/ptracers_init_fixed.F 101 PTRACERS_INIT_FIXED
          WRITE(msgBuf,'(2A)') 'PTRACERS_INIT_FIXED: ',
./pkg/ptracers/ptracers_init_fixed.F 103 PTRACERS_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_init_fixed.F 104 PTRACERS_INIT_FIXED
          WRITE(msgBuf,'(2A)') 'PTRACERS_INIT_FIXED: ',
./pkg/ptracers/ptracers_init_fixed.F 106 PTRACERS_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_init_fixed.F 107 PTRACERS_INIT_FIXED
          WRITE(msgBuf,'(2A)') 'PTRACERS_INIT_FIXED: ',
./pkg/ptracers/ptracers_init_fixed.F 109 PTRACERS_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_init_fixed.F 127 PTRACERS_INIT_FIXED
        WRITE(msgBuf,'(2A,9I3)') 'PTRACERS_INIT_FIXED: ',
./pkg/ptracers/ptracers_init_fixed.F 129 PTRACERS_INIT_FIXED
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_init_fixed.F 144 PTRACERS_INIT_FIXED
        WRITE(msgBuf,'(A,I3,A)')
./pkg/ptracers/ptracers_init_fixed.F 146 PTRACERS_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_init_fixed.F 44 PTRACERS_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_init_fixed.F 65 PTRACERS_INIT_FIXED
          WRITE(msgBuf,'(2A,I6)') 'PTRACERS_INIT_FIXED: ',
./pkg/ptracers/ptracers_init_fixed.F 67 PTRACERS_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_init_fixed.F 68 PTRACERS_INIT_FIXED
          WRITE(msgBuf,'(2A,I6)') 'PTRACERS_INIT_FIXED: ',
./pkg/ptracers/ptracers_init_fixed.F 70 PTRACERS_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/do_write_pickup.F 105 DO_WRITE_PICKUP
        WRITE(msgBuf,'(A11,I10,1X,A10)')
./model/src/do_write_pickup.F 107 DO_WRITE_PICKUP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/do_write_pickup.F 117 DO_WRITE_PICKUP
        WRITE(msgBuf,'(A)')
./model/src/do_write_pickup.F 119 DO_WRITE_PICKUP
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/do_write_pickup.F 59 DO_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_monitor.F 125 PTRACERS_MONITOR
         WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/ptracers/ptracers_monitor.F 127 PTRACERS_MONITOR
         CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor.F 128 PTRACERS_MONITOR
         WRITE(msgBuf,'(A)')
./pkg/ptracers/ptracers_monitor.F 130 PTRACERS_MONITOR
         CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor.F 131 PTRACERS_MONITOR
         WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/ptracers/ptracers_monitor.F 133 PTRACERS_MONITOR
         CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor.F 49 PTRACERS_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_monitor.F 85 PTRACERS_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/ptracers/ptracers_monitor.F 87 PTRACERS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor.F 88 PTRACERS_MONITOR
            WRITE(msgBuf,'(A)')
./pkg/ptracers/ptracers_monitor.F 90 PTRACERS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor.F 91 PTRACERS_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/ptracers/ptracers_monitor.F 93 PTRACERS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor_ad.F 101 ADPTRACERS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor_ad.F 122 ADPTRACERS_MONITOR
         WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/ptracers/ptracers_monitor_ad.F 124 ADPTRACERS_MONITOR
         CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor_ad.F 125 ADPTRACERS_MONITOR
         WRITE(msgBuf,'(A)')
./pkg/ptracers/ptracers_monitor_ad.F 127 ADPTRACERS_MONITOR
         CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor_ad.F 128 ADPTRACERS_MONITOR
         WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/ptracers/ptracers_monitor_ad.F 130 ADPTRACERS_MONITOR
         CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor_ad.F 57 ADPTRACERS_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_monitor_ad.F 93 ADPTRACERS_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/ptracers/ptracers_monitor_ad.F 95 ADPTRACERS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor_ad.F 96 ADPTRACERS_MONITOR
            WRITE(msgBuf,'(A)')
./pkg/ptracers/ptracers_monitor_ad.F 98 ADPTRACERS_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/ptracers/ptracers_monitor_ad.F 99 ADPTRACERS_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/ptracers/ptracers_read_pickup.F 126 PTRACERS_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'PTRACERS_READ_PICKUP: ',
./pkg/ptracers/ptracers_read_pickup.F 128 PTRACERS_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_read_pickup.F 129 PTRACERS_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'PTRACERS_READ_PICKUP: ',
./pkg/ptracers/ptracers_read_pickup.F 131 PTRACERS_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_read_pickup.F 140 PTRACERS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'PTRACERS_READ_PICKUP: ',
./pkg/ptracers/ptracers_read_pickup.F 143 PTRACERS_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_read_pickup.F 144 PTRACERS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'PTRACERS_READ_PICKUP: ',
./pkg/ptracers/ptracers_read_pickup.F 147 PTRACERS_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 150 PTRACERS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> PTRACERS_READ_PICKUP: ',
./pkg/ptracers/ptracers_read_pickup.F 152 PTRACERS_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 155 PTRACERS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/ptracers/ptracers_read_pickup.F 157 PTRACERS_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 160 PTRACERS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/ptracers/ptracers_read_pickup.F 162 PTRACERS_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 163 PTRACERS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/ptracers/ptracers_read_pickup.F 165 PTRACERS_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 261 PTRACERS_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'PTRACERS_READ_PICKUP: ',
./pkg/ptracers/ptracers_read_pickup.F 263 PTRACERS_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_read_pickup.F 298 PTRACERS_READ_PICKUP
         WRITE(msgBuf,'(A,I3,A)')'PTRACERS_READ_PICKUP: iTracer = ',
./pkg/ptracers/ptracers_read_pickup.F 300 PTRACERS_READ_PICKUP
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 327 PTRACERS_READ_PICKUP
            WRITE(msgBuf,'(4A)') 'PTRACERS_READ_PICKUP: ',
./pkg/ptracers/ptracers_read_pickup.F 330 PTRACERS_READ_PICKUP
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 333 PTRACERS_READ_PICKUP
            WRITE(msgBuf,'(2A)') 'WARNING >> PTRACERS_READ_PICKUP: ',
./pkg/ptracers/ptracers_read_pickup.F 335 PTRACERS_READ_PICKUP
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ptracers/ptracers_read_pickup.F 59 PTRACERS_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_read_pickup.F 93 PTRACERS_READ_PICKUP
         WRITE(msgBuf,'(3A)')'PTRACERS_READ_PICKUP: MNC not yet coded',
./pkg/ptracers/ptracers_read_pickup.F 96 PTRACERS_READ_PICKUP
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ptracers/ptracers_readparms.F 160 PTRACERS_READPARMS
      WRITE(msgBuf,'(A)') ' PTRACERS_READPARMS: opening data.ptracers'
./pkg/ptracers/ptracers_readparms.F 161 PTRACERS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_readparms.F 168 PTRACERS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/ptracers/ptracers_readparms.F 170 PTRACERS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_readparms.F 184 PTRACERS_READPARMS
        WRITE(msgBuf,'(2A)')' PTRACERS_READPARMS: ',
./pkg/ptracers/ptracers_readparms.F 186 PTRACERS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_readparms.F 205 PTRACERS_READPARMS
        WRITE(msgBuf,'(A,I4,A,I4,A)')
./pkg/ptracers/ptracers_readparms.F 209 PTRACERS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_readparms.F 230 PTRACERS_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ptracers/ptracers_readparms.F 232 PTRACERS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_readparms.F 233 PTRACERS_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ptracers/ptracers_readparms.F 235 PTRACERS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_readparms.F 42 PTRACERS_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_reset.F 110 PTRACERS_RESET
         WRITE(msgBuf,'(A,I3,A)')'PTRACERS_RESET: iTracer = ',
./pkg/ptracers/ptracers_reset.F 112 PTRACERS_RESET
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_reset.F 134 PTRACERS_RESET
        WRITE(msgBuf,'(A)')  ' '
./pkg/ptracers/ptracers_reset.F 135 PTRACERS_RESET
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_reset.F 44 PTRACERS_RESET
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_reset.F 62 PTRACERS_RESET
        WRITE(msgBuf,'(A,I2,I10)')
./pkg/ptracers/ptracers_reset.F 65 PTRACERS_RESET
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_write_pickup.F 109 PTRACERS_WRITE_PICKUP
         WRITE(msgBuf,'(3A)')'PTRACERS_WRITE_PICKUP: MNC not yet coded',
./pkg/ptracers/ptracers_write_pickup.F 112 PTRACERS_WRITE_PICKUP
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ptracers/ptracers_write_pickup.F 162 PTRACERS_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'PTRACERS_WRITE_PICKUP: ',
./pkg/ptracers/ptracers_write_pickup.F 164 PTRACERS_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_write_pickup.F 165 PTRACERS_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'PTRACERS_WRITE_PICKUP: ',
./pkg/ptracers/ptracers_write_pickup.F 167 PTRACERS_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_write_pickup.F 195 PTRACERS_WRITE_PICKUP
          WRITE(msgBuf,'(A,I4,A)')'PTRACERS_WRITE_PICKUP: iTracer =',
./pkg/ptracers/ptracers_write_pickup.F 197 PTRACERS_WRITE_PICKUP
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_write_pickup.F 200 PTRACERS_WRITE_PICKUP
          WRITE(msgBuf,'(A,A)') ' to file: ',fn(1:j)
./pkg/ptracers/ptracers_write_pickup.F 201 PTRACERS_WRITE_PICKUP
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_write_pickup.F 66 PTRACERS_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ptracers/ptracers_write_timeave.F 141 PTRACERS_WRITE_TIMEAVE
            WRITE(msgBuf,'(A)')  'S/R PTRACERS_WRITE_TIMEAVE'
./pkg/ptracers/ptracers_write_timeave.F 142 PTRACERS_WRITE_TIMEAVE
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_write_timeave.F 143 PTRACERS_WRITE_TIMEAVE
            WRITE(msgBuf,'(A)')  'Error writing out data'
./pkg/ptracers/ptracers_write_timeave.F 144 PTRACERS_WRITE_TIMEAVE
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_write_timeave.F 145 PTRACERS_WRITE_TIMEAVE
            WRITE(msgBuf,'(A,I10)') 'Timestep ',myIter
./pkg/ptracers/ptracers_write_timeave.F 146 PTRACERS_WRITE_TIMEAVE
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ptracers/ptracers_write_timeave.F 150 PTRACERS_WRITE_TIMEAVE
            WRITE(msgBuf,'(A,I10)')
./pkg/ptracers/ptracers_write_timeave.F 152 PTRACERS_WRITE_TIMEAVE
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_write_timeave.F 154 PTRACERS_WRITE_TIMEAVE
            WRITE(msgBuf,'(A)')  ' '
./pkg/ptracers/ptracers_write_timeave.F 155 PTRACERS_WRITE_TIMEAVE
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ptracers/ptracers_write_timeave.F 49 PTRACERS_WRITE_TIMEAVE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/rbcs/rbcs_init_fixed.F 101 RBCS_INIT_FIXED
         WRITE(msgBuf,'(A,I3,3A)') 'Use relaxMaskFile(irbc=', irbc,
./pkg/rbcs/rbcs_init_fixed.F 103 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 105 RBCS_INIT_FIXED
         WRITE(msgBuf,'(A,1PE21.13)')
./pkg/rbcs/rbcs_init_fixed.F 107 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 113 RBCS_INIT_FIXED
         WRITE(msgBuf,'(2A)') '** WARNING ** RBCS_INIT_FIXED:',
./pkg/rbcs/rbcs_init_fixed.F 115 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 117 RBCS_INIT_FIXED
         WRITE(msgBuf,'(2A)') 'Warning:',
./pkg/rbcs/rbcs_init_fixed.F 119 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 123 RBCS_INIT_FIXED
         WRITE(msgBuf,'(A,3A)') 'Use relaxMaskUFile',
./pkg/rbcs/rbcs_init_fixed.F 125 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 128 RBCS_INIT_FIXED
         WRITE(msgBuf,'(A,1PE21.13)')
./pkg/rbcs/rbcs_init_fixed.F 130 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 135 RBCS_INIT_FIXED
         WRITE(msgBuf,'(2A)') '** WARNING ** RBCS_INIT_FIXED:',
./pkg/rbcs/rbcs_init_fixed.F 137 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 139 RBCS_INIT_FIXED
         WRITE(msgBuf,'(2A)') 'Warning:',
./pkg/rbcs/rbcs_init_fixed.F 141 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 145 RBCS_INIT_FIXED
         WRITE(msgBuf,'(A,3A)') 'Use relaxMaskVFile',
./pkg/rbcs/rbcs_init_fixed.F 147 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 150 RBCS_INIT_FIXED
         WRITE(msgBuf,'(A,1PE21.13)')
./pkg/rbcs/rbcs_init_fixed.F 152 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 161 RBCS_INIT_FIXED
          WRITE(msgBuf,'(2A,I3,2A,I3)')
./pkg/rbcs/rbcs_init_fixed.F 165 RBCS_INIT_FIXED
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 167 RBCS_INIT_FIXED
          WRITE(msgBuf,'(2A,I3,2A,I3)') 'Warning:',
./pkg/rbcs/rbcs_init_fixed.F 170 RBCS_INIT_FIXED
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 174 RBCS_INIT_FIXED
          WRITE(msgBuf,'(A,I3,3A)') 'Use relaxMaskFile(irbc=', irbc,
./pkg/rbcs/rbcs_init_fixed.F 176 RBCS_INIT_FIXED
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 178 RBCS_INIT_FIXED
          WRITE(msgBuf,'(A,I3,A,1PE21.13)')
./pkg/rbcs/rbcs_init_fixed.F 181 RBCS_INIT_FIXED
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 318 RBCS_INIT_FIXED
      WRITE(msgBuf,'(2A)') ' ---  RBCS_INIT_FIXED:',
./pkg/rbcs/rbcs_init_fixed.F 320 RBCS_INIT_FIXED
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 42 RBCS_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/rbcs/rbcs_init_fixed.F 53 RBCS_INIT_FIXED
      WRITE(msgBuf,'(2A)') ' '
./pkg/rbcs/rbcs_init_fixed.F 54 RBCS_INIT_FIXED
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 56 RBCS_INIT_FIXED
      WRITE(msgBuf,'(2A)') ' ---  RBCS_INIT_FIXED:',
./pkg/rbcs/rbcs_init_fixed.F 58 RBCS_INIT_FIXED
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 64 RBCS_INIT_FIXED
         WRITE(msgBuf,'(2A,I3,2A)') '** WARNING ** RBCS_INIT_FIXED:',
./pkg/rbcs/rbcs_init_fixed.F 67 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 69 RBCS_INIT_FIXED
         WRITE(msgBuf,'(2A,I3,2A)') 'Warning:',
./pkg/rbcs/rbcs_init_fixed.F 72 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 76 RBCS_INIT_FIXED
         WRITE(msgBuf,'(A,I3,3A)') 'Use relaxMaskFile(irbc=', irbc,
./pkg/rbcs/rbcs_init_fixed.F 78 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 80 RBCS_INIT_FIXED
         WRITE(msgBuf,'(A,1PE21.13)')
./pkg/rbcs/rbcs_init_fixed.F 82 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 89 RBCS_INIT_FIXED
         WRITE(msgBuf,'(2A,I3,2A)') '** WARNING ** RBCS_INIT_FIXED:',
./pkg/rbcs/rbcs_init_fixed.F 92 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/rbcs/rbcs_init_fixed.F 94 RBCS_INIT_FIXED
         WRITE(msgBuf,'(2A,I3,2A)') 'Warning:',
./pkg/rbcs/rbcs_init_fixed.F 97 RBCS_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_readparms.F 140 RBCS_READPARMS
      WRITE(msgBuf,'(A)') ' RBCS_READPARMS: opening data.rbcs'
./pkg/rbcs/rbcs_readparms.F 141 RBCS_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_readparms.F 151 RBCS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/rbcs/rbcs_readparms.F 153 RBCS_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/rbcs/rbcs_readparms.F 176 RBCS_READPARMS
        WRITE(msgBuf,'(2A,I6)')' RBCS_READPARAMS: ',
./pkg/rbcs/rbcs_readparms.F 178 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 179 RBCS_READPARMS
        WRITE(msgBuf,'(2A)')' RBCS_READPARAMS: ',
./pkg/rbcs/rbcs_readparms.F 181 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 187 RBCS_READPARMS
        WRITE(msgBuf,'(2A,2(L2,A))') 'RBCS_READPARMS: ',
./pkg/rbcs/rbcs_readparms.F 190 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 191 RBCS_READPARMS
        WRITE(msgBuf,'(2A)') 'RBCS_READPARMS: ',
./pkg/rbcs/rbcs_readparms.F 193 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 198 RBCS_READPARMS
        WRITE(msgBuf,'(2A)')' RBCS_READPARAMS: ',
./pkg/rbcs/rbcs_readparms.F 200 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 201 RBCS_READPARMS
        WRITE(msgBuf,'(2A)')' RBCS_READPARAMS: ',
./pkg/rbcs/rbcs_readparms.F 203 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 209 RBCS_READPARMS
        WRITE(msgBuf,'(2A)')' RBCS_READPARAMS: ',
./pkg/rbcs/rbcs_readparms.F 211 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 212 RBCS_READPARMS
        WRITE(msgBuf,'(2A)')' RBCS_READPARAMS: ',
./pkg/rbcs/rbcs_readparms.F 214 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 216 RBCS_READPARMS
        WRITE(msgBuf,'(2A)')' RBCS_READPARAMS: ',
./pkg/rbcs/rbcs_readparms.F 218 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 219 RBCS_READPARMS
        WRITE(msgBuf,'(2A)')' RBCS_READPARAMS: ',
./pkg/rbcs/rbcs_readparms.F 221 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 226 RBCS_READPARMS
        WRITE(msgBuf,'(2A)') 'RBCS_READPARMS: ',
./pkg/rbcs/rbcs_readparms.F 228 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 232 RBCS_READPARMS
        WRITE(msgBuf,'(2A)') 'RBCS_READPARMS: ',
./pkg/rbcs/rbcs_readparms.F 234 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 238 RBCS_READPARMS
        WRITE(msgBuf,'(2A)') 'RBCS_READPARMS: ',
./pkg/rbcs/rbcs_readparms.F 240 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 244 RBCS_READPARMS
        WRITE(msgBuf,'(2A)') 'RBCS_READPARMS: ',
./pkg/rbcs/rbcs_readparms.F 246 RBCS_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 253 RBCS_READPARMS
         WRITE(msgBuf,'(2A,I6,A)') 'RBCS_READPARMS: ',
./pkg/rbcs/rbcs_readparms.F 255 RBCS_READPARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 262 RBCS_READPARMS
         WRITE(msgBuf,'(2A,I6,A)') 'RBCS_READPARMS: ',
./pkg/rbcs/rbcs_readparms.F 264 RBCS_READPARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 265 RBCS_READPARMS
         WRITE(msgBuf,'(2A,I6,A)') 'RBCS_READPARMS: ',
./pkg/rbcs/rbcs_readparms.F 267 RBCS_READPARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rbcs/rbcs_readparms.F 40 RBCS_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/regrid/regrid_check.F 31 REGRID_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/regrid/regrid_check.F 36 REGRID_CHECK
      WRITE(msgBuf,'(A)') 'REGRID_CHECK: #define REGRID'
./pkg/regrid/regrid_check.F 37 REGRID_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/regrid/regrid_check.F 43 REGRID_CHECK
        WRITE(msgBuf,'(A)') 'Regrid needs useMNC=.true.'
./pkg/regrid/regrid_check.F 44 REGRID_CHECK
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/regrid/regrid_init_varia.F 136 REGRID_INIT_VARIA
              WRITE(msgBuf,'(A)')  'S/R REGRID_INIT_VARIA()'
./pkg/regrid/regrid_init_varia.F 137 REGRID_INIT_VARIA
              CALL PRINT_ERROR( msgBuf , 1)
./pkg/regrid/regrid_init_varia.F 138 REGRID_INIT_VARIA
              WRITE(msgBuf,'(3A)')  ' File "',
./pkg/regrid/regrid_init_varia.F 140 REGRID_INIT_VARIA
              CALL PRINT_ERROR( msgBuf , 1)
./pkg/regrid/regrid_init_varia.F 148 REGRID_INIT_VARIA
              WRITE(msgBuf,'(A)')  'S/R REGRID_INIT_VARIA()'
./pkg/regrid/regrid_init_varia.F 149 REGRID_INIT_VARIA
              CALL PRINT_ERROR( msgBuf , 1)
./pkg/regrid/regrid_init_varia.F 150 REGRID_INIT_VARIA
              WRITE(msgBuf,'(3A)')  'Unable to open file="',
./pkg/regrid/regrid_init_varia.F 152 REGRID_INIT_VARIA
              CALL PRINT_ERROR( msgBuf , 1)
./pkg/regrid/regrid_init_varia.F 156 REGRID_INIT_VARIA
              WRITE(msgBuf,'(3a)') 'Reading file "', fname(1:nnb),'"'
./pkg/regrid/regrid_init_varia.F 157 REGRID_INIT_VARIA
              call PRINT_MESSAGE(msgBuf,standardMessageUnit,
./pkg/regrid/regrid_init_varia.F 181 REGRID_INIT_VARIA
            WRITE(msgBuf,'(a,i10)') '  num weights read = ',
./pkg/regrid/regrid_init_varia.F 183 REGRID_INIT_VARIA
            call PRINT_MESSAGE(msgBuf,standardMessageUnit,
./pkg/regrid/regrid_init_varia.F 193 REGRID_INIT_VARIA
      WRITE(msgBuf,'(a)') ' '
./pkg/regrid/regrid_init_varia.F 194 REGRID_INIT_VARIA
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./pkg/regrid/regrid_init_varia.F 69 REGRID_INIT_VARIA
      WRITE(msgBuf,'(a)')
./pkg/regrid/regrid_init_varia.F 71 REGRID_INIT_VARIA
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./pkg/regrid/regrid_init_varia.F 73 REGRID_INIT_VARIA
      WRITE(msgBuf,'(a)')
./pkg/regrid/regrid_init_varia.F 75 REGRID_INIT_VARIA
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./pkg/regrid/regrid_init_varia.F 77 REGRID_INIT_VARIA
      WRITE(msgBuf,'(a)')
./pkg/regrid/regrid_init_varia.F 79 REGRID_INIT_VARIA
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./pkg/regrid/regrid_readparms.F 31 REGRID_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/regrid/regrid_readparms.F 68 REGRID_READPARMS
      WRITE(msgBuf,'(A)') 'REGRID_READPARMS: opening data.regrid'
./pkg/regrid/regrid_readparms.F 69 REGRID_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/regrid/regrid_readparms.F 78 REGRID_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/regrid/regrid_readparms.F 80 REGRID_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/runclock/runclock_check.F 24 RUNCLOCK_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/runclock/runclock_check.F 29 RUNCLOCK_CHECK
       WRITE(msgBuf,'(A)') 'RUNCLOCK_CHECK: #define RUNCLOCK'
./pkg/runclock/runclock_check.F 30 RUNCLOCK_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/runclock/runclock_continue.F 35 NO PROCEDURE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/runclock/runclock_continue.F 44 NO PROCEDURE
       WRITE(msgBuf,'(A)') ' RUNCLOCK_CONTINUE: RUNCLOCK not turned on'
./pkg/runclock/runclock_continue.F 45 NO PROCEDURE
       CALL PRINT_ERROR( msgBuf, myThid ) 
./pkg/runclock/runclock_continue.F 81 NO PROCEDURE
      WRITE(msgBuf,'(A,G16.6,G24.10)') ' RUNCLOCK: dT,T-To =',
./pkg/runclock/runclock_continue.F 83 NO PROCEDURE
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/runclock/runclock_continue.F 89 NO PROCEDURE
       WRITE(msgBuf,'(A)') 
./pkg/runclock/runclock_continue.F 91 NO PROCEDURE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/runclock/runclock_continue.F 93 NO PROCEDURE
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/runclock/runclock_continue.F 94 NO PROCEDURE
       WRITE(msgBuf,'(A)') ' RUNCLOCK_CONTINUE: Ending run now ...'
./pkg/runclock/runclock_continue.F 95 NO PROCEDURE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/runclock/runclock_continue.F 97 NO PROCEDURE
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/runclock/runclock_init.F 34 RUNCLOCK_INIT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/runclock/runclock_init.F 37 RUNCLOCK_INIT
       WRITE(msgBuf,'(A)') ' RUNCLOCK_INIT: RUNCLOCK not turned on'
./pkg/runclock/runclock_init.F 38 RUNCLOCK_INIT
       CALL PRINT_ERROR( msgBuf, myThid ) 
./pkg/runclock/runclock_readparms.F 102 RUNCLOCK_READPARMS
      WRITE(msgBuf,'(A)') ' RUNCLOCK_READPARMS: no Wall Clock limit set'
./pkg/runclock/runclock_readparms.F 103 RUNCLOCK_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/runclock/runclock_readparms.F 107 RUNCLOCK_READPARMS
      WRITE(msgBuf,'(A,I7)')
./pkg/runclock/runclock_readparms.F 109 RUNCLOCK_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/runclock/runclock_readparms.F 24 RUNCLOCK_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/runclock/runclock_readparms.F 51 RUNCLOCK_READPARMS
      WRITE(msgBuf,'(A)') ' RUNCLOCK_READPARMS: opening data.runclock'
./pkg/runclock/runclock_readparms.F 52 RUNCLOCK_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/runclock/runclock_readparms.F 68 RUNCLOCK_READPARMS
      WRITE(msgBuf,'(A)') ' RUNCLOCK_READPARMS: read data.runclock done'
./pkg/runclock/runclock_readparms.F 69 RUNCLOCK_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/runclock/runclock_readparms.F 80 RUNCLOCK_READPARMS
      WRITE(msgBuf,'(A)') ' RUNCLOCK_READPARMS: ERR! RC_maxtime_hr<0'
./pkg/runclock/runclock_readparms.F 81 RUNCLOCK_READPARMS
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/runclock/runclock_readparms.F 84 RUNCLOCK_READPARMS
      WRITE(msgBuf,'(A)') ' RUNCLOCK_READPARMS: ERR! RC_maxtime_mi<0'
./pkg/runclock/runclock_readparms.F 85 RUNCLOCK_READPARMS
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/runclock/runclock_readparms.F 88 RUNCLOCK_READPARMS
      WRITE(msgBuf,'(A)') ' RUNCLOCK_READPARMS: ERR! RC_maxtime_sc<0'
./pkg/runclock/runclock_readparms.F 89 RUNCLOCK_READPARMS
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/runclock/runclock_readparms.F 92 RUNCLOCK_READPARMS
      WRITE(msgBuf,'(A)') ' RUNCLOCK_READPARMS: ERR! RC_maxtime_sc>59'
./pkg/runclock/runclock_readparms.F 93 RUNCLOCK_READPARMS
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/runclock/runclock_readparms.F 96 RUNCLOCK_READPARMS
      WRITE(msgBuf,'(A)') ' RUNCLOCK_READPARMS: ERR! RC_maxtime_mi>59'
./pkg/runclock/runclock_readparms.F 97 RUNCLOCK_READPARMS
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/read_mflds.F 117 READ_MFLDS_SET
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/rw/read_mflds.F 128 READ_MFLDS_SET
        WRITE(msgBuf,'(4A)') 'READ_MFLDS_SET: ',
./pkg/rw/read_mflds.F 130 READ_MFLDS_SET
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/read_mflds.F 175 READ_MFLDS_SET
          WRITE(msgBuf,'(A,I5,A,I4,A)')
./pkg/rw/read_mflds.F 178 READ_MFLDS_SET
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/read_mflds.F 179 READ_MFLDS_SET
          WRITE(msgBuf,'(A,I5,A,I4,A)')
./pkg/rw/read_mflds.F 181 READ_MFLDS_SET
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/read_mflds.F 193 READ_MFLDS_SET
         WRITE(msgBuf,'(3A)') ' simulName=>', simulName(1:i), '<'
./pkg/rw/read_mflds.F 194 READ_MFLDS_SET
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 198 READ_MFLDS_SET
         WRITE(msgBuf,'(3A)') ' titleLine=>', titleLine(1:i), '<'
./pkg/rw/read_mflds.F 199 READ_MFLDS_SET
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 201 READ_MFLDS_SET
        WRITE(msgBuf,'(2(A,I4),A,I10)')
./pkg/rw/read_mflds.F 204 READ_MFLDS_SET
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 205 READ_MFLDS_SET
        WRITE(msgBuf,'(A,I4,A)') '    nDims =', nDims, ' , dims:'
./pkg/rw/read_mflds.F 206 READ_MFLDS_SET
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 208 READ_MFLDS_SET
         WRITE(msgBuf,'(I4,A,3I4)') j,':',(dimList(i,j),i=1,3)
./pkg/rw/read_mflds.F 209 READ_MFLDS_SET
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 211 READ_MFLDS_SET
        WRITE(msgBuf,'(3(A,I4))')
./pkg/rw/read_mflds.F 213 READ_MFLDS_SET
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 215 READ_MFLDS_SET
         WRITE(msgBuf,'(20(A2,A8,A))')
./pkg/rw/read_mflds.F 217 READ_MFLDS_SET
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 219 READ_MFLDS_SET
        WRITE(msgBuf,'(A,1PE22.14,A,I4,A)') 'missingVal=', misVal,
./pkg/rw/read_mflds.F 221 READ_MFLDS_SET
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 223 READ_MFLDS_SET
         WRITE(msgBuf,'(1P20E20.12)') (timList(i),i=1,nTimRec)
./pkg/rw/read_mflds.F 224 READ_MFLDS_SET
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 289 READ_MFLDS_3D_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/rw/read_mflds.F 295 READ_MFLDS_3D_RL
        WRITE(msgBuf,'(2A,I4)') 'READ_MFLDS_3D_RL: ',
./pkg/rw/read_mflds.F 297 READ_MFLDS_3D_RL
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/read_mflds.F 321 READ_MFLDS_3D_RL
            WRITE(msgBuf,'(5A)') 'READ_MFLDS_3D_RL: ',
./pkg/rw/read_mflds.F 323 READ_MFLDS_3D_RL
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 330 READ_MFLDS_3D_RL
            WRITE(msgBuf,'(3A,2(A,I4))') 'READ_MFLDS_3D_RL: ',
./pkg/rw/read_mflds.F 332 READ_MFLDS_3D_RL
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 339 READ_MFLDS_3D_RL
            WRITE(msgBuf,'(3A,2(A,I4))') 'READ_MFLDS_3D_RL: ',
./pkg/rw/read_mflds.F 341 READ_MFLDS_3D_RL
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 418 READ_MFLDS_LEV_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/rw/read_mflds.F 424 READ_MFLDS_LEV_RL
        WRITE(msgBuf,'(2A,I4)') 'READ_MFLDS_LEV_RL: ',
./pkg/rw/read_mflds.F 426 READ_MFLDS_LEV_RL
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/read_mflds.F 450 READ_MFLDS_LEV_RL
            WRITE(msgBuf,'(5A)') 'READ_MFLDS_LEV_RL: ',
./pkg/rw/read_mflds.F 452 READ_MFLDS_LEV_RL
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 459 READ_MFLDS_LEV_RL
            WRITE(msgBuf,'(3A,2(A,I4))') 'READ_MFLDS_LEV_RL: ',
./pkg/rw/read_mflds.F 461 READ_MFLDS_LEV_RL
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 468 READ_MFLDS_LEV_RL
            WRITE(msgBuf,'(3A,2(A,I4))') 'READ_MFLDS_LEV_RL: ',
./pkg/rw/read_mflds.F 470 READ_MFLDS_LEV_RL
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 547 READ_MFLDS_LEV_RS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/rw/read_mflds.F 553 READ_MFLDS_LEV_RS
        WRITE(msgBuf,'(2A,I4)') 'READ_MFLDS_LEV_RS: ',
./pkg/rw/read_mflds.F 555 READ_MFLDS_LEV_RS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/read_mflds.F 579 READ_MFLDS_LEV_RS
            WRITE(msgBuf,'(5A)') 'READ_MFLDS_LEV_RS: ',
./pkg/rw/read_mflds.F 581 READ_MFLDS_LEV_RS
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 588 READ_MFLDS_LEV_RS
            WRITE(msgBuf,'(3A,2(A,I4))') 'READ_MFLDS_LEV_RS: ',
./pkg/rw/read_mflds.F 590 READ_MFLDS_LEV_RS
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 597 READ_MFLDS_LEV_RS
            WRITE(msgBuf,'(3A,2(A,I4))') 'READ_MFLDS_LEV_RS: ',
./pkg/rw/read_mflds.F 599 READ_MFLDS_LEV_RS
            CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 665 READ_MFLDS_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/rw/read_mflds.F 671 READ_MFLDS_CHECK
        WRITE(msgBuf,'(2A,I4)') 'READ_MFLDS_CHECK: ',
./pkg/rw/read_mflds.F 673 READ_MFLDS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/read_mflds.F 693 READ_MFLDS_CHECK
         WRITE(msgBuf,'(3A)') 'READ_MFLDS_CHECK: ',
./pkg/rw/read_mflds.F 695 READ_MFLDS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 696 READ_MFLDS_CHECK
         WRITE(msgBuf,'(2A,I4,A)') 'READ_MFLDS_CHECK: ',
./pkg/rw/read_mflds.F 698 READ_MFLDS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 700 READ_MFLDS_CHECK
          WRITE(msgBuf,'(20(A2,A8,A))')
./pkg/rw/read_mflds.F 702 READ_MFLDS_CHECK
          CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 704 READ_MFLDS_CHECK
         WRITE(msgBuf,'(A,I4,A)') 'READ_MFLDS_CHECK: ',
./pkg/rw/read_mflds.F 706 READ_MFLDS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 709 READ_MFLDS_CHECK
          WRITE(msgBuf,'(20(A2,A8,A))')
./pkg/rw/read_mflds.F 711 READ_MFLDS_CHECK
          CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/read_mflds.F 717 READ_MFLDS_CHECK
           WRITE(msgBuf,'(2A,I4)') 'READ_MFLDS_CHECK: ',
./pkg/rw/read_mflds.F 719 READ_MFLDS_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/read_mflds.F 734 READ_MFLDS_CHECK
         WRITE(msgBuf,'(3A)') 'READ_MFLDS_CHECK: ',
./pkg/rw/read_mflds.F 736 READ_MFLDS_CHECK
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/rw/write_fld_s3d_rl.F 54 WRITE_FLD_S3D_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/rw/write_fld_s3d_rl.F 63 WRITE_FLD_S3D_RL
        WRITE(msgBuf,'(2A,2(I3,A))') 'WRITE_FLD_S3D_RL:',
./pkg/rw/write_fld_s3d_rl.F 65 WRITE_FLD_S3D_RL
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/write_fld_s3d_rl.F 69 WRITE_FLD_S3D_RL
        WRITE(msgBuf,'(2A,2(I3,A))') 'WRITE_FLD_S3D_RL:',
./pkg/rw/write_fld_s3d_rl.F 71 WRITE_FLD_S3D_RL
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/write_fld_s3d_rs.F 54 WRITE_FLD_S3D_RS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/rw/write_fld_s3d_rs.F 63 WRITE_FLD_S3D_RS
        WRITE(msgBuf,'(2A,2(I3,A))') 'WRITE_FLD_S3D_RS:',
./pkg/rw/write_fld_s3d_rs.F 65 WRITE_FLD_S3D_RS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/rw/write_fld_s3d_rs.F 69 WRITE_FLD_S3D_RS
        WRITE(msgBuf,'(2A,2(I3,A))') 'WRITE_FLD_S3D_RS:',
./pkg/rw/write_fld_s3d_rs.F 71 WRITE_FLD_S3D_RS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/find_hyd_press_1d.F 138 FIND_HYD_PRESS_1D
         WRITE(msgBuf,'(A,I5,2(A,1PE20.12))')
./model/src/find_hyd_press_1d.F 140 FIND_HYD_PRESS_1D
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/find_hyd_press_1d.F 155 FIND_HYD_PRESS_1D
        WRITE(msgBuf,'(2A,I5,A,I3,A)') 'FIND_HYD_PRESS_1D: ',
./model/src/find_hyd_press_1d.F 158 FIND_HYD_PRESS_1D
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/find_hyd_press_1d.F 161 FIND_HYD_PRESS_1D
        WRITE(msgBuf,'(2A,I5,A,I3,A)') 'FIND_HYD_PRESS_1D: ',
./model/src/find_hyd_press_1d.F 164 FIND_HYD_PRESS_1D
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/find_hyd_press_1d.F 57 FIND_HYD_PRESS_1D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/find_hyd_press_1d.F 68 FIND_HYD_PRESS_1D
      WRITE(msgBuf,'(A)') ' '
./model/src/find_hyd_press_1d.F 69 FIND_HYD_PRESS_1D
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/find_hyd_press_1d.F 71 FIND_HYD_PRESS_1D
      WRITE(msgBuf,'(2A,I5,A)') 'FIND_HYD_PRESS_1D: ',
./model/src/find_hyd_press_1d.F 74 FIND_HYD_PRESS_1D
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/find_hyd_press_1d.F 76 FIND_HYD_PRESS_1D
      WRITE(msgBuf,'(2A,I3,A,1PE13.6)') 'FIND_HYD_PRESS_1D: ',
./model/src/find_hyd_press_1d.F 79 FIND_HYD_PRESS_1D
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/find_rho.F 1171 FIND_RHO_SCALAR
       WRITE(msgBuf,'(3A)')
./model/src/find_rho.F 1174 FIND_RHO_SCALAR
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/find_rho.F 1219 LOOK_FOR_NEG_SALINITY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/find_rho.F 1234 LOOK_FOR_NEG_SALINITY
        WRITE(msgBuf,'(2A,I5,A,2I4)') 'S/R LOOK_FOR_NEG_SALINITY:',
./model/src/find_rho.F 1236 LOOK_FOR_NEG_SALINITY
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/find_rho.F 1238 LOOK_FOR_NEG_SALINITY
        WRITE(msgBuf,'(2A,I6,A)') 'S/R LOOK_FOR_NEG_SALINITY:',
./model/src/find_rho.F 1240 LOOK_FOR_NEG_SALINITY
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/find_rho.F 261 FIND_RHO_2D
       WRITE(msgBuf,'(3a)')
./model/src/find_rho.F 263 FIND_RHO_2D
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/find_rho.F 74 FIND_RHO_2D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/find_rho.F 868 FIND_RHO_SCALAR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/find_rho.F 930 FIND_RHO_SCALAR
         WRITE(msgBuf,'(A,E13.5)')
./model/src/find_rho.F 932 FIND_RHO_SCALAR
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/find_rho.F 949 FIND_RHO_SCALAR
         WRITE(msgBuf,'(A)')
./model/src/find_rho.F 951 FIND_RHO_SCALAR
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/find_rho.F 953 FIND_RHO_SCALAR
         WRITE(msgBuf,'(A)')
./model/src/find_rho.F 955 FIND_RHO_SCALAR
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/salt_plume/salt_plume_apply.F 69 SALT_PLUME_APPLY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/salt_plume/salt_plume_check.F 29 SALT_PLUME_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/salt_plume/salt_plume_check.F 33 SALT_PLUME_CHECK
       WRITE(msgBuf,'(A)') 'SALT_PLUME_CHECK: #define SALT_PLUME'
./pkg/salt_plume/salt_plume_check.F 34 SALT_PLUME_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/salt_plume/salt_plume_check.F 40 SALT_PLUME_CHECK
       WRITE(msgBuf,'(2A)') 'SALT_PLUME_CHECK:',
./pkg/salt_plume/salt_plume_check.F 42 SALT_PLUME_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/salt_plume/salt_plume_check.F 47 SALT_PLUME_CHECK
       WRITE(msgBuf,'(2A)') 'SALT_PLUME_CHECK:',
./pkg/salt_plume/salt_plume_check.F 49 SALT_PLUME_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/salt_plume/salt_plume_check.F 54 SALT_PLUME_CHECK
       WRITE(msgBuf,'(2A)') 'SALT_PLUME_CHECK:',
./pkg/salt_plume/salt_plume_check.F 56 SALT_PLUME_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/salt_plume/salt_plume_check.F 64 SALT_PLUME_CHECK
       WRITE(msgBuf,'(2A)') 'SALT_PLUME_CHECK:',
./pkg/salt_plume/salt_plume_check.F 66 SALT_PLUME_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/salt_plume/salt_plume_check.F 73 SALT_PLUME_CHECK
       WRITE(msgBuf,'(2A,F6.1,A)') 'SALT_PLUME_CHECK:',
./pkg/salt_plume/salt_plume_check.F 75 SALT_PLUME_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/forcing_surf_relax.F 198 FORCING_SURF_RELAX
         WRITE(msgBuf,'(A,E24.17)')
./model/src/forcing_surf_relax.F 200 FORCING_SURF_RELAX
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/forcing_surf_relax.F 234 FORCING_SURF_RELAX
         WRITE(msgBuf,'(A,E24.17)')
./model/src/forcing_surf_relax.F 236 FORCING_SURF_RELAX
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/forcing_surf_relax.F 62 FORCING_SURF_RELAX
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/salt_plume/salt_plume_readparms.F 112 SALT_PLUME_READPARMS
        WRITE(msgBuf,'(A)') 'S/R SALT_PLUME_READPARMS'
./pkg/salt_plume/salt_plume_readparms.F 113 SALT_PLUME_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/salt_plume/salt_plume_readparms.F 114 SALT_PLUME_READPARMS
        WRITE(msgBuf,'(A)') 'Invalid CriterionType'
./pkg/salt_plume/salt_plume_readparms.F 115 SALT_PLUME_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/salt_plume/salt_plume_readparms.F 30 SALT_PLUME_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/salt_plume/salt_plume_readparms.F 85 SALT_PLUME_READPARMS
      WRITE(msgBuf,'(A)')'SALT_PLUME_READPARMS: opening data.salt_plume'
./pkg/salt_plume/salt_plume_readparms.F 86 SALT_PLUME_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/salt_plume/salt_plume_readparms.F 95 SALT_PLUME_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/salt_plume/salt_plume_readparms.F 97 SALT_PLUME_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/sbo/sbo_check.F 27 SBO_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/sbo/sbo_check.F 31 SBO_CHECK
      WRITE(msgBuf,'(A)') 'SBO_CHECK: #define ALLOW_SBO'
./pkg/sbo/sbo_check.F 32 SBO_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/sbo/sbo_check.F 37 SBO_CHECK
        WRITE(msgBuf,'(A)') 'SBO not implemented for Cartesian Grid'
./pkg/sbo/sbo_check.F 38 SBO_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/sbo/sbo_check.F 42 SBO_CHECK
        WRITE(msgBuf,'(A)') 'SBO not implemented for Cylindrical Grid'
./pkg/sbo/sbo_check.F 43 SBO_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/sbo/sbo_output.F 120 SBO_OUTPUT
        WRITE(msgBuf,'(A,1PE21.13)')
./pkg/sbo/sbo_output.F 122 SBO_OUTPUT
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/sbo/sbo_output.F 123 SBO_OUTPUT
        WRITE(msgBuf,'(A,1PE21.13)')
./pkg/sbo/sbo_output.F 125 SBO_OUTPUT
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/sbo/sbo_output.F 126 SBO_OUTPUT
        WRITE(msgBuf,'(A,1PE21.13)')
./pkg/sbo/sbo_output.F 128 SBO_OUTPUT
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/sbo/sbo_output.F 129 SBO_OUTPUT
        WRITE(msgBuf,'(A,1PE21.13)')
./pkg/sbo/sbo_output.F 131 SBO_OUTPUT
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/sbo/sbo_output.F 47 SBO_OUTPUT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/sbo/sbo_readparms.F 103 SBO_READPARMS
        WRITE(msgBuf,'(2A)') 'S/R SBO_READPARMS: ',
./pkg/sbo/sbo_readparms.F 105 SBO_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/sbo/sbo_readparms.F 106 SBO_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/sbo/sbo_readparms.F 108 SBO_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/sbo/sbo_readparms.F 114 SBO_READPARMS
        WRITE(msgBuf,'(A,I3,A)')
./pkg/sbo/sbo_readparms.F 116 SBO_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/sbo/sbo_readparms.F 37 SBO_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/sbo/sbo_readparms.F 61 SBO_READPARMS
      WRITE(msgBuf,'(A)') ' SBO_READPARMS: opening data.sbo'
./pkg/sbo/sbo_readparms.F 62 SBO_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/sbo/sbo_readparms.F 89 SBO_READPARMS
      WRITE(msgBuf,'(A)') ' SBO_READPARMS: finished reading data.sbo'
./pkg/sbo/sbo_readparms.F 90 SBO_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/sbo/sbo_readparms.F 96 SBO_READPARMS
        WRITE(msgBuf,'(A,A)') 'S/R SBO_READPARMS: "sbo_taveFreq" ',
./pkg/sbo/sbo_readparms.F 98 SBO_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/cost_ice_test.F 225 COST_ICE_TEST
            WRITE(msgBuf,'(A)')
./pkg/seaice/cost_ice_test.F 227 COST_ICE_TEST
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/cost_ice_test.F 74 COST_ICE_TEST
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/lsr.F 667 LSR
        WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/lsr.F 669 LSR
        CALL DEBUG_STATS_RL( 1, uIce, msgBuf, myThid )
./pkg/seaice/lsr.F 670 LSR
        WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/lsr.F 672 LSR
        CALL DEBUG_STATS_RL( 1, vIce, msgBuf, myThid )
./pkg/seaice/lsr.F 676 LSR
        WRITE(msgBuf,'(2A,I10,A,I4,A)') '** WARNING ** SEAICE_LSR ',
./pkg/seaice/lsr.F 678 LSR
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/lsr.F 680 LSR
        WRITE(msgBuf,'(2(A,I6,0PF6.3,1PE14.6))')
./pkg/seaice/lsr.F 683 LSR
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/lsr.F 88 LSR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_advection.F 139 SEAICE_ADVECTION
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_advection.F 169 SEAICE_ADVECTION
           WRITE(msgBuf,'(A,2I3)')
./pkg/seaice/seaice_advection.F 172 SEAICE_ADVECTION
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_advection.F 209 SEAICE_ADVECTION
           WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_advection.F 211 SEAICE_ADVECTION
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_advection.F 291 SEAICE_ADVECTION
           WRITE(msgBuf,'(A,2I3)')
./pkg/seaice/seaice_advection.F 294 SEAICE_ADVECTION
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_advection.F 396 SEAICE_ADVECTION
           WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_advection.F 399 SEAICE_ADVECTION
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_advection.F 598 SEAICE_ADVECTION
           WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_advection.F 601 SEAICE_ADVECTION
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 102 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 104 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 111 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 113 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 114 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 116 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 125 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 127 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 128 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 130 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 136 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 138 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 139 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 141 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 147 SEAICE_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/seaice/seaice_check.F 150 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 156 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 158 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 159 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 161 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 174 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 176 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 177 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 179 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 186 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 188 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 189 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 191 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 196 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 198 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 199 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 201 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 216 SEAICE_CHECK
         WRITE(msgBuf,'(2A)')
./pkg/seaice/seaice_check.F 219 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 225 SEAICE_CHECK
         WRITE(msgBuf,'(2A)')
./pkg/seaice/seaice_check.F 228 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 244 SEAICE_CHECK
         WRITE(msgBuf,'(2A)')
./pkg/seaice/seaice_check.F 247 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 289 SEAICE_CHECK
       WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: allowed advection schemes',
./pkg/seaice/seaice_check.F 291 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 292 SEAICE_CHECK
       WRITE(msgBuf,'(A,7I3)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 296 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 297 SEAICE_CHECK
       WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 299 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 301 SEAICE_CHECK
        WRITE(msgBuf,'(2A,I3)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 303 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 306 SEAICE_CHECK
        WRITE(msgBuf,'(2A,I3)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 308 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 311 SEAICE_CHECK
        WRITE(msgBuf,'(2A,I3)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 313 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 316 SEAICE_CHECK
        WRITE(msgBuf,'(2A,I3)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 318 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 336 SEAICE_CHECK
        WRITE(msgBuf,'(A,I3,A)') 'SEAICE_CHECK: SEAICEadvScheme=',
./pkg/seaice/seaice_check.F 338 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 340 SEAICE_CHECK
         WRITE(msgBuf,'(2A,I3)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 342 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 345 SEAICE_CHECK
         WRITE(msgBuf,'(2A,I3)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 347 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 350 SEAICE_CHECK
         WRITE(msgBuf,'(2A,I3)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 352 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 355 SEAICE_CHECK
         WRITE(msgBuf,'(2A,I3)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 357 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 364 SEAICE_CHECK
        WRITE(msgBuf,'(2A,1PE16.8)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 366 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 367 SEAICE_CHECK
        WRITE(msgBuf,'(2A,I3)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 369 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 380 SEAICE_CHECK
       WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 382 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 383 SEAICE_CHECK
       WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 385 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 390 SEAICE_CHECK
       WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 392 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 398 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 400 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 401 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: OR SEAICEpresPow1 ',
./pkg/seaice/seaice_check.F 403 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 410 SEAICE_CHECK
       WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 412 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 413 SEAICE_CHECK
       WRITE(msgBuf,'(2A,2I4)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 416 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 420 SEAICE_CHECK
       WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 422 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 423 SEAICE_CHECK
       WRITE(msgBuf,'(2A,2I4)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 425 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 429 SEAICE_CHECK
       WRITE(msgBuf,'(A)') 'SEAICE_CHECK: SEAICE_maskRHS not allowed'
./pkg/seaice/seaice_check.F 430 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 438 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 440 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 447 SEAICE_CHECK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 449 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 456 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 458 SEAICE_CHECK
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 459 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 461 SEAICE_CHECK
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 466 SEAICE_CHECK
      WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 468 SEAICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 473 SEAICE_CHECK
      WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 475 SEAICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 480 SEAICE_CHECK
      WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 482 SEAICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 483 SEAICE_CHECK
      WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 485 SEAICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 486 SEAICE_CHECK
      WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 488 SEAICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 493 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 495 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 496 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 498 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 505 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 507 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 508 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'they are replaced with run time',
./pkg/seaice/seaice_check.F 510 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 516 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 518 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 519 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 521 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 527 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 529 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 530 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 532 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 538 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 53 SEAICE_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_check.F 540 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 541 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'it now is done',
./pkg/seaice/seaice_check.F 543 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 549 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 551 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 552 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 554 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 560 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 562 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 563 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 565 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 574 SEAICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 576 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 580 SEAICE_CHECK
           WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 582 SEAICE_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 586 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 588 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 592 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 594 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 599 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 601 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 605 SEAICE_CHECK
          WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 607 SEAICE_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 608 SEAICE_CHECK
          WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 610 SEAICE_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 615 SEAICE_CHECK
          WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_check.F 617 SEAICE_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 618 SEAICE_CHECK
          WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 621 SEAICE_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 626 SEAICE_CHECK
          WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_check.F 628 SEAICE_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 629 SEAICE_CHECK
          WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 632 SEAICE_CHECK
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 636 SEAICE_CHECK
         WRITE(msgBuf,'(3A)') 'S/R SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 639 SEAICE_CHECK
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_check.F 641 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 642 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 644 SEAICE_CHECK
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_check.F 646 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 650 SEAICE_CHECK
           WRITE(msgBuf,'(2A)') 'S/R SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 652 SEAICE_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 658 SEAICE_CHECK
           WRITE(msgBuf,'(2A)') 'S/R SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 660 SEAICE_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 672 SEAICE_CHECK
         WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_check.F 675 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 680 SEAICE_CHECK
         WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_check.F 683 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 689 SEAICE_CHECK
        WRITE(msgBuf,'(A,I2,A,I2)') 'S/R SEAICE_CHECK: SEAICE_OLx/y = ',
./pkg/seaice/seaice_check.F 691 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 692 SEAICE_CHECK
        WRITE(msgBuf,'(2A,I2,A,I2)')
./pkg/seaice/seaice_check.F 695 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 700 SEAICE_CHECK
         WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_check.F 703 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 707 SEAICE_CHECK
         WRITE(msgBuf,'(A,I2,A,I2)')
./pkg/seaice/seaice_check.F 710 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 711 SEAICE_CHECK
         WRITE(msgBuf,'(2A,I2,A,I2)')
./pkg/seaice/seaice_check.F 714 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 724 SEAICE_CHECK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 726 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 727 SEAICE_CHECK
       WRITE(msgBuf,'(A,I4)')
./pkg/seaice/seaice_check.F 730 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 735 SEAICE_CHECK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 738 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 739 SEAICE_CHECK
       WRITE(msgBuf,'(A,I4)')
./pkg/seaice/seaice_check.F 741 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 747 SEAICE_CHECK
       WRITE(msgBuf,'(A)') 'SEAICE_CHECK: SEAICEnEVPstarSteps is '//
./pkg/seaice/seaice_check.F 749 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 754 SEAICE_CHECK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 756 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 757 SEAICE_CHECK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 759 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 760 SEAICE_CHECK
       WRITE(msgBuf,'(A)') 'SEAICE_CHECK: but cpp-flag '//
./pkg/seaice/seaice_check.F 762 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 769 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 76 SEAICE_CHECK
      WRITE(msgBuf,'(A)') 'SEAICE_CHECK: #define ALLOW_SEAICE'
./pkg/seaice/seaice_check.F 771 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 772 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') ' but CPP-flag ',
./pkg/seaice/seaice_check.F 774 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 77 SEAICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_check.F 781 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 783 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 784 SEAICE_CHECK
        WRITE(msgBuf,'(A)') 'SEAICE_CHECK: but cpp-flag '//
./pkg/seaice/seaice_check.F 786 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 794 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 797 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 798 SEAICE_CHECK
        WRITE(msgBuf,'(A)') 'SEAICE_CHECK: but cpp-flag '//
./pkg/seaice/seaice_check.F 800 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 807 SEAICE_CHECK
       WRITE(msgBuf,'(A)') 'SEAICE_CHECK: SEAICEuseTEM requires that'
./pkg/seaice/seaice_check.F 808 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 809 SEAICE_CHECK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 811 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 818 SEAICE_CHECK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 820 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 821 SEAICE_CHECK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 823 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 824 SEAICE_CHECK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 826 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 82 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 830 SEAICE_CHECK
       WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 832 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 836 SEAICE_CHECK
       WRITE(msgBuf,'(2A)') 'SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 838 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 846 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 848 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 84 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 852 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 854 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 861 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 863 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 864 SEAICE_CHECK
        WRITE(msgBuf,'(A)') 'SEAICE_CHECK: '//
./pkg/seaice/seaice_check.F 866 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 874 SEAICE_CHECK
        WRITE(msgBuf,'(3A)') 'S/R SEAICE_CHECK: JFNKres_t and ',
./pkg/seaice/seaice_check.F 876 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 877 SEAICE_CHECK
        WRITE(msgBuf,'(3A)') 'S/R SEAICE_CHECK: ',
./pkg/seaice/seaice_check.F 880 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 881 SEAICE_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/seaice/seaice_check.F 884 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 887 SEAICE_CHECK
        WRITE(msgBuf,'(2A)') 'S/R SEAICE_CHECK: need to specify ',
./pkg/seaice/seaice_check.F 889 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 894 SEAICE_CHECK
       WRITE(msgBuf,'(2A)')
./pkg/seaice/seaice_check.F 897 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 902 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 904 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 905 SEAICE_CHECK
        WRITE(msgBuf,'(A)') 'SEAICE_CHECK: '//
./pkg/seaice/seaice_check.F 907 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 913 SEAICE_CHECK
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_check.F 915 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 916 SEAICE_CHECK
        WRITE(msgBuf,'(A)') 'SEAICE_CHECK: '//
./pkg/seaice/seaice_check.F 918 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 925 SEAICE_CHECK
        WRITE(msgBuf,'(A)') 'SEAICE_CHECK: SEAICEuseBDF2 = .TRUE. '//
./pkg/seaice/seaice_check.F 927 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 931 SEAICE_CHECK
        WRITE(msgBuf,'(A)') 'SEAICE_CHECK: SEAICEuseIMEX = .TRUE. '//
./pkg/seaice/seaice_check.F 933 SEAICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 938 SEAICE_CHECK
       WRITE(msgBuf,'(A)') '** WARNING ** SEAICE_CHECK: '//
./pkg/seaice/seaice_check.F 941 SEAICE_CHECK
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 945 SEAICE_CHECK
       WRITE(msgBuf,'(A,I2)')
./pkg/seaice/seaice_check.F 947 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 948 SEAICE_CHECK
       WRITE(msgBuf,'(A)') 'SEAICE_CHECK: '//
./pkg/seaice/seaice_check.F 950 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 956 SEAICE_CHECK
       WRITE(msgBuf,'(A,I2)')
./pkg/seaice/seaice_check.F 958 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 959 SEAICE_CHECK
       WRITE(msgBuf,'(A)') 'SEAICE_CHECK: '//
./pkg/seaice/seaice_check.F 95 SEAICE_CHECK
         WRITE(msgBuf,'(2A)') 'SEAICE_CHECK:',
./pkg/seaice/seaice_check.F 961 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 967 SEAICE_CHECK
       WRITE(msgBuf,'(A,I2)')
./pkg/seaice/seaice_check.F 969 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 970 SEAICE_CHECK
       WRITE(msgBuf,'(A)') 'SEAICE_CHECK: is greater than 0, '//
./pkg/seaice/seaice_check.F 972 SEAICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 97 SEAICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check.F 983 SEAICE_CHECK
       WRITE(msgBuf,'(A)') '** WARNING ** SEAICE_CHECK: '//
./pkg/seaice/seaice_check.F 985 SEAICE_CHECK
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 986 SEAICE_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_check.F 988 SEAICE_CHECK
       WRITE(msgBuf,'(A)') '** WARNING ** SEAICE_CHECK: '//
./pkg/seaice/seaice_check.F 990 SEAICE_CHECK
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 991 SEAICE_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_check.F 993 SEAICE_CHECK
       WRITE(msgBuf,'(A)') '** WARNING ** SEAICE_CHECK: '//
./pkg/seaice/seaice_check.F 995 SEAICE_CHECK
       CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check.F 996 SEAICE_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_check_pickup.F 104 SEAICE_CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** SEAICE_CHECK_PICKUP:',
./pkg/seaice/seaice_check_pickup.F 106 SEAICE_CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 116 SEAICE_CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** SEAICE_CHECK_PICKUP:',
./pkg/seaice/seaice_check_pickup.F 118 SEAICE_CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 127 SEAICE_CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** SEAICE_CHECK_PICKUP:',
./pkg/seaice/seaice_check_pickup.F 129 SEAICE_CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 142 SEAICE_CHECK_PICKUP
           WRITE(msgBuf,'(4A)') 'SEAICE_CHECK_PICKUP: ',
./pkg/seaice/seaice_check_pickup.F 144 SEAICE_CHECK_PICKUP
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check_pickup.F 157 SEAICE_CHECK_PICKUP
           WRITE(msgBuf,'(4A)') 'SEAICE_CHECK_PICKUP: ',
./pkg/seaice/seaice_check_pickup.F 159 SEAICE_CHECK_PICKUP
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check_pickup.F 169 SEAICE_CHECK_PICKUP
              WRITE(msgBuf,'(4A)')
./pkg/seaice/seaice_check_pickup.F 173 SEAICE_CHECK_PICKUP
     &         msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 183 SEAICE_CHECK_PICKUP
           WRITE(msgBuf,'(4A)') 'SEAICE_CHECK_PICKUP: ',
./pkg/seaice/seaice_check_pickup.F 185 SEAICE_CHECK_PICKUP
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check_pickup.F 195 SEAICE_CHECK_PICKUP
         WRITE(msgBuf,'(4A)') 'SEAICE_CHECK_PICKUP: ',
./pkg/seaice/seaice_check_pickup.F 198 SEAICE_CHECK_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_check_pickup.F 205 SEAICE_CHECK_PICKUP
          WRITE(msgBuf,'(3A)') '** WARNING ** SEAICE_CHECK_PICKUP:',
./pkg/seaice/seaice_check_pickup.F 208 SEAICE_CHECK_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 209 SEAICE_CHECK_PICKUP
          WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_CHECK_PICKUP:',
./pkg/seaice/seaice_check_pickup.F 211 SEAICE_CHECK_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 215 SEAICE_CHECK_PICKUP
         WRITE(msgBuf,'(4A)') '** WARNING ** SEAICE_CHECK_PICKUP: ',
./pkg/seaice/seaice_check_pickup.F 217 SEAICE_CHECK_PICKUP
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_check_pickup.F 65 SEAICE_CHECK_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_check_pickup.F 96 SEAICE_CHECK_PICKUP
           WRITE(msgBuf,'(4A)') '** WARNING ** SEAICE_CHECK_PICKUP:',
./pkg/seaice/seaice_check_pickup.F 98 SEAICE_CHECK_PICKUP
           CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_do_ridging.F 100 SEAICE_DO_RIDGING
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_do_ridging.F 429 SEAICE_DO_RIDGING
       WRITE(msgBuf,'(A)') 'SEAICE_DO_RIDGING: *** WARNING ***'
./pkg/seaice/seaice_do_ridging.F 430 SEAICE_DO_RIDGING
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_do_ridging.F 432 SEAICE_DO_RIDGING
       WRITE(msgBuf,'(A,I2,A)') 'SEAICE_DO_RIDGING: '//
./pkg/seaice/seaice_do_ridging.F 435 SEAICE_DO_RIDGING
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_do_ridging.F 442 SEAICE_DO_RIDGING
       WRITE(msgBuf,'(A,I2,A,I10)')
./pkg/seaice/seaice_do_ridging.F 445 SEAICE_DO_RIDGING
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_fake.F 43 SEAICE_FAKE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_fake.F 45 SEAICE_FAKE
      WRITE(msgBuf,'(2A)') 'SEAICE_FAKE:',
./pkg/seaice/seaice_fake.F 47 SEAICE_FAKE
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_fgmres.F 346 SEAICE_FGMRES
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_fgmres.F 399 SEAICE_FGMRES
       write(msgBuf, 199) its, ro
./pkg/seaice/seaice_fgmres.F 400 SEAICE_FGMRES
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_fgmres.F 534 SEAICE_FGMRES
       write(msgBuf, 199) its, ro
./pkg/seaice/seaice_fgmres.F 535 SEAICE_FGMRES
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_growth.F 105 SEAICE_GROWTH
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_growth.F 107 SEAICE_GROWTH
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_growth.F 2664 SEAICE_GROWTH
        WRITE(msgBuf,'(a,a,e24.17)') 'rm Global mean of ',
./pkg/seaice/seaice_growth.F 2666 SEAICE_GROWTH
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_growth.F 2685 SEAICE_GROWTH
        WRITE(msgBuf,'(a,a,e24.17)') 'rm Global mean of ',
./pkg/seaice/seaice_growth.F 2687 SEAICE_GROWTH
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_init_fixed.F 178 SEAICE_INIT_FIXED
      WRITE(msgBuf,'(A,I2,A)')
./pkg/seaice/seaice_init_fixed.F 181 SEAICE_INIT_FIXED
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_init_fixed.F 184 SEAICE_INIT_FIXED
      WRITE(msgBuf,HlimitMsgFormat)
./pkg/seaice/seaice_init_fixed.F 186 SEAICE_INIT_FIXED
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_init_fixed.F 34 SEAICE_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_itd_remap.F 534 SEAICE_ITD_REMAP_CHECK_BOUNDS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_itd_remap.F 546 SEAICE_ITD_REMAP_CHECK_BOUNDS
            WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_itd_remap.F 549 SEAICE_ITD_REMAP_CHECK_BOUNDS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_itd_remap.F 556 SEAICE_ITD_REMAP_CHECK_BOUNDS
            WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_itd_remap.F 559 SEAICE_ITD_REMAP_CHECK_BOUNDS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_itd_remap.F 569 SEAICE_ITD_REMAP_CHECK_BOUNDS
            WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_itd_remap.F 572 SEAICE_ITD_REMAP_CHECK_BOUNDS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_itd_remap.F 576 SEAICE_ITD_REMAP_CHECK_BOUNDS
            WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_itd_remap.F 579 SEAICE_ITD_REMAP_CHECK_BOUNDS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 304 SEAICE_JFNK
         WRITE(msgBuf,'(2A,2(1XI6),2E12.5)')
./pkg/seaice/seaice_jfnk.F 309 SEAICE_JFNK
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 311 SEAICE_JFNK
         WRITE(msgBuf,'(3(A,I6))')
./pkg/seaice/seaice_jfnk.F 315 SEAICE_JFNK
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 381 SEAICE_JFNK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_jfnk.F 383 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 385 SEAICE_JFNK
       WRITE(msgBuf,'(A)') ' // Begin JFNK statistics'
./pkg/seaice/seaice_jfnk.F 386 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 388 SEAICE_JFNK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_jfnk.F 390 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 392 SEAICE_JFNK
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_jfnk.F 394 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 396 SEAICE_JFNK
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_jfnk.F 398 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 400 SEAICE_JFNK
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_jfnk.F 402 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 404 SEAICE_JFNK
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_jfnk.F 406 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 408 SEAICE_JFNK
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_jfnk.F 410 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 412 SEAICE_JFNK
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_jfnk.F 414 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 416 SEAICE_JFNK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_jfnk.F 418 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 420 SEAICE_JFNK
       WRITE(msgBuf,'(A)') ' // End JFNK statistics'
./pkg/seaice/seaice_jfnk.F 421 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 423 SEAICE_JFNK
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_jfnk.F 425 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 440 SEAICE_JFNK
        WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_jfnk.F 443 SEAICE_JFNK
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 449 SEAICE_JFNK
        WRITE(msgBuf,'(A,I4,A,I10)')
./pkg/seaice/seaice_jfnk.F 452 SEAICE_JFNK
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 457 SEAICE_JFNK
       WRITE(msgBuf,'(A,I6,A,I10)')
./pkg/seaice/seaice_jfnk.F 460 SEAICE_JFNK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 538 SEAICE_JFNK_UPDATE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_jfnk.F 584 SEAICE_JFNK_UPDATE
        WRITE(msgBuf,'(2A,2(1XI6),3E12.5)')
./pkg/seaice/seaice_jfnk.F 588 SEAICE_JFNK_UPDATE
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_jfnk.F 94 SEAICE_JFNK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_cg2d.F 175 INI_CG2D
       WRITE(msgBuf,'(2A,1PE23.16)') 'INI_CG2D: ',
./model/src/ini_cg2d.F 177 INI_CG2D
       CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/ini_cg2d.F 179 INI_CG2D
        WRITE(msgBuf,'(2A,1PE22.15,A,1PE16.10,A)') 'INI_CG2D: ',
./model/src/ini_cg2d.F 181 INI_CG2D
        CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/ini_cg2d.F 183 INI_CG2D
       WRITE(msgBuf,*) ' '
./model/src/ini_cg2d.F 184 INI_CG2D
       CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/ini_cg2d.F 43 INI_CG2D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_krylov.F 381 SEAICE_KRYLOV
         WRITE(msgBuf,'(2A,2(1XI6),2E12.5)')
./pkg/seaice/seaice_krylov.F 386 SEAICE_KRYLOV
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 388 SEAICE_KRYLOV
         WRITE(msgBuf,'(3(A,I6))')
./pkg/seaice/seaice_krylov.F 392 SEAICE_KRYLOV
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 436 SEAICE_KRYLOV
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_krylov.F 438 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 440 SEAICE_KRYLOV
       WRITE(msgBuf,'(A)') ' // Begin KRYLOV statistics'
./pkg/seaice/seaice_krylov.F 441 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 443 SEAICE_KRYLOV
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_krylov.F 445 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 447 SEAICE_KRYLOV
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_krylov.F 449 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 451 SEAICE_KRYLOV
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_krylov.F 454 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 456 SEAICE_KRYLOV
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_krylov.F 458 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 460 SEAICE_KRYLOV
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_krylov.F 462 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 464 SEAICE_KRYLOV
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_krylov.F 466 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 468 SEAICE_KRYLOV
       WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_krylov.F 470 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 472 SEAICE_KRYLOV
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_krylov.F 474 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 476 SEAICE_KRYLOV
       WRITE(msgBuf,'(A)') ' // End KRYLOV statistics'
./pkg/seaice/seaice_krylov.F 477 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 479 SEAICE_KRYLOV
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_krylov.F 481 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 497 SEAICE_KRYLOV
        WRITE(msgBuf,'(A,I10)')
./pkg/seaice/seaice_krylov.F 500 SEAICE_KRYLOV
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 506 SEAICE_KRYLOV
        WRITE(msgBuf,'(A,I4,A,I10)')
./pkg/seaice/seaice_krylov.F 509 SEAICE_KRYLOV
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 514 SEAICE_KRYLOV
       WRITE(msgBuf,'(A,I6,A,I10)')
./pkg/seaice/seaice_krylov.F 517 SEAICE_KRYLOV
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_krylov.F 86 SEAICE_KRYLOV
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_lsr.F 528 SEAICE_LSR
        WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_lsr.F 530 SEAICE_LSR
        CALL DEBUG_STATS_RL( 1, UICE, msgBuf, myThid )
./pkg/seaice/seaice_lsr.F 531 SEAICE_LSR
        WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_lsr.F 533 SEAICE_LSR
        CALL DEBUG_STATS_RL( 1, VICE, msgBuf, myThid )
./pkg/seaice/seaice_lsr.F 899 SEAICE_LSR
        WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_lsr.F 89 SEAICE_LSR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_lsr.F 901 SEAICE_LSR
        CALL DEBUG_STATS_RL( 1, UICE, msgBuf, myThid )
./pkg/seaice/seaice_lsr.F 902 SEAICE_LSR
        WRITE(msgBuf,'(A,I3,A)')
./pkg/seaice/seaice_lsr.F 904 SEAICE_LSR
        CALL DEBUG_STATS_RL( 1, VICE, msgBuf, myThid )
./pkg/seaice/seaice_lsr.F 908 SEAICE_LSR
        WRITE(msgBuf,'(2A,I10,A,I4,A)') '** WARNING ** SEAICE_LSR ',
./pkg/seaice/seaice_lsr.F 910 SEAICE_LSR
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_lsr.F 912 SEAICE_LSR
        WRITE(msgBuf,'(2(A,I6,0PF6.3,1PE14.6))')
./pkg/seaice/seaice_lsr.F 915 SEAICE_LSR
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_monitor.F 143 SEAICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/seaice/seaice_monitor.F 145 SEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor.F 146 SEAICE_MONITOR
            WRITE(msgBuf,'(A)') '// End MONITOR SEAICE statistics'
./pkg/seaice/seaice_monitor.F 147 SEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor.F 148 SEAICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/seaice/seaice_monitor.F 150 SEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor.F 45 SEAICE_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_monitor.F 85 SEAICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/seaice/seaice_monitor.F 87 SEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor.F 88 SEAICE_MONITOR
            WRITE(msgBuf,'(A)') '// Begin MONITOR SEAICE statistics'
./pkg/seaice/seaice_monitor.F 89 SEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor.F 90 SEAICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/seaice/seaice_monitor.F 92 SEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor_ad.F 101 ADSEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor_ad.F 142 ADSEAICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/seaice/seaice_monitor_ad.F 144 ADSEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor_ad.F 145 ADSEAICE_MONITOR
            WRITE(msgBuf,'(A)') '// End AD_MONITOR SEAICE statistics'
./pkg/seaice/seaice_monitor_ad.F 146 ADSEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor_ad.F 147 ADSEAICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/seaice/seaice_monitor_ad.F 149 ADSEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor_ad.F 54 ADSEAICE_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_monitor_ad.F 94 ADSEAICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./pkg/seaice/seaice_monitor_ad.F 96 ADSEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor_ad.F 97 ADSEAICE_MONITOR
            WRITE(msgBuf,'(A)') '// Begin AD_MONITOR SEAICE statistics'
./pkg/seaice/seaice_monitor_ad.F 98 ADSEAICE_MONITOR
            CALL PRINT_MESSAGE(msgBuf, mon_ioUnit, SQUEEZE_RIGHT, 1)
./pkg/seaice/seaice_monitor_ad.F 99 ADSEAICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ===========================',
./model/src/ini_cg3d.F 178 INI_CG3D
       WRITE(msgBuf,'(2A,1PE23.16)') 'INI_CG3D: ',
./model/src/ini_cg3d.F 180 INI_CG3D
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_cg3d.F 182 INI_CG3D
       WRITE(msgBuf,*) '                               '
./model/src/ini_cg3d.F 183 INI_CG3D
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_cg3d.F 45 INI_CG3D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_preconditioner.F 219 SEAICE_PRECONDITIONER
        WRITE(msgBuf,'(A,I3,A,I3,A)')
./pkg/seaice/seaice_preconditioner.F 222 SEAICE_PRECONDITIONER
        CALL DEBUG_STATS_RL( 1, UICE, msgBuf, myThid )
./pkg/seaice/seaice_preconditioner.F 223 SEAICE_PRECONDITIONER
        WRITE(msgBuf,'(A,I3,A,I3,A)')
./pkg/seaice/seaice_preconditioner.F 226 SEAICE_PRECONDITIONER
        CALL DEBUG_STATS_RL( 1, VICE, msgBuf, myThid )
./pkg/seaice/seaice_preconditioner.F 406 SEAICE_PRECONDITIONER
        WRITE(msgBuf,'(A,I3,A,I3,A)')
./pkg/seaice/seaice_preconditioner.F 409 SEAICE_PRECONDITIONER
        CALL DEBUG_STATS_RL( 1, UICE, msgBuf, myThid )
./pkg/seaice/seaice_preconditioner.F 410 SEAICE_PRECONDITIONER
        WRITE(msgBuf,'(A,I3,A,I3,A)')
./pkg/seaice/seaice_preconditioner.F 413 SEAICE_PRECONDITIONER
        CALL DEBUG_STATS_RL( 1, VICE, msgBuf, myThid )
./pkg/seaice/seaice_preconditioner.F 86 SEAICE_PRECONDITIONER
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_read_pickup.F 108 SEAICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'SEAICE_READ_PICKUP: ',
./pkg/seaice/seaice_read_pickup.F 111 SEAICE_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_read_pickup.F 112 SEAICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'SEAICE_READ_PICKUP: ',
./pkg/seaice/seaice_read_pickup.F 115 SEAICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 118 SEAICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> SEAICE_READ_PICKUP: ',
./pkg/seaice/seaice_read_pickup.F 120 SEAICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 123 SEAICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/seaice/seaice_read_pickup.F 125 SEAICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 128 SEAICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/seaice/seaice_read_pickup.F 130 SEAICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 131 SEAICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/seaice/seaice_read_pickup.F 133 SEAICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_read_pickup.F 290 SEAICE_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'SEAICE_READ_PICKUP: ',
./pkg/seaice/seaice_read_pickup.F 292 SEAICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_read_pickup.F 57 SEAICE_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_read_pickup.F 92 SEAICE_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'SEAICE_READ_PICKUP: ',
./pkg/seaice/seaice_read_pickup.F 94 SEAICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_read_pickup.F 95 SEAICE_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'SEAICE_READ_PICKUP: ',
./pkg/seaice/seaice_read_pickup.F 97 SEAICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1001 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1004 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1005 SEAICE_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 1007 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1011 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1014 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1015 SEAICE_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 1017 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1021 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1024 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1025 SEAICE_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 1027 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1031 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1034 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1035 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1038 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1042 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1045 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1046 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1049 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1053 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1056 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1057 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1060 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1063 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1065 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1066 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1068 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1072 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)') 'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1074 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1075 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)') 'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1077 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1081 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)') 'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1083 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1084 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)') 'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1086 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1090 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)') 'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1092 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1093 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)') 'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1095 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1099 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1102 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1103 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1106 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1110 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1113 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1114 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1117 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1121 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1124 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1125 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1129 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1133 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1136 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1137 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1140 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1144 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1147 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1148 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1151 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1155 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)') 'S/R SEAICE_READPARMS: "LAD" ',
./pkg/seaice/seaice_readparms.F 1157 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1158 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)') 'always use modified Euler step ',
./pkg/seaice/seaice_readparms.F 1160 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1164 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1167 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1171 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1174 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1175 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1178 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1182 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1185 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1186 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1189 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1193 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1196 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1197 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1200 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1204 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1207 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1208 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1211 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1218 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1221 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1222 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1225 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1228 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1230 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1231 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1233 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1237 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1240 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1244 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1247 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1251 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 1254 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1257 SEAICE_READPARMS
       WRITE(msgBuf,'(2A)') 'S/R SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1259 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1260 SEAICE_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 1262 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 1298 SEAICE_READPARMS
       WRITE(msgBuf,'(2A)')
./pkg/seaice/seaice_readparms.F 1301 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 1302 SEAICE_READPARMS
       WRITE(msgBuf,'(2A)')
./pkg/seaice/seaice_readparms.F 1305 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 1306 SEAICE_READPARMS
       WRITE(msgBuf,'(A,E13.6,A)')
./pkg/seaice/seaice_readparms.F 1309 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 1320 SEAICE_READPARMS
          WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1322 SEAICE_READPARMS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_readparms.F 1327 SEAICE_READPARMS
          WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1329 SEAICE_READPARMS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_readparms.F 1334 SEAICE_READPARMS
          WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1336 SEAICE_READPARMS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_readparms.F 1341 SEAICE_READPARMS
          WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1343 SEAICE_READPARMS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_readparms.F 1348 SEAICE_READPARMS
          WRITE(msgBuf,'(2A)') '** WARNING ** SEAICE_READPARMS: ',
./pkg/seaice/seaice_readparms.F 1350 SEAICE_READPARMS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_readparms.F 55 SEAICE_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_readparms.F 620 SEAICE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 622 SEAICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_readparms.F 624 SEAICE_READPARMS
      WRITE(msgBuf,'(A)') ' SEAICE_READPARMS: opening data.seaice'
./pkg/seaice/seaice_readparms.F 625 SEAICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_readparms.F 657 SEAICE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 659 SEAICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_readparms.F 703 SEAICE_READPARMS
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 705 SEAICE_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 706 SEAICE_READPARMS
         WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 708 SEAICE_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 730 SEAICE_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 732 SEAICE_READPARMS
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 736 SEAICE_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 738 SEAICE_READPARMS
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 775 SEAICE_READPARMS
        WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 778 SEAICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_readparms.F 786 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 789 SEAICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_readparms.F 791 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 794 SEAICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/seaice/seaice_readparms.F 870 SEAICE_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_READPARMS: Cannot specify ',
./pkg/seaice/seaice_readparms.F 872 SEAICE_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 881 SEAICE_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_READPARMS: Cannot specify ',
./pkg/seaice/seaice_readparms.F 883 SEAICE_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 892 SEAICE_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_READPARMS: Cannot specify ',
./pkg/seaice/seaice_readparms.F 895 SEAICE_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_READPARMS: Cannot specify ',
./pkg/seaice/seaice_readparms.F 898 SEAICE_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 922 SEAICE_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_READPARMS: Cannot specify ',
./pkg/seaice/seaice_readparms.F 924 SEAICE_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 931 SEAICE_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_READPARMS: Cannot specify ',
./pkg/seaice/seaice_readparms.F 934 SEAICE_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R SEAICE_READPARMS: Cannot specify ',
./pkg/seaice/seaice_readparms.F 937 SEAICE_READPARMS
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/seaice/seaice_readparms.F 981 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 984 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 985 SEAICE_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 987 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 991 SEAICE_READPARMS
       WRITE(msgBuf,'(A,A)')
./pkg/seaice/seaice_readparms.F 994 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_readparms.F 995 SEAICE_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_readparms.F 997 SEAICE_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_summary.F 100 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 102 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 110 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') '   pkg/seaice dynamics is OFF  '
./pkg/seaice/seaice_summary.F 111 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 297 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/seaice/seaice_summary.F 298 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 300 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 302 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 304 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 306 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 309 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 311 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 37 SEAICE_SUMMARY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_summary.F 384 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/seaice/seaice_summary.F 385 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 387 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 389 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 391 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 393 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 406 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') '   pkg/seaice thermodynamics is OFF  '
./pkg/seaice/seaice_summary.F 407 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 440 SEAICE_SUMMARY
      WRITE(msgBuf,'(2A)') 'SEAICE_areaGainFormula =',
./pkg/seaice/seaice_summary.F 442 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 446 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') '    1=from growth by ATM '
./pkg/seaice/seaice_summary.F 447 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 448 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') '    2=from predicted growth by ATM'
./pkg/seaice/seaice_summary.F 449 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 452 SEAICE_SUMMARY
      WRITE(msgBuf,'(2A)') 'SEAICE_areaLossFormula =',
./pkg/seaice/seaice_summary.F 454 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 458 SEAICE_SUMMARY
      WRITE(msgBuf,'(2A)') '    1=from all but only melt ',
./pkg/seaice/seaice_summary.F 460 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 461 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') '    2=from net melt-grow>0 by ATM and OCN'
./pkg/seaice/seaice_summary.F 462 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 463 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') '    3=from predicted melt by ATM'
./pkg/seaice/seaice_summary.F 464 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/seaice/seaice_summary.F 481 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 483 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 497 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/seaice/seaice_summary.F 498 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 500 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 502 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 504 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 506 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 53 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 55 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 57 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 59 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 613 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/seaice/seaice_summary.F 614 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 616 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 618 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 61 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 620 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 622 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 63 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 673 SEAICE_SUMMARY
      WRITE(msgBuf,'(A,I3,A)') '== SItracer no. ',iTracer,
./pkg/seaice/seaice_summary.F 675 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 68 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/seaice/seaice_summary.F 69 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 702 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/seaice/seaice_summary.F 703 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 705 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 707 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 709 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 711 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 71 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 727 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/seaice/seaice_summary.F 728 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 730 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 732 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 734 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 736 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 738 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 73 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 740 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 742 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/seaice/seaice_summary.F 743 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 75 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 77 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 93 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/seaice/seaice_summary.F 94 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/seaice/seaice_summary.F 96 SEAICE_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/seaice/seaice_summary.F 98 SEAICE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/bar_check.F 41 BAR_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/bar_check.F 64 BAR_CHECK
         WRITE(msgBuf,'(A,I4,A,I8)') 'BAR_CHECK: thread', myThid,
./eesupp/src/bar_check.F 66 BAR_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_cori.F 162 INI_CORI
           WRITE(msgBuf,'(A,I6,2A)')
./model/src/ini_cori.F 164 INI_CORI
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_cori.F 170 INI_CORI
           WRITE(msgBuf,'(A)') 'INI_CORI: Needs to compile MDSIO pkg'
./model/src/ini_cori.F 171 INI_CORI
           CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_cori.F 51 INI_CORI
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/seaice/seaice_write_pickup.F 197 SEAICE_WRITE_PICKUP
         WRITE(msgBuf,'(2A,I5,A)') 'WRITE_SEAICE_PICKUP: ',
./pkg/seaice/seaice_write_pickup.F 199 SEAICE_WRITE_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_write_pickup.F 200 SEAICE_WRITE_PICKUP
         WRITE(msgBuf,'(2A,I5,A)') 'WRITE_SEAICE_PICKUP: ',
./pkg/seaice/seaice_write_pickup.F 202 SEAICE_WRITE_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/seaice/seaice_write_pickup.F 63 SEAICE_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/shap_filt/shap_filt_readparms.F 184 SHAP_FILT_READPARMS
         WRITE(msgBuf,'(2A)') 'SHAP_FILT: CPP-option NO_SLIP_SHAP',
./pkg/shap_filt/shap_filt_readparms.F 186 SHAP_FILT_READPARMS
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/shap_filt/shap_filt_readparms.F 187 SHAP_FILT_READPARMS
         WRITE(msgBuf,'(2A)') ' ==> use parameter Shap_noSlip=1. ',
./pkg/shap_filt/shap_filt_readparms.F 189 SHAP_FILT_READPARMS
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/shap_filt/shap_filt_readparms.F 203 SHAP_FILT_READPARMS
         WRITE(msgBuf,'(2A)') 'SHAP_FILT with rigidLid ',
./pkg/shap_filt/shap_filt_readparms.F 205 SHAP_FILT_READPARMS
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/shap_filt/shap_filt_readparms.F 208 SHAP_FILT_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R SHAP_FILT_READPARMS: WARNING <<< ',
./pkg/shap_filt/shap_filt_readparms.F 210 SHAP_FILT_READPARMS
         CALL PRINT_MESSAGE(msgBuf, errorMessageUnit, SQUEEZE_RIGHT,1)
./pkg/shap_filt/shap_filt_readparms.F 211 SHAP_FILT_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R SHAP_FILT_READPARMS: WARNING <<< ',
./pkg/shap_filt/shap_filt_readparms.F 213 SHAP_FILT_READPARMS
         CALL PRINT_MESSAGE(msgBuf, errorMessageUnit, SQUEEZE_RIGHT,1)
./pkg/shap_filt/shap_filt_readparms.F 221 SHAP_FILT_READPARMS
         WRITE(msgBuf,'(2A,I3)') 'SHAP_FILT on CS-grid ',
./pkg/shap_filt/shap_filt_readparms.F 223 SHAP_FILT_READPARMS
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/shap_filt/shap_filt_readparms.F 227 SHAP_FILT_READPARMS
         WRITE(msgBuf,'(2A)') 'SHAP_FILT on CS-grid:',
./pkg/shap_filt/shap_filt_readparms.F 229 SHAP_FILT_READPARMS
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/shap_filt/shap_filt_readparms.F 230 SHAP_FILT_READPARMS
         WRITE(msgBuf,'(A,I3,A)') ' Shap_funct=', Shap_funct,
./pkg/shap_filt/shap_filt_readparms.F 232 SHAP_FILT_READPARMS
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/shap_filt/shap_filt_readparms.F 38 SHAP_FILT_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/shap_filt/shap_filt_readparms.F 66 SHAP_FILT_READPARMS
      WRITE(msgBuf,'(A)') ' SHAP_FILT_READPARMS: opening data.shap'
./pkg/shap_filt/shap_filt_readparms.F 67 SHAP_FILT_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/shap_filt/shap_filt_readparms.F 96 SHAP_FILT_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/shap_filt/shap_filt_readparms.F 98 SHAP_FILT_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_curvilinear_grid.F 120 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(2A)') 'INI_CURVILINEAR_GRID:',
./model/src/ini_curvilinear_grid.F 122 INI_CURVILINEAR_GRID
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_curvilinear_grid.F 144 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(2A)') 'INI_CURVILINEAR_GRID:',
./model/src/ini_curvilinear_grid.F 146 INI_CURVILINEAR_GRID
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_curvilinear_grid.F 179 INI_CURVILINEAR_GRID
      WRITE(msgBuf,'(2A)')
./model/src/ini_curvilinear_grid.F 181 INI_CURVILINEAR_GRID
      CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_curvilinear_grid.F 182 INI_CURVILINEAR_GRID
      WRITE(msgBuf,'(2A)')
./model/src/ini_curvilinear_grid.F 184 INI_CURVILINEAR_GRID
      CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_curvilinear_grid.F 216 INI_CURVILINEAR_GRID
          msgBuf(i:i) = ' '
./model/src/ini_curvilinear_grid.F 218 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(2A)') msgBuf,' ; Reading grid info using MNC'
./model/src/ini_curvilinear_grid.F 219 INI_CURVILINEAR_GRID
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_curvilinear_grid.F 284 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(3A)') tmpBuf(1:iL),
./model/src/ini_curvilinear_grid.F 286 INI_CURVILINEAR_GRID
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_curvilinear_grid.F 288 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(A)') '  =>'
./model/src/ini_curvilinear_grid.F 292 INI_CURVILINEAR_GRID
        iL = ILNBLNK(msgBuf)
./model/src/ini_curvilinear_grid.F 293 INI_CURVILINEAR_GRID
        WRITE(tmpBuf,'(A,1X,A)') msgBuf(1:iL),'xC'
./model/src/ini_curvilinear_grid.F 296 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(A,1X,A)') tmpBuf(1:iL),'yC'
./model/src/ini_curvilinear_grid.F 298 INI_CURVILINEAR_GRID
        iL = ILNBLNK(msgBuf)
./model/src/ini_curvilinear_grid.F 299 INI_CURVILINEAR_GRID
        WRITE(tmpBuf,'(A,1X,A)') msgBuf(1:iL),'dxF'
./model/src/ini_curvilinear_grid.F 302 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(A,1X,A)') tmpBuf(1:iL),'dyF'
./model/src/ini_curvilinear_grid.F 304 INI_CURVILINEAR_GRID
        iL = ILNBLNK(msgBuf)
./model/src/ini_curvilinear_grid.F 305 INI_CURVILINEAR_GRID
        WRITE(tmpBuf,'(A,1X,A)') msgBuf(1:iL),'rA'
./model/src/ini_curvilinear_grid.F 308 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(A,1X,A)') tmpBuf(1:iL),'xG'
./model/src/ini_curvilinear_grid.F 310 INI_CURVILINEAR_GRID
        iL = ILNBLNK(msgBuf)
./model/src/ini_curvilinear_grid.F 311 INI_CURVILINEAR_GRID
        WRITE(tmpBuf,'(A,1X,A)') msgBuf(1:iL),'yG'
./model/src/ini_curvilinear_grid.F 314 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(A,1X,A)') tmpBuf(1:iL),'dxV'
./model/src/ini_curvilinear_grid.F 316 INI_CURVILINEAR_GRID
        iL = ILNBLNK(msgBuf)
./model/src/ini_curvilinear_grid.F 317 INI_CURVILINEAR_GRID
        WRITE(tmpBuf,'(A,1X,A)') msgBuf(1:iL),'dyU'
./model/src/ini_curvilinear_grid.F 320 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(A,1X,A)') tmpBuf(1:iL),'rAz'
./model/src/ini_curvilinear_grid.F 322 INI_CURVILINEAR_GRID
        iL = ILNBLNK(msgBuf)
./model/src/ini_curvilinear_grid.F 323 INI_CURVILINEAR_GRID
        WRITE(tmpBuf,'(A,1X,A)') msgBuf(1:iL),'dxC'
./model/src/ini_curvilinear_grid.F 326 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(A,1X,A)') tmpBuf(1:iL),'dyC'
./model/src/ini_curvilinear_grid.F 328 INI_CURVILINEAR_GRID
        iL = ILNBLNK(msgBuf)
./model/src/ini_curvilinear_grid.F 329 INI_CURVILINEAR_GRID
        WRITE(tmpBuf,'(A,1X,A)') msgBuf(1:iL),'rAw'
./model/src/ini_curvilinear_grid.F 332 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(A,1X,A)') tmpBuf(1:iL),'rAs'
./model/src/ini_curvilinear_grid.F 334 INI_CURVILINEAR_GRID
        iL = ILNBLNK(msgBuf)
./model/src/ini_curvilinear_grid.F 335 INI_CURVILINEAR_GRID
        WRITE(tmpBuf,'(A,1X,A)') msgBuf(1:iL),'dxG'
./model/src/ini_curvilinear_grid.F 338 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(A,1X,A)') tmpBuf(1:iL),'dyG'
./model/src/ini_curvilinear_grid.F 343 INI_CURVILINEAR_GRID
         iL = ILNBLNK(msgBuf)
./model/src/ini_curvilinear_grid.F 344 INI_CURVILINEAR_GRID
         WRITE(tmpBuf,'(A,1X,A)') msgBuf(1:iL),'AngleCS'
./model/src/ini_curvilinear_grid.F 347 INI_CURVILINEAR_GRID
         WRITE(msgBuf,'(A,1X,A)') tmpBuf(1:iL),'AngleSN'
./model/src/ini_curvilinear_grid.F 353 INI_CURVILINEAR_GRID
        WRITE(msgBuf,'(2A)')
./model/src/ini_curvilinear_grid.F 355 INI_CURVILINEAR_GRID
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_curvilinear_grid.F 359 INI_CURVILINEAR_GRID
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_curvilinear_grid.F 51 INI_CURVILINEAR_GRID
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/shelfice/shelfice_check.F 135 SHELFICE_CHECK
      WRITE(msgBuf,'(A)')
./pkg/shelfice/shelfice_check.F 137 SHELFICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/shelfice/shelfice_check.F 143 SHELFICE_CHECK
         WRITE(msgBuf,'(2A)') 'SHELFICE_CHECK: cannot specify both',
./pkg/shelfice/shelfice_check.F 145 SHELFICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 151 SHELFICE_CHECK
         WRITE(msgBuf,'(A)')
./pkg/shelfice/shelfice_check.F 153 SHELFICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 165 SHELFICE_CHECK
         WRITE(msgBuf,'(2A,I3,A)') 'Current nonHydrostatic',
./pkg/shelfice/shelfice_check.F 167 SHELFICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 168 SHELFICE_CHECK
         WRITE(msgBuf,'(A)') ' not compatible with SHELFICE code'
./pkg/shelfice/shelfice_check.F 169 SHELFICE_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 189 SHELFICE_CHECK
       WRITE(msgBuf,'(A,A,A)')
./pkg/shelfice/shelfice_check.F 191 SHELFICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 192 SHELFICE_CHECK
       WRITE(msgBuf,'(A,A,A)')
./pkg/shelfice/shelfice_check.F 194 SHELFICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 200 SHELFICE_CHECK
        WRITE(msgBuf,'(A,A,A)')
./pkg/shelfice/shelfice_check.F 202 SHELFICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 203 SHELFICE_CHECK
        WRITE(msgBuf,'(A,A,A)')
./pkg/shelfice/shelfice_check.F 205 SHELFICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 213 SHELFICE_CHECK
       WRITE(msgBuf,'(A,A,A)')
./pkg/shelfice/shelfice_check.F 215 SHELFICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 216 SHELFICE_CHECK
       WRITE(msgBuf,'(A,A,A)')
./pkg/shelfice/shelfice_check.F 218 SHELFICE_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 224 SHELFICE_CHECK
        WRITE(msgBuf,'(A,I3,A)')
./pkg/shelfice/shelfice_check.F 226 SHELFICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_check.F 27 SHELFICE_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/shelfice/shelfice_check.F 33 SHELFICE_CHECK
      WRITE(msgBuf,'(A)') 'SHELFICE_CHECK: #define ALLOW_SHELFICE'
./pkg/shelfice/shelfice_check.F 34 SHELFICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/shelfice/shelfice_check.F 38 SHELFICE_CHECK
      WRITE(msgBuf,'(A)') ' '
./pkg/shelfice/shelfice_check.F 39 SHELFICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/shelfice/shelfice_check.F 41 SHELFICE_CHECK
      WRITE(msgBuf,'(A)')
./pkg/shelfice/shelfice_check.F 43 SHELFICE_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_depths.F 195 INI_DEPTHS
          WRITE(msgBuf,'(A,A)') 'S/R INI_DEPTHS: ',
./model/src/ini_depths.F 197 INI_DEPTHS
          CALL PRINT_ERROR( msgBuf , myThid)
./model/src/ini_depths.F 60 INI_DEPTHS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_depths.F 65 INI_DEPTHS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_depths.F 68 INI_DEPTHS
       CALL PRINT_ERROR( msgBuf , myThid)
./pkg/shelfice/shelfice_read_pickup.F 100 SHELFICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/shelfice/shelfice_read_pickup.F 103 SHELFICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/shelfice/shelfice_read_pickup.F 105 SHELFICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/shelfice/shelfice_read_pickup.F 114 SHELFICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'SHELFICE_READ_PICKUP: ',
./pkg/shelfice/shelfice_read_pickup.F 116 SHELFICE_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_read_pickup.F 148 SHELFICE_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'SHELFICE_READ_PICKUP: ',
./pkg/shelfice/shelfice_read_pickup.F 150 SHELFICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_read_pickup.F 157 SHELFICE_READ_PICKUP
         WRITE(msgBuf,'(4A)') 'SHELFICE_READ_PICKUP: ',
./pkg/shelfice/shelfice_read_pickup.F 159 SHELFICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_read_pickup.F 48 SHELFICE_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/shelfice/shelfice_read_pickup.F 72 SHELFICE_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'SHELFICE_READ_PICKUP: ',
./pkg/shelfice/shelfice_read_pickup.F 74 SHELFICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_read_pickup.F 75 SHELFICE_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'SHELFICE_READ_PICKUP: ',
./pkg/shelfice/shelfice_read_pickup.F 77 SHELFICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_read_pickup.F 87 SHELFICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'SHELFICE_READ_PICKUP: ',
./pkg/shelfice/shelfice_read_pickup.F 90 SHELFICE_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_read_pickup.F 91 SHELFICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'SHELFICE_READ_PICKUP: ',
./pkg/shelfice/shelfice_read_pickup.F 94 SHELFICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/shelfice/shelfice_read_pickup.F 98 SHELFICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> SHELFICE_READ_PICKUP: ',
./pkg/shelfice/shelfice_readparms.F 142 SHELFICE_READPARMS
      WRITE(msgBuf,'(A)') ' SHELFICE_READPARMS: opening data.shelfice'
./pkg/shelfice/shelfice_readparms.F 143 SHELFICE_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/shelfice/shelfice_readparms.F 150 SHELFICE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/shelfice/shelfice_readparms.F 152 SHELFICE_READPARMS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./pkg/shelfice/shelfice_readparms.F 41 SHELFICE_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/shelfice/shelfice_write_pickup.F 100 SHELFICE_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_write_pickup.F 60 SHELFICE_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/shelfice/shelfice_write_pickup.F 95 SHELFICE_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'SHELFICE_WRITE_PICKUP: ',
./pkg/shelfice/shelfice_write_pickup.F 97 SHELFICE_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/shelfice/shelfice_write_pickup.F 98 SHELFICE_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'SHELFICE_WRITE_PICKUP: ',
./pkg/showflops/SHOWFLOPS.h 5 NO PROCEDURE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/showflops/SHOWFLOPS_INIT.h 5 NO PROCEDURE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_eos.F 107 INI_EOS
            WRITE(msgBuf,'(A)')
./model/src/ini_eos.F 109 INI_EOS
            CALL PRINT_ERROR( msgBuf , myThid )
./model/src/ini_eos.F 110 INI_EOS
            WRITE(msgBuf,'(A)')
./model/src/ini_eos.F 112 INI_EOS
            CALL PRINT_ERROR( msgBuf , myThid )
./model/src/ini_eos.F 113 INI_EOS
            WRITE(msgBuf,'(A)')
./model/src/ini_eos.F 115 INI_EOS
            CALL PRINT_ERROR( msgBuf , myThid )
./model/src/ini_eos.F 170 INI_EOS
            WRITE(msgBuf,'(a)')
./model/src/ini_eos.F 172 INI_EOS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 174 INI_EOS
            WRITE(msgBuf,'(a,a)')
./model/src/ini_eos.F 177 INI_EOS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 179 INI_EOS
            WRITE(msgBuf,'(a)')
./model/src/ini_eos.F 181 INI_EOS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 183 INI_EOS
            WRITE(msgBuf,'(a)')
./model/src/ini_eos.F 185 INI_EOS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 187 INI_EOS
            WRITE(msgBuf,'(a)')
./model/src/ini_eos.F 189 INI_EOS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 374 EOS_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_eos.F 42 INI_EOS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_eos.F 461 EOS_CHECK
        WRITE(msgBuf,'(A,A)')
./model/src/ini_eos.F 464 EOS_CHECK
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 505 EOS_CHECK
           WRITE(msgBuf,'(A)') 
./model/src/ini_eos.F 507 EOS_CHECK
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 510 EOS_CHECK
           WRITE(msgBuf,'(A)') 
./model/src/ini_eos.F 512 EOS_CHECK
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 515 EOS_CHECK
           WRITE(msgBuf,'(A)') 
./model/src/ini_eos.F 517 EOS_CHECK
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 520 EOS_CHECK
           WRITE(msgBuf,'(A)') 
./model/src/ini_eos.F 522 EOS_CHECK
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 525 EOS_CHECK
          WRITE(msgBuf,'(2(A,F4.1),A,F5.0,2A,F10.5,1X,F11.5)')
./model/src/ini_eos.F 530 EOS_CHECK
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 532 EOS_CHECK
          WRITE(msgBuf,'(A,F10.5,1X,F11.5)')
./model/src/ini_eos.F 535 EOS_CHECK
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 540 EOS_CHECK
          WRITE(msgBuf,'(A,F10.5,1X,F11.5)')
./model/src/ini_eos.F 543 EOS_CHECK
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 551 EOS_CHECK
        WRITE(msgBuf,'(A)') 'EOS_CHECK: Done'
./model/src/ini_eos.F 552 EOS_CHECK
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_eos.F 83 INI_EOS
            WRITE(msgBuf,'(A)')
./model/src/ini_eos.F 85 INI_EOS
            CALL PRINT_ERROR( msgBuf , myThid )
./model/src/ini_eos.F 86 INI_EOS
            WRITE(msgBuf,'(A)')
./model/src/ini_eos.F 88 INI_EOS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/showflops/showflops_init.F 62 SHOWFLOPS_INIT
      WRITE(msgBuf,'(A34,F10.6,A,F10.6)')
./pkg/showflops/showflops_init.F 65 SHOWFLOPS_INIT
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_init.F 68 SHOWFLOPS_INIT
      WRITE(msgBuf,'(A34,F10.6,A,F10.6)')
./pkg/showflops/showflops_init.F 71 SHOWFLOPS_INIT
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_init.F 80 SHOWFLOPS_INIT
         WRITE(msgBuf,'(A22,A26,F10.6)'),
./pkg/showflops/showflops_init.F 83 SHOWFLOPS_INIT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_inloop.F 101 SHOWFLOPS_INLOOP
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_inloop.F 63 SHOWFLOPS_INLOOP
      WRITE(msgBuf,'(A34,3F10.6,I8)')
./pkg/showflops/showflops_inloop.F 66 SHOWFLOPS_INLOOP
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_inloop.F 80 SHOWFLOPS_INLOOP
      WRITE(msgBuf,'(F12.6,A,F12.6,A34,I8)')
./pkg/showflops/showflops_inloop.F 83 SHOWFLOPS_INLOOP
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_inloop.F 86 SHOWFLOPS_INLOOP
      WRITE(msgBuf,'(F12.6,A,F12.6,A34,I8)')
./pkg/showflops/showflops_inloop.F 89 SHOWFLOPS_INLOOP
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_inloop.F 98 SHOWFLOPS_INLOOP
         WRITE(msgBuf,'(F12.6,A2,A22,A17,I8)'), fp_result(ipcl),
./pkg/showflops/showflops_insolve.F 59 SHOWFLOPS_INSOLVE
        WRITE(msgBuf,'(A34,3F10.6)')
./pkg/showflops/showflops_insolve.F 62 SHOWFLOPS_INSOLVE
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_insolve.F 77 SHOWFLOPS_INSOLVE
      WRITE(msgBuf,'(A34,F12.6,A,F12.6)')
./pkg/showflops/showflops_insolve.F 80 SHOWFLOPS_INSOLVE
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_insolve.F 83 SHOWFLOPS_INSOLVE
      WRITE(msgBuf,'(A34,F12.6,A,F12.6)')
./pkg/showflops/showflops_insolve.F 86 SHOWFLOPS_INSOLVE
      CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/showflops/showflops_insolve.F 95 SHOWFLOPS_INSOLVE
         WRITE(msgBuf,'(A22,A26,F12.6)'),
./pkg/showflops/showflops_insolve.F 98 SHOWFLOPS_INSOLVE
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/smooth/smooth_readparms.F 101 SMOOTH_READPARMS
      WRITE(msgBuf,'(2A)') 'SMOOTH_READPARMS: ',
./pkg/smooth/smooth_readparms.F 103 SMOOTH_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 113 SMOOTH_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/smooth/smooth_readparms.F 115 SMOOTH_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 117 SMOOTH_READPARMS
      WRITE(msgBuf,'(A)') '// pkg/smooth configuration'
./pkg/smooth/smooth_readparms.F 118 SMOOTH_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 120 SMOOTH_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/smooth/smooth_readparms.F 122 SMOOTH_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 127 SMOOTH_READPARMS
          WRITE(msgBuf,'(A,I2,I6,2f6.0)') 'smooth 2D parameters: ',
./pkg/smooth/smooth_readparms.F 130 SMOOTH_READPARMS
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 138 SMOOTH_READPARMS
          WRITE(msgBuf,'(A,I2,I6,3f6.0)') 'smooth 3D parameters: ',
./pkg/smooth/smooth_readparms.F 142 SMOOTH_READPARMS
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 147 SMOOTH_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/smooth/smooth_readparms.F 149 SMOOTH_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 151 SMOOTH_READPARMS
      WRITE(msgBuf,'(A)') '// End of pkg/smooth config. summary'
./pkg/smooth/smooth_readparms.F 152 SMOOTH_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 154 SMOOTH_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/smooth/smooth_readparms.F 156 SMOOTH_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 158 SMOOTH_READPARMS
      WRITE(msgBuf,'(A)') ' '
./pkg/smooth/smooth_readparms.F 159 SMOOTH_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/smooth/smooth_readparms.F 31 SMOOTH_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/smooth/smooth_readparms.F 90 SMOOTH_READPARMS
      WRITE(msgBuf,'(A)') 'SMOOTH_READPARMS: opening data.smooth'
./pkg/smooth/smooth_readparms.F 91 SMOOTH_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/adstreamice_cg_solve.F 239 ADSTREAMICE_CG_SOLVE
      WRITE(msgBuf,'(A,I5,A)') 'DONE WITH MANUAL CG ADJOINT:',tmpiter,
./pkg/streamice/adstreamice_cg_solve.F 241 ADSTREAMICE_CG_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/adstreamice_cg_solve.F 79 ADSTREAMICE_CG_SOLVE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/adstreamice_cg_solve.F 86 ADSTREAMICE_CG_SOLVE
      WRITE(msgBuf,'(A)') 'CALLING MANUAL CG ADJOINT'
./pkg/streamice/adstreamice_cg_solve.F 87 ADSTREAMICE_CG_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_global_domain.F 104 INI_GLOBAL_DOMAIN
         WRITE(msgBuf,'(A,I6,A,2I4,A)')
./model/src/ini_global_domain.F 107 INI_GLOBAL_DOMAIN
         WRITE(msgBuf,'(A,I6,I6)') 'Empty tile bi,bj=', bi, bj
./model/src/ini_global_domain.F 109 INI_GLOBAL_DOMAIN
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_global_domain.F 114 INI_GLOBAL_DOMAIN
      IF ( msgBuf(1:1).NE.' ' ) THEN
./model/src/ini_global_domain.F 115 INI_GLOBAL_DOMAIN
         WRITE(msgBuf,'(A)') ' '
./model/src/ini_global_domain.F 116 INI_GLOBAL_DOMAIN
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_global_domain.F 157 INI_GLOBAL_DOMAIN
        WRITE(msgBuf,'(A,I4,A)') 'INI_GLOBAL_DOMAIN: Found',
./model/src/ini_global_domain.F 159 INI_GLOBAL_DOMAIN
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_global_domain.F 52 INI_GLOBAL_DOMAIN
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_global_domain.F 99 INI_GLOBAL_DOMAIN
      msgBuf(1:1) = ' '
./pkg/streamice/streamice_adv_front.F 304 STREAMICE_ADV_FRONT
       WRITE(msgBuf,'(A,I5,A)') 'FRONT ADVANCE: ',iter_rpt,
./pkg/streamice/streamice_adv_front.F 306 STREAMICE_ADV_FRONT
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_adv_front.F 51 STREAMICE_ADV_FRONT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_advect_2dtracer.F 227 STREAMICE_ADVECT_2DTRACER
      WRITE(msgBuf,'(A)') 'END STREAMICE_ADVECT_THICKNESS'
./pkg/streamice/streamice_advect_2dtracer.F 228 STREAMICE_ADVECT_2DTRACER
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_advect_2dtracer.F 61 STREAMICE_ADVECT_2DTRACER
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_advect_thickness.F 380 STREAMICE_ADVECT_THICKNESS
      WRITE(msgBuf,'(A)') 'END STREAMICE_ADVECT_THICKNESS'
./pkg/streamice/streamice_advect_thickness.F 381 STREAMICE_ADVECT_THICKNESS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_advect_thickness.F 56 STREAMICE_ADVECT_THICKNESS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_apply_flux_ctrl.F 36 STREAMICE_APPLY_FLUX_CTRL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_grid.F 143 INI_GRID
        WRITE(msgBuf,'(2A)') 'S/R INI_GRID: ',
./model/src/ini_grid.F 145 INI_GRID
        CALL PRINT_ERROR( msgBuf , myThid)
./model/src/ini_grid.F 54 INI_GRID
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_cg_solve.F 220 STREAMICE_CG_SOLVE
       WRITE(msgBuf,'(A,I1,I1,E14.7)') 'CONJ GRAD INIT RESID LOCAL, ',
./pkg/streamice/streamice_cg_solve.F 222 STREAMICE_CG_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_cg_solve.F 228 STREAMICE_CG_SOLVE
      WRITE(msgBuf,'(A,E14.7)') 'CONJ GRAD INIT RESID, ',
./pkg/streamice/streamice_cg_solve.F 230 STREAMICE_CG_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_cg_solve.F 276 STREAMICE_CG_SOLVE
      WRITE(msgBuf,'(A)') 'BEGINNING MAIN CG LOOP'
./pkg/streamice/streamice_cg_solve.F 277 STREAMICE_CG_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_cg_solve.F 72 STREAMICE_CG_SOLVE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_cg_solve_matfree.F 192 STREAMICE_CG_SOLVE_MATFREE
       WRITE(msgBuf,'(A)') 'BEGINNING MAIN CG LOOP'
./pkg/streamice/streamice_cg_solve_matfree.F 193 STREAMICE_CG_SOLVE_MATFREE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_cg_solve_matfree.F 51 STREAMICE_CG_SOLVE_MATFREE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_cg_solve_petsc.F 77 STREAMICE_CG_SOLVE_PETSC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_check.F 33 STREAMICE_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_check.F 39 STREAMICE_CHECK
       WRITE(msgBuf,'(A)') 'STREAMICE_CHECK: #define STREAMICE'
./pkg/streamice/streamice_check.F 40 STREAMICE_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_diagnostics_state.F 30 STREAMICE_DIAGNOSTICS_STATE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_diagnostics_state.F 86 STREAMICE_DIAGNOSTICS_STATE
       WRITE(msgBuf,'(A)') 'CALLING FILL DIAGNOSTICS'
./pkg/streamice/streamice_diagnostics_state.F 87 STREAMICE_DIAGNOSTICS_STATE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_dump.F 54 STREAMICE_DUMP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_dump_ad.F 63 ADSTREAMICE_DUMP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_get_fp_err_oad.F 37 STREAMICE_GET_FP_ERR_OAD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_get_vel_resid_err.F 38 STREAMICE_GET_VEL_RESID_ERR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_get_vel_resid_err_oad.F 46 STREAMICE_GET_VEL_RESID_ERR_OAD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_init_diagnostics.F 140 STREAMICE_INIT_DIAGNOSTICS
      WRITE(msgBuf,'(A)') 'ADDED DIAGS TO LIST'
./pkg/streamice/streamice_init_diagnostics.F 141 STREAMICE_INIT_DIAGNOSTICS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_diagnostics.F 30 STREAMICE_INIT_DIAGNOSTICS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_init_fixed.F 104 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'SIG COORD INIT - NOT IMPLENTED'
./pkg/streamice/streamice_init_fixed.F 105 STREAMICE_INIT_FIXED
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_fixed.F 116 STREAMICE_INIT_FIXED
        WRITE(msgBuf,'(A)') 'COST MASK - NOT IMPLENTED'
./pkg/streamice/streamice_init_fixed.F 117 STREAMICE_INIT_FIXED
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_fixed.F 141 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'U FACE MASK - NOT SET'
./pkg/streamice/streamice_init_fixed.F 142 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 150 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'V FACE MASK - NOT SET'
./pkg/streamice/streamice_init_fixed.F 151 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 166 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'U DIRICH VALS - NOT SET'
./pkg/streamice/streamice_init_fixed.F 167 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 179 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'V DIRICH VALS - NOT SET'
./pkg/streamice/streamice_init_fixed.F 180 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 188 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'THICK BC AT U FACE - NOT SET'
./pkg/streamice/streamice_init_fixed.F 189 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 197 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'THICK BC AT V FACE - NOT SET'
./pkg/streamice/streamice_init_fixed.F 198 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 206 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'MASS FLUX AT U FACE - NOT SET'
./pkg/streamice/streamice_init_fixed.F 207 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 215 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'MASS FLUX AT V FACE - NOT SET'
./pkg/streamice/streamice_init_fixed.F 216 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 226 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'TRAC BC AT U FACE - NOT SET'
./pkg/streamice/streamice_init_fixed.F 227 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 235 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'TRAC BC AT V FACE - NOT SET'
./pkg/streamice/streamice_init_fixed.F 236 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 251 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'H MASK FILE - NOT SET'
./pkg/streamice/streamice_init_fixed.F 252 STREAMICE_INIT_FIXED
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_fixed.F 40 STREAMICE_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_init_fixed.F 76 STREAMICE_INIT_FIXED
        WRITE(msgBuf,'(A)') 'INIT CALVE MASK - NOT IMPLENTED'
./pkg/streamice/streamice_init_fixed.F 77 STREAMICE_INIT_FIXED
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_fixed.F 95 STREAMICE_INIT_FIXED
       WRITE(msgBuf,'(A)') 'SIG FROM FILE - NOT IMPLENTED'
./pkg/streamice/streamice_init_fixed.F 96 STREAMICE_INIT_FIXED
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_varia.F 175 STREAMICE_INIT_VARIA
        WRITE(msgBuf,'(A)') 'STREAMICE TOPOG - FILENAME MISSING'
./pkg/streamice/streamice_init_varia.F 176 STREAMICE_INIT_VARIA
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_varia.F 187 STREAMICE_INIT_VARIA
      WRITE(msgBuf,'(A)') 'initializing analytic thickness'
./pkg/streamice/streamice_init_varia.F 188 STREAMICE_INIT_VARIA
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_varia.F 275 STREAMICE_INIT_VARIA
        WRITE(msgBuf,'(A)') 'INIT THICKNESS - FILENAME MISSING'
./pkg/streamice/streamice_init_varia.F 276 STREAMICE_INIT_VARIA
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_varia.F 282 STREAMICE_INIT_VARIA
       WRITE(msgBuf,'(A)') 'INIT THICKNESS - NOT IMPLENTED'
./pkg/streamice/streamice_init_varia.F 283 STREAMICE_INIT_VARIA
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_varia.F 296 STREAMICE_INIT_VARIA
       WRITE(msgBuf,'(A)') 'INIT THICKNESS - FILENAME MISSING'
./pkg/streamice/streamice_init_varia.F 297 STREAMICE_INIT_VARIA
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_varia.F 306 STREAMICE_INIT_VARIA
       WRITE(msgBuf,'(A)') 'INIT HMASK - FILENAME MISSING'
./pkg/streamice/streamice_init_varia.F 307 STREAMICE_INIT_VARIA
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_varia.F 341 STREAMICE_INIT_VARIA
        WRITE(msgBuf,'(A)') 'INIT GLEN - FILENAME MISSING'
./pkg/streamice/streamice_init_varia.F 342 STREAMICE_INIT_VARIA
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_varia.F 366 STREAMICE_INIT_VARIA
       WRITE(msgBuf,'(A)') 'INIT GLEN CONSTANT - NOT IMPLENTED'
./pkg/streamice/streamice_init_varia.F 367 STREAMICE_INIT_VARIA
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_varia.F 384 STREAMICE_INIT_VARIA
        WRITE(msgBuf,'(A)') 'INIT BDOT - FILENAME MISSING'
./pkg/streamice/streamice_init_varia.F 385 STREAMICE_INIT_VARIA
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_varia.F 404 STREAMICE_INIT_VARIA
        WRITE(msgBuf,'(A)') 'INIT C_BASAL - FILENAME MISSING'
./pkg/streamice/streamice_init_varia.F 405 STREAMICE_INIT_VARIA
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_varia.F 42 STREAMICE_INIT_VARIA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_init_varia.F 459 STREAMICE_INIT_VARIA
       WRITE(msgBuf,'(A)') 'INIT TRAC - NOT IMPLENTED'
./pkg/streamice/streamice_init_varia.F 460 STREAMICE_INIT_VARIA
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_varia.F 475 STREAMICE_INIT_VARIA
        WRITE(msgBuf,'(A)') 'TRAC2dInit - NO FILE SPECIFIED'
./pkg/streamice/streamice_init_varia.F 476 STREAMICE_INIT_VARIA
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_init_varia.F 500 STREAMICE_INIT_VARIA
       WRITE(msgBuf,'(A)') 'IMPOSED NORMAL U STRESS NOT SET'
./pkg/streamice/streamice_init_varia.F 501 STREAMICE_INIT_VARIA
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_varia.F 509 STREAMICE_INIT_VARIA
       WRITE(msgBuf,'(A)') 'IMPOSED NORMAL V STRESS NOT SET'
./pkg/streamice/streamice_init_varia.F 510 STREAMICE_INIT_VARIA
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_varia.F 518 STREAMICE_INIT_VARIA
       WRITE(msgBuf,'(A)') 'IMPOSED SHEAR U STRESS NOT SET'
./pkg/streamice/streamice_init_varia.F 519 STREAMICE_INIT_VARIA
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_init_varia.F 527 STREAMICE_INIT_VARIA
       WRITE(msgBuf,'(A)') 'IMPOSED SHEAR V STRESS NOT SET'
./pkg/streamice/streamice_init_varia.F 528 STREAMICE_INIT_VARIA
       CALL PRINT_ERROR( msgBuf, myThid)
./pkg/streamice/streamice_petsc_numerate.F 36 STREAMICE_PETSC_NUMERATE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_read_pickup.F 101 STREAMICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/streamice/streamice_read_pickup.F 110 STREAMICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'STREAMICE_READ_PICKUP: ',
./pkg/streamice/streamice_read_pickup.F 112 STREAMICE_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/streamice/streamice_read_pickup.F 167 STREAMICE_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'STREAMICE_READ_PICKUP: ',
./pkg/streamice/streamice_read_pickup.F 169 STREAMICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/streamice/streamice_read_pickup.F 176 STREAMICE_READ_PICKUP
         WRITE(msgBuf,'(4A)') 'STREAMICE_READ_PICKUP: ',
./pkg/streamice/streamice_read_pickup.F 178 STREAMICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/streamice/streamice_read_pickup.F 49 STREAMICE_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_read_pickup.F 68 STREAMICE_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'STREAMICE_READ_PICKUP: ',
./pkg/streamice/streamice_read_pickup.F 70 STREAMICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/streamice/streamice_read_pickup.F 71 STREAMICE_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'STREAMICE_READ_PICKUP: ',
./pkg/streamice/streamice_read_pickup.F 73 STREAMICE_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/streamice/streamice_read_pickup.F 83 STREAMICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'STREAMICE_READ_PICKUP: ',
./pkg/streamice/streamice_read_pickup.F 86 STREAMICE_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/streamice/streamice_read_pickup.F 87 STREAMICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'STREAMICE_READ_PICKUP: ',
./pkg/streamice/streamice_read_pickup.F 90 STREAMICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/streamice/streamice_read_pickup.F 94 STREAMICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> STREAMICE_READ_PICKUP: ',
./pkg/streamice/streamice_read_pickup.F 96 STREAMICE_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/streamice/streamice_read_pickup.F 99 STREAMICE_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/streamice/streamice_readparms.F 35 STREAMICE_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_readparms.F 368 STREAMICE_READPARMS
      WRITE(msgBuf,'(A)') 'STREAMICE_READPARMS: opening data.streamice'
./pkg/streamice/streamice_readparms.F 369 STREAMICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_readparms.F 378 STREAMICE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/streamice/streamice_readparms.F 380 STREAMICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_readparms.F 385 STREAMICE_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/streamice/streamice_readparms.F 387 STREAMICE_READPARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_readparms.F 393 STREAMICE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/streamice/streamice_readparms.F 395 STREAMICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_readparms.F 401 STREAMICE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/streamice/streamice_readparms.F 403 STREAMICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_readparms.F 409 STREAMICE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/streamice/streamice_readparms.F 411 STREAMICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_readparms.F 416 STREAMICE_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/streamice/streamice_readparms.F 418 STREAMICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_timestep.F 169 STREAMICE_TIMESTEP
       WRITE(msgBuf,'(A,I3,A,1PE22.14)') 'ECSE_CRYO_SUM ', myIter, ', ',
./pkg/streamice/streamice_timestep.F 171 STREAMICE_TIMESTEP
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_timestep.F 49 STREAMICE_TIMESTEP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_timestep.F 93 STREAMICE_TIMESTEP
      WRITE(msgBuf,'(A,I10.10,E9.2,A)')
./pkg/streamice/streamice_timestep.F 96 STREAMICE_TIMESTEP
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_phi.F 55 STREAMICE_VEL_PHI
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_vel_phistage.F 104 STREAMICE_VEL_PHISTAGE
           WRITE(msgBuf,'(A,E15.7)') 'err/err_init', err_max/err_init
./pkg/streamice/streamice_vel_phistage.F 105 STREAMICE_VEL_PHISTAGE
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit, SQUEEZE_RIGH
./pkg/streamice/streamice_vel_phistage.F 116 STREAMICE_VEL_PHISTAGE
            WRITE(msgBuf,'(A,E15.7)') 'new cg tol: ', cgtol
./pkg/streamice/streamice_vel_phistage.F 117 STREAMICE_VEL_PHISTAGE
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit, SQUEEZE_RIG
./pkg/streamice/streamice_vel_phistage.F 127 STREAMICE_VEL_PHISTAGE
           WRITE(msgBuf,'(A,1PE22.14)') 'STREAMICE_FP_ERROR =', err_max_
./pkg/streamice/streamice_vel_phistage.F 129 STREAMICE_VEL_PHISTAGE
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit, SQUEEZE_RIGH
./pkg/streamice/streamice_vel_phistage.F 81 STREAMICE_VEL_PHISTAGE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_vel_solve.F 141 STREAMICE_VEL_SOLVE
       WRITE(msgBuf,'(A,E15.7)') 'initial nonlinear resid (error): ',
./pkg/streamice/streamice_vel_solve.F 143 STREAMICE_VEL_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve.F 241 STREAMICE_VEL_SOLVE
       WRITE(msgBuf,'(A,I5,A,I4,A)') 'streamice linear solve number',
./pkg/streamice/streamice_vel_solve.F 245 STREAMICE_VEL_SOLVE
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve.F 275 STREAMICE_VEL_SOLVE
       WRITE(msgBuf,'(A,E15.7)') 'err/err_init',
./pkg/streamice/streamice_vel_solve.F 277 STREAMICE_VEL_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve.F 302 STREAMICE_VEL_SOLVE
       WRITE(msgBuf,'(A,1PE22.14)') 'STREAMICE_FP_ERROR =',
./pkg/streamice/streamice_vel_solve.F 304 STREAMICE_VEL_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve.F 319 STREAMICE_VEL_SOLVE
         WRITE(msgBuf,'(A,E15.7)') 'new cg tol: ',
./pkg/streamice/streamice_vel_solve.F 321 STREAMICE_VEL_SOLVE
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve.F 334 STREAMICE_VEL_SOLVE
       WRITE(msgBuf,'(A,I5,A)') 'VELOCITY SOLVE CONVERGED, ',
./pkg/streamice/streamice_vel_solve.F 336 STREAMICE_VEL_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve.F 339 STREAMICE_VEL_SOLVE
       WRITE(msgBuf,'(A,I5,A)') 'VELOCITY SOLVE NOT CONVERGED IN ',
./pkg/streamice/streamice_vel_solve.F 341 STREAMICE_VEL_SOLVE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve.F 57 STREAMICE_VEL_SOLVE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_vel_solve_openad.F 114 STREAMICE_VEL_SOLVE_OPENAD
        WRITE(msgBuf,'(A,E15.7)') 'initial nonlinear resid (error): ',
./pkg/streamice/streamice_vel_solve_openad.F 116 STREAMICE_VEL_SOLVE_OPENAD
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve_openad.F 228 STREAMICE_VEL_SOLVE_OPENAD
       WRITE(msgBuf,'(A,I5,A)') 'VELOCITY SOLVE CONVERGED, ',
./pkg/streamice/streamice_vel_solve_openad.F 230 STREAMICE_VEL_SOLVE_OPENAD
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve_openad.F 233 STREAMICE_VEL_SOLVE_OPENAD
       WRITE(msgBuf,'(A,I5,A)') 'VELOCITY SOLVE NOT CONVERGED IN ',
./pkg/streamice/streamice_vel_solve_openad.F 235 STREAMICE_VEL_SOLVE_OPENAD
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/streamice/streamice_vel_solve_openad.F 45 STREAMICE_VEL_SOLVE_OPENAD
      CHARACTER*(MAX_LEN_MBUF) msgBuf      
./pkg/streamice/streamice_velmask_upd.F 45 STREAMICE_VELMASK_UPD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/streamice/streamice_write_pickup.F 150 STREAMICE_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'STREAMICE_WRITE_PICKUP: ',
./pkg/streamice/streamice_write_pickup.F 152 STREAMICE_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/streamice/streamice_write_pickup.F 153 STREAMICE_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'STREAMICE_WRITE_PICKUP: ',
./pkg/streamice/streamice_write_pickup.F 155 STREAMICE_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/streamice/streamice_write_pickup.F 60 STREAMICE_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/thsice/thsice_advdiff.F 532 THSICE_ADVDIFF
        WRITE(msgBuf,'(2A)') 'S/R THSICE_ADVDIFF: ',
./pkg/thsice/thsice_advdiff.F 534 THSICE_ADVDIFF
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/thsice/thsice_advdiff.F 535 THSICE_ADVDIFF
        WRITE(msgBuf,'(2A)') '                    ',
./pkg/thsice/thsice_advdiff.F 537 THSICE_ADVDIFF
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/thsice/thsice_advdiff.F 80 THSICE_ADVDIFF
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/thsice/thsice_albedo.F 176 THSICE_ALBEDO
       WRITE(msgBuf,'(A,I10,4I6)')
./pkg/thsice/thsice_albedo.F 178 THSICE_ALBEDO
       CALL PRINT_ERROR( msgBuf , myThid)
./pkg/thsice/thsice_albedo.F 179 THSICE_ALBEDO
       WRITE(msgBuf,'(A,1P3E17.9)')
./pkg/thsice/thsice_albedo.F 182 THSICE_ALBEDO
       CALL PRINT_ERROR( msgBuf , myThid)
./pkg/thsice/thsice_albedo.F 89 THSICE_ALBEDO
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_model_io.F 100 INI_MODEL_IO
          WRITE(msgBuf,'(A,2(I10,A))')
./model/src/ini_model_io.F 103 INI_MODEL_IO
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_model_io.F 104 INI_MODEL_IO
          WRITE(msgBuf,'(2A)')
./model/src/ini_model_io.F 107 INI_MODEL_IO
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_model_io.F 143 INI_MODEL_IO
          WRITE(msgBuf,'(2A,I4,A)') 'INI_MODEL_IO: ',
./model/src/ini_model_io.F 145 INI_MODEL_IO
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_model_io.F 158 INI_MODEL_IO
        WRITE(msgBuf,'(3A)') '** WARNING ** INI_MODEL_IO: ',
./model/src/ini_model_io.F 160 INI_MODEL_IO
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_model_io.F 162 INI_MODEL_IO
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_model_io.F 167 INI_MODEL_IO
        WRITE(msgBuf,'(A)') ' '
./model/src/ini_model_io.F 168 INI_MODEL_IO
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_model_io.F 183 INI_MODEL_IO
        WRITE(msgBuf,'(2A)') '** WARNING ** INI_MODEL_IO:',
./model/src/ini_model_io.F 185 INI_MODEL_IO
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_model_io.F 44 INI_MODEL_IO
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_model_io.F 76 INI_MODEL_IO
        WRITE(msgBuf,'(2A)')
./model/src/ini_model_io.F 79 INI_MODEL_IO
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_model_io.F 81 INI_MODEL_IO
        WRITE(msgBuf,'(2A)') '** WARNING ** INI_MODEL_IO:',
./model/src/ini_model_io.F 83 INI_MODEL_IO
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/thsice/thsice_check.F 105 THSICE_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** THSICE_CHECK: ',
./pkg/thsice/thsice_check.F 107 THSICE_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/thsice/thsice_check.F 109 THSICE_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** THSICE_CHECK: ',
./pkg/thsice/thsice_check.F 111 THSICE_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/thsice/thsice_check.F 120 THSICE_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** THSICE_CHECK: ',
./pkg/thsice/thsice_check.F 122 THSICE_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/thsice/thsice_check.F 124 THSICE_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** THSICE_CHECK: ',
./pkg/thsice/thsice_check.F 127 THSICE_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/thsice/thsice_check.F 132 THSICE_CHECK
        WRITE(msgBuf,'(A,I3,A)')
./pkg/thsice/thsice_check.F 134 THSICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/thsice/thsice_check.F 35 THSICE_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/thsice/thsice_check.F 42 THSICE_CHECK
       WRITE(msgBuf,'(A)') 'THSICE_CHECK: #define THSICE'
./pkg/thsice/thsice_check.F 43 THSICE_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/thsice/thsice_check.F 50 THSICE_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/thsice/thsice_check.F 52 THSICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/thsice/thsice_check.F 53 THSICE_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/thsice/thsice_check.F 55 THSICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/thsice/thsice_check.F 59 THSICE_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/thsice/thsice_check.F 62 THSICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/thsice/thsice_check.F 67 THSICE_CHECK
        WRITE(msgBuf,'(2A)') 'THSICE_CHECK: Need to compile ',
./pkg/thsice/thsice_check.F 69 THSICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/thsice/thsice_check.F 76 THSICE_CHECK
        WRITE(msgBuf,'(2A)') 'THSICE_CHECK: needs to have ',
./pkg/thsice/thsice_check.F 78 THSICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/thsice/thsice_check.F 82 THSICE_CHECK
        WRITE(msgBuf,'(2A)') 'THSICE_CHECK: cannot use',
./pkg/thsice/thsice_check.F 84 THSICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/thsice/thsice_check.F 91 THSICE_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/thsice/thsice_check.F 93 THSICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/thsice/thsice_check.F 97 THSICE_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/thsice/thsice_check.F 99 THSICE_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/thsice/thsice_cost_test.F 115 THSICE_COST_TEST
            WRITE(msgBuf,'(A)')
./pkg/thsice/thsice_cost_test.F 117 THSICE_COST_TEST
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/thsice/thsice_cost_test.F 70 THSICE_COST_TEST
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_nh_fields.F 46 INI_NH_FIELDS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_nh_fields.F 66 INI_NH_FIELDS
       WRITE(msgBuf,'(A,I4)')
./model/src/ini_nh_fields.F 68 INI_NH_FIELDS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/thsice/thsice_monitor.F 101 THSICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/thsice/thsice_monitor.F 103 THSICE_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/thsice/thsice_monitor.F 104 THSICE_MONITOR
            WRITE(msgBuf,'(A)')
./pkg/thsice/thsice_monitor.F 106 THSICE_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/thsice/thsice_monitor.F 107 THSICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/thsice/thsice_monitor.F 109 THSICE_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/thsice/thsice_monitor.F 274 THSICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/thsice/thsice_monitor.F 276 THSICE_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/thsice/thsice_monitor.F 277 THSICE_MONITOR
            WRITE(msgBuf,'(A)')
./pkg/thsice/thsice_monitor.F 279 THSICE_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/thsice/thsice_monitor.F 280 THSICE_MONITOR
            WRITE(msgBuf,'(2A)') '// ==========================',
./pkg/thsice/thsice_monitor.F 282 THSICE_MONITOR
            CALL PRINT_MESSAGE( msgBuf, mon_ioUnit, SQUEEZE_RIGHT , 1)
./pkg/thsice/thsice_monitor.F 48 THSICE_MONITOR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/thsice/thsice_readparms.F 197 THSICE_READPARMS
      WRITE(msgBuf,'(A)') ' THSICE_READPARMS: read THSICE_CONST'
./pkg/thsice/thsice_readparms.F 198 THSICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/thsice/thsice_readparms.F 202 THSICE_READPARMS
      WRITE(msgBuf,'(A)') ' THSICE_READPARMS: read THSICE_PARM01'
./pkg/thsice/thsice_readparms.F 203 THSICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/thsice/thsice_readparms.F 208 THSICE_READPARMS
      WRITE(msgBuf,'(A)') ' THSICE_READPARMS: read THSICE_COST'
./pkg/thsice/thsice_readparms.F 209 THSICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/thsice/thsice_readparms.F 261 THSICE_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** THSICE_READPARMS:',
./pkg/thsice/thsice_readparms.F 263 THSICE_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/thsice/thsice_readparms.F 265 THSICE_READPARMS
        WRITE(msgBuf,'(2A)') 'THSICE_READPARMS: useSEAICE=T =>',
./pkg/thsice/thsice_readparms.F 267 THSICE_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/thsice/thsice_readparms.F 272 THSICE_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** THSICE_READPARMS:',
./pkg/thsice/thsice_readparms.F 274 THSICE_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/thsice/thsice_readparms.F 276 THSICE_READPARMS
        WRITE(msgBuf,'(2A)') 'THSICE_READPARMS:',
./pkg/thsice/thsice_readparms.F 278 THSICE_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/thsice/thsice_readparms.F 46 THSICE_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/thsice/thsice_readparms.F 98 THSICE_READPARMS
      WRITE(msgBuf,'(A)') ' THSICE_READPARMS: opening data.ice'
./pkg/thsice/thsice_readparms.F 99 THSICE_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/thsice/thsice_solve4temp.F 158 THSICE_SOLVE4TEMP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/thsice/thsice_solve4temp.F 349 THSICE_SOLVE4TEMP
       WRITE( msgBuf, '(A)')
./pkg/thsice/thsice_solve4temp.F 351 THSICE_SOLVE4TEMP
       CALL PRINT_ERROR( msgBuf , myThid )
./pkg/thsice/thsice_solve4temp.F 548 THSICE_SOLVE4TEMP
             WRITE( msgBuf, '(A,2I4,2I3,I10,F12.3)')
./pkg/thsice/thsice_solve4temp.F 551 THSICE_SOLVE4TEMP
             CALL PRINT_ERROR( msgBuf , myThid )
./eesupp/src/check_threads.F 115 CHECK_THREADS
          WRITE(msgBuf,'(A,I5,A)') 'CHECK_THREADS:', nChecks,
./eesupp/src/check_threads.F 117 CHECK_THREADS
          CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/check_threads.F 141 CHECK_THREADS
       WRITE(msgBuf,'(A,I5,A,I5,A)')
./eesupp/src/check_threads.F 144 CHECK_THREADS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/check_threads.F 61 CHECK_THREADS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/check_threads.F 80 CHECK_THREADS
       WRITE(msgBuf,'(2A,I6)') 'CHECK_THREADS:',
./eesupp/src/check_threads.F 82 CHECK_THREADS
       CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/check_threads.F 83 CHECK_THREADS
       WRITE(msgBuf,'(2A,I6)') ' not equal to ',
./eesupp/src/check_threads.F 85 CHECK_THREADS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_p_ground.F 206 INI_P_GROUND
             WRITE(msgBuf,'(2A)')
./model/src/ini_p_ground.F 209 INI_P_GROUND
             CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_p_ground.F 210 INI_P_GROUND
             WRITE(msgBuf,'(A,F7.1,2A,F6.4,A,F8.0)')
./model/src/ini_p_ground.F 213 INI_P_GROUND
             CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_p_ground.F 61 INI_P_GROUND
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_p_ground.F 81 INI_P_GROUND
        WRITE(msgBuf,'(A,I2,A)')
./model/src/ini_p_ground.F 84 INI_P_GROUND
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/timeave/timeave_statv_write.F 202 TIMEAVE_STATV_WRITE
            WRITE(msgBuf,'(A)')  'S/R WRITE_TIME_AVERAGES'
./pkg/timeave/timeave_statv_write.F 203 TIMEAVE_STATV_WRITE
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/timeave/timeave_statv_write.F 204 TIMEAVE_STATV_WRITE
            WRITE(msgBuf,'(A)')  'Error writing out data'
./pkg/timeave/timeave_statv_write.F 205 TIMEAVE_STATV_WRITE
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/timeave/timeave_statv_write.F 206 TIMEAVE_STATV_WRITE
            WRITE(msgBuf,'(A,I10)') 'Timestep ',myIter
./pkg/timeave/timeave_statv_write.F 207 TIMEAVE_STATV_WRITE
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/timeave/timeave_statv_write.F 211 TIMEAVE_STATV_WRITE
            WRITE(msgBuf,'(A,I10)')
./pkg/timeave/timeave_statv_write.F 213 TIMEAVE_STATV_WRITE
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/timeave/timeave_statv_write.F 215 TIMEAVE_STATV_WRITE
            WRITE(msgBuf,'(A)')  ' '
./pkg/timeave/timeave_statv_write.F 216 TIMEAVE_STATV_WRITE
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/timeave/timeave_statv_write.F 53 TIMEAVE_STATV_WRITE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_parms.F 1002 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1004 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1005 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1007 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1011 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1013 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1014 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1016 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1021 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1023 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1024 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1026 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1070 INI_PARMS
      WRITE(msgBuf,'(A)') ' INI_PARMS ; starts to read PARM04'
./model/src/ini_parms.F 1071 INI_PARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 1075 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1077 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1078 INI_PARMS
       WRITE(msgBuf,'(A)') 'S/R INI_PARMS: Problem in namelist PARM04'
./model/src/ini_parms.F 1079 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1082 INI_PARMS
       WRITE(msgBuf,'(A)') ' INI_PARMS ; read PARM04 : OK'
./model/src/ini_parms.F 1083 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 1091 INI_PARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** INI_PARMS: ',
./model/src/ini_parms.F 1094 INI_PARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** INI_PARMS: ',
./model/src/ini_parms.F 1097 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_parms.F 1100 INI_PARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** INI_PARMS: ',
./model/src/ini_parms.F 1103 INI_PARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** INI_PARMS: ',
./model/src/ini_parms.F 1106 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_parms.F 1111 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 1114 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1118 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 1121 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1125 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 1128 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1132 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 1135 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1144 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'Too many specifications for delX:',
./model/src/ini_parms.F 1146 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1160 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'Too many specifications for delY:',
./model/src/ini_parms.F 1162 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1178 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1180 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1185 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1187 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_parms.F 1189 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1191 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_parms.F 1215 INI_PARMS
        WRITE(msgBuf,'(2A)') 'S/R INI_PARMS: ',
./model/src/ini_parms.F 1217 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1221 INI_PARMS
        WRITE(msgBuf,'(2A)') 'S/R INI_PARMS: ',
./model/src/ini_parms.F 1223 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1244 INI_PARMS
          WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1246 INI_PARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1257 INI_PARMS
       WRITE(msgBuf,'(A)') 'S/R INI_PARMS ; Cylinder OK'
./model/src/ini_parms.F 1258 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 1294 INI_PARMS
         WRITE(msgBuf,'(A,I4)')
./model/src/ini_parms.F 1296 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1302 INI_PARMS
         WRITE(msgBuf,'(A,I4)')
./model/src/ini_parms.F 1304 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1320 INI_PARMS
         WRITE(msgBuf,'(A,I4)')
./model/src/ini_parms.F 1322 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1328 INI_PARMS
         WRITE(msgBuf,'(A,I4)')
./model/src/ini_parms.F 1330 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1341 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1343 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1349 INI_PARMS
          WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1351 INI_PARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1358 INI_PARMS
          WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1360 INI_PARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1367 INI_PARMS
      WRITE(msgBuf,'(A)') ' INI_PARMS ; starts to read PARM05'
./model/src/ini_parms.F 1368 INI_PARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 1372 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1374 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1375 INI_PARMS
       WRITE(msgBuf,'(A)') 'S/R INI_PARMS: Problem in namelist PARM05'
./model/src/ini_parms.F 1376 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1379 INI_PARMS
       WRITE(msgBuf,'(A)') ' INI_PARMS ; read PARM05 : OK'
./model/src/ini_parms.F 1380 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 1386 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 1389 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1393 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 1395 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1399 INI_PARMS
         WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1401 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1402 INI_PARMS
         WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1404 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1411 INI_PARMS
         WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1413 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1414 INI_PARMS
         WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1416 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1421 INI_PARMS
         WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1423 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1424 INI_PARMS
         WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1426 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1432 INI_PARMS
         WRITE(msgBuf,'(2A)') '** WARNING ** INI_PARMS: Ignores diffKr',
./model/src/ini_parms.F 1434 INI_PARMS
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_parms.F 1438 INI_PARMS
         WRITE(msgBuf,'(2A)') '** WARNING ** INI_PARMS: Ignores diffKr',
./model/src/ini_parms.F 1440 INI_PARMS
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_parms.F 1478 INI_PARMS
      WRITE(msgBuf,'(A)') ' INI_PARMS: finished reading file "data"'
./model/src/ini_parms.F 1479 INI_PARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 1484 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 1486 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1487 INI_PARMS
       WRITE(msgBuf,'(I4,A)') nRetired,
./model/src/ini_parms.F 1489 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 1494 INI_PARMS
        WRITE(msgBuf,'(A,I3,A)')
./model/src/ini_parms.F 1496 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 355 INI_PARMS
      WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 357 INI_PARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 393 INI_PARMS
      WRITE(msgBuf,'(A)') ' INI_PARMS ; starts to read PARM01'
./model/src/ini_parms.F 394 INI_PARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 398 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 400 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 401 INI_PARMS
       WRITE(msgBuf,'(A)') 'S/R INI_PARMS: Problem in namelist PARM01'
./model/src/ini_parms.F 402 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 405 INI_PARMS
       WRITE(msgBuf,'(A)') ' INI_PARMS ; read PARM01 : OK'
./model/src/ini_parms.F 406 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 426 INI_PARMS
        WRITE(msgBuf,'(2A)') 'S/R INI_PARMS:',
./model/src/ini_parms.F 428 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 435 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 437 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 439 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 441 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 468 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 470 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 495 INI_PARMS
        WRITE(msgBuf,'(A,2(I5,A))') 'S/R INI_PARMS: Partial setting (',
./model/src/ini_parms.F 497 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 503 INI_PARMS
        WRITE(msgBuf,'(2A)') 'S/R INI_PARMS: Cannot set both ',
./model/src/ini_parms.F 505 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 529 INI_PARMS
        WRITE(msgBuf,'(A,2(I5,A))') 'S/R INI_PARMS: Partial setting (',
./model/src/ini_parms.F 531 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 538 INI_PARMS
        WRITE(msgBuf,'(2A)') 'S/R INI_PARMS: Cannot set both ',
./model/src/ini_parms.F 540 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 561 INI_PARMS
        WRITE(msgBuf,'(A,2(I5,A))') 'S/R INI_PARMS: Partial setting (',
./model/src/ini_parms.F 563 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 569 INI_PARMS
         WRITE(msgBuf,'(2A)') 'S/R INI_PARMS: Cannot set both ',
./model/src/ini_parms.F 56 INI_PARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_parms.F 571 INI_PARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 610 INI_PARMS
          WRITE(msgBuf,'(A,I5,A)')
./model/src/ini_parms.F 613 INI_PARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 619 INI_PARMS
        WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 622 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 631 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 633 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 637 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 639 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 646 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 648 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 652 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 654 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 658 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 660 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 679 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "useConstantF" ',
./model/src/ini_parms.F 681 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 682 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: set "selectCoriMap"',
./model/src/ini_parms.F 684 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 688 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "useBetaPlaneF" ',
./model/src/ini_parms.F 690 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 691 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: set "selectCoriMap"',
./model/src/ini_parms.F 693 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 697 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "useSphereF" ',
./model/src/ini_parms.F 699 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 700 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: set "selectCoriMap"',
./model/src/ini_parms.F 702 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 706 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 709 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 710 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 713 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 717 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 720 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 724 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "tracerAdvScheme" ',
./model/src/ini_parms.F 726 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 730 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "trac_EvPrRn" ',
./model/src/ini_parms.F 732 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 736 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "tempDiffusion" ',
./model/src/ini_parms.F 738 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 739 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: to turn off diffusion',
./model/src/ini_parms.F 741 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 745 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "saltDiffusion" ',
./model/src/ini_parms.F 747 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 748 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: to turn off diffusion',
./model/src/ini_parms.F 750 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 754 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 757 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 758 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: to use Strain & Tension',
./model/src/ini_parms.F 760 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 764 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 767 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 768 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: to use Strain & Tension',
./model/src/ini_parms.F 770 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 774 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 777 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 781 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 784 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 788 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 791 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 795 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 798 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 802 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "useOldFreezing" ',
./model/src/ini_parms.F 804 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 808 INI_PARMS
      WRITE(msgBuf,'(A)') ' INI_PARMS ; starts to read PARM02'
./model/src/ini_parms.F 809 INI_PARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 813 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 815 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 816 INI_PARMS
       WRITE(msgBuf,'(A)') 'S/R INI_PARMS: Problem in namelist PARM02'
./model/src/ini_parms.F 817 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 820 INI_PARMS
       WRITE(msgBuf,'(A)') ' INI_PARMS ; read PARM02 : OK'
./model/src/ini_parms.F 821 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 831 INI_PARMS
      WRITE(msgBuf,'(A)') ' INI_PARMS ; starts to read PARM03'
./model/src/ini_parms.F 832 INI_PARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 836 INI_PARMS
       WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 838 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 839 INI_PARMS
       WRITE(msgBuf,'(A)') 'S/R INI_PARMS: Problem in namelist PARM03'
./model/src/ini_parms.F 840 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 843 INI_PARMS
       WRITE(msgBuf,'(A)') ' INI_PARMS ; read PARM03 : OK'
./model/src/ini_parms.F 844 INI_PARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_parms.F 850 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "tauThetaClimRelax3Dim" ',
./model/src/ini_parms.F 852 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 853 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: 3-dim. relaxation code',
./model/src/ini_parms.F 855 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 859 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "tauSaltClimRelax3Dim" ',
./model/src/ini_parms.F 861 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 862 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: 3-dim. relaxation code',
./model/src/ini_parms.F 864 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 868 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: "calendarDumps" ',
./model/src/ini_parms.F 870 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 871 INI_PARMS
       WRITE(msgBuf,'(A,A)') 'S/R INI_PARMS: calendarDumps',
./model/src/ini_parms.F 873 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 880 INI_PARMS
        WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 882 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 892 INI_PARMS
        WRITE(msgBuf,'(2A)') 'S/R INI_PARMS: ',
./model/src/ini_parms.F 894 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 895 INI_PARMS
        WRITE(msgBuf,'(2A)') 'S/R INI_PARMS: ',
./model/src/ini_parms.F 897 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 915 INI_PARMS
        WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 917 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 921 INI_PARMS
        WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 923 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 926 INI_PARMS
        WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 928 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 932 INI_PARMS
        WRITE(msgBuf,'(A)')
./model/src/ini_parms.F 934 INI_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_parms.F 952 INI_PARMS
       WRITE(msgBuf,'(A,A)')
./model/src/ini_parms.F 955 INI_PARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/zonal_filt/zonal_filt_init.F 60 ZONAL_FILT_INIT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/zonal_filt/zonal_filt_init.F 74 ZONAL_FILT_INIT
         WRITE(msgBuf,'(A,I3,A)')
./pkg/zonal_filt/zonal_filt_init.F 76 ZONAL_FILT_INIT
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/zonal_filt/zonal_filt_init.F 77 ZONAL_FILT_INIT
         WRITE(msgBuf,'(A)')
./pkg/zonal_filt/zonal_filt_init.F 79 ZONAL_FILT_INIT
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_pressure.F 146 INI_PRESSURE
         WRITE(msgBuf,'(A,I4,A,1PE20.12)')
./model/src/ini_pressure.F 148 INI_PRESSURE
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_pressure.F 160 INI_PRESSURE
         WRITE(msgBuf,'(A)')
./model/src/ini_pressure.F 162 INI_PRESSURE
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_pressure.F 164 INI_PRESSURE
         WRITE(msgBuf,'(A)')
./model/src/ini_pressure.F 166 INI_PRESSURE
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_pressure.F 168 INI_PRESSURE
         WRITE(msgBuf,'(A)')
./model/src/ini_pressure.F 170 INI_PRESSURE
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_pressure.F 173 INI_PRESSURE
         WRITE(msgBuf,'(A,I2,A)')
./model/src/ini_pressure.F 176 INI_PRESSURE
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_pressure.F 180 INI_PRESSURE
       WRITE(msgBuf,'(A)')
./model/src/ini_pressure.F 182 INI_PRESSURE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_pressure.F 192 INI_PRESSURE
       WRITE(msgBuf,'(A,A)')
./model/src/ini_pressure.F 195 INI_PRESSURE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_pressure.F 202 INI_PRESSURE
      WRITE(msgBuf,'(A)') ' '
./model/src/ini_pressure.F 203 INI_PRESSURE
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_pressure.F 55 INI_PRESSURE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_pressure.F 63 INI_PRESSURE
      WRITE(msgBuf,'(a)')
./model/src/ini_pressure.F 65 INI_PRESSURE
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/zonal_filt/zonal_filt_readparms.F 102 ZONAL_FILT_READPARMS
         WRITE(msgBuf,'(2A)') 'ZONAL_FILT with rigidLid ',
./pkg/zonal_filt/zonal_filt_readparms.F 104 ZONAL_FILT_READPARMS
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/zonal_filt/zonal_filt_readparms.F 107 ZONAL_FILT_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R ZONAL_FILT_READPARMS: WARNING <<< ',
./pkg/zonal_filt/zonal_filt_readparms.F 109 ZONAL_FILT_READPARMS
         CALL PRINT_MESSAGE(msgBuf, errorMessageUnit, SQUEEZE_RIGHT,1)
./pkg/zonal_filt/zonal_filt_readparms.F 110 ZONAL_FILT_READPARMS
         WRITE(msgBuf,'(2A)') 'S/R ZONAL_FILT_READPARMS: WARNING <<< ',
./pkg/zonal_filt/zonal_filt_readparms.F 112 ZONAL_FILT_READPARMS
         CALL PRINT_MESSAGE(msgBuf, errorMessageUnit, SQUEEZE_RIGHT,1)
./pkg/zonal_filt/zonal_filt_readparms.F 27 ZONAL_FILT_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/zonal_filt/zonal_filt_readparms.F 53 ZONAL_FILT_READPARMS
      WRITE(msgBuf,'(A)')' ZONAL_FILT_READPARMS: opening data.zonfilt'
./pkg/zonal_filt/zonal_filt_readparms.F 54 ZONAL_FILT_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/zonal_filt/zonal_filt_readparms.F 73 ZONAL_FILT_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/zonal_filt/zonal_filt_readparms.F 75 ZONAL_FILT_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_salt.F 113 INI_SALT
        WRITE(msgBuf,'(A,I10,A)')
./model/src/ini_salt.F 116 INI_SALT
        CALL PRINT_ERROR( msgBuf , myThid)
./model/src/ini_salt.F 117 INI_SALT
        WRITE(msgBuf,'(A,A)')
./model/src/ini_salt.F 120 INI_SALT
        CALL PRINT_ERROR( msgBuf , myThid)
./model/src/ini_salt.F 123 INI_SALT
        WRITE(msgBuf,'(A,I10,A)')
./model/src/ini_salt.F 126 INI_SALT
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_salt.F 52 INI_SALT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_sigma_hfac.F 120 INI_SIGMA_HFAC
      WRITE(msgBuf,'(A,1PE14.6)')
./model/src/ini_sigma_hfac.F 122 INI_SIGMA_HFAC
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_sigma_hfac.F 51 INI_SIGMA_HFAC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/adjustment.cs-32x32x1/code_min/main.F 112 NO PROCEDURE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/adjustment.cs-32x32x1/code_min/main.F 211 NO PROCEDURE
       WRITE( msgBuf,'(A)') 'PROGRAM MAIN: ends with fatal Error'
./verification/adjustment.cs-32x32x1/code_min/main.F 212 NO PROCEDURE
       CALL PRINT_ERROR( msgBuf, 1 )
./model/src/ini_theta.F 114 INI_THETA
        WRITE(msgBuf,'(A,I10,A)')
./model/src/ini_theta.F 117 INI_THETA
        CALL PRINT_ERROR( msgBuf , myThid)
./model/src/ini_theta.F 118 INI_THETA
        WRITE(msgBuf,'(A,A)')
./model/src/ini_theta.F 121 INI_THETA
        CALL PRINT_ERROR( msgBuf , myThid)
./model/src/ini_theta.F 124 INI_THETA
        WRITE(msgBuf,'(A,I10,A)')
./model/src/ini_theta.F 127 INI_THETA
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/ini_theta.F 53 INI_THETA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/advect_xy/code/ini_salt.F 112 INI_SALT
        WRITE(msgBuf,'(A,I10,A)')
./verification/advect_xy/code/ini_salt.F 115 INI_SALT
        CALL PRINT_ERROR( msgBuf , myThid)
./verification/advect_xy/code/ini_salt.F 116 INI_SALT
        WRITE(msgBuf,'(A,A)')
./verification/advect_xy/code/ini_salt.F 119 INI_SALT
        CALL PRINT_ERROR( msgBuf , myThid)
./verification/advect_xy/code/ini_salt.F 122 INI_SALT
        WRITE(msgBuf,'(A,I10,A)')
./verification/advect_xy/code/ini_salt.F 125 INI_SALT
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./verification/advect_xy/code/ini_salt.F 49 INI_SALT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/advect_xy/code/ini_theta.F 113 INI_THETA
        WRITE(msgBuf,'(A,I10,A)')
./verification/advect_xy/code/ini_theta.F 116 INI_THETA
        CALL PRINT_ERROR( msgBuf , myThid)
./verification/advect_xy/code/ini_theta.F 117 INI_THETA
        WRITE(msgBuf,'(A,A)')
./verification/advect_xy/code/ini_theta.F 120 INI_THETA
        CALL PRINT_ERROR( msgBuf , myThid)
./verification/advect_xy/code/ini_theta.F 123 INI_THETA
        WRITE(msgBuf,'(A,I10,A)')
./verification/advect_xy/code/ini_theta.F 126 INI_THETA
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./verification/advect_xy/code/ini_theta.F 50 INI_THETA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F 195 INI_DEPTHS
          WRITE(msgBuf,'(A,A)') 'S/R INI_DEPTHS: ',
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F 197 INI_DEPTHS
          CALL PRINT_ERROR( msgBuf , myThid)
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F 60 INI_DEPTHS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F 65 INI_DEPTHS
       WRITE(msgBuf,'(A,A)')
./verification/aim.5l_Equatorial_Channel/code/ini_depths.F 68 INI_DEPTHS
       CALL PRINT_ERROR( msgBuf , myThid)
./model/src/ini_vertical_grid.F 114 INI_VERTICAL_GRID
         WRITE(msgBuf,'(A,I4,A,E16.8)')
./model/src/ini_vertical_grid.F 116 INI_VERTICAL_GRID
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 117 INI_VERTICAL_GRID
         WRITE(msgBuf,'(A)')
./model/src/ini_vertical_grid.F 119 INI_VERTICAL_GRID
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 185 INI_VERTICAL_GRID
        WRITE(msgBuf,'(A,I4,A,E16.8)')
./model/src/ini_vertical_grid.F 188 INI_VERTICAL_GRID
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 189 INI_VERTICAL_GRID
        WRITE(msgBuf,'(A,1PE14.6,A,2E14.6)')
./model/src/ini_vertical_grid.F 192 INI_VERTICAL_GRID
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 369 INI_VERTICAL_GRID
           WRITE(msgBuf,'(2A)') 'S/R INI_VERTICAL_GRID:',
./model/src/ini_vertical_grid.F 371 INI_VERTICAL_GRID
           CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 373 INI_VERTICAL_GRID
          WRITE(msgBuf,'(A,I4,2(A,1PE14.6),A,1P2E14.6)')
./model/src/ini_vertical_grid.F 376 INI_VERTICAL_GRID
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 37 INI_VERTICAL_GRID
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/ini_vertical_grid.F 385 INI_VERTICAL_GRID
           WRITE(msgBuf,'(2A)') 'S/R INI_VERTICAL_GRID:',
./model/src/ini_vertical_grid.F 387 INI_VERTICAL_GRID
           CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 389 INI_VERTICAL_GRID
          WRITE(msgBuf,'(A,I4,2(A,1PE14.6),A,1P2E14.6)')
./model/src/ini_vertical_grid.F 392 INI_VERTICAL_GRID
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 396 INI_VERTICAL_GRID
       WRITE(msgBuf,'(2A,1PE14.6)') 'S/R INI_VERTICAL_GRID:',
./model/src/ini_vertical_grid.F 398 INI_VERTICAL_GRID
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_vertical_grid.F 400 INI_VERTICAL_GRID
       WRITE(msgBuf,'(2A,1PE14.6)') 'S/R INI_VERTICAL_GRID:',
./model/src/ini_vertical_grid.F 402 INI_VERTICAL_GRID
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_vertical_grid.F 405 INI_VERTICAL_GRID
         WRITE(msgBuf,'(2A)') 'S/R INI_VERTICAL_GRID:',
./model/src/ini_vertical_grid.F 407 INI_VERTICAL_GRID
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 45 INI_VERTICAL_GRID
      WRITE(msgBuf,'(A,2(A,L5))') 'Enter INI_VERTICAL_GRID:',
./model/src/ini_vertical_grid.F 48 INI_VERTICAL_GRID
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/ini_vertical_grid.F 63 INI_VERTICAL_GRID
        WRITE(msgBuf,'(A)')
./model/src/ini_vertical_grid.F 65 INI_VERTICAL_GRID
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 66 INI_VERTICAL_GRID
        WRITE(msgBuf,'(A)')
./model/src/ini_vertical_grid.F 68 INI_VERTICAL_GRID
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 82 INI_VERTICAL_GRID
         WRITE(msgBuf,'(A,I4,A,E16.8)')
./model/src/ini_vertical_grid.F 84 INI_VERTICAL_GRID
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/ini_vertical_grid.F 85 INI_VERTICAL_GRID
         WRITE(msgBuf,'(A)')
./model/src/ini_vertical_grid.F 87 INI_VERTICAL_GRID
         CALL PRINT_ERROR( msgBuf, myThid )
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 152 ADDUMMY_IN_STEPPING
         WRITE(msgBuf,'(A)')  'S/R ADDUMMY_IN_STEPPING'
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 153 ADDUMMY_IN_STEPPING
         CALL PRINT_ERROR( msgBuf, 1 )
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 154 ADDUMMY_IN_STEPPING
         WRITE(msgBuf,'(A)')  'Error writing out model state'
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 155 ADDUMMY_IN_STEPPING
         CALL PRINT_ERROR( msgBuf, 1 )
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 156 ADDUMMY_IN_STEPPING
         WRITE(msgBuf,'(A,I10)') 'Timestep ',myIter
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 157 ADDUMMY_IN_STEPPING
         CALL PRINT_ERROR( msgBuf, 1 )
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 159 ADDUMMY_IN_STEPPING
         WRITE(msgBuf,'(A,I10)')
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 161 ADDUMMY_IN_STEPPING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 163 ADDUMMY_IN_STEPPING
         WRITE(msgBuf,'(A)')  ' '
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 164 ADDUMMY_IN_STEPPING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/bottom_ctrl_5x5/code_ad/addummy_in_stepping.F 58 ADDUMMY_IN_STEPPING
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 125 ADDUMMY_IN_HFAC
         WRITE(msgBuf,'(A)')  'S/R WRITE_STATE'
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 126 ADDUMMY_IN_HFAC
         CALL PRINT_ERROR( msgBuf, 1 )
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 127 ADDUMMY_IN_HFAC
         WRITE(msgBuf,'(A)')  'Error writing out model state'
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 128 ADDUMMY_IN_HFAC
         CALL PRINT_ERROR( msgBuf, 1 )
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 129 ADDUMMY_IN_HFAC
         WRITE(msgBuf,'(A,I10)') 'Timestep ',myIter
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 130 ADDUMMY_IN_HFAC
         CALL PRINT_ERROR( msgBuf, 1 )
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 132 ADDUMMY_IN_HFAC
         WRITE(msgBuf,'(A,I10)')
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 134 ADDUMMY_IN_HFAC
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 136 ADDUMMY_IN_HFAC
         WRITE(msgBuf,'(A)')  ' '
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 137 ADDUMMY_IN_HFAC
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/bottom_ctrl_5x5/code_ad/dummy_in_hfac.F 80 ADDUMMY_IN_HFAC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/comm_stats.F 101 COMM_STATS
          WRITE(msgBuf,'(A,A,1PE15.2)')
./eesupp/src/comm_stats.F 106 COMM_STATS
          WRITE(msgBuf,'(A,A,1PE15.2)')
./eesupp/src/comm_stats.F 110 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 119 COMM_STATS
         WRITE(msgBuf,'(A,A,I6.6)')
./eesupp/src/comm_stats.F 121 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 123 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 125 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 127 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 129 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 131 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 133 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 135 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 137 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 140 COMM_STATS
          WRITE(msgBuf,'(A,A,1PE15.2)')
./eesupp/src/comm_stats.F 144 COMM_STATS
          WRITE(msgBuf,'(A,A,1PE15.2)')
./eesupp/src/comm_stats.F 148 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 31 COMM_STATS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/comm_stats.F 35 COMM_STATS
       WRITE(msgBuf,'(A)')
./eesupp/src/comm_stats.F 37 COMM_STATS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/comm_stats.F 39 COMM_STATS
       WRITE(msgBuf,'(A)') '// Tile <-> Tile communication statistics'
./eesupp/src/comm_stats.F 40 COMM_STATS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/comm_stats.F 42 COMM_STATS
       WRITE(msgBuf,'(A)')
./eesupp/src/comm_stats.F 44 COMM_STATS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/comm_stats.F 50 COMM_STATS
         WRITE(msgBuf,'(A,A,I6.6)')
./eesupp/src/comm_stats.F 52 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 55 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 57 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 59 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 61 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 63 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 65 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 67 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 69 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 72 COMM_STATS
          WRITE(msgBuf,'(A,A,1PE15.2)')
./eesupp/src/comm_stats.F 77 COMM_STATS
          WRITE(msgBuf,'(A,A,1PE15.2)')
./eesupp/src/comm_stats.F 81 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 84 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 86 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 88 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 90 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 92 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 94 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./eesupp/src/comm_stats.F 96 COMM_STATS
         WRITE(msgBuf,'(A,A,I15)')
./eesupp/src/comm_stats.F 98 COMM_STATS
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,
./model/src/load_grid_spacing.F 105 LOAD_GRID_SPACING
        WRITE(msgBuf,'(3A)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 107 LOAD_GRID_SPACING
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/load_grid_spacing.F 123 LOAD_GRID_SPACING
         WRITE(msgBuf,'(2A,I5)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 125 LOAD_GRID_SPACING
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/load_grid_spacing.F 130 LOAD_GRID_SPACING
         WRITE(msgBuf,'(2A,I5,A,1PE16.8,A)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 132 LOAD_GRID_SPACING
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/load_grid_spacing.F 136 LOAD_GRID_SPACING
         WRITE(msgBuf,'(2A,I5,A)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 138 LOAD_GRID_SPACING
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/load_grid_spacing.F 148 LOAD_GRID_SPACING
         WRITE(msgBuf,'(2A,I5)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 150 LOAD_GRID_SPACING
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/load_grid_spacing.F 155 LOAD_GRID_SPACING
         WRITE(msgBuf,'(2A,I5,A,1PE16.8,A)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 157 LOAD_GRID_SPACING
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/load_grid_spacing.F 161 LOAD_GRID_SPACING
         WRITE(msgBuf,'(2A,I5,A)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 163 LOAD_GRID_SPACING
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/load_grid_spacing.F 46 LOAD_GRID_SPACING
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/load_grid_spacing.F 65 LOAD_GRID_SPACING
        WRITE(msgBuf,'(3A)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 67 LOAD_GRID_SPACING
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/load_grid_spacing.F 75 LOAD_GRID_SPACING
        WRITE(msgBuf,'(3A)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 77 LOAD_GRID_SPACING
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/load_grid_spacing.F 85 LOAD_GRID_SPACING
        WRITE(msgBuf,'(3A)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 87 LOAD_GRID_SPACING
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/load_grid_spacing.F 94 LOAD_GRID_SPACING
        WRITE(msgBuf,'(3A)') 'S/R LOAD_GRID_SPACING:',
./model/src/load_grid_spacing.F 96 LOAD_GRID_SPACING
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/fizhi-cs-aqualev20/code/ini_salt.F 139 INI_SALT
       WRITE(msgBuf,'(A,A)')
./verification/fizhi-cs-aqualev20/code/ini_salt.F 142 INI_SALT
       CALL PRINT_ERROR( msgBuf , myThid)
./verification/fizhi-cs-aqualev20/code/ini_salt.F 47 INI_SALT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/load_ref_files.F 103 LOAD_REF_FILES
        WRITE(msgBuf,'(3A)') 'S/R LOAD_REF_FILES: ',
./model/src/load_ref_files.F 105 LOAD_REF_FILES
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/load_ref_files.F 114 LOAD_REF_FILES
        WRITE(msgBuf,'(3A)') 'S/R LOAD_REF_FILES: ',
./model/src/load_ref_files.F 116 LOAD_REF_FILES
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/load_ref_files.F 127 LOAD_REF_FILES
        WRITE(msgBuf,'(3A)') 'S/R LOAD_REF_FILES: ',
./model/src/load_ref_files.F 129 LOAD_REF_FILES
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/load_ref_files.F 42 LOAD_REF_FILES
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/load_ref_files.F 61 LOAD_REF_FILES
          WRITE(msgBuf,'(2A,I4,A)') 'S/R LOAD_REF_FILES: ',
./model/src/load_ref_files.F 63 LOAD_REF_FILES
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/load_ref_files.F 72 LOAD_REF_FILES
        WRITE(msgBuf,'(3A)') 'S/R LOAD_REF_FILES: ',
./model/src/load_ref_files.F 74 LOAD_REF_FILES
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/load_ref_files.F 92 LOAD_REF_FILES
          WRITE(msgBuf,'(2A,I4,A)') 'S/R LOAD_REF_FILES: ',
./model/src/load_ref_files.F 94 LOAD_REF_FILES
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/packages_boot.F 103 PACKAGES_BOOT
      WRITE(msgBuf,'(A)') ' PACKAGES_BOOT: opening data.pkg'
./model/src/packages_boot.F 104 PACKAGES_BOOT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_boot.F 179 PACKAGES_BOOT
      WRITE(msgBuf,'(A)') ' PACKAGES_BOOT: finished reading data.pkg'
./model/src/packages_boot.F 180 PACKAGES_BOOT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_boot.F 193 PACKAGES_BOOT
        WRITE(msgBuf,'(2A)') '** WARNING ** pkg/profiles uses NetCDF',
./model/src/packages_boot.F 195 PACKAGES_BOOT
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_boot.F 197 PACKAGES_BOOT
        WRITE(msgBuf,'(2A)') '** WARNING ** PACKAGES_BOOT:',
./model/src/packages_boot.F 199 PACKAGES_BOOT
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_boot.F 201 PACKAGES_BOOT
        WRITE(msgBuf,'(2A)') ' PACKAGES_BOOT: undef HAVE_NETCDF',
./model/src/packages_boot.F 203 PACKAGES_BOOT
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_boot.F 225 PACKAGES_BOOT
        WRITE(msgBuf,'(2A)') '** WARNING ** PACKAGES_BOOT: ',
./model/src/packages_boot.F 227 PACKAGES_BOOT
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_boot.F 229 PACKAGES_BOOT
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_boot.F 231 PACKAGES_BOOT
        WRITE(msgBuf,'(2A)') '** WARNING ** PACKAGES_BOOT: ',
./model/src/packages_boot.F 233 PACKAGES_BOOT
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_boot.F 235 PACKAGES_BOOT
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_boot.F 237 PACKAGES_BOOT
        WRITE(msgBuf,'(2A)') '** WARNING ** PACKAGES_BOOT: ',
./model/src/packages_boot.F 239 PACKAGES_BOOT
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_boot.F 241 PACKAGES_BOOT
        WRITE(msgBuf,'(2A)') '** WARNING ** PACKAGES_BOOT: ',
./model/src/packages_boot.F 243 PACKAGES_BOOT
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_boot.F 250 PACKAGES_BOOT
      WRITE(msgBuf,'(2A)') ' PACKAGES_BOOT: On/Off package Summary'
./model/src/packages_boot.F 251 PACKAGES_BOOT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_boot.F 43 PACKAGES_BOOT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/packages_boot.F 497 PACKAGES_BOOT
      WRITE(msgBuf,'(2A)') ' PACKAGES_BOOT: End of package Summary'
./model/src/packages_boot.F 498 PACKAGES_BOOT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_boot.F 500 PACKAGES_BOOT
      WRITE(msgBuf,'(A)') ' '
./model/src/packages_boot.F 501 PACKAGES_BOOT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_check.F 112 PACKAGES_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/packages_check.F 116 PACKAGES_CHECK
      WRITE(msgBuf,'(A)')
./model/src/packages_check.F 118 PACKAGES_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_check.F 120 PACKAGES_CHECK
      WRITE(msgBuf,'(A)') ' '
./model/src/packages_check.F 121 PACKAGES_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/packages_check.F 130 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING **',
./model/src/packages_check.F 132 PACKAGES_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_check.F 134 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING **',
./model/src/packages_check.F 136 PACKAGES_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_check.F 144 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/packages_check.F 147 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_check.F 148 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)') 'PACKAGES_CHECK: ',
./model/src/packages_check.F 150 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_check.F 157 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/packages_check.F 160 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_check.F 161 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)') 'PACKAGES_CHECK: ',
./model/src/packages_check.F 163 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_check.F 171 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)')
./model/src/packages_check.F 174 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_check.F 175 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)') 'PACKAGES_CHECK: ',
./model/src/packages_check.F 177 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_check.F 492 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)') 'PACKAGES_CHECK: ',
./model/src/packages_check.F 494 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_check.F 495 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)') 'PACKAGES_CHECK: ',
./model/src/packages_check.F 497 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_check.F 504 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)') 'PACKAGES_CHECK: ',
./model/src/packages_check.F 506 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_check.F 507 PACKAGES_CHECK
        WRITE(msgBuf,'(2A)') 'PACKAGES_CHECK: ',
./model/src/packages_check.F 509 PACKAGES_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./model/src/packages_error_msg.F 39 PACKAGES_ERROR_MSG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/packages_error_msg.F 50 PACKAGES_ERROR_MSG
       WRITE(msgBuf,'(4A)') 'from PACKAGES_CHECK: ',
./model/src/packages_error_msg.F 53 PACKAGES_ERROR_MSG
       WRITE(msgBuf,'(4A)') 'from PACKAGES_CHECK: ',
./model/src/packages_error_msg.F 56 PACKAGES_ERROR_MSG
      CALL PRINT_ERROR( msgBuf, myThid )
./model/src/packages_error_msg.F 57 PACKAGES_ERROR_MSG
      WRITE(msgBuf,'(5A)') 'but pkg/',msgLwc(1:iLen),
./model/src/packages_error_msg.F 59 PACKAGES_ERROR_MSG
      CALL PRINT_ERROR( msgBuf, myThid )
./model/src/packages_error_msg.F 60 PACKAGES_ERROR_MSG
      WRITE(msgBuf,'(3A)')
./model/src/packages_error_msg.F 63 PACKAGES_ERROR_MSG
      CALL PRINT_ERROR( msgBuf, myThid )
./verification/halfpipe_streamice/code_ad/ctrl_map_ini_genarr.F 66 CTRL_MAP_INI_GENARR
      character*(MAX_LEN_MBUF) msgBuf
./model/src/packages_unused_msg.F 103 PACKAGES_UNUSED_MSG
           WRITE(msgBuf,'(5A)') '** Warning ** ', caller_sub(1:iLen2),
./model/src/packages_unused_msg.F 105 PACKAGES_UNUSED_MSG
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_unused_msg.F 107 PACKAGES_UNUSED_MSG
           WRITE(msgBuf,'(5A)') '** Warning ** ', caller_sub(1:iLen2),
./model/src/packages_unused_msg.F 109 PACKAGES_UNUSED_MSG
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/packages_unused_msg.F 50 PACKAGES_UNUSED_MSG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/halfpipe_streamice/code_oad/ctrl_map_ini_genarr.F 66 CTRL_MAP_INI_GENARR
      character*(MAX_LEN_MBUF) msgBuf
./verification/hs94.1x64x5/code/ini_theta.F 118 INI_THETA
       WRITE(msgBuf,'(A,A)')
./verification/hs94.1x64x5/code/ini_theta.F 121 INI_THETA
       CALL PRINT_ERROR( msgBuf , myThid)
./verification/hs94.1x64x5/code/ini_theta.F 54 INI_THETA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F 151 CTRL_MAP_GENTIM2D
         WRITE(msgBuf,'(A,I6,A,I6,A,1PE21.14)') ' xx_gentim2d ',
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F 153 CTRL_MAP_GENTIM2D
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/hs94.1x64x5/code_ad/ctrl_map_gentim2d.F 63 CTRL_MAP_GENTIM2D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/hs94.1x64x5/code_ad/ctrl_map_ini_genarr.F 62 CTRL_MAP_INI_GENARR
      character*(MAX_LEN_MBUF) msgBuf
./verification/hs94.1x64x5/code_ad/ini_theta.F 118 INI_THETA
       WRITE(msgBuf,'(A,A)')
./verification/hs94.1x64x5/code_ad/ini_theta.F 121 INI_THETA
       CALL PRINT_ERROR( msgBuf , myThid)
./verification/hs94.1x64x5/code_ad/ini_theta.F 54 INI_THETA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 151 CTRL_MAP_GENTIM2D
         WRITE(msgBuf,'(A,I6,A,I6,A,1PE21.14)') ' xx_gentim2d ',
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 153 CTRL_MAP_GENTIM2D
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/hs94.1x64x5/code_oad/ctrl_map_gentim2d.F 63 CTRL_MAP_GENTIM2D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/hs94.1x64x5/code_oad/ctrl_map_ini_genarr.F 62 CTRL_MAP_INI_GENARR
      character*(MAX_LEN_MBUF) msgBuf
./verification/hs94.1x64x5/code_oad/ini_theta.F 118 INI_THETA
       WRITE(msgBuf,'(A,A)')
./verification/hs94.1x64x5/code_oad/ini_theta.F 121 INI_THETA
       CALL PRINT_ERROR( msgBuf , myThid)
./verification/hs94.1x64x5/code_oad/ini_theta.F 54 INI_THETA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/hs94.cs-32x32x5/code/ini_theta.F 118 INI_THETA
       WRITE(msgBuf,'(A,A)')
./verification/hs94.cs-32x32x5/code/ini_theta.F 121 INI_THETA
       CALL PRINT_ERROR( msgBuf , myThid)
./verification/hs94.cs-32x32x5/code/ini_theta.F 54 INI_THETA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/read_pickup.F 115 READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'READ_PICKUP: ',
./model/src/read_pickup.F 117 READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/read_pickup.F 118 READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'READ_PICKUP: ',
./model/src/read_pickup.F 120 READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/read_pickup.F 131 READ_PICKUP
          WRITE(msgBuf,'(4A)') 'READ_PICKUP: ',
./model/src/read_pickup.F 135 READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/read_pickup.F 136 READ_PICKUP
          WRITE(msgBuf,'(4A)') 'READ_PICKUP: ',
./model/src/read_pickup.F 139 READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 142 READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> READ_PICKUP: ',
./model/src/read_pickup.F 144 READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 147 READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./model/src/read_pickup.F 149 READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 152 READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./model/src/read_pickup.F 154 READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 155 READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./model/src/read_pickup.F 157 READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/read_pickup.F 444 READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'READ_PICKUP: ',
./model/src/read_pickup.F 446 READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./model/src/read_pickup.F 74 READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/remove_mean.F 102 REMOVE_MEAN_RL
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/remove_mean.F 207 REMOVE_MEAN_RS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/rotate_uv2en.F 245 ROTATE_UV2EN_RS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/rotate_uv2en.F 251 ROTATE_UV2EN_RS
        WRITE(msgBuf,'(2A,I4,A)') ' ROTATE_UV2EN: ',
./model/src/rotate_uv2en.F 253 ROTATE_UV2EN_RS
        CALL PRINT_ERROR(msgBuf, myThid)      
./model/src/rotate_uv2en.F 64 ROTATE_UV2EN_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/rotate_uv2en.F 70 ROTATE_UV2EN_RL
        WRITE(msgBuf,'(2A,I4,A)') ' ROTATE_UV2EN: ',
./model/src/rotate_uv2en.F 72 ROTATE_UV2EN_RL
        CALL PRINT_ERROR(msgBuf, myThid)      
./model/src/set_parms.F 136 SET_PARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** SET_PARMS: ',
./model/src/set_parms.F 138 SET_PARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/set_parms.F 157 SET_PARMS
        WRITE(msgBuf,'(A,A)') '** WARNING ** SET_PARMS: ',
./model/src/set_parms.F 159 SET_PARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/set_parms.F 242 SET_PARMS
          WRITE(msgBuf,'(A,I9,A)') 'SET_PARAMS: selectP_inEOS_Zc=',
./model/src/set_parms.F 244 SET_PARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/set_parms.F 251 SET_PARMS
          WRITE(msgBuf,'(A,I9,A)') 'SET_PARAMS: selectP_inEOS_Zc=',
./model/src/set_parms.F 253 SET_PARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/set_parms.F 272 SET_PARMS
        WRITE(msgBuf,'(A,A)') '** WARNING ** SET_PARMS: ',
./model/src/set_parms.F 274 SET_PARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/set_parms.F 276 SET_PARMS
        WRITE(msgBuf,'(2A,1PE20.13)') '** WARNING ** SET_PARMS: ',
./model/src/set_parms.F 278 SET_PARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/set_parms.F 280 SET_PARMS
        WRITE(msgBuf,'(2A,1PE20.13)') '** WARNING ** SET_PARMS: ',
./model/src/set_parms.F 282 SET_PARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/set_parms.F 295 SET_PARMS
       WRITE(msgBuf,'(A,A)') 'SET_PARMS: done'
./model/src/set_parms.F 296 SET_PARMS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/set_parms.F 40 SET_PARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/set_parms.F 76 SET_PARMS
        WRITE(msgBuf,'(2A)') 'SET_PARAMS: ',
./model/src/set_parms.F 78 SET_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/set_parms.F 79 SET_PARMS
        WRITE(msgBuf,'(2A)') 'SET_PARAMS: ',
./model/src/set_parms.F 81 SET_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/set_parms.F 88 SET_PARMS
        WRITE(msgBuf,'(2A)') 'SET_PARAMS: ',
./model/src/set_parms.F 90 SET_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/set_parms.F 91 SET_PARMS
        WRITE(msgBuf,'(2A)') 'SET_PARAMS: ',
./model/src/set_parms.F 93 SET_PARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./model/src/set_ref_state.F 139 SET_REF_STATE
         WRITE(msgBuf,'(2A)') 'SET_REF_STATE:',
./model/src/set_ref_state.F 141 SET_REF_STATE
         CALL PRINT_ERROR( msgBuf , myThid )
./model/src/set_ref_state.F 142 SET_REF_STATE
         WRITE(msgBuf,'(2A)') 'SET_REF_STATE:',
./model/src/set_ref_state.F 144 SET_REF_STATE
         CALL PRINT_ERROR( msgBuf , myThid )
./model/src/set_ref_state.F 148 SET_REF_STATE
         WRITE(msgBuf,'(2A)') 'SET_REF_STATE:',
./model/src/set_ref_state.F 150 SET_REF_STATE
         CALL PRINT_ERROR( msgBuf , myThid )
./model/src/set_ref_state.F 151 SET_REF_STATE
         WRITE(msgBuf,'(2A)') 'SET_REF_STATE:',
./model/src/set_ref_state.F 153 SET_REF_STATE
         CALL PRINT_ERROR( msgBuf , myThid )
./model/src/set_ref_state.F 156 SET_REF_STATE
         WRITE(msgBuf,'(2A)') 'SET_REF_STATE:',
./model/src/set_ref_state.F 158 SET_REF_STATE
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/set_ref_state.F 160 SET_REF_STATE
         WRITE(msgBuf,'(2A)') 'SET_REF_STATE:',
./model/src/set_ref_state.F 162 SET_REF_STATE
         CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./model/src/set_ref_state.F 378 SET_REF_STATE
       WRITE(msgBuf,'(A)') ' '
./model/src/set_ref_state.F 379 SET_REF_STATE
       CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid )
./model/src/set_ref_state.F 380 SET_REF_STATE
       WRITE(msgBuf,'(A)')
./model/src/set_ref_state.F 382 SET_REF_STATE
       CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid )
./model/src/set_ref_state.F 383 SET_REF_STATE
       WRITE(msgBuf,'(A)')
./model/src/set_ref_state.F 385 SET_REF_STATE
       CALL PRINT_MESSAGE( msgBuf, stdUnit, SQUEEZE_RIGHT, myThid )
./model/src/set_ref_state.F 387 SET_REF_STATE
        WRITE(msgBuf,'(A,F5.1,A,F15.1,A,F13.3)')
./model/src/set_ref_state.F 390 SET_REF_STATE
        CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid )
./model/src/set_ref_state.F 40 SET_REF_STATE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F 124 CTRL_MAP_INI_GENARR
        WRITE(msgBuf,'(A)')
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F 126 CTRL_MAP_INI_GENARR
        CALL PRINT_ERROR( msgBuf, myThid )
./verification/tutorial_global_oce_biogeo/code_oad/ctrl_map_ini_genarr.F 62 CTRL_MAP_INI_GENARR
      character*(MAX_LEN_MBUF) msgBuf
./model/src/solve_for_pressure.F 109 SOLVE_FOR_PRESSURE
        WRITE(msgBuf,'(2A,L5)') 'SOLVE_FOR_PRESSURE:',
./model/src/solve_for_pressure.F 111 SOLVE_FOR_PRESSURE
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/solve_for_pressure.F 113 SOLVE_FOR_PRESSURE
        WRITE(msgBuf,'(A,2(A,L5))') 'SOLVE_FOR_PRESSURE:',
./model/src/solve_for_pressure.F 115 SOLVE_FOR_PRESSURE
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/solve_for_pressure.F 116 SOLVE_FOR_PRESSURE
        WRITE(msgBuf,'(2A,L5)') 'SOLVE_FOR_PRESSURE:',
./model/src/solve_for_pressure.F 118 SOLVE_FOR_PRESSURE
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./model/src/solve_for_pressure.F 327 SOLVE_FOR_PRESSURE
        WRITE(msgBuf,'(A20,1PE23.14)') 'cg2d_init_res =',firstResidual
./model/src/solve_for_pressure.F 328 SOLVE_FOR_PRESSURE
        CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/solve_for_pressure.F 329 SOLVE_FOR_PRESSURE
        WRITE(msgBuf,'(A27,2I8)')
./model/src/solve_for_pressure.F 331 SOLVE_FOR_PRESSURE
        CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/solve_for_pressure.F 334 SOLVE_FOR_PRESSURE
         WRITE(msgBuf,'(A20,1PE23.14)') 'cg2d_min_res  =',minResidualSq
./model/src/solve_for_pressure.F 335 SOLVE_FOR_PRESSURE
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/solve_for_pressure.F 337 SOLVE_FOR_PRESSURE
        WRITE(msgBuf,'(A20,1PE23.14)') 'cg2d_last_res =',lastResidual
./model/src/solve_for_pressure.F 338 SOLVE_FOR_PRESSURE
        CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/solve_for_pressure.F 430 SOLVE_FOR_PRESSURE
         WRITE(msgBuf,'(A20,1PE23.14)') 'cg3d_init_res =',firstResidual
./model/src/solve_for_pressure.F 431 SOLVE_FOR_PRESSURE
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/solve_for_pressure.F 432 SOLVE_FOR_PRESSURE
         WRITE(msgBuf,'(A27,I16)') 'cg3d_iters (last) =   ',numIters
./model/src/solve_for_pressure.F 433 SOLVE_FOR_PRESSURE
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/solve_for_pressure.F 434 SOLVE_FOR_PRESSURE
         WRITE(msgBuf,'(A20,1PE23.14)') 'cg3d_last_res =',lastResidual
./model/src/solve_for_pressure.F 435 SOLVE_FOR_PRESSURE
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./model/src/solve_for_pressure.F 66 SOLVE_FOR_PRESSURE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F 101 COST_WEIGHTS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F 47 COST_WEIGHTS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/tutorial_global_oce_optim/code_ad/cost_weights.F 99 COST_WEIGHTS
       WRITE(msgBuf,'(3A)') 'S/R COST_WEIGHTS:',
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F 101 COST_WEIGHTS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F 47 COST_WEIGHTS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./verification/tutorial_global_oce_optim/code_oad/cost_weights.F 99 COST_WEIGHTS
       WRITE(msgBuf,'(3A)') 'S/R COST_WEIGHTS:',
./model/src/state_summary.F 43 STATE_SUMMARY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./model/src/state_summary.F 47 STATE_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/state_summary.F 49 STATE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit, 
./model/src/state_summary.F 51 STATE_SUMMARY
      WRITE(msgBuf,'(A)') '// Model current state'
./model/src/state_summary.F 52 STATE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit, 
./model/src/state_summary.F 54 STATE_SUMMARY
      WRITE(msgBuf,'(A)')
./model/src/state_summary.F 56 STATE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./model/src/state_summary.F 58 STATE_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./model/src/state_summary.F 59 STATE_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 122 CTRL_MAP_INI_GENARR
        WRITE(msgBuf,'(A)')
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 124 CTRL_MAP_INI_GENARR
        CALL PRINT_ERROR( msgBuf, myThid )
./verification/tutorial_tracer_adjsens/code_ad/ctrl_map_ini_genarr.F 61 CTRL_MAP_INI_GENARR
      character*(MAX_LEN_MBUF) msgBuf
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F 124 CTRL_MAP_INI_GENARR
        WRITE(msgBuf,'(A)')
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F 126 CTRL_MAP_INI_GENARR
        CALL PRINT_ERROR( msgBuf, myThid )
./verification/tutorial_tracer_adjsens/code_oad/ctrl_map_ini_genarr.F 62 CTRL_MAP_INI_GENARR
      character*(MAX_LEN_MBUF) msgBuf
./eesupp/src/eeboot_minimal.F 115 EEBOOT_MINIMAL
         WRITE(msgBuf,'(A,I5)')
./eesupp/src/eeboot_minimal.F 117 EEBOOT_MINIMAL
         CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/eeboot_minimal.F 181 EEBOOT_MINIMAL
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/eeboot_minimal.F 183 EEBOOT_MINIMAL
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/eeboot_minimal.F 214 EEBOOT_MINIMAL
          WRITE(msgBuf,'(2A)') '** WARNING ** EEBOOT_MINIMAL: ',
./eesupp/src/eeboot_minimal.F 216 EEBOOT_MINIMAL
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./eesupp/src/eeboot_minimal.F 218 EEBOOT_MINIMAL
          WRITE(msgBuf,'(2A)') '** WARNING ** EEBOOT_MINIMAL: ',
./eesupp/src/eeboot_minimal.F 220 EEBOOT_MINIMAL
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./eesupp/src/eeboot_minimal.F 237 EEBOOT_MINIMAL
        WRITE(msgBuf,'(A,I6)')
./eesupp/src/eeboot_minimal.F 239 EEBOOT_MINIMAL
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/eeboot_minimal.F 247 EEBOOT_MINIMAL
        WRITE(msgBuf,'(A,I6)')
./eesupp/src/eeboot_minimal.F 249 EEBOOT_MINIMAL
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/eeboot_minimal.F 262 EEBOOT_MINIMAL
        WRITE(msgBuf,'(2(A,I6))')
./eesupp/src/eeboot_minimal.F 265 EEBOOT_MINIMAL
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/eeboot_minimal.F 56 EEBOOT_MINIMAL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/eedata_example.F 20 EEDATA_EXAMPLE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/eedata_example.F 22 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '// Shown below is an example "eedata" file.'
./eesupp/src/eedata_example.F 23 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 24 EEDATA_EXAMPLE
      WRITE(msgBuf,'(2A)') '// To use this example copy and paste',
./eesupp/src/eedata_example.F 26 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 27 EEDATA_EXAMPLE
      WRITE(msgBuf,'(2A)') '// Then remove the text up to',
./eesupp/src/eedata_example.F 29 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 30 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '># Example "eedata" file'
./eesupp/src/eedata_example.F 31 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 32 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '># Lines beginning "#" are comments'
./eesupp/src/eedata_example.F 33 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 34 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '># nTx - No. threads per process in X'
./eesupp/src/eedata_example.F 35 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 36 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '># nTy - No. threads per process in Y'
./eesupp/src/eedata_example.F 37 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 38 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '>&EEPARMS '
./eesupp/src/eedata_example.F 39 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 40 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '> nTx=1,  '
./eesupp/src/eedata_example.F 41 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 42 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '> nTy=1,  '
./eesupp/src/eedata_example.F 43 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 44 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '>&        '
./eesupp/src/eedata_example.F 45 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 46 EEDATA_EXAMPLE
      WRITE(msgBuf,'(2A)') '># Note: Some systems use & as the ',
./eesupp/src/eedata_example.F 48 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 49 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') '>#       Other systems use a / character.'
./eesupp/src/eedata_example.F 50 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./eesupp/src/eedata_example.F 51 EEDATA_EXAMPLE
      WRITE(msgBuf,'(A)') ' '
./eesupp/src/eedata_example.F 52 EEDATA_EXAMPLE
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./model/src/write_pickup.F 326 WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'WRITE_PICKUP: ',
./model/src/write_pickup.F 328 WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/write_pickup.F 329 WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'WRITE_PICKUP: ',
./model/src/write_pickup.F 331 WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./model/src/write_pickup.F 80 WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/eedie.F 100 EEDIE
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/eedie.F 103 EEDIE
        CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eedie.F 32 EEDIE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/eedie.F 42 EEDIE
        WRITE(msgBuf,'(2A)')
./eesupp/src/eedie.F 44 EEDIE
        CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eedie.F 60 EEDIE
         WRITE(msgBuf,'(A,I5,A)')
./eesupp/src/eedie.F 62 EEDIE
         CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eedie.F 63 EEDIE
         WRITE(msgBuf,'(A,I5,A)')
./eesupp/src/eedie.F 65 EEDIE
         CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eeintro_msg.F 26 EEINTRO_MSG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/eeintro_msg.F 29 EEINTRO_MSG
      WRITE(msgBuf,'(A)') '                '
./eesupp/src/eeintro_msg.F 30 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 32 EEINTRO_MSG
      WRITE(msgBuf,'(A)')
./eesupp/src/eeintro_msg.F 34 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 36 EEINTRO_MSG
      WRITE(msgBuf,'(A)') '//                      MITgcm UV'
./eesupp/src/eeintro_msg.F 37 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 39 EEINTRO_MSG
      WRITE(msgBuf,'(A)') '//                      ========='
./eesupp/src/eeintro_msg.F 40 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 42 EEINTRO_MSG
      WRITE(msgBuf,'(A)')
./eesupp/src/eeintro_msg.F 44 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 46 EEINTRO_MSG
      WRITE(msgBuf,'(A)') '// execution environment starting up...'
./eesupp/src/eeintro_msg.F 47 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 49 EEINTRO_MSG
      WRITE(msgBuf,'(A)') '   '
./eesupp/src/eeintro_msg.F 50 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 54 EEINTRO_MSG
      WRITE(msgBuf,'(2A)') '// MITgcmUV version:  ',
./eesupp/src/eeintro_msg.F 56 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 60 EEINTRO_MSG
      WRITE(msgBuf,'(2A)') '// Build user:        ',
./eesupp/src/eeintro_msg.F 62 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 66 EEINTRO_MSG
      WRITE(msgBuf,'(2A)') '// Build host:        ',
./eesupp/src/eeintro_msg.F 68 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 72 EEINTRO_MSG
      WRITE(msgBuf,'(2A)') '// Build date:        ',
./eesupp/src/eeintro_msg.F 74 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeintro_msg.F 78 EEINTRO_MSG
      WRITE(msgBuf,'(A)') '   '
./eesupp/src/eeintro_msg.F 79 EEINTRO_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eeset_parms.F 174 EESET_PARMS
        WRITE(msgBuf,'(2A)') 'EESET_PARMS: ',
./eesupp/src/eeset_parms.F 176 EESET_PARMS
        CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eeset_parms.F 201 EESET_PARMS
       WRITE(msgBuf,'(A)')
./eesupp/src/eeset_parms.F 203 EESET_PARMS
       CALL PRINT_MESSAGE(msgBuf, standardMessageUnit, SQUEEZE_RIGHT, 1)
./eesupp/src/eeset_parms.F 204 EESET_PARMS
       WRITE(msgBuf,'(A)')
./eesupp/src/eeset_parms.F 206 EESET_PARMS
       CALL PRINT_MESSAGE(msgBuf, standardMessageUnit, SQUEEZE_RIGHT, 1)
./eesupp/src/eeset_parms.F 207 EESET_PARMS
       WRITE(msgBuf,'(A)')
./eesupp/src/eeset_parms.F 209 EESET_PARMS
       CALL PRINT_MESSAGE(msgBuf, standardMessageUnit, SQUEEZE_RIGHT, 1)
./eesupp/src/eeset_parms.F 215 EESET_PARMS
        WRITE(msgBuf,'(A,A)') '>',RECORD(:IL)
./eesupp/src/eeset_parms.F 216 EESET_PARMS
        CALL PRINT_MESSAGE(msgBuf,standardMessageUnit, SQUEEZE_RIGHT, 1)
./eesupp/src/eeset_parms.F 220 EESET_PARMS
       WRITE(msgBuf,'(A)') ' '
./eesupp/src/eeset_parms.F 221 EESET_PARMS
       CALL PRINT_MESSAGE(msgBuf,standardMessageUnit, SQUEEZE_RIGHT, 1)
./eesupp/src/eeset_parms.F 250 EESET_PARMS
       WRITE(msgBuf,'(2A)') 'EESET_PARMS: ',
./eesupp/src/eeset_parms.F 252 EESET_PARMS
       CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eeset_parms.F 269 EESET_PARMS
       WRITE(msgBuf,'(2A)') 'EESET_PARMS: ',
./eesupp/src/eeset_parms.F 271 EESET_PARMS
       CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eeset_parms.F 272 EESET_PARMS
       WRITE(msgBuf,'(A)') 'EESET_PARMS:  with #define ALWAYS_USE_MPI'
./eesupp/src/eeset_parms.F 273 EESET_PARMS
       CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eeset_parms.F 280 EESET_PARMS
       WRITE(msgBuf,'(2A)') 'EESET_PARMS: ',
./eesupp/src/eeset_parms.F 282 EESET_PARMS
       CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eeset_parms.F 283 EESET_PARMS
       WRITE(msgBuf,'(A)') 'EESET_PARMS:  with #undef ALLOW_USE_MPI'
./eesupp/src/eeset_parms.F 284 EESET_PARMS
       CALL PRINT_ERROR( msgBuf, 1 )
./eesupp/src/eeset_parms.F 55 EESET_PARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/aim_v23/aim_do_co2.F 125 AIM_DO_CO2
          WRITE(msgBuf,'(A)') ' '
./pkg/aim_v23/aim_do_co2.F 126 AIM_DO_CO2
          CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/aim_v23/aim_do_co2.F 127 AIM_DO_CO2
          WRITE(msgBuf,'(A)') '// ==================================='
./pkg/aim_v23/aim_do_co2.F 128 AIM_DO_CO2
          CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/aim_v23/aim_do_co2.F 129 AIM_DO_CO2
          WRITE(msgBuf,'(2A)') '// AIM_DO_CO2: Read pickup ',fn(iLo:iHi)
./pkg/aim_v23/aim_do_co2.F 130 AIM_DO_CO2
          CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/aim_v23/aim_do_co2.F 64 AIM_DO_CO2
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/eewrite_eeenv.F 102 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     nTy =',nTy,
./eesupp/src/eewrite_eeenv.F 104 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 107 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '      Nr =', Nr,
./eesupp/src/eewrite_eeenv.F 109 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 112 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '      Nx =', Nx,
./eesupp/src/eewrite_eeenv.F 114 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 117 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '      Ny =', Ny,
./eesupp/src/eewrite_eeenv.F 119 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 122 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '  nTiles =', nSx*nSy,
./eesupp/src/eewrite_eeenv.F 124 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 127 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '  nProcs =', nPx*nPy,
./eesupp/src/eewrite_eeenv.F 129 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 132 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') 'nThreads =', nTx*nTy,
./eesupp/src/eewrite_eeenv.F 134 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 137 EEWRITE_EEENV
      WRITE(msgBuf,'(A,L5,A)') 'usingMPI =', usingMPI,
./eesupp/src/eewrite_eeenv.F 139 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 142 EEWRITE_EEENV
      WRITE(msgBuf,'(A,A,A)') '          ', '     ' ,
./eesupp/src/eewrite_eeenv.F 144 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 147 EEWRITE_EEENV
      WRITE(msgBuf,'(A,A,A)') '          ', '     ' ,
./eesupp/src/eewrite_eeenv.F 149 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 152 EEWRITE_EEENV
      WRITE(msgBuf,'(A,A,A)') '          ', '     ' ,
./eesupp/src/eewrite_eeenv.F 154 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 157 EEWRITE_EEENV
      WRITE(msgBuf,'(A,L5,A)') 'useCoupler=', useCoupler,
./eesupp/src/eewrite_eeenv.F 159 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 161 EEWRITE_EEENV
      WRITE(msgBuf,'(A,A,A)')  '           ', '     ',
./eesupp/src/eewrite_eeenv.F 163 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 166 EEWRITE_EEENV
      WRITE(msgBuf,'(A,L5,A)') 'debugMode =', debugMode,
./eesupp/src/eewrite_eeenv.F 168 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 170 EEWRITE_EEENV
      WRITE(msgBuf,'(A,L5,A)')
./eesupp/src/eewrite_eeenv.F 173 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 175 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') 'maxLengthPrt1D=', maxLengthPrt1D,
./eesupp/src/eewrite_eeenv.F 177 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 180 EEWRITE_EEENV
      WRITE(msgBuf,'(A)') '                '
./eesupp/src/eewrite_eeenv.F 181 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 34 EEWRITE_EEENV
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/eewrite_eeenv.F 37 EEWRITE_EEENV
      WRITE(msgBuf,'(A)')
./eesupp/src/eewrite_eeenv.F 39 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 42 EEWRITE_EEENV
      WRITE(msgBuf,'(A)')
./eesupp/src/eewrite_eeenv.F 44 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 47 EEWRITE_EEENV
      WRITE(msgBuf,'(A)')
./eesupp/src/eewrite_eeenv.F 49 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 52 EEWRITE_EEENV
      WRITE(msgBuf,'(A)')
./eesupp/src/eewrite_eeenv.F 54 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 57 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     nPx =',nPx,
./eesupp/src/eewrite_eeenv.F 59 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 62 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     nPy =',nPy,
./eesupp/src/eewrite_eeenv.F 64 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 67 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     nSx =',nSx,
./eesupp/src/eewrite_eeenv.F 69 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 72 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     nSy =',nSy,
./eesupp/src/eewrite_eeenv.F 74 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 77 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     sNx =',sNx,
./eesupp/src/eewrite_eeenv.F 79 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 82 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     sNy =',sNy,
./eesupp/src/eewrite_eeenv.F 84 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 87 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     OLx =',OLx,
./eesupp/src/eewrite_eeenv.F 89 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 92 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     OLy =',OLy,
./eesupp/src/eewrite_eeenv.F 94 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/eewrite_eeenv.F 97 EEWRITE_EEENV
      WRITE(msgBuf,'(A,I5,A)') '     nTx =',nTx,
./eesupp/src/eewrite_eeenv.F 99 EEWRITE_EEENV
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/aim_v23/aim_dyn2aim.F 224 AIM_DYN2AIM
         WRITE(msgBuf,'(A,1PE20.13,A,2I4)')
./pkg/aim_v23/aim_dyn2aim.F 227 AIM_DYN2AIM
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/aim_v23/aim_dyn2aim.F 228 AIM_DYN2AIM
         WRITE(msgBuf,'(A,3I4,3I3,I6,2F9.3)')
./pkg/aim_v23/aim_dyn2aim.F 231 AIM_DYN2AIM
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/aim_v23/aim_dyn2aim.F 67 AIM_DYN2AIM
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/aim_v23/aim_readparms.F 274 AIM_READPARMS
      WRITE(msgBuf,'(A)') ' AIM_READPARMS: opening data.aimphys'
./pkg/aim_v23/aim_readparms.F 275 AIM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/aim_v23/aim_readparms.F 304 AIM_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/aim_v23/aim_readparms.F 306 AIM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/aim_v23/aim_readparms.F 321 AIM_READPARMS
        WRITE(msgBuf,'(2A)') 'AIM_READPARMS: ',
./pkg/aim_v23/aim_readparms.F 323 AIM_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_readparms.F 328 AIM_READPARMS
        WRITE(msgBuf,'(2A)') 'AIM_READPARMS: ',
./pkg/aim_v23/aim_readparms.F 330 AIM_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_readparms.F 331 AIM_READPARMS
        WRITE(msgBuf,'(2A)')
./pkg/aim_v23/aim_readparms.F 333 AIM_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_readparms.F 342 AIM_READPARMS
        WRITE(msgBuf,'(2A)') 'AIM_READPARMS: ',
./pkg/aim_v23/aim_readparms.F 344 AIM_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_readparms.F 350 AIM_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** AIM_READPARMS: ',
./pkg/aim_v23/aim_readparms.F 352 AIM_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/aim_v23/aim_readparms.F 359 AIM_READPARMS
        WRITE(msgBuf,'(2A)') 'AIM_READPARMS: ',
./pkg/aim_v23/aim_readparms.F 361 AIM_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_readparms.F 362 AIM_READPARMS
        WRITE(msgBuf,'(2A)')
./pkg/aim_v23/aim_readparms.F 364 AIM_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_readparms.F 372 AIM_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/aim_v23/aim_readparms.F 374 AIM_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_readparms.F 375 AIM_READPARMS
        WRITE(msgBuf,'(2A)')
./pkg/aim_v23/aim_readparms.F 377 AIM_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_readparms.F 407 AIM_READPARMS
      WRITE(msgBuf,'(A)') ' '
./pkg/aim_v23/aim_readparms.F 408 AIM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 409 AIM_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/aim_v23/aim_readparms.F 410 AIM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 411 AIM_READPARMS
      WRITE(msgBuf,'(A)') '// AIM physics parameters :'
./pkg/aim_v23/aim_readparms.F 412 AIM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 413 AIM_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/aim_v23/aim_readparms.F 414 AIM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 450 AIM_READPARMS
       WRITE(msgBuf,'(2A)') 'aim_select_pCO2=',
./pkg/aim_v23/aim_readparms.F 452 AIM_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 456 AIM_READPARMS
       WRITE(msgBuf,'(2A)')
./pkg/aim_v23/aim_readparms.F 458 AIM_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 459 AIM_READPARMS
       WRITE(msgBuf,'(2A)')
./pkg/aim_v23/aim_readparms.F 461 AIM_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 462 AIM_READPARMS
       WRITE(msgBuf,'(2A)')
./pkg/aim_v23/aim_readparms.F 464 AIM_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 465 AIM_READPARMS
       WRITE(msgBuf,'(2A)')
./pkg/aim_v23/aim_readparms.F 467 AIM_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 584 AIM_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/aim_v23/aim_readparms.F 586 AIM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/aim_v23/aim_readparms.F 58 AIM_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/aim_v23/aim_readparms.F 600 AIM_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/aim_v23/aim_readparms.F 628 AIM_READPARMS
        WRITE(msgBuf,'(A,I3,A)')
./pkg/aim_v23/aim_readparms.F 630 AIM_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_write_local.F 49 AIM_WRITE_LOCAL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/aim_v23/aim_write_local.F 60 AIM_WRITE_LOCAL
          WRITE(msgBuf,'(A,I10,A,2I5,A,I4,2A)')
./pkg/aim_v23/aim_write_local.F 63 AIM_WRITE_LOCAL
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_write_local.F 64 AIM_WRITE_LOCAL
          WRITE(msgBuf,'(A,I4,A,I4)')
./pkg/aim_v23/aim_write_local.F 66 AIM_WRITE_LOCAL
          CALL PRINT_ERROR( msgBuf , myThid)
./pkg/aim_v23/aim_write_phys.F 52 AIM_WRITE_PHYS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/aim_v23/aim_write_phys.F 80 AIM_WRITE_PHYS
          WRITE(msgBuf,'(A,I10,A,2I5,A,I4,2A)')
./pkg/aim_v23/aim_write_phys.F 83 AIM_WRITE_PHYS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_write_phys.F 84 AIM_WRITE_PHYS
          WRITE(msgBuf,'(A,I4,A,I4)')
./pkg/aim_v23/aim_write_phys.F 86 AIM_WRITE_PHYS
          CALL PRINT_ERROR( msgBuf , myThid)
./pkg/aim_v23/aim_write_phys.F 90 AIM_WRITE_PHYS
          WRITE(msgBuf,'(A,I10,A,2I5,A,I4,2A)')
./pkg/aim_v23/aim_write_phys.F 93 AIM_WRITE_PHYS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/aim_v23/aim_write_phys.F 94 AIM_WRITE_PHYS
          WRITE(msgBuf,'(A,I4,A,I4)')
./pkg/aim_v23/aim_write_phys.F 97 AIM_WRITE_PHYS
          CALL PRINT_ERROR( msgBuf , myThid)
./pkg/aim_v23/aim_write_tave.F 193 AIM_WRITE_TAVE
         WRITE(msgBuf,'(A,I10)')
./pkg/aim_v23/aim_write_tave.F 195 AIM_WRITE_TAVE
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/aim_v23/aim_write_tave.F 197 AIM_WRITE_TAVE
         WRITE(msgBuf,'(A)') ' '
./pkg/aim_v23/aim_write_tave.F 198 AIM_WRITE_TAVE
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/aim_v23/aim_write_tave.F 48 AIM_WRITE_TAVE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/aim_v23/phy_suflux_post.F 148 SUFLUX_POST
         WRITE(msgBuf,'(A,1PE20.13,A,2I4)')
./pkg/aim_v23/phy_suflux_post.F 151 SUFLUX_POST
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/aim_v23/phy_suflux_post.F 152 SUFLUX_POST
         WRITE(msgBuf,'(A,1P3E10.3,A,0P3F8.5)')
./pkg/aim_v23/phy_suflux_post.F 155 SUFLUX_POST
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/aim_v23/phy_suflux_post.F 156 SUFLUX_POST
         WRITE(msgBuf,'(A,2I4,3I3,I6,2F9.3)')
./pkg/aim_v23/phy_suflux_post.F 159 SUFLUX_POST
         CALL PRINT_ERROR( msgBuf , myThid)
./pkg/aim_v23/phy_suflux_post.F 94 SUFLUX_POST
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm2d/atm2d_readparms.F 102 ATM2D_READPARMS
      WRITE(msgBuf,'(A)') ' ATM2D_READPARMS: read PARM01_ATM2D'
./pkg/atm2d/atm2d_readparms.F 103 ATM2D_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/atm2d/atm2d_readparms.F 47 ATM2D_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm2d/atm2d_readparms.F 52 ATM2D_READPARMS
      WRITE(msgBuf,'(A)') ' ATM2D_READPARMS: opening data.atm2d'
./pkg/atm2d/atm2d_readparms.F 53 ATM2D_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/atm_compon_interf/atm_check_cplconfig.F 49 ATM_CHECK_CPLCONFIG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_compon_interf/atm_check_cplconfig.F 69 ATM_CHECK_CPLCONFIG
        WRITE(msgBuf,'(2A,I4,A)') 'ATM_CHECK_CPLCONFIG: ',
./pkg/atm_compon_interf/atm_check_cplconfig.F 71 ATM_CHECK_CPLCONFIG
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/atm_check_cplconfig.F 90 ATM_CHECK_CPLCONFIG
           WRITE(msgBuf,'(2(A,I6),2(A,I4),A)')
./pkg/atm_compon_interf/atm_check_cplconfig.F 93 ATM_CHECK_CPLCONFIG
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/atm_check_cplconfig.F 94 ATM_CHECK_CPLCONFIG
           WRITE(msgBuf,'(A,E30.15)')
./pkg/atm_compon_interf/atm_check_cplconfig.F 96 ATM_CHECK_CPLCONFIG
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/atm_check_cplconfig.F 97 ATM_CHECK_CPLCONFIG
           WRITE(msgBuf,'(A,E30.15)')
./pkg/atm_compon_interf/atm_check_cplconfig.F 99 ATM_CHECK_CPLCONFIG
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 100 ATM_CPL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'ATM_CPL_READ_PICKUP: ',
./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 107 ATM_CPL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ATM_CPL_READ_PICKUP: ',
./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 112 ATM_CPL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./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 117 ATM_CPL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./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 120 ATM_CPL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./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 220 ATM_CPL_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'ATM_CPL_READ_PICKUP: ',
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 222 ATM_CPL_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 229 ATM_CPL_READ_PICKUP
         WRITE(msgBuf,'(4A)') 'ATM_CPL_READ_PICKUP: ',
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 231 ATM_CPL_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 56 ATM_CPL_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 81 ATM_CPL_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'ATM_CPL_READ_PICKUP: ',
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 83 ATM_CPL_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 84 ATM_CPL_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'ATM_CPL_READ_PICKUP: ',
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 86 ATM_CPL_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 96 ATM_CPL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'ATM_CPL_READ_PICKUP: ',
./pkg/atm_compon_interf/atm_cpl_read_pickup.F 99 ATM_CPL_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/atm_export_atmconfig.F 43 ATM_EXPORT_ATMCONFIG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_compon_interf/atm_export_atmconfig.F 54 ATM_EXPORT_ATMCONFIG
        WRITE(msgBuf,'(2A)') 'ATM_EXPORT_ATMCONFIG: ',
./pkg/atm_compon_interf/atm_export_atmconfig.F 56 ATM_EXPORT_ATMCONFIG
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/get_periodic_interval.F 56 GET_PERIODIC_INTERVAL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/get_periodic_interval.F 76 GET_PERIODIC_INTERVAL
        IF ( cycleLength.LT.0. ) WRITE(msgBuf,'(A)')
./eesupp/src/get_periodic_interval.F 78 GET_PERIODIC_INTERVAL
        IF ( recSpacing .LE.0. ) WRITE(msgBuf,'(A)')
./eesupp/src/get_periodic_interval.F 80 GET_PERIODIC_INTERVAL
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/get_periodic_interval.F 81 GET_PERIODIC_INTERVAL
        WRITE(msgBuf,'(A,2(A,1PE16.8))') 'GET_PERIODIC_INTERVAL: ',
./eesupp/src/get_periodic_interval.F 83 GET_PERIODIC_INTERVAL
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/get_periodic_interval.F 90 GET_PERIODIC_INTERVAL
        WRITE(msgBuf,'(2A,I5,A)') 'GET_PERIODIC_INTERVAL: ',
./eesupp/src/get_periodic_interval.F 92 GET_PERIODIC_INTERVAL
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/get_periodic_interval.F 93 GET_PERIODIC_INTERVAL
        WRITE(msgBuf,'(A,2(A,1PE16.8))') 'GET_PERIODIC_INTERVAL: ',
./eesupp/src/get_periodic_interval.F 95 GET_PERIODIC_INTERVAL
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_export_import_data.F 49 CPL_EXPORT_IMPORT_DATA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_compon_interf/cpl_export_import_data.F 60 CPL_EXPORT_IMPORT_DATA
         WRITE(msgBuf,'(A,I10)')
./pkg/atm_compon_interf/cpl_export_import_data.F 62 CPL_EXPORT_IMPORT_DATA
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/atm_compon_interf/cpl_export_import_data.F 89 CPL_EXPORT_IMPORT_DATA
         WRITE(msgBuf,'(A,I10)')
./pkg/atm_compon_interf/cpl_export_import_data.F 91 CPL_EXPORT_IMPORT_DATA
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/atm_compon_interf/cpl_import_cplparms.F 42 CPL_IMPORT_CPLPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_compon_interf/cpl_import_cplparms.F 84 CPL_IMPORT_CPLPARMS
        WRITE(msgBuf,'(2A,I4,A)') 'CPL_IMPORT_CPLPARMS: ',
./pkg/atm_compon_interf/cpl_import_cplparms.F 86 CPL_IMPORT_CPLPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_import_cplparms.F 87 CPL_IMPORT_CPLPARMS
        WRITE(msgBuf,'(2A,I4,A)') 'CPL_IMPORT_CPLPARMS: ',
./pkg/atm_compon_interf/cpl_import_cplparms.F 89 CPL_IMPORT_CPLPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 104 CPL_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/atm_compon_interf/cpl_readparms.F 106 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./pkg/atm_compon_interf/cpl_readparms.F 118 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 120 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 121 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 123 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 131 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: needs',
./pkg/atm_compon_interf/cpl_readparms.F 133 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 134 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 136 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 142 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: needs',
./pkg/atm_compon_interf/cpl_readparms.F 144 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 145 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 147 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 151 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: needs',
./pkg/atm_compon_interf/cpl_readparms.F 153 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 154 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 156 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 160 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: needs',
./pkg/atm_compon_interf/cpl_readparms.F 162 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 163 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 165 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 171 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: needs',
./pkg/atm_compon_interf/cpl_readparms.F 173 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 174 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 176 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 182 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: useImportThSIce',
./pkg/atm_compon_interf/cpl_readparms.F 184 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 185 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 187 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 190 CPL_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 192 CPL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/atm_compon_interf/cpl_readparms.F 194 CPL_READPARMS
        WRITE(msgBuf,'(2A)') '** WARNING ** CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 196 CPL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/atm_compon_interf/cpl_readparms.F 200 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: useImportFlxCO2',
./pkg/atm_compon_interf/cpl_readparms.F 202 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 203 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: ',
./pkg/atm_compon_interf/cpl_readparms.F 205 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 211 CPL_READPARMS
        WRITE(msgBuf,'(2A)') 'CPL_READPARMS: cpl_atmSendFrq',
./pkg/atm_compon_interf/cpl_readparms.F 213 CPL_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 225 CPL_READPARMS
      WRITE(msgBuf,'(A)') ' '
./pkg/atm_compon_interf/cpl_readparms.F 226 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 227 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/atm_compon_interf/cpl_readparms.F 228 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 229 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// Coupling set-up summary :'
./pkg/atm_compon_interf/cpl_readparms.F 230 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 231 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/atm_compon_interf/cpl_readparms.F 232 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 235 CPL_READPARMS
       WRITE(msgBuf,'(A)') '// -------'
./pkg/atm_compon_interf/cpl_readparms.F 236 CPL_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 237 CPL_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/atm_compon_interf/cpl_readparms.F 239 CPL_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 261 CPL_READPARMS
       WRITE(msgBuf,'(A)') '// -------'
./pkg/atm_compon_interf/cpl_readparms.F 262 CPL_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 263 CPL_READPARMS
       WRITE(msgBuf,'(A)')
./pkg/atm_compon_interf/cpl_readparms.F 265 CPL_READPARMS
       CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 296 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/atm_compon_interf/cpl_readparms.F 297 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 298 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// End of Coupling set-up summary'
./pkg/atm_compon_interf/cpl_readparms.F 299 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 300 CPL_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/atm_compon_interf/cpl_readparms.F 301 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./pkg/atm_compon_interf/cpl_readparms.F 49 CPL_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_compon_interf/cpl_readparms.F 79 CPL_READPARMS
      WRITE(msgBuf,'(A)') ' CPL_READPARMS: opening data.cpl'
./pkg/atm_compon_interf/cpl_readparms.F 80 CPL_READPARMS
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1 )
./pkg/atm_compon_interf/cpl_write_pickup.F 150 CPL_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'CPL_WRITE_PICKUP: ',
./pkg/atm_compon_interf/cpl_write_pickup.F 152 CPL_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_write_pickup.F 153 CPL_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'CPL_WRITE_PICKUP: ',
./pkg/atm_compon_interf/cpl_write_pickup.F 155 CPL_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_compon_interf/cpl_write_pickup.F 64 CPL_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_phys/atm_phys_check.F 31 ATM_PHYS_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_phys/atm_phys_check.F 35 ATM_PHYS_CHECK
       WRITE(msgBuf,'(A)') 'ATM_PHYS_CHECK: #define ALLOW_ATM_PHYS'
./pkg/atm_phys/atm_phys_check.F 36 ATM_PHYS_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/atm_phys/atm_phys_check.F 76 ATM_PHYS_CHECK
        WRITE(msgBuf,'(A)') 'An example requirement is:'
./pkg/atm_phys/atm_phys_check.F 77 ATM_PHYS_CHECK
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/atm_phys/atm_phys_check.F 78 ATM_PHYS_CHECK
        WRITE(msgBuf,'(A)') 'atmPhys_addTendT needs tempStepping=.true.'
./pkg/atm_phys/atm_phys_check.F 79 ATM_PHYS_CHECK
        CALL PRINT_ERROR( msgBuf , 1)
./pkg/atm_phys/atm_phys_check.F 84 ATM_PHYS_CHECK
       WRITE(msgBuf,'(A)') ' '
./pkg/atm_phys/atm_phys_check.F 85 ATM_PHYS_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/atm_phys/atm_phys_init_fixed.F 42 ATM_PHYS_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_phys/atm_phys_init_fixed.F 68 ATM_PHYS_INIT_FIXED
      WRITE(msgBuf,'(A)') 'ATM_PHYS_INIT_FIXED: opening data.atm_gray'
./pkg/atm_phys/atm_phys_init_fixed.F 69 ATM_PHYS_INIT_FIXED
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/atm_phys/atm_phys_init_fixed.F 78 ATM_PHYS_INIT_FIXED
      WRITE(msgBuf,'(A)')
./pkg/atm_phys/atm_phys_init_fixed.F 80 ATM_PHYS_INIT_FIXED
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./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 105 ATM_PHYS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ATM_PHYS_READ_PICKUP: ',
./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 110 ATM_PHYS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./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 121 ATM_PHYS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'ATM_PHYS_READ_PICKUP: ',
./pkg/atm_phys/atm_phys_read_pickup.F 123 ATM_PHYS_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_phys/atm_phys_read_pickup.F 155 ATM_PHYS_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'ATM_PHYS_READ_PICKUP: ',
./pkg/atm_phys/atm_phys_read_pickup.F 157 ATM_PHYS_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_phys/atm_phys_read_pickup.F 164 ATM_PHYS_READ_PICKUP
         WRITE(msgBuf,'(4A)') 'ATM_PHYS_READ_PICKUP: ',
./pkg/atm_phys/atm_phys_read_pickup.F 166 ATM_PHYS_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_phys/atm_phys_read_pickup.F 52 ATM_PHYS_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_phys/atm_phys_read_pickup.F 79 ATM_PHYS_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'ATM_PHYS_READ_PICKUP: ',
./pkg/atm_phys/atm_phys_read_pickup.F 81 ATM_PHYS_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_phys/atm_phys_read_pickup.F 82 ATM_PHYS_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'ATM_PHYS_READ_PICKUP: ',
./pkg/atm_phys/atm_phys_read_pickup.F 84 ATM_PHYS_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_phys/atm_phys_read_pickup.F 94 ATM_PHYS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'ATM_PHYS_READ_PICKUP: ',
./pkg/atm_phys/atm_phys_read_pickup.F 97 ATM_PHYS_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_phys/atm_phys_read_pickup.F 98 ATM_PHYS_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'ATM_PHYS_READ_PICKUP: ',
./pkg/atm_phys/atm_phys_readparms.F 32 ATM_PHYS_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_phys/atm_phys_readparms.F 72 ATM_PHYS_READPARMS
      WRITE(msgBuf,'(A)') 'ATM_PHYS_READPARMS: opening data.atm_phys'
./pkg/atm_phys/atm_phys_readparms.F 73 ATM_PHYS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/atm_phys/atm_phys_readparms.F 82 ATM_PHYS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/atm_phys/atm_phys_readparms.F 84 ATM_PHYS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/atm_phys/atm_phys_write_pickup.F 62 ATM_PHYS_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/atm_phys/atm_phys_write_pickup.F 91 ATM_PHYS_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'ATM_PHYS_WRITE_PICKUP: ',
./pkg/atm_phys/atm_phys_write_pickup.F 93 ATM_PHYS_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/atm_phys/atm_phys_write_pickup.F 94 ATM_PHYS_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'ATM_PHYS_WRITE_PICKUP: ',
./pkg/atm_phys/atm_phys_write_pickup.F 96 ATM_PHYS_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 151 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 154 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 162 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 165 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 210 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 213 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 234 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 237 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 249 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 252 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 264 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 267 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 276 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 279 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 282 INI_PROCS
       WRITE(msgBuf,'(A)')
./eesupp/src/ini_procs.F 284 INI_PROCS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_procs.F 286 INI_PROCS
       WRITE(msgBuf,'(A,I3,A,A)') ' My Processor Name (len:',
./eesupp/src/ini_procs.F 288 INI_PROCS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_procs.F 290 INI_PROCS
       WRITE(msgBuf,'(A,I3,A,I3,A,I3,A,I3,A)') ' Located at (',
./eesupp/src/ini_procs.F 293 INI_PROCS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_procs.F 295 INI_PROCS
       WRITE(msgBuf,'(A,I6,A,I6,A,I6,A,I6,A)') ' Origin at  (',
./eesupp/src/ini_procs.F 298 INI_PROCS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_procs.F 300 INI_PROCS
       WRITE(msgBuf,'(A,I4.4)')
./eesupp/src/ini_procs.F 302 INI_PROCS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_procs.F 304 INI_PROCS
       WRITE(msgBuf,'(A,I4.4)')
./eesupp/src/ini_procs.F 306 INI_PROCS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_procs.F 308 INI_PROCS
       WRITE(msgBuf,'(A,I4.4)')
./eesupp/src/ini_procs.F 310 INI_PROCS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_procs.F 312 INI_PROCS
       WRITE(msgBuf,'(A,I4.4)')
./eesupp/src/ini_procs.F 314 INI_PROCS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_procs.F 344 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 347 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 352 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 355 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 368 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 371 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 376 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 379 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 393 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 396 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 401 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 404 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 415 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 418 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 423 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 426 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 442 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 445 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 450 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 453 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 465 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 468 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 473 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 476 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 489 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 492 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 497 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 500 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 510 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 513 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 518 INI_PROCS
        WRITE(msgBuf,'(A,I5)')
./eesupp/src/ini_procs.F 521 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 540 INI_PROCS
        WRITE(msgBuf,'(2A,I6,A)') 'INI_PROCS: ',
./eesupp/src/ini_procs.F 542 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 543 INI_PROCS
        WRITE(msgBuf,'(2A)') 'INI_PROCS: ',
./eesupp/src/ini_procs.F 545 INI_PROCS
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_procs.F 64 INI_PROCS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/addummy_in_dynamics.F 67 ADDUMMY_IN_DYNAMICS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/addummy_in_stepping.F 82 ADDUMMY_IN_STEPPING
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/adread_adwrite.F 130 ADREAD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/adread_adwrite.F 175 ADREAD
        WRITE(msgBuf,'(2A,3I6,I9,2I3,2A)') 'ADREAD: ',
./pkg/autodiff/adread_adwrite.F 178 ADREAD
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/adread_adwrite.F 328 ADWRITE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/adread_adwrite.F 374 ADWRITE
        WRITE(msgBuf,'(2A,3I6,I9,2I3,2A)') 'ADWRITE:',
./pkg/autodiff/adread_adwrite.F 377 ADWRITE
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/adread_adwrite.F 393 ADWRITE
               write(msgBuf,'(A,2I5)')
./pkg/autodiff/adread_adwrite.F 396 ADWRITE
               CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/autodiff/adread_adwrite.F 398 ADWRITE
               write(msgBuf,'(2A)') 'for file ', fname(1:lenLoc)
./pkg/autodiff/adread_adwrite.F 399 ADWRITE
               CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/autodiff/autodiff_check.F 101 AUTODIFF_CHECK
        WRITE(msgBuf,'(A)')
./pkg/autodiff/autodiff_check.F 103 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 107 AUTODIFF_CHECK
        WRITE(msgBuf,'(A)')
./pkg/autodiff/autodiff_check.F 109 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 128 AUTODIFF_CHECK
       WRITE(msgBuf,'(2A)')
./pkg/autodiff/autodiff_check.F 131 AUTODIFF_CHECK
       CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 30 AUTODIFF_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/autodiff_check.F 38 AUTODIFF_CHECK
        WRITE(msgBuf,'(A)')
./pkg/autodiff/autodiff_check.F 40 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 41 AUTODIFF_CHECK
        WRITE(msgBuf,'(A,I10)')
./pkg/autodiff/autodiff_check.F 44 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 45 AUTODIFF_CHECK
        WRITE(msgBuf,'(A,I10)')
./pkg/autodiff/autodiff_check.F 48 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 53 AUTODIFF_CHECK
        WRITE(msgBuf,'(A)')
./pkg/autodiff/autodiff_check.F 55 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 56 AUTODIFF_CHECK
        WRITE(msgBuf,'(A,I10)')
./pkg/autodiff/autodiff_check.F 59 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 60 AUTODIFF_CHECK
        WRITE(msgBuf,'(A,I10)')
./pkg/autodiff/autodiff_check.F 63 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 70 AUTODIFF_CHECK
        WRITE(msgBuf,'(A)')
./pkg/autodiff/autodiff_check.F 72 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 73 AUTODIFF_CHECK
        WRITE(msgBuf,'(A,I10)')
./pkg/autodiff/autodiff_check.F 76 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 77 AUTODIFF_CHECK
        WRITE(msgBuf,'(A,I10)')
./pkg/autodiff/autodiff_check.F 80 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 86 AUTODIFF_CHECK
        WRITE(msgBuf,'(A)')
./pkg/autodiff/autodiff_check.F 88 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 89 AUTODIFF_CHECK
        WRITE(msgBuf,'(A,I10)')
./pkg/autodiff/autodiff_check.F 91 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_check.F 92 AUTODIFF_CHECK
        WRITE(msgBuf,'(A,I10)')
./pkg/autodiff/autodiff_check.F 94 AUTODIFF_CHECK
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/autodiff/autodiff_findunit.F 27 AUTODIFF_FINDUNIT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/autodiff_findunit.F 42 AUTODIFF_FINDUNIT
            WRITE(msgBuf,'(A,I4)')
./pkg/autodiff/autodiff_findunit.F 44 AUTODIFF_FINDUNIT
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_findunit.F 46 AUTODIFF_FINDUNIT
            WRITE(msgBuf,'(A)')
./pkg/autodiff/autodiff_findunit.F 48 AUTODIFF_FINDUNIT
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/autodiff/autodiff_findunit.F 60 AUTODIFF_FINDUNIT
        WRITE(msgBuf,'(A)')
./pkg/autodiff/autodiff_findunit.F 62 AUTODIFF_FINDUNIT
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_threading_environment.F 100 INI_THREADING_ENVIRONMENT
       CALL PRINT_ERROR(msgBuf, myThid)
./eesupp/src/ini_threading_environment.F 116 INI_THREADING_ENVIRONMENT
       WRITE(msgBuf,'(A,A,A,I5,A,I5)')
./eesupp/src/ini_threading_environment.F 120 INI_THREADING_ENVIRONMENT
       CALL PRINT_ERROR(msgBuf, myThid)
./eesupp/src/ini_threading_environment.F 126 INI_THREADING_ENVIRONMENT
       WRITE(msgBuf,'(A,A,A)')
./eesupp/src/ini_threading_environment.F 130 INI_THREADING_ENVIRONMENT
       CALL PRINT_ERROR(msgBuf, myThid)
./eesupp/src/ini_threading_environment.F 136 INI_THREADING_ENVIRONMENT
       WRITE(msgBuf,'(A,A,A)')
./eesupp/src/ini_threading_environment.F 140 INI_THREADING_ENVIRONMENT
       CALL PRINT_ERROR(msgBuf, myThid)
./eesupp/src/ini_threading_environment.F 167 INI_THREADING_ENVIRONMENT
      WRITE(msgBuf,'(A)')
./eesupp/src/ini_threading_environment.F 169 INI_THREADING_ENVIRONMENT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_threading_environment.F 171 INI_THREADING_ENVIRONMENT
      WRITE(msgBuf,'(A)') '// Mapping of tiles to threads'
./eesupp/src/ini_threading_environment.F 172 INI_THREADING_ENVIRONMENT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_threading_environment.F 175 INI_THREADING_ENVIRONMENT
      WRITE(msgBuf,'(A)')
./eesupp/src/ini_threading_environment.F 177 INI_THREADING_ENVIRONMENT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_threading_environment.F 180 INI_THREADING_ENVIRONMENT
       WRITE(msgBuf,'(A,I4,A,4(I4,A1))')
./eesupp/src/ini_threading_environment.F 183 INI_THREADING_ENVIRONMENT
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,SQUEEZE_BOTH , 1)
./eesupp/src/ini_threading_environment.F 185 INI_THREADING_ENVIRONMENT
      WRITE(msgBuf,'(A)')  ' '
./eesupp/src/ini_threading_environment.F 186 INI_THREADING_ENVIRONMENT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,SQUEEZE_RIGHT , 1)
./eesupp/src/ini_threading_environment.F 190 INI_THREADING_ENVIRONMENT
      WRITE(msgBuf,'(A)')
./eesupp/src/ini_threading_environment.F 192 INI_THREADING_ENVIRONMENT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_threading_environment.F 194 INI_THREADING_ENVIRONMENT
      WRITE(msgBuf,'(A)') '// Tile <-> Tile connectvity table'
./eesupp/src/ini_threading_environment.F 195 INI_THREADING_ENVIRONMENT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_threading_environment.F 197 INI_THREADING_ENVIRONMENT
      WRITE(msgBuf,'(A)')
./eesupp/src/ini_threading_environment.F 199 INI_THREADING_ENVIRONMENT
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/ini_threading_environment.F 203 INI_THREADING_ENVIRONMENT
        WRITE(msgBuf,'(A,A,I6.6,A,I6.6,A)')
./eesupp/src/ini_threading_environment.F 206 INI_THREADING_ENVIRONMENT
        CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT , 1)
./eesupp/src/ini_threading_environment.F 209 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A,A,I6.6,A,I6.6,A,A)')
./eesupp/src/ini_threading_environment.F 214 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 215 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A,A,I6.6,A,I6.6)')
./eesupp/src/ini_threading_environment.F 219 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 221 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A)')
./eesupp/src/ini_threading_environment.F 223 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 227 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A,A,I6.6,A,I6.6,A,A)')
./eesupp/src/ini_threading_environment.F 232 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 233 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A,A,I6.6,A,I6.6)')
./eesupp/src/ini_threading_environment.F 237 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 239 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A)')
./eesupp/src/ini_threading_environment.F 241 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 245 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A,A,I6.6,A,I6.6,A,A)')
./eesupp/src/ini_threading_environment.F 250 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 251 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A,A,I6.6,A,I6.6)')
./eesupp/src/ini_threading_environment.F 255 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 257 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A)')
./eesupp/src/ini_threading_environment.F 259 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 263 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A,A,I6.6,A,I6.6,A,A)')
./eesupp/src/ini_threading_environment.F 268 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 269 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A,A,I6.6,A,I6.6)')
./eesupp/src/ini_threading_environment.F 273 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 275 INI_THREADING_ENVIRONMENT
         WRITE(msgBuf,'(A)')
./eesupp/src/ini_threading_environment.F 277 INI_THREADING_ENVIRONMENT
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 281 INI_THREADING_ENVIRONMENT
      WRITE(msgBuf,'(A)')  ' '
./eesupp/src/ini_threading_environment.F 282 INI_THREADING_ENVIRONMENT
      CALL PRINT_MESSAGE( msgBuf,standardMessageUnit,SQUEEZE_RIGHT, 1)
./eesupp/src/ini_threading_environment.F 290 INI_THREADING_ENVIRONMENT
        WRITE(msgBuf,'(2A)') 'EXCH-1 useCubedSphereExchange',
./eesupp/src/ini_threading_environment.F 292 INI_THREADING_ENVIRONMENT
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_threading_environment.F 298 INI_THREADING_ENVIRONMENT
        WRITE(msgBuf,'(2A)') 'EXCH-1 useCubedSphereExchange',
./eesupp/src/ini_threading_environment.F 300 INI_THREADING_ENVIRONMENT
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_threading_environment.F 316 INI_THREADING_ENVIRONMENT
        WRITE(msgBuf,'(3A)') 'EXCH-1 using Comm = ',
./eesupp/src/ini_threading_environment.F 318 INI_THREADING_ENVIRONMENT
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/ini_threading_environment.F 57 INI_THREADING_ENVIRONMENT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/ini_threading_environment.F 92 INI_THREADING_ENVIRONMENT
       WRITE(msgBuf,'(2A,2I6)')
./eesupp/src/ini_threading_environment.F 96 INI_THREADING_ENVIRONMENT
       CALL PRINT_ERROR(msgBuf, myThid)
./eesupp/src/ini_threading_environment.F 97 INI_THREADING_ENVIRONMENT
       WRITE(msgBuf,'(2A)')
./pkg/autodiff/autodiff_inadmode_set_ad.F 100 ADAUTODIFF_INADMODE_SET
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 104 ADAUTODIFF_INADMODE_SET
         WRITE(msgBuf,'(2A,L5)') 'S/R ADAUTODIFF_INADMODE_SET: ',
./pkg/autodiff/autodiff_inadmode_set_ad.F 106 ADAUTODIFF_INADMODE_SET
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 110 ADAUTODIFF_INADMODE_SET
         WRITE(msgBuf,'(2A,I2)') 'S/R ADAUTODIFF_INADMODE_SET: ',
./pkg/autodiff/autodiff_inadmode_set_ad.F 112 ADAUTODIFF_INADMODE_SET
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 31 ADAUTODIFF_INADMODE_SET
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/autodiff_inadmode_set_ad.F 57 ADAUTODIFF_INADMODE_SET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_set_ad.F 59 ADAUTODIFF_INADMODE_SET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 61 ADAUTODIFF_INADMODE_SET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_set_ad.F 63 ADAUTODIFF_INADMODE_SET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 65 ADAUTODIFF_INADMODE_SET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_set_ad.F 67 ADAUTODIFF_INADMODE_SET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 69 ADAUTODIFF_INADMODE_SET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_set_ad.F 71 ADAUTODIFF_INADMODE_SET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 73 ADAUTODIFF_INADMODE_SET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_set_ad.F 76 ADAUTODIFF_INADMODE_SET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 79 ADAUTODIFF_INADMODE_SET
       WRITE(msgBuf,'(A,1PE21.14)')
./pkg/autodiff/autodiff_inadmode_set_ad.F 81 ADAUTODIFF_INADMODE_SET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 85 ADAUTODIFF_INADMODE_SET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_set_ad.F 88 ADAUTODIFF_INADMODE_SET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 94 ADAUTODIFF_INADMODE_SET
         WRITE(msgBuf,'(2A,L5)') 'S/R ADAUTODIFF_INADMODE_SET: ',
./pkg/autodiff/autodiff_inadmode_set_ad.F 96 ADAUTODIFF_INADMODE_SET
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_set_ad.F 98 ADAUTODIFF_INADMODE_SET
         WRITE(msgBuf,'(2A,L5)') 'S/R ADAUTODIFF_INADMODE_SET: ',
./pkg/autodiff/autodiff_inadmode_unset_ad.F 103 ADAUTODIFF_INADMODE_UNSET
         WRITE(msgBuf,'(2A,L5)') 'S/R ADAUTODIFF_INADMODE_UNSET: ',
./pkg/autodiff/autodiff_inadmode_unset_ad.F 105 ADAUTODIFF_INADMODE_UNSET
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 109 ADAUTODIFF_INADMODE_UNSET
         WRITE(msgBuf,'(2A,I2)') 'S/R ADAUTODIFF_INADMODE_UNSET: ',
./pkg/autodiff/autodiff_inadmode_unset_ad.F 111 ADAUTODIFF_INADMODE_UNSET
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 31 ADAUTODIFF_INADMODE_UNSET
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/autodiff_inadmode_unset_ad.F 56 ADAUTODIFF_INADMODE_UNSET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_unset_ad.F 58 ADAUTODIFF_INADMODE_UNSET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 60 ADAUTODIFF_INADMODE_UNSET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_unset_ad.F 62 ADAUTODIFF_INADMODE_UNSET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 64 ADAUTODIFF_INADMODE_UNSET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_unset_ad.F 66 ADAUTODIFF_INADMODE_UNSET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 68 ADAUTODIFF_INADMODE_UNSET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_unset_ad.F 70 ADAUTODIFF_INADMODE_UNSET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 72 ADAUTODIFF_INADMODE_UNSET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_unset_ad.F 75 ADAUTODIFF_INADMODE_UNSET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 78 ADAUTODIFF_INADMODE_UNSET
       WRITE(msgBuf,'(A,1PE21.14)')
./pkg/autodiff/autodiff_inadmode_unset_ad.F 80 ADAUTODIFF_INADMODE_UNSET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 84 ADAUTODIFF_INADMODE_UNSET
       WRITE(msgBuf,'(A,L5)')
./pkg/autodiff/autodiff_inadmode_unset_ad.F 87 ADAUTODIFF_INADMODE_UNSET
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 93 ADAUTODIFF_INADMODE_UNSET
         WRITE(msgBuf,'(2A,L5)') 'S/R ADAUTODIFF_INADMODE_UNSET: ',
./pkg/autodiff/autodiff_inadmode_unset_ad.F 95 ADAUTODIFF_INADMODE_UNSET
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_inadmode_unset_ad.F 97 ADAUTODIFF_INADMODE_UNSET
         WRITE(msgBuf,'(2A,L5)') 'S/R ADAUTODIFF_INADMODE_UNSET: ',
./pkg/autodiff/autodiff_inadmode_unset_ad.F 99 ADAUTODIFF_INADMODE_UNSET
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_ini_model_io.F 53 AUTODIFF_INI_MODEL_IO
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/autodiff_ini_model_io.F 82 AUTODIFF_INI_MODEL_IO
       WRITE(msgBuf,'(2A)') '** WARNING ** AUTODIFF_INI_MODEL_IO: ',
./pkg/autodiff/autodiff_ini_model_io.F 84 AUTODIFF_INI_MODEL_IO
       CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/autodiff/autodiff_readparms.F 135 AUTODIFF_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/autodiff/autodiff_readparms.F 136 AUTODIFF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_readparms.F 138 AUTODIFF_READPARMS
      WRITE(msgBuf,'(A)') '// AUTODIFF parameters :'
./pkg/autodiff/autodiff_readparms.F 139 AUTODIFF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_readparms.F 141 AUTODIFF_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/autodiff/autodiff_readparms.F 142 AUTODIFF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_readparms.F 174 AUTODIFF_READPARMS
      WRITE(msgBuf,'(A)') ' '
./pkg/autodiff/autodiff_readparms.F 175 AUTODIFF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_readparms.F 181 AUTODIFF_READPARMS
        WRITE(msgBuf,'(2A)') 'AUTODIFF_READPARMS: ',
./pkg/autodiff/autodiff_readparms.F 183 AUTODIFF_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/autodiff/autodiff_readparms.F 187 AUTODIFF_READPARMS
        WRITE(msgBuf,'(2A)') 'AUTODIFF_READPARMS: ',
./pkg/autodiff/autodiff_readparms.F 189 AUTODIFF_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/autodiff/autodiff_readparms.F 198 AUTODIFF_READPARMS
        WRITE(msgBuf,'(A,I3,A)')
./pkg/autodiff/autodiff_readparms.F 200 AUTODIFF_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/autodiff/autodiff_readparms.F 32 AUTODIFF_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/autodiff/autodiff_readparms.F 80 AUTODIFF_READPARMS
      WRITE(msgBuf,'(A)') 'AUTODIFF_READPARMS: opening data.autodiff'
./pkg/autodiff/autodiff_readparms.F 81 AUTODIFF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_readparms.F 90 AUTODIFF_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/autodiff/autodiff_readparms.F 92 AUTODIFF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/autodiff_whtapeio_sync.F 119 AUTODIFF_WHTAPEIO_SYNC
          write(msgBuf,'(a,i1,a,i3)') 'whio : create lev ',
./pkg/autodiff/autodiff_whtapeio_sync.F 122 AUTODIFF_WHTAPEIO_SYNC
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/autodiff/autodiff_whtapeio_sync.F 148 AUTODIFF_WHTAPEIO_SYNC
          write(msgBuf,'(a,i1,a,i3)') 'whio : write lev ',
./pkg/autodiff/autodiff_whtapeio_sync.F 151 AUTODIFF_WHTAPEIO_SYNC
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/autodiff/autodiff_whtapeio_sync.F 55 AUTODIFF_WHTAPEIO_SYNC
      character*(max_len_mbuf) msgBuf
./eesupp/src/main.F 117 NO PROCEDURE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/main.F 215 NO PROCEDURE
       WRITE( msgBuf,'(A)') 'PROGRAM MAIN: ends with fatal Error'
./eesupp/src/main.F 216 NO PROCEDURE
       CALL PRINT_ERROR( msgBuf, 1 )
./pkg/autodiff/g_dummy_in_stepping.F 134 G_DUMMY_IN_STEPPING
         WRITE(msgBuf,'(A)')  'S/R WRITE_STATE'
./pkg/autodiff/g_dummy_in_stepping.F 135 G_DUMMY_IN_STEPPING
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/autodiff/g_dummy_in_stepping.F 136 G_DUMMY_IN_STEPPING
         WRITE(msgBuf,'(A)')  'Error writing out model state'
./pkg/autodiff/g_dummy_in_stepping.F 137 G_DUMMY_IN_STEPPING
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/autodiff/g_dummy_in_stepping.F 138 G_DUMMY_IN_STEPPING
         WRITE(msgBuf,'(A,I10)') 'Timestep ',myIter
./pkg/autodiff/g_dummy_in_stepping.F 139 G_DUMMY_IN_STEPPING
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/autodiff/g_dummy_in_stepping.F 141 G_DUMMY_IN_STEPPING
         WRITE(msgBuf,'(A,I10)')
./pkg/autodiff/g_dummy_in_stepping.F 143 G_DUMMY_IN_STEPPING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/g_dummy_in_stepping.F 145 G_DUMMY_IN_STEPPING
         WRITE(msgBuf,'(A)')  ' '
./pkg/autodiff/g_dummy_in_stepping.F 146 G_DUMMY_IN_STEPPING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/autodiff/g_dummy_in_stepping.F 65 G_DUMMY_IN_STEPPING
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bbl/bbl_check.F 31 BBL_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bbl/bbl_check.F 35 BBL_CHECK
       WRITE(msgBuf,'(A)') 'BBL_CHECK: #define BBL'
./pkg/bbl/bbl_check.F 36 BBL_CHECK
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bbl/bbl_read_pickup.F 101 BBL_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bbl/bbl_read_pickup.F 104 BBL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/bbl/bbl_read_pickup.F 106 BBL_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bbl/bbl_read_pickup.F 108 BBL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'BBL_READ_PICKUP: ',
./pkg/bbl/bbl_read_pickup.F 110 BBL_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bbl/bbl_read_pickup.F 142 BBL_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'BBL_READ_PICKUP: ',
./pkg/bbl/bbl_read_pickup.F 144 BBL_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bbl/bbl_read_pickup.F 150 BBL_READ_PICKUP
         WRITE(msgBuf,'(4A)') 'BBL_READ_PICKUP: ',
./pkg/bbl/bbl_read_pickup.F 152 BBL_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bbl/bbl_read_pickup.F 51 BBL_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bbl/bbl_read_pickup.F 75 BBL_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'BBL_READ_PICKUP: ',
./pkg/bbl/bbl_read_pickup.F 77 BBL_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bbl/bbl_read_pickup.F 78 BBL_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'BBL_READ_PICKUP: ',
./pkg/bbl/bbl_read_pickup.F 80 BBL_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bbl/bbl_read_pickup.F 89 BBL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'BBL_READ_PICKUP: ',
./pkg/bbl/bbl_read_pickup.F 92 BBL_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bbl/bbl_read_pickup.F 93 BBL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'BBL_READ_PICKUP: ',
./pkg/bbl/bbl_read_pickup.F 96 BBL_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bbl/bbl_read_pickup.F 99 BBL_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> BBL_READ_PICKUP: ',
./pkg/bbl/bbl_readparms.F 32 BBL_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bbl/bbl_readparms.F 63 BBL_READPARMS
      WRITE(msgBuf,'(A)') 'BBL_READPARMS: opening data.bbl'
./pkg/bbl/bbl_readparms.F 64 BBL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bbl/bbl_readparms.F 73 BBL_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/bbl/bbl_readparms.F 75 BBL_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bbl/bbl_write_pickup.F 60 BBL_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bbl/bbl_write_pickup.F 93 BBL_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'BBL_WRITE_PICKUP: ',
./pkg/bbl/bbl_write_pickup.F 95 BBL_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bbl/bbl_write_pickup.F 96 BBL_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'BBL_WRITE_PICKUP: ',
./pkg/bbl/bbl_write_pickup.F 98 BBL_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bling/bling_ini_forcing.F 40 BLING_INI_FORCING
       CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bling/bling_ini_forcing.F 66 BLING_INI_FORCING
        WRITE(msgBuf,'(2A)')
./pkg/bling/bling_ini_forcing.F 69 BLING_INI_FORCING
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bling/bling_init_fixed.F 30 BLING_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bling/bling_read_pickup.F 37 BLING_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bling/bling_read_pickup.F 90 BLING_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'BLING_READ_PICKUP: ',
./pkg/bling/bling_read_pickup.F 93 BLING_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bling/bling_read_pickup.F 96 BLING_READ_PICKUP
          WRITE(msgBuf,'(2A)') 'WARNING >> BLING_READ_PICKUP: ',
./pkg/bling/bling_read_pickup.F 98 BLING_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/bling/bling_readparms.F 346 BLING_READPARMS
      WRITE(msgBuf,'(A)') ' BLING_READPARMS: opening data.bling'
./pkg/bling/bling_readparms.F 347 BLING_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bling/bling_readparms.F 364 BLING_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/bling/bling_readparms.F 366 BLING_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bling/bling_readparms.F 389 BLING_READPARMS
       WRITE(msgBuf,'(A,I3,A)')
./pkg/bling/bling_readparms.F 391 BLING_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bling/bling_readparms.F 47 BLING_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bling/bling_tr_register.F 37 BLING_TR_REGISTER
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bling/bling_tr_register.F 47 BLING_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') ' BLING_TR_REGISTER:',
./pkg/bling/bling_tr_register.F 49 BLING_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bling/bling_tr_register.F 51 BLING_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') ' BLING_TR_REGISTER:',
./pkg/bling/bling_tr_register.F 53 BLING_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bling/bling_tr_register.F 59 BLING_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') ' BLING_TR_REGISTER:',
./pkg/bling/bling_tr_register.F 61 BLING_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bling/bling_write_pickup.F 52 BLING_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/bling/bling_write_pickup.F 93 BLING_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'BLING_WRITE_PICKUP: ',
./pkg/bling/bling_write_pickup.F 95 BLING_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bling/bling_write_pickup.F 96 BLING_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'BLING_WRITE_PICKUP: ',
./pkg/bling/bling_write_pickup.F 98 BLING_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/bulk_force/bulkf_readparms.F 151 BULKF_READPARMS
      WRITE(msgBuf,'(A)')' BULKF_READPARMS: starts to read BULKF_CONST'
./pkg/bulk_force/bulkf_readparms.F 152 BULKF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bulk_force/bulkf_readparms.F 155 BULKF_READPARMS
      WRITE(msgBuf,'(A)') ' BULKF_READPARMS: read BULKF_CONST : OK'
./pkg/bulk_force/bulkf_readparms.F 156 BULKF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bulk_force/bulkf_readparms.F 159 BULKF_READPARMS
      WRITE(msgBuf,'(A)')' BULKF_READPARMS: starts to read BULKF_PARM01'
./pkg/bulk_force/bulkf_readparms.F 160 BULKF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bulk_force/bulkf_readparms.F 163 BULKF_READPARMS
      WRITE(msgBuf,'(A)') ' BULKF_READPARMS: read BULKF_PARM01 : OK'
./pkg/bulk_force/bulkf_readparms.F 164 BULKF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bulk_force/bulkf_readparms.F 171 BULKF_READPARMS
      WRITE(msgBuf,'(A)')' BULKF_READPARMS: starts reading BULKF_PARM02'
./pkg/bulk_force/bulkf_readparms.F 172 BULKF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bulk_force/bulkf_readparms.F 175 BULKF_READPARMS
      WRITE(msgBuf,'(A)') ' BULKF_READPARMS: read BULKF_PARM02 : OK'
./pkg/bulk_force/bulkf_readparms.F 176 BULKF_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/bulk_force/bulkf_readparms.F 191 BULKF_READPARMS
        WRITE(msgBuf,'(2A)') ' BULKF_READPARMS: ',
./pkg/bulk_force/bulkf_readparms.F 193 BULKF_READPARMS
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/bulk_force/bulkf_readparms.F 194 BULKF_READPARMS
        WRITE(msgBuf,'(2A)') ' BULKF_READPARMS: => recompile with',
./pkg/bulk_force/bulkf_readparms.F 196 BULKF_READPARMS
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/bulk_force/bulkf_readparms.F 32 BULKF_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/mds_reclen.F 28 NO PROCEDURE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/mds_reclen.F 36 NO PROCEDURE
       WRITE(msgBuf,'(A,I2.2)')
./eesupp/src/mds_reclen.F 38 NO PROCEDURE
       CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/mds_reclen.F 39 NO PROCEDURE
       WRITE(msgBuf,'(A)')
./eesupp/src/mds_reclen.F 41 NO PROCEDURE
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_addtime.F 65 CAL_ADDTIME
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_addtime.F 69 CAL_ADDTIME
        WRITE( msgBuf,'(2A,4I9)')  'CAL_ADDTIME: ',
./pkg/cal/cal_addtime.F 71 CAL_ADDTIME
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_addtime.F 72 CAL_ADDTIME
        WRITE( msgBuf,'(2A,4I9)')  'CAL_ADDTIME: ',
./pkg/cal/cal_addtime.F 74 CAL_ADDTIME
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_addtime.F 75 CAL_ADDTIME
        WRITE( msgBuf,'(2A,I2,A)') 'CAL_ADDTIME: ',
./pkg/cal/cal_addtime.F 77 CAL_ADDTIME
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_checkdate.F 109 CAL_CHECKDATE
          WRITE( msgBuf,'(2A,I10)') 'CAL_CHECKDATE:',
./pkg/cal/cal_checkdate.F 111 CAL_CHECKDATE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_checkdate.F 126 CAL_CHECKDATE
          WRITE( msgBuf,'(2A,I10)') '** WARNING ** CAL_CHECKDATE:',
./pkg/cal/cal_checkdate.F 128 CAL_CHECKDATE
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/cal/cal_checkdate.F 132 CAL_CHECKDATE
          WRITE( msgBuf,'(2A,I10)') '** WARNING ** CAL_CHECKDATE:',
./pkg/cal/cal_checkdate.F 134 CAL_CHECKDATE
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/cal/cal_checkdate.F 138 CAL_CHECKDATE
          WRITE( msgBuf,'(2A,I10)') '** WARNING ** CAL_CHECKDATE:',
./pkg/cal/cal_checkdate.F 140 CAL_CHECKDATE
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/cal/cal_checkdate.F 52 CAL_CHECKDATE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_checkdate.F 68 CAL_CHECKDATE
          WRITE( msgBuf,'(2A,4I9)')  'CAL_CHECKDATE:',
./pkg/cal/cal_checkdate.F 70 CAL_CHECKDATE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_checkdate.F 71 CAL_CHECKDATE
          WRITE( msgBuf,'(2A,I2,A)') 'CAL_CHECKDATE:',
./pkg/cal/cal_checkdate.F 73 CAL_CHECKDATE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_checkdate.F 92 CAL_CHECKDATE
          WRITE( msgBuf,'(2A,I10)') 'CAL_CHECKDATE:',
./pkg/cal/cal_checkdate.F 94 CAL_CHECKDATE
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_convdate.F 50 CAL_CONVDATE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_convdate.F 54 CAL_CONVDATE
        WRITE( msgBuf,'(2A,4I9)') 'CAL_CONVDATE: ',
./pkg/cal/cal_convdate.F 56 CAL_CONVDATE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_convdate.F 57 CAL_CONVDATE
        WRITE( msgBuf,'(2A,I2,A)') 'CAL_CONVDATE: ',
./pkg/cal/cal_convdate.F 59 CAL_CONVDATE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_fulldate.F 101 CAL_FULLDATE
        WRITE( msgBuf,'(2A)') 'CAL_FULLDATE: ',
./pkg/cal/cal_fulldate.F 103 CAL_FULLDATE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_fulldate.F 53 CAL_FULLDATE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_fulldate.F 62 CAL_FULLDATE
        WRITE( msgBuf,'(A,2(A,I9))')  'CAL_FULLDATE: ',
./pkg/cal/cal_fulldate.F 64 CAL_FULLDATE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_fulldate.F 65 CAL_FULLDATE
        WRITE( msgBuf,'(2A,I2,A)') 'CAL_FULLDATE: ',
./pkg/cal/cal_fulldate.F 67 CAL_FULLDATE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_fulldate.F 74 CAL_FULLDATE
        WRITE( msgBuf,'(A,2(A,I9))')  'CAL_FULLDATE: ',
./pkg/cal/cal_fulldate.F 76 CAL_FULLDATE
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/mdsfindunit.F 27 MDSFINDUNIT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/mdsfindunit.F 46 MDSFINDUNIT
            WRITE(msgBuf,'(A,I4)')
./eesupp/src/mdsfindunit.F 48 MDSFINDUNIT
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/mdsfindunit.F 50 MDSFINDUNIT
            WRITE(msgBuf,'(A)')
./eesupp/src/mdsfindunit.F 52 MDSFINDUNIT
            CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/mdsfindunit.F 64 MDSFINDUNIT
        WRITE(msgBuf,'(A)')
./eesupp/src/mdsfindunit.F 66 MDSFINDUNIT
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_getdate.F 47 CAL_GETDATE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_getdate.F 60 CAL_GETDATE
        WRITE( msgBuf,'(2A,I10,A,F19.2)') 'CAL_GETDATE: ',
./pkg/cal/cal_getdate.F 62 CAL_GETDATE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_getdate.F 63 CAL_GETDATE
        WRITE( msgBuf,'(2A,I2,A)') 'CAL_GETDATE: ',
./pkg/cal/cal_getdate.F 65 CAL_GETDATE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_isleap.F 40 NO PROCEDURE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_isleap.F 44 NO PROCEDURE
        WRITE( msgBuf,'(A,2(A,I9))')  'CAL_ISLEAP: ',
./pkg/cal/cal_isleap.F 46 NO PROCEDURE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_isleap.F 47 NO PROCEDURE
        WRITE( msgBuf,'(2A,I2,A)') 'CAL_ISLEAP: ',
./pkg/cal/cal_isleap.F 49 NO PROCEDURE
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_printdate.F 60 CAL_PRINTDATE
        write(msgBuf,'(i10,i8,i3,i4)') caldate(1), caldate(2),
./pkg/cal/cal_printdate.F 62 CAL_PRINTDATE
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cal/cal_printdate.F 66 CAL_PRINTDATE
        write(msgBuf,'(i10,i8,i3,i4)') caldate(1), caldate(2),
./pkg/cal/cal_printdate.F 68 CAL_PRINTDATE
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cal/cal_printerror.F 125 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 127 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 128 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 130 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 132 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 133 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 135 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 137 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 138 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 140 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 142 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 143 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 228 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 230 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 231 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 240 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 242 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 243 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 252 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 254 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 255 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 264 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 266 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 267 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 268 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 270 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 271 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 280 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 282 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 283 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 292 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 294 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 295 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 304 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 306 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 307 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 316 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 318 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 319 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 353 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 355 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 356 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 357 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 359 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 360 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 362 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 364 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 365 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 367 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 369 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 370 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 372 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 374 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 375 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 377 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 379 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 380 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 382 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 384 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 385 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 387 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 389 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 390 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 392 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 394 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 395 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 397 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 399 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 400 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 414 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 416 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 417 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 431 CAL_PRINTERROR
         WRITE(msgBuf,'(A)')
./pkg/cal/cal_printerror.F 433 CAL_PRINTERROR
         CALL PRINT_MESSAGE(msgBuf,standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/cal/cal_printerror.F 434 CAL_PRINTERROR
         CALL PRINT_ERROR( msgBuf , 1)
./pkg/cal/cal_printerror.F 98 CAL_PRINTERROR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_readparms.F 101 CAL_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/cal/cal_readparms.F 103 CAL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_readparms.F 57 CAL_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_readparms.F 92 CAL_READPARMS
        WRITE(msgBuf,'(A)') 'CAL_READPARMS: opening data.cal'
./pkg/cal/cal_readparms.F 93 CAL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_subdates.F 46 CAL_SUBDATES
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_subdates.F 51 CAL_SUBDATES
        WRITE( msgBuf,'(2A,4I9)') 'CAL_SUBDATES: ', 'finaldate=',
./pkg/cal/cal_subdates.F 53 CAL_SUBDATES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_subdates.F 54 CAL_SUBDATES
        WRITE( msgBuf,'(2A,4I9)') 'CAL_SUBDATES: ', 'initialdate=',
./pkg/cal/cal_subdates.F 56 CAL_SUBDATES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_subdates.F 57 CAL_SUBDATES
        WRITE( msgBuf,'(2A,I2,A)') 'CAL_SUBDATES: ',
./pkg/cal/cal_subdates.F 59 CAL_SUBDATES
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_summary.F 132 CAL_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/cal/cal_summary.F 133 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_summary.F 135 CAL_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/cal/cal_summary.F 137 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_summary.F 139 CAL_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/cal/cal_summary.F 141 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_summary.F 143 CAL_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/cal/cal_summary.F 145 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_summary.F 147 CAL_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/cal/cal_summary.F 148 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_summary.F 37 CAL_SUMMARY
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_summary.F 58 CAL_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/cal/cal_summary.F 59 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_summary.F 61 CAL_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/cal/cal_summary.F 63 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_summary.F 65 CAL_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/cal/cal_summary.F 67 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_summary.F 69 CAL_SUMMARY
      WRITE(msgBuf,'(A)')
./pkg/cal/cal_summary.F 71 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_summary.F 73 CAL_SUMMARY
      WRITE(msgBuf,'(A)') ' '
./pkg/cal/cal_summary.F 74 CAL_SUMMARY
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cal/cal_timeinterval.F 52 CAL_TIMEINTERVAL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_timeinterval.F 63 CAL_TIMEINTERVAL
          WRITE( msgBuf,'(2A,F19.2,2A)')  'CAL_TIMEINTERVAL: ',
./pkg/cal/cal_timeinterval.F 65 CAL_TIMEINTERVAL
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_timeinterval.F 66 CAL_TIMEINTERVAL
          WRITE( msgBuf,'(2A,I2,A)') 'CAL_TIMEINTERVAL: ',
./pkg/cal/cal_timeinterval.F 68 CAL_TIMEINTERVAL
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_timeinterval.F 79 CAL_TIMEINTERVAL
          WRITE( msgBuf,'(2A,F15.2,2A)')  'CAL_TIMEINTERVAL: ',
./pkg/cal/cal_timeinterval.F 81 CAL_TIMEINTERVAL
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_timeinterval.F 82 CAL_TIMEINTERVAL
          WRITE( msgBuf,'(2A,I2,A)') 'CAL_TIMEINTERVAL: ',
./pkg/cal/cal_timeinterval.F 84 CAL_TIMEINTERVAL
          CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/nml_change_syntax.F 114 NML_CHANGE_SYNTAX
            WRITE(msgBuf,'(2A)') 'NML_CHANGE_SYNTAX: warning: ',
./eesupp/src/nml_change_syntax.F 116 NML_CHANGE_SYNTAX
            CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/nml_change_syntax.F 118 NML_CHANGE_SYNTAX
            WRITE(msgBuf,'(4A)') 'NML_CHANGE_SYNTAX: ',
./eesupp/src/nml_change_syntax.F 121 NML_CHANGE_SYNTAX
            CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/nml_change_syntax.F 144 NML_CHANGE_SYNTAX
          WRITE(msgBuf,'(2A)') 'NML_CHANGE_SYNTAX: ',
./eesupp/src/nml_change_syntax.F 146 NML_CHANGE_SYNTAX
          CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/nml_change_syntax.F 148 NML_CHANGE_SYNTAX
          WRITE(msgBuf,'(4A)') 'NML_CHANGE_SYNTAX: ',
./eesupp/src/nml_change_syntax.F 151 NML_CHANGE_SYNTAX
          CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/nml_change_syntax.F 200 NML_CHANGE_SYNTAX
           WRITE(msgBuf,'(2A)') 'NML_CHANGE_SYNTAX: ',
./eesupp/src/nml_change_syntax.F 202 NML_CHANGE_SYNTAX
           CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/nml_change_syntax.F 204 NML_CHANGE_SYNTAX
           WRITE(msgBuf,'(4A)') 'NML_CHANGE_SYNTAX: ',
./eesupp/src/nml_change_syntax.F 207 NML_CHANGE_SYNTAX
           CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/nml_change_syntax.F 221 NML_CHANGE_SYNTAX
           WRITE(msgBuf,'(2A)') 'NML_CHANGE_SYNTAX: ',
./eesupp/src/nml_change_syntax.F 223 NML_CHANGE_SYNTAX
           CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/nml_change_syntax.F 225 NML_CHANGE_SYNTAX
           WRITE(msgBuf,'(4A)') 'NML_CHANGE_SYNTAX: ',
./eesupp/src/nml_change_syntax.F 228 NML_CHANGE_SYNTAX
           CALL PRINT_MESSAGE( msgBuf, iUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/nml_change_syntax.F 71 NML_CHANGE_SYNTAX
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_timepassed.F 65 CAL_TIMEPASSED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_timepassed.F 70 CAL_TIMEPASSED
        WRITE( msgBuf,'(2A,4I9)') 'CAL_TIMEPASSED: ', 'initialdate=',
./pkg/cal/cal_timepassed.F 72 CAL_TIMEPASSED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_timepassed.F 73 CAL_TIMEPASSED
        WRITE( msgBuf,'(2A,4I9)') 'CAL_TIMEPASSED: ', 'finaldate=',
./pkg/cal/cal_timepassed.F 75 CAL_TIMEPASSED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_timepassed.F 76 CAL_TIMEPASSED
        WRITE( msgBuf,'(2A,I2,A)') 'CAL_TIMEPASSED: ',
./pkg/cal/cal_timepassed.F 78 CAL_TIMEPASSED
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_toseconds.F 53 CAL_TOSECONDS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cal/cal_toseconds.F 60 CAL_TOSECONDS
        WRITE( msgBuf,'(2A,4I9)') 'CAL_TOSECONDS: ',
./pkg/cal/cal_toseconds.F 62 CAL_TOSECONDS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cal/cal_toseconds.F 63 CAL_TOSECONDS
        WRITE( msgBuf,'(2A,I2,A)') 'CAL_TOSECONDS: ',
./pkg/cal/cal_toseconds.F 65 CAL_TOSECONDS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc11_forcing.F 100 CFC11_FORCING
         WRITE(msgBuf,'(A,6X,I10,I6,F9.4,F7.1)')
./pkg/cfc/cfc11_forcing.F 103 CFC11_FORCING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc11_forcing.F 105 CFC11_FORCING
         WRITE(msgBuf,'(A,1PE16.7,I6,0PF9.4,F7.1)')
./pkg/cfc/cfc11_forcing.F 108 CFC11_FORCING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc11_forcing.F 110 CFC11_FORCING
         WRITE(msgBuf,'(2(A,F14.6))')
./pkg/cfc/cfc11_forcing.F 113 CFC11_FORCING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc11_forcing.F 75 CFC11_FORCING
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/open_copy_data_file.F 110 OPEN_COPY_DATA_FILE
       WRITE(msgBuf,'(A,A)')
./eesupp/src/open_copy_data_file.F 112 OPEN_COPY_DATA_FILE
       CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/open_copy_data_file.F 113 OPEN_COPY_DATA_FILE
       WRITE(msgBuf,'(A,A)') 'S/R CALLED BY ',caller_sub
./eesupp/src/open_copy_data_file.F 114 OPEN_COPY_DATA_FILE
       CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/open_copy_data_file.F 132 OPEN_COPY_DATA_FILE
      WRITE(msgBuf,'(A)')
./eesupp/src/open_copy_data_file.F 134 OPEN_COPY_DATA_FILE
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/open_copy_data_file.F 136 OPEN_COPY_DATA_FILE
      WRITE(msgBuf,'(A,A,A)') '// Parameter file "',data_file,'"'
./eesupp/src/open_copy_data_file.F 137 OPEN_COPY_DATA_FILE
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/open_copy_data_file.F 139 OPEN_COPY_DATA_FILE
      WRITE(msgBuf,'(A)')
./eesupp/src/open_copy_data_file.F 141 OPEN_COPY_DATA_FILE
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/open_copy_data_file.F 148 OPEN_COPY_DATA_FILE
       WRITE(msgBuf,'(A,A)') '>',RECORD(:IL)
./eesupp/src/open_copy_data_file.F 149 OPEN_COPY_DATA_FILE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/open_copy_data_file.F 154 OPEN_COPY_DATA_FILE
      WRITE(msgBuf,'(A)') ' '
./eesupp/src/open_copy_data_file.F 155 OPEN_COPY_DATA_FILE
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/open_copy_data_file.F 48 OPEN_COPY_DATA_FILE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/open_copy_data_file.F 67 OPEN_COPY_DATA_FILE
       WRITE(msgBuf,'(A,A)')
./eesupp/src/open_copy_data_file.F 69 OPEN_COPY_DATA_FILE
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/open_copy_data_file.F 72 OPEN_COPY_DATA_FILE
       WRITE(msgBuf,'(A,A,A)')
./eesupp/src/open_copy_data_file.F 74 OPEN_COPY_DATA_FILE
       CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/open_copy_data_file.F 75 OPEN_COPY_DATA_FILE
       WRITE(msgBuf,'(A,A)') 'S/R CALLED BY ',caller_sub
./eesupp/src/open_copy_data_file.F 76 OPEN_COPY_DATA_FILE
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc12_forcing.F 101 CFC12_FORCING
         WRITE(msgBuf,'(A,6X,I10,I6,F9.4,F7.1)')
./pkg/cfc/cfc12_forcing.F 104 CFC12_FORCING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc12_forcing.F 106 CFC12_FORCING
         WRITE(msgBuf,'(A,1PE16.7,I6,0PF9.4,F7.1)')
./pkg/cfc/cfc12_forcing.F 109 CFC12_FORCING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc12_forcing.F 111 CFC12_FORCING
         WRITE(msgBuf,'(2(A,F14.6))')
./pkg/cfc/cfc12_forcing.F 114 CFC12_FORCING
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc12_forcing.F 76 CFC12_FORCING
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cfc/cfc_atmos.F 103 CFC_ATMOS
      WRITE(msgBuf,'(A,I8,A)')
./pkg/cfc/cfc_atmos.F 105 CFC_ATMOS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc_atmos.F 107 CFC_ATMOS
      WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_atmos.F 109 CFC_ATMOS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc_atmos.F 112 CFC_ATMOS
        WRITE(msgBuf,'(F7.1,4F9.2)')
./pkg/cfc/cfc_atmos.F 115 CFC_ATMOS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc_atmos.F 119 CFC_ATMOS
      WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_atmos.F 121 CFC_ATMOS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc_atmos.F 43 CFC_ATMOS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cfc/cfc_atmos.F 50 CFC_ATMOS
        WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_atmos.F 52 CFC_ATMOS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc_atmos.F 57 CFC_ATMOS
       WRITE(msgBuf,'(3A)')
./pkg/cfc/cfc_atmos.F 59 CFC_ATMOS
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc_atmos.F 62 CFC_ATMOS
       WRITE(msgBuf,'(3A)')
./pkg/cfc/cfc_atmos.F 64 CFC_ATMOS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc_atmos.F 90 CFC_ATMOS
       WRITE(msgBuf,'(3A)')
./pkg/cfc/cfc_atmos.F 92 CFC_ATMOS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc_atmos.F 93 CFC_ATMOS
       WRITE(msgBuf,'(2A,I9)') 'CFC_ATMOS: exceeds max num',
./pkg/cfc/cfc_atmos.F 95 CFC_ATMOS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc_check.F 103 CFC_CHECK
        WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_check.F 105 CFC_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc_check.F 111 CFC_CHECK
        WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_check.F 113 CFC_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc_check.F 121 CFC_CHECK
        WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_check.F 123 CFC_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc_check.F 124 CFC_CHECK
        WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_check.F 126 CFC_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc_check.F 131 CFC_CHECK
        WRITE(msgBuf,'(A,I3,A)')
./pkg/cfc/cfc_check.F 133 CFC_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cfc/cfc_check.F 138 CFC_CHECK
      WRITE(msgBuf,'(A)') 'CFC_CHECK: done'
./pkg/cfc/cfc_check.F 139 CFC_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 37 CFC_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cfc/cfc_check.F 46 CFC_CHECK
      WRITE(msgBuf,'(A)') 'CFC_CHECK:   #define ALLOW_CFC'
./pkg/cfc/cfc_check.F 47 CFC_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 51 CFC_CHECK
      WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_check.F 53 CFC_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 54 CFC_CHECK
      WRITE(msgBuf,'(A)') '// CFC pkg configuration summary'
./pkg/cfc/cfc_check.F 55 CFC_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 56 CFC_CHECK
      WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_check.F 58 CFC_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 90 CFC_CHECK
      WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_check.F 92 CFC_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 93 CFC_CHECK
      WRITE(msgBuf,'(A)') '// End of CFC pkg config summary'
./pkg/cfc/cfc_check.F 94 CFC_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cfc/cfc_check.F 95 CFC_CHECK
      WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_check.F 97 CFC_CHECK
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./eesupp/src/print.F 1000 PRINT_MAPRS
       CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1032 PRINT_MAPRS
         WRITE(msgBuf,'(A,A)') '// ',plotBuf
./eesupp/src/print.F 1033 PRINT_MAPRS
         CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1048 PRINT_MAPRS
         WRITE(msgBuf,'(A,A)') '// ',plotBuf
./eesupp/src/print.F 1049 PRINT_MAPRS
         CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1081 PRINT_MAPRS
           WRITE(msgBuf,'(A,A)') '// ',plotBuf
./eesupp/src/print.F 1082 PRINT_MAPRS
           CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1090 PRINT_MAPRS
      msgBuf =
./eesupp/src/print.F 1092 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1094 PRINT_MAPRS
      msgBuf =
./eesupp/src/print.F 1096 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1098 PRINT_MAPRS
      msgBuf =
./eesupp/src/print.F 1100 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1102 PRINT_MAPRS
      msgBuf = ' '
./eesupp/src/print.F 1103 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1212 PRINT_MAPRL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/print.F 1265 PRINT_MAPRL
      msgBuf =
./eesupp/src/print.F 1267 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1272 PRINT_MAPRL
       WRITE(msgBuf,'(A)') fldTitle(iStrngLo:iStrngHi)
./eesupp/src/print.F 1274 PRINT_MAPRL
       msgBuf = '// UNKNOWN FIELD'
./eesupp/src/print.F 1276 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1278 PRINT_MAPRL
      WRITE(msgBuf,'(A,1PE30.15)')
./eesupp/src/print.F 1280 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1282 PRINT_MAPRL
      WRITE(msgBuf,'(A,1PE30.15)')
./eesupp/src/print.F 1284 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1287 PRINT_MAPRL
       WRITE(msgBuf,'(A,1PE30.15)')
./eesupp/src/print.F 1290 PRINT_MAPRL
       WRITE(msgBuf,'(A,1PE30.15)')
./eesupp/src/print.F 1293 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1295 PRINT_MAPRL
      WRITE(msgBuf,'(A,1024A1)')
./eesupp/src/print.F 1297 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1299 PRINT_MAPRL
      WRITE(msgBuf,'(A,1024A1)')
./eesupp/src/print.F 1301 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1303 PRINT_MAPRL
       WRITE(msgBuf,'(A,3(A,I6),A)')
./eesupp/src/print.F 1308 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1310 PRINT_MAPRL
       WRITE(msgBuf,'(A,3(A,I6),A)')
./eesupp/src/print.F 1315 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1317 PRINT_MAPRL
       WRITE(msgBuf,'(A,3(A,I4),A)')
./eesupp/src/print.F 1322 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1324 PRINT_MAPRL
      msgBuf =
./eesupp/src/print.F 1326 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1432 PRINT_MAPRL
       msgBuf =
./eesupp/src/print.F 1434 PRINT_MAPRL
       CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1521 PRINT_MAPRL
      msgBuf =
./eesupp/src/print.F 1523 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1525 PRINT_MAPRL
      msgBuf =
./eesupp/src/print.F 1527 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1529 PRINT_MAPRL
      msgBuf =
./eesupp/src/print.F 1531 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 1533 PRINT_MAPRL
      msgBuf = ' '
./eesupp/src/print.F 1534 PRINT_MAPRL
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 338 PRINT_LIST_I
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/print.F 373 PRINT_LIST_I
         WRITE(msgBuf,'(A,I9,A)') '              ',xOld,punc
./eesupp/src/print.F 375 PRINT_LIST_I
     &    WRITE(msgBuf(45:),fmt1)
./eesupp/src/print.F 378 PRINT_LIST_I
         WRITE(msgBuf,'(I5,'' '',A,I9,A)') nDup,'@',xOld,punc
./eesupp/src/print.F 380 PRINT_LIST_I
     &    WRITE(msgBuf(45:),fmt2)
./eesupp/src/print.F 383 PRINT_LIST_I
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 395 PRINT_LIST_I
       WRITE(msgBuf,'(A,I9,A)') '              ',xOld,punc
./eesupp/src/print.F 397 PRINT_LIST_I
     &  WRITE(msgBuf(45:),'(A,1X,A,I3,1X,A)')
./eesupp/src/print.F 400 PRINT_LIST_I
       WRITE(msgBuf,'(I5,'' '',A,I9,A)') nDup,'@',xOld,punc
./eesupp/src/print.F 402 PRINT_LIST_I
     &  WRITE(msgBuf(45:),'(A,1X,A,I3,A,I3,1X,A)')
./eesupp/src/print.F 405 PRINT_LIST_I
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 471 PRINT_LIST_L
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/print.F 506 PRINT_LIST_L
         WRITE(msgBuf,'(A,L5,A)') '              ',xOld,punc
./eesupp/src/print.F 508 PRINT_LIST_L
     &    WRITE(msgBuf(45:),fmt1)
./eesupp/src/print.F 511 PRINT_LIST_L
         WRITE(msgBuf,'(I5,'' '',A,L5,A)') nDup,'@',xOld,punc
./eesupp/src/print.F 513 PRINT_LIST_L
     &    WRITE(msgBuf(45:),fmt2)
./eesupp/src/print.F 516 PRINT_LIST_L
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 528 PRINT_LIST_L
       WRITE(msgBuf,'(A,L5,A)') '              ',xOld,punc
./eesupp/src/print.F 530 PRINT_LIST_L
     &  WRITE(msgBuf(45:),'(A,1X,A,I3,1X,A)')
./eesupp/src/print.F 533 PRINT_LIST_L
       WRITE(msgBuf,'(I5,'' '',A,L5,A)') nDup,'@',xOld,punc
./eesupp/src/print.F 535 PRINT_LIST_L
     &  WRITE(msgBuf(45:),'(A,1X,A,I3,A,I3,1X,A)')
./eesupp/src/print.F 538 PRINT_LIST_L
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 604 PRINT_LIST_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/print.F 639 PRINT_LIST_RL
         WRITE(msgBuf,'(A,1PE23.15,A)') '              ',xOld,punc
./eesupp/src/print.F 641 PRINT_LIST_RL
     &    WRITE(msgBuf(45:),fmt1)
./eesupp/src/print.F 644 PRINT_LIST_RL
         WRITE(msgBuf,'(I5,'' '',A,1PE23.15,A)') nDup,'@',xOld,punc
./eesupp/src/print.F 646 PRINT_LIST_RL
     &    WRITE(msgBuf(45:),fmt2)
./eesupp/src/print.F 649 PRINT_LIST_RL
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 661 PRINT_LIST_RL
       WRITE(msgBuf,'(A,1PE23.15,A)') '              ',xOld,punc
./eesupp/src/print.F 663 PRINT_LIST_RL
     &  WRITE(msgBuf(45:),fmt1)
./eesupp/src/print.F 666 PRINT_LIST_RL
       WRITE(msgBuf,'(I5,'' '',A,1PE23.15,A)') nDup,'@',xOld,punc
./eesupp/src/print.F 668 PRINT_LIST_RL
     &  WRITE(msgBuf(45:),fmt2)
./eesupp/src/print.F 671 PRINT_LIST_RL
      CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT , 1)
./eesupp/src/print.F 779 PRINT_MAPRS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/print.F 831 PRINT_MAPRS
      msgBuf =
./eesupp/src/print.F 833 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 838 PRINT_MAPRS
       WRITE(msgBuf,'(A)') fldTitle(iStrngLo:iStrngHi)
./eesupp/src/print.F 840 PRINT_MAPRS
       msgBuf = '// UNKNOWN FIELD'
./eesupp/src/print.F 842 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 844 PRINT_MAPRS
      WRITE(msgBuf,'(A,1PE30.15)')
./eesupp/src/print.F 846 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 848 PRINT_MAPRS
      WRITE(msgBuf,'(A,1PE30.15)')
./eesupp/src/print.F 850 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 853 PRINT_MAPRS
       WRITE(msgBuf,'(A,1PE30.15)')
./eesupp/src/print.F 856 PRINT_MAPRS
       WRITE(msgBuf,'(A,1PE30.15)')
./eesupp/src/print.F 859 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 861 PRINT_MAPRS
      WRITE(msgBuf,'(A,1024A1)')
./eesupp/src/print.F 863 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 865 PRINT_MAPRS
      WRITE(msgBuf,'(A,1024A1)')
./eesupp/src/print.F 867 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 869 PRINT_MAPRS
       WRITE(msgBuf,'(A,3(A,I6),A)')
./eesupp/src/print.F 874 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 876 PRINT_MAPRS
       WRITE(msgBuf,'(A,3(A,I6),A)')
./eesupp/src/print.F 881 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 883 PRINT_MAPRS
       WRITE(msgBuf,'(A,3(A,I4),A)')
./eesupp/src/print.F 888 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 890 PRINT_MAPRS
      msgBuf =
./eesupp/src/print.F 892 PRINT_MAPRS
      CALL PRINT_MESSAGE(msgBuf, standardMessageUnit,
./eesupp/src/print.F 998 PRINT_MAPRS
       msgBuf =
./pkg/cfc/cfc_readparms.F 42 CFC_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cfc/cfc_readparms.F 69 CFC_READPARMS
      WRITE(msgBuf,'(A)') ' CFC_READPARMS: opening data.cfc'
./pkg/cfc/cfc_readparms.F 70 CFC_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc_readparms.F 81 CFC_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/cfc/cfc_readparms.F 83 CFC_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc_tr_register.F 38 CFC_TR_REGISTER
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cfc/cfc_tr_register.F 44 CFC_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') '  CFC_TR_REGISTER: ',
./pkg/cfc/cfc_tr_register.F 46 CFC_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc_tr_register.F 48 CFC_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') '  CFC_TR_REGISTER: ',
./pkg/cfc/cfc_tr_register.F 50 CFC_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cfc/cfc_tr_register.F 53 CFC_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') '  CFC_TR_REGISTER: ',
./pkg/cfc/cfc_tr_register.F 55 CFC_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cheapaml/cheapaml_init_fixed.F 168 CHEAPAML_INIT_FIXED
        WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_fixed.F 170 CHEAPAML_INIT_FIXED
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_fixed.F 173 CHEAPAML_INIT_FIXED
        WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_fixed.F 175 CHEAPAML_INIT_FIXED
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_fixed.F 50 CHEAPAML_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cheapaml/cheapaml_init_fixed.F 81 CHEAPAML_INIT_FIXED
         WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_fixed.F 83 CHEAPAML_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_fixed.F 86 CHEAPAML_INIT_FIXED
         WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_fixed.F 88 CHEAPAML_INIT_FIXED
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 120 CHEAPAML_INIT_VARIA
         WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_varia.F 122 CHEAPAML_INIT_VARIA
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 126 CHEAPAML_INIT_VARIA
         WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_varia.F 128 CHEAPAML_INIT_VARIA
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 146 CHEAPAML_INIT_VARIA
         WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_varia.F 148 CHEAPAML_INIT_VARIA
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 152 CHEAPAML_INIT_VARIA
         WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_varia.F 154 CHEAPAML_INIT_VARIA
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 176 CHEAPAML_INIT_VARIA
         WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_varia.F 178 CHEAPAML_INIT_VARIA
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 47 CHEAPAML_INIT_VARIA
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cheapaml/cheapaml_init_varia.F 92 CHEAPAML_INIT_VARIA
         WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_varia.F 94 CHEAPAML_INIT_VARIA
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_init_varia.F 97 CHEAPAML_INIT_VARIA
         WRITE(msgBuf,'(4A)') 'CHEAPAML_INIT_VARIA: ',
./pkg/cheapaml/cheapaml_init_varia.F 99 CHEAPAML_INIT_VARIA
         CALL PRINT_MESSAGE(msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 102 CHEAPAML_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 104 CHEAPAML_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 107 CHEAPAML_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'WARNING >> ',
./pkg/cheapaml/cheapaml_read_pickup.F 109 CHEAPAML_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 118 CHEAPAML_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 120 CHEAPAML_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 163 CHEAPAML_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 165 CHEAPAML_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 182 CHEAPAML_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 184 CHEAPAML_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 190 CHEAPAML_READ_PICKUP
         WRITE(msgBuf,'(4A)') 'CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 193 CHEAPAML_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 196 CHEAPAML_READ_PICKUP
         WRITE(msgBuf,'(4A)') '** WARNING ** CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 198 CHEAPAML_READ_PICKUP
         CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 52 CHEAPAML_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cheapaml/cheapaml_read_pickup.F 78 CHEAPAML_READ_PICKUP
         WRITE(msgBuf,'(2A,I4)') 'CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 80 CHEAPAML_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 81 CHEAPAML_READ_PICKUP
         WRITE(msgBuf,'(A,2(A,I4))') 'CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 83 CHEAPAML_READ_PICKUP
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 92 CHEAPAML_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 95 CHEAPAML_READ_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_read_pickup.F 96 CHEAPAML_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'CHEAPAML_READ_PICKUP: ',
./pkg/cheapaml/cheapaml_read_pickup.F 99 CHEAPAML_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/cheapaml/cheapaml_readparms.F 208 CHEAPAML_READPARMS
      WRITE(msgBuf,'(A)') ' CHEAPAML_READPARMS: read CHEAPAML_CONST'
./pkg/cheapaml/cheapaml_readparms.F 209 CHEAPAML_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cheapaml/cheapaml_readparms.F 214 CHEAPAML_READPARMS
      WRITE(msgBuf,'(A)') ' CHEAPAML_READPARMS: read CHEAPAML_PARM01'
./pkg/cheapaml/cheapaml_readparms.F 215 CHEAPAML_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cheapaml/cheapaml_readparms.F 220 CHEAPAML_READPARMS
      WRITE(msgBuf,'(A)') ' CHEAPAML_READPARMS: read CHEAPAML_PARM02'
./pkg/cheapaml/cheapaml_readparms.F 221 CHEAPAML_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cheapaml/cheapaml_readparms.F 25 CHEAPAML_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cheapaml/cheapaml_readparms.F 261 CHEAPAML_READPARMS
        WRITE(msgBuf,'(2A)')
./pkg/cheapaml/cheapaml_readparms.F 263 CHEAPAML_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_readparms.F 264 CHEAPAML_READPARMS
        WRITE(msgBuf,'(2A)')
./pkg/cheapaml/cheapaml_readparms.F 266 CHEAPAML_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_readparms.F 270 CHEAPAML_READPARMS
        WRITE(msgBuf,'(2A)')
./pkg/cheapaml/cheapaml_readparms.F 272 CHEAPAML_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_readparms.F 273 CHEAPAML_READPARMS
        WRITE(msgBuf,'(2A)')
./pkg/cheapaml/cheapaml_readparms.F 275 CHEAPAML_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_readparms.F 279 CHEAPAML_READPARMS
       WRITE(msgBuf,'(2A)') 'S/R CHEAPAML_READPARMS: ',
./pkg/cheapaml/cheapaml_readparms.F 281 CHEAPAML_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_readparms.F 282 CHEAPAML_READPARMS
       WRITE(msgBuf,'(I4,A)') nRetired,
./pkg/cheapaml/cheapaml_readparms.F 284 CHEAPAML_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_readparms.F 90 CHEAPAML_READPARMS
      WRITE(msgBuf,'(A)') ' BULKF_READPARMS: opening data.cheapaml'
./pkg/cheapaml/cheapaml_readparms.F 91 CHEAPAML_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cheapaml/cheapaml_write_pickup.F 121 CHEAPAML_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'CHEAPAML_WRITE_PICKUP: ',
./pkg/cheapaml/cheapaml_write_pickup.F 123 CHEAPAML_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_write_pickup.F 124 CHEAPAML_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'CHEAPAML_WRITE_PICKUP: ',
./pkg/cheapaml/cheapaml_write_pickup.F 126 CHEAPAML_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/cheapaml/cheapaml_write_pickup.F 62 CHEAPAML_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/stop_if_error.F 48 STOP_IF_ERROR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/stop_if_error.F 61 STOP_IF_ERROR
        WRITE(msgBuf,'(A,I5,A)')
./eesupp/src/stop_if_error.F 63 STOP_IF_ERROR
        CALL PRINT_ERROR( msgBuf, myThid )
./eesupp/src/write_utils.F 120 WRITE_1D_L
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 123 WRITE_1D_L
      WRITE(msgBuf,'(A,A)') head, comment
./eesupp/src/write_utils.F 124 WRITE_1D_L
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 128 WRITE_1D_L
      WRITE(msgBuf,'(A)')   '    ;     '
./eesupp/src/write_utils.F 129 WRITE_1D_L
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 179 WRITE_1D_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 201 WRITE_1D_RL
      WRITE(msgBuf,'(A,A)') head(1:ILH), comment(1:ILC)
./eesupp/src/write_utils.F 202 WRITE_1D_RL
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 221 WRITE_1D_RL
        WRITE(msgBuf,'(A)') '     . . .'
./eesupp/src/write_utils.F 222 WRITE_1D_RL
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 230 WRITE_1D_RL
      WRITE(msgBuf,'(A)')   '    ;     '
./eesupp/src/write_utils.F 231 WRITE_1D_RL
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 275 WRITE_0D_I
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 281 WRITE_0D_I
      WRITE(msgBuf,'(A,A)') head, comment
./eesupp/src/write_utils.F 282 WRITE_0D_I
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 286 WRITE_0D_I
      WRITE(msgBuf,'(A)')   '    ;     '
./eesupp/src/write_utils.F 287 WRITE_0D_I
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 331 WRITE_0D_L
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 336 WRITE_0D_L
      WRITE(msgBuf,'(A,A)') head, comment
./eesupp/src/write_utils.F 337 WRITE_0D_L
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 341 WRITE_0D_L
      WRITE(msgBuf,'(A)')   '    ;     '
./eesupp/src/write_utils.F 342 WRITE_0D_L
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 386 WRITE_0D_R4
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 393 WRITE_0D_R4
      WRITE(msgBuf,'(A,A)') head, comment
./eesupp/src/write_utils.F 394 WRITE_0D_R4
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 398 WRITE_0D_R4
      WRITE(msgBuf,'(A)')   '    ;     '
./eesupp/src/write_utils.F 399 WRITE_0D_R4
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 443 WRITE_0D_R8
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 450 WRITE_0D_R8
      WRITE(msgBuf,'(A,A)') head, comment
./eesupp/src/write_utils.F 451 WRITE_0D_R8
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 455 WRITE_0D_R8
      WRITE(msgBuf,'(A)')   '    ;     '
./eesupp/src/write_utils.F 456 WRITE_0D_R8
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 500 WRITE_0D_RS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 507 WRITE_0D_RS
      WRITE(msgBuf,'(A,A)') head, comment
./eesupp/src/write_utils.F 508 WRITE_0D_RS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 512 WRITE_0D_RS
      WRITE(msgBuf,'(A)')   '    ;     '
./eesupp/src/write_utils.F 513 WRITE_0D_RS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 557 WRITE_0D_RL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 564 WRITE_0D_RL
      WRITE(msgBuf,'(A,A)') head, comment
./eesupp/src/write_utils.F 565 WRITE_0D_RL
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 569 WRITE_0D_RL
      WRITE(msgBuf,'(A)')   '    ;     '
./eesupp/src/write_utils.F 570 WRITE_0D_RL
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 624 WRITE_0D_C
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 638 WRITE_0D_C
      WRITE(msgBuf,'(A,A)') head, comment
./eesupp/src/write_utils.F 639 WRITE_0D_C
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 643 WRITE_0D_C
        WRITE(msgBuf,'(14X,3A)') "'", fld(iS:iL), "'"
./eesupp/src/write_utils.F 645 WRITE_0D_C
        WRITE(msgBuf,'(14X,3A)') "'","'"
./eesupp/src/write_utils.F 647 WRITE_0D_C
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 649 WRITE_0D_C
      WRITE(msgBuf,'(A)') '    ;'
./eesupp/src/write_utils.F 64 WRITE_1D_I
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./eesupp/src/write_utils.F 650 WRITE_0D_C
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 67 WRITE_1D_I
      WRITE(msgBuf,'(A,A)') head, comment
./eesupp/src/write_utils.F 68 WRITE_1D_I
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./eesupp/src/write_utils.F 72 WRITE_1D_I
      WRITE(msgBuf,'(A)')   '    ;     '
./eesupp/src/write_utils.F 73 WRITE_1D_I
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cost/cost_check.F 25 COST_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/cost/cost_check.F 27 COST_CHECK
      WRITE(msgBuf,'(A)') 'COST_CHECK: #define ALLOW_COST'
./pkg/cost/cost_check.F 28 COST_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cost/cost_final.F 107 COST_FINAL
      write(msgBuf,'(A,D22.15)') '  early fc = ', fc
./pkg/cost/cost_final.F 108 COST_FINAL
      call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/cost/cost_final.F 182 COST_FINAL
      write(msgBuf,'(A,D22.15)') '  local fc = ', loc_fc
./pkg/cost/cost_final.F 183 COST_FINAL
      call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/cost/cost_final.F 202 COST_FINAL
      write(msgBuf,'(A,D22.15)') ' global fc = ', fc
./pkg/cost/cost_final.F 203 COST_FINAL
      call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/cost/cost_final.F 54 COST_FINAL
      character*(MAX_LEN_MBUF) msgBuf
./pkg/cost/cost_readparms.F 81 COST_READPARMS
        WRITE(msgBuf,'(A)') 'COST_READPARMS: opening data.cost'
./pkg/cost/cost_readparms.F 82 COST_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/cost/cost_readparms.F 92 COST_READPARMS
        WRITE(msgBuf,'(A)') 'COST_READPARMS: finished reading data.cost'
./pkg/cost/cost_readparms.F 93 COST_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/ctrl_check.F 109 CTRL_CHECK
           WRITE(msgBuf,'(3A)') 'CTRL_CHECK : ',
./pkg/ctrl/ctrl_check.F 112 CTRL_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 123 CTRL_CHECK
        WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_check.F 125 CTRL_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 131 CTRL_CHECK
      WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_check.F 133 CTRL_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 138 CTRL_CHECK
      WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_check.F 140 CTRL_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 146 CTRL_CHECK
      WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_check.F 148 CTRL_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 155 CTRL_CHECK
      WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_check.F 157 CTRL_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 166 CTRL_CHECK
      WRITE(msgBuf,'(3A)') 'CTRL_CHECK : ',
./pkg/ctrl/ctrl_check.F 169 CTRL_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ctrl/ctrl_check.F 179 CTRL_CHECK
      WRITE(msgBuf,'(3A)') 'CTRL_CHECK : ',
./pkg/ctrl/ctrl_check.F 182 CTRL_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ctrl/ctrl_check.F 192 CTRL_CHECK
      WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_check.F 194 CTRL_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 195 CTRL_CHECK
      WRITE(msgBuf,'(A)') '  ALLOW_HFLUX_CONTROL'
./pkg/ctrl/ctrl_check.F 196 CTRL_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 197 CTRL_CHECK
      WRITE(msgBuf,'(A)') '  ALLOW_SFLUX_CONTROL'
./pkg/ctrl/ctrl_check.F 198 CTRL_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 199 CTRL_CHECK
      WRITE(msgBuf,'(A)') 'to be control variables'
./pkg/ctrl/ctrl_check.F 200 CTRL_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 214 CTRL_CHECK
        WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_check.F 216 CTRL_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 217 CTRL_CHECK
        WRITE(msgBuf,'(A)') '  ALLOW_USTRESS_CONTROL'
./pkg/ctrl/ctrl_check.F 218 CTRL_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 219 CTRL_CHECK
        WRITE(msgBuf,'(A)') '  ALLOW_VSTRESS_CONTROL'
./pkg/ctrl/ctrl_check.F 220 CTRL_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 221 CTRL_CHECK
        WRITE(msgBuf,'(A)') 'to be control variables'
./pkg/ctrl/ctrl_check.F 222 CTRL_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 223 CTRL_CHECK
        WRITE(msgBuf,'(A)') 'except if wspeedfile is specified'
./pkg/ctrl/ctrl_check.F 224 CTRL_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 225 CTRL_CHECK
        WRITE(msgBuf,'(A)') 'and ifdef ALLOW_BULK_LARGEYEAGER04'
./pkg/ctrl/ctrl_check.F 226 CTRL_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 235 CTRL_CHECK
        WRITE(msgBuf,'(3A)') '** WARNING ** CTRL_CHECK: ',
./pkg/ctrl/ctrl_check.F 238 CTRL_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit, 
./pkg/ctrl/ctrl_check.F 250 CTRL_CHECK
        WRITE(msgBuf,'(2A)') 
./pkg/ctrl/ctrl_check.F 253 CTRL_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 35 CTRL_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ctrl/ctrl_check.F 44 CTRL_CHECK
      WRITE(msgBuf,'(A)') 'CTRL_CHECK: #define ALLOW_CTRL'
./pkg/ctrl/ctrl_check.F 45 CTRL_CHECK
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/ctrl_check.F 52 CTRL_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_check.F 54 CTRL_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 55 CTRL_CHECK
         WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_check.F 57 CTRL_CHECK
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 64 CTRL_CHECK
      WRITE(msgBuf,'(2A)') 'CTRL_CHECK : ',
./pkg/ctrl/ctrl_check.F 66 CTRL_CHECK
      CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 79 CTRL_CHECK
           WRITE(msgBuf,'(3A)') 'CTRL_CHECK : ',
./pkg/ctrl/ctrl_check.F 82 CTRL_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_check.F 94 CTRL_CHECK
           WRITE(msgBuf,'(3A)') 'CTRL_CHECK : ',
./pkg/ctrl/ctrl_check.F 97 CTRL_CHECK
           CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ctrl/ctrl_getrec.F 83 CTRL_GETREC
      character*(max_len_mbuf) msgBuf
./pkg/ctrl/ctrl_getrec.F 90 CTRL_GETREC
      write(msgBuf,'(A)')
./pkg/ctrl/ctrl_getrec.F 92 CTRL_GETREC
      call PRINT_ERROR( msgBuf , 1)
./pkg/ctrl/ctrl_getrec.F 93 CTRL_GETREC
      write(msgBuf,'(A)')
./pkg/ctrl/ctrl_getrec.F 95 CTRL_GETREC
      call PRINT_ERROR( msgBuf , 1)
./pkg/ctrl/ctrl_getrec.F 96 CTRL_GETREC
      write(msgBuf,'(A)')
./pkg/ctrl/ctrl_getrec.F 98 CTRL_GETREC
      call PRINT_ERROR( msgBuf , 1)
./pkg/ctrl/ctrl_init_rec.F 118 CTRL_INIT_REC
       WRITE( msgBuf,'(A,A,A)')
./pkg/ctrl/ctrl_init_rec.F 120 CTRL_INIT_REC
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/ctrl_init_rec.F 122 CTRL_INIT_REC
       WRITE( msgBuf,'(A,I10,A,I10)')
./pkg/ctrl/ctrl_init_rec.F 124 CTRL_INIT_REC
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/ctrl_init_rec.F 75 CTRL_INIT_REC
       WRITE( msgBuf,'(A,A)')
./pkg/ctrl/ctrl_init_rec.F 77 CTRL_INIT_REC
       CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/ctrl_map_gentim2d.F 148 CTRL_MAP_GENTIM2D
         WRITE(msgBuf,'(A,I6,A,1PE21.14)')
./pkg/ctrl/ctrl_map_gentim2d.F 150 CTRL_MAP_GENTIM2D
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/ctrl_map_gentim2d.F 62 CTRL_MAP_GENTIM2D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ctrl/ctrl_readparms.F 498 CTRL_READPARMS
        WRITE(msgBuf,'(A)') 'CTRL_READPARMS: opening data.ctrl'
./pkg/ctrl/ctrl_readparms.F 499 CTRL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/ctrl_readparms.F 513 CTRL_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/ctrl/ctrl_readparms.F 515 CTRL_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/optim_readparms.F 101 OPTIM_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/optim_readparms.F 88 OPTIM_READPARMS
        WRITE(msgBuf,'(A)') 'OPTIM_READPARMS: opening data.optim'
./pkg/ctrl/optim_readparms.F 89 OPTIM_READPARMS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ctrl/optim_readparms.F 99 OPTIM_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/debug/debug_call.F 25 DEBUG_CALL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/debug/debug_call.F 27 DEBUG_CALL
      WRITE(msgBuf,'(A,A)') 'CALLING S/R ',text
./pkg/debug/debug_call.F 28 DEBUG_CALL
      CALL DEBUG_MSG( msgBuf, myThid )
./pkg/debug/debug_enter.F 25 DEBUG_ENTER
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/debug/debug_enter.F 27 DEBUG_ENTER
      WRITE(msgBuf,'(A,A)') 'ENTERED S/R ',text
./pkg/debug/debug_enter.F 28 DEBUG_ENTER
      CALL DEBUG_MSG( msgBuf, myThid )
./pkg/debug/debug_leave.F 25 DEBUG_LEAVE
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/debug/debug_leave.F 27 DEBUG_LEAVE
      WRITE(msgBuf,'(A,A)') 'LEAVING S/R ',text
./pkg/debug/debug_leave.F 28 DEBUG_LEAVE
      CALL DEBUG_MSG( msgBuf, myThid )
./pkg/debug/debug_msg.F 35 DEBUG_MSG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/debug/debug_msg.F 39 DEBUG_MSG
      WRITE(msgBuf,'(A11,A60)') 'DEBUG_MSG: ',text
./pkg/debug/debug_msg.F 40 DEBUG_MSG
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diag_cg2d.F 214 DIAG_CG2D
         WRITE(msgBuf,'(2A,I6,A,1PE17.9,A,1PE14.6)')' diag_cg2d:',
./pkg/diagnostics/diag_cg2d.F 216 DIAG_CG2D
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diag_cg2d.F 313 DIAG_CG2D
         WRITE(msgBuf,'(A,I6,A,1PE17.9)')
./pkg/diagnostics/diag_cg2d.F 315 DIAG_CG2D
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diag_cg2d.F 89 DIAG_CG2D
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diag_vegtile_fill.F 135 DIAG_VEGTILE_FILL
           WRITE(msgBuf,'(2A,I4,A)') 'DIAGNOSTICS_FILL: ',
./pkg/diagnostics/diag_vegtile_fill.F 137 DIAG_VEGTILE_FILL
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diag_vegtile_fill.F 138 DIAG_VEGTILE_FILL
           WRITE(msgBuf,'(2A,I6,2A)') 'DIAGNOSTICS_FILL: ',
./pkg/diagnostics/diag_vegtile_fill.F 140 DIAG_VEGTILE_FILL
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diag_vegtile_fill.F 141 DIAG_VEGTILE_FILL
           WRITE(msgBuf,'(2A,2I4,I3)') 'calling DIAGNOSTICS_FILL ',
./pkg/diagnostics/diag_vegtile_fill.F 143 DIAG_VEGTILE_FILL
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diag_vegtile_fill.F 144 DIAG_VEGTILE_FILL
           WRITE(msgBuf,'(2A,I6,A)') 'DIAGNOSTICS_FILL: ',
./pkg/diagnostics/diag_vegtile_fill.F 146 DIAG_VEGTILE_FILL
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diag_vegtile_fill.F 62 DIAG_VEGTILE_FILL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_addtolist.F 114 DIAGNOSTICS_ADDTOLIST
        WRITE(msgBuf,'(2A,I6)') 'DIAGNOSTICS_ADDTOLIST:',
./pkg/diagnostics/diagnostics_addtolist.F 116 DIAGNOSTICS_ADDTOLIST
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/diagnostics/diagnostics_addtolist.F 117 DIAGNOSTICS_ADDTOLIST
        WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagnostics_addtolist.F 119 DIAGNOSTICS_ADDTOLIST
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/diagnostics/diagnostics_addtolist.F 53 DIAGNOSTICS_ADDTOLIST
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_addtolist.F 74 DIAGNOSTICS_ADDTOLIST
          WRITE(msgBuf,'(3A,I6,A)') 'DIAGNOSTICS_ADDTOLIST: diag=',
./pkg/diagnostics/diagnostics_addtolist.F 76 DIAGNOSTICS_ADDTOLIST
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_addtolist.F 78 DIAGNOSTICS_ADDTOLIST
          WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_ADDTOLIST:',
./pkg/diagnostics/diagnostics_addtolist.F 80 DIAGNOSTICS_ADDTOLIST
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_addtolist.F 86 DIAGNOSTICS_ADDTOLIST
          WRITE(msgBuf,'(3A,I6,A)') 'DIAGNOSTICS_ADDTOLIST: diag=',
./pkg/diagnostics/diagnostics_addtolist.F 88 DIAGNOSTICS_ADDTOLIST
          CALL PRINT_ERROR( msgBuf , myThid)
./pkg/diagnostics/diagnostics_addtolist.F 89 DIAGNOSTICS_ADDTOLIST
          WRITE(msgBuf,'(4A,I6)')   'DIAGNOSTICS_ADDTOLIST: cannot ',
./pkg/diagnostics/diagnostics_addtolist.F 91 DIAGNOSTICS_ADDTOLIST
          CALL PRINT_ERROR( msgBuf , myThid)
./pkg/diagnostics/diagnostics_addtolist.F 92 DIAGNOSTICS_ADDTOLIST
          WRITE(msgBuf,'(4A,I6,A)') 'DIAGNOSTICS_ADDTOLIST:',
./pkg/diagnostics/diagnostics_addtolist.F 94 DIAGNOSTICS_ADDTOLIST
          CALL PRINT_ERROR( msgBuf , myThid)
./pkg/diagnostics/diagnostics_calc_phivel.F 298 DIAGNOSTICS_CALC_PHIVEL
          WRITE(msgBuf,'(2A,I6,2A)') 'DIAGNOSTICS_CALC_PHIVEL: ',
./pkg/diagnostics/diagnostics_calc_phivel.F 300 DIAGNOSTICS_CALC_PHIVEL
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_calc_phivel.F 85 DIAGNOSTICS_CALC_PHIVEL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_check.F 105 DIAGNOSTICS_CHECK
         WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 107 DIAGNOSTICS_CHECK
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 108 DIAGNOSTICS_CHECK
         WRITE(msgBuf,'(2A,I5,2A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 110 DIAGNOSTICS_CHECK
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 111 DIAGNOSTICS_CHECK
         WRITE(msgBuf,'(2A,I5,2A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 113 DIAGNOSTICS_CHECK
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 122 DIAGNOSTICS_CHECK
         WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 124 DIAGNOSTICS_CHECK
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 125 DIAGNOSTICS_CHECK
         WRITE(msgBuf,'(2A,I5,2A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 127 DIAGNOSTICS_CHECK
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 128 DIAGNOSTICS_CHECK
         WRITE(msgBuf,'(2A,I5,2A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 130 DIAGNOSTICS_CHECK
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 155 DIAGNOSTICS_CHECK
            WRITE(msgBuf,'(2A,I5,2A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 158 DIAGNOSTICS_CHECK
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 159 DIAGNOSTICS_CHECK
            WRITE(msgBuf,'(2A,I4,3(A,F16.8))') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 162 DIAGNOSTICS_CHECK
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 168 DIAGNOSTICS_CHECK
          WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 170 DIAGNOSTICS_CHECK
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 171 DIAGNOSTICS_CHECK
           WRITE(msgBuf,'(2A,I5,2A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 173 DIAGNOSTICS_CHECK
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 191 DIAGNOSTICS_CHECK
            WRITE(msgBuf,'(2A,I5)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 193 DIAGNOSTICS_CHECK
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 195 DIAGNOSTICS_CHECK
              WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 197 DIAGNOSTICS_CHECK
              CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 199 DIAGNOSTICS_CHECK
              WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 202 DIAGNOSTICS_CHECK
              CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 205 DIAGNOSTICS_CHECK
              WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 207 DIAGNOSTICS_CHECK
              CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 209 DIAGNOSTICS_CHECK
              WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 212 DIAGNOSTICS_CHECK
              CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_check.F 30 DIAGNOSTICS_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_check.F 42 DIAGNOSTICS_CHECK
        WRITE(msgBuf,'(2A)') '** WARNING ** DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 44 DIAGNOSTICS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_check.F 49 DIAGNOSTICS_CHECK
        WRITE(msgBuf,'(A,A)') 'S/R DIAGNOSTICS_CHECK: diagMdsDir ',
./pkg/diagnostics/diagnostics_check.F 51 DIAGNOSTICS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_check.F 57 DIAGNOSTICS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_check.F 59 DIAGNOSTICS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_check.F 60 DIAGNOSTICS_CHECK
        WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_check.F 62 DIAGNOSTICS_CHECK
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_check.F 69 DIAGNOSTICS_CHECK
        WRITE(msgBuf,'(2A)') '**CAUTION** (DIAGNOSTICS_CHECK): ',
./pkg/diagnostics/diagnostics_check.F 71 DIAGNOSTICS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_check.F 73 DIAGNOSTICS_CHECK
        WRITE(msgBuf,'(2A)') '**CAUTION** ',
./pkg/diagnostics/diagnostics_check.F 75 DIAGNOSTICS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_check.F 77 DIAGNOSTICS_CHECK
        WRITE(msgBuf,'(2A)') '**CAUTION** ',
./pkg/diagnostics/diagnostics_check.F 79 DIAGNOSTICS_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_check.F 85 DIAGNOSTICS_CHECK
        WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 88 DIAGNOSTICS_CHECK
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/diagnostics/diagnostics_check.F 91 DIAGNOSTICS_CHECK
        WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_CHECK: ',
./pkg/diagnostics/diagnostics_check.F 94 DIAGNOSTICS_CHECK
        CALL PRINT_ERROR( msgBuf , myThid)
./pkg/diagnostics/diagnostics_fill_field.F 103 DIAGNOSTICS_FILL_FIELD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_fill_field.F 207 DIAGNOSTICS_FILL_FIELD
          WRITE(msgBuf,'(2A,I4,A)') 'DIAGNOSTICS_FILL_FIELD: ',
./pkg/diagnostics/diagnostics_fill_field.F 209 DIAGNOSTICS_FILL_FIELD
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_fill_field.F 210 DIAGNOSTICS_FILL_FIELD
          WRITE(msgBuf,'(2A,I6,2A)') 'DIAGNOSTICS_FILL_FIELD: ',
./pkg/diagnostics/diagnostics_fill_field.F 212 DIAGNOSTICS_FILL_FIELD
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_fill_field.F 213 DIAGNOSTICS_FILL_FIELD
          WRITE(msgBuf,'(2A,2I4,I3)') 'calling DIAGNOSTICS_FILL_FIELD ',
./pkg/diagnostics/diagnostics_fill_field.F 215 DIAGNOSTICS_FILL_FIELD
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_fill_field.F 216 DIAGNOSTICS_FILL_FIELD
          WRITE(msgBuf,'(2A,I6,A)') 'DIAGNOSTICS_FILL_FIELD: ',
./pkg/diagnostics/diagnostics_fill_field.F 218 DIAGNOSTICS_FILL_FIELD
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_fract_fill.F 119 DIAGNOSTICS_FRACT_FILL
             WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_FRACT_FILL: ',
./pkg/diagnostics/diagnostics_fract_fill.F 121 DIAGNOSTICS_FRACT_FILL
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_fract_fill.F 122 DIAGNOSTICS_FRACT_FILL
             WRITE(msgBuf,'(2A,I6,2A)') 'DIAGNOSTICS_FRACT_FILL: ',
./pkg/diagnostics/diagnostics_fract_fill.F 124 DIAGNOSTICS_FRACT_FILL
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_fract_fill.F 158 DIAGNOSTICS_FRACT_FILL
             WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_FRACT_FILL: ',
./pkg/diagnostics/diagnostics_fract_fill.F 160 DIAGNOSTICS_FRACT_FILL
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_fract_fill.F 161 DIAGNOSTICS_FRACT_FILL
             WRITE(msgBuf,'(2A,I6,2A)') 'DIAGNOSTICS_FRACT_FILL: ',
./pkg/diagnostics/diagnostics_fract_fill.F 163 DIAGNOSTICS_FRACT_FILL
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_fract_fill.F 84 DIAGNOSTICS_FRACT_FILL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_ini_io.F 37 DIAGNOSTICS_INI_IO
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_ini_io.F 55 DIAGNOSTICS_INI_IO
        WRITE(msgBuf,'(A)') ' '
./pkg/diagnostics/diagnostics_ini_io.F 56 DIAGNOSTICS_INI_IO
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_ini_io.F 59 DIAGNOSTICS_INI_IO
        WRITE(msgBuf,'(2A)') 'S/R DIAGNOSTICS_INI_IO: ',
./pkg/diagnostics/diagnostics_ini_io.F 61 DIAGNOSTICS_INI_IO
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_ini_io.F 62 DIAGNOSTICS_INI_IO
        WRITE(msgBuf,'(2A)') 'S/R DIAGNOSTICS_INI_IO: ',
./pkg/diagnostics/diagnostics_ini_io.F 64 DIAGNOSTICS_INI_IO
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_interp_vert.F 104 DIAGNOSTICS_INTERP_VERT
            WRITE(msgBuf,'(2A,I6,2A)') 'DIAGNOSTICS_INTERP_VERT: ',
./pkg/diagnostics/diagnostics_interp_vert.F 106 DIAGNOSTICS_INTERP_VERT
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_interp_vert.F 79 DIAGNOSTICS_INTERP_VERT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_list_check.F 100 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 101 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 103 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 107 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 109 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 110 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 112 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 117 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(5A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 120 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 121 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 123 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 128 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(5A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 131 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 132 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 134 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 138 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 140 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 141 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 143 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 147 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 149 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 150 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 152 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 156 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 158 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 159 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 161 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 165 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 167 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 168 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 170 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 174 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 176 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 177 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 179 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 183 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 185 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 186 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 188 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 192 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 194 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 195 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 197 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 47 DIAGNOSTICS_LIST_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_list_check.F 71 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 73 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 74 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 76 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 80 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 82 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 83 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 85 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 89 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_list_check.F 91 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 92 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: ',
./pkg/diagnostics/diagnostics_list_check.F 94 DIAGNOSTICS_LIST_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_list_check.F 98 DIAGNOSTICS_LIST_CHECK
           WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_LIST_CHECK: diagnostic "',
./pkg/diagnostics/diagnostics_out.F 217 DIAGNOSTICS_OUT
            WRITE(msgBuf,'(A,I10)')
./pkg/diagnostics/diagnostics_out.F 219 DIAGNOSTICS_OUT
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_out.F 221 DIAGNOSTICS_OUT
            WRITE(msgBuf,'(A,I6,3A,I4,2A)')
./pkg/diagnostics/diagnostics_out.F 224 DIAGNOSTICS_OUT
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_out.F 227 DIAGNOSTICS_OUT
             WRITE(msgBuf,'(A,2(I3,A))')
./pkg/diagnostics/diagnostics_out.F 231 DIAGNOSTICS_OUT
             WRITE(msgBuf,'(A,2(I3,A))')
./pkg/diagnostics/diagnostics_out.F 235 DIAGNOSTICS_OUT
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_out.F 237 DIAGNOSTICS_OUT
            WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_out.F 239 DIAGNOSTICS_OUT
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_out.F 356 DIAGNOSTICS_OUT
               WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_OUT: ',
./pkg/diagnostics/diagnostics_out.F 358 DIAGNOSTICS_OUT
               CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_out.F 381 DIAGNOSTICS_OUT
               WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_OUT: ',
./pkg/diagnostics/diagnostics_out.F 383 DIAGNOSTICS_OUT
               CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_out.F 78 DIAGNOSTICS_OUT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_readparms.F 193 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagnostics_readparms.F 195 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,SQUEEZE_RIGHT,1)
./pkg/diagnostics/diagnostics_readparms.F 200 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(2A)') 'S/R DIAGNOSTICS_READPARMS,',
./pkg/diagnostics/diagnostics_readparms.F 202 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_readparms.F 205 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(2A)') 'S/R DIAGNOSTICS_READPARMS,',
./pkg/diagnostics/diagnostics_readparms.F 207 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_readparms.F 214 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(2A)') 'S/R DIAGNOSTICS_READPARMS,',
./pkg/diagnostics/diagnostics_readparms.F 216 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_readparms.F 219 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(2A)') 'S/R DIAGNOSTICS_READPARMS,',
./pkg/diagnostics/diagnostics_readparms.F 221 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_readparms.F 300 DIAGNOSTICS_READPARMS
           WRITE(msgBuf,'(2A,F18.6,I4)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 303 DIAGNOSTICS_READPARMS
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 304 DIAGNOSTICS_READPARMS
           WRITE(msgBuf,'(2A,I4,2A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 306 DIAGNOSTICS_READPARMS
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 331 DIAGNOSTICS_READPARMS
              WRITE(msgBuf,'(2A,I4)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 333 DIAGNOSTICS_READPARMS
              CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 334 DIAGNOSTICS_READPARMS
              WRITE(msgBuf,'(2A,I4,A,F8.0)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 336 DIAGNOSTICS_READPARMS
              CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 337 DIAGNOSTICS_READPARMS
              WRITE(msgBuf,'(2A,I4,2A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 339 DIAGNOSTICS_READPARMS
              CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 355 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(2A,I4)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 357 DIAGNOSTICS_READPARMS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 358 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(2A,I4,3A,I4,2A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 360 DIAGNOSTICS_READPARMS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 361 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(2A,I4,2A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 363 DIAGNOSTICS_READPARMS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 370 DIAGNOSTICS_READPARMS
         WRITE(msgBuf,'(2A,I4)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 372 DIAGNOSTICS_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 373 DIAGNOSTICS_READPARMS
         WRITE(msgBuf,'(2A,I4)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 375 DIAGNOSTICS_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 376 DIAGNOSTICS_READPARMS
         WRITE(msgBuf,'(2A,F18.6,2A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 378 DIAGNOSTICS_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 427 DIAGNOSTICS_READPARMS
         WRITE(msgBuf,'(2A,I4,A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 429 DIAGNOSTICS_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 430 DIAGNOSTICS_READPARMS
         WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 432 DIAGNOSTICS_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 456 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(2A,I4,2A)')
./pkg/diagnostics/diagnostics_readparms.F 459 DIAGNOSTICS_READPARMS
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_readparms.F 461 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(A,I4,A)')
./pkg/diagnostics/diagnostics_readparms.F 464 DIAGNOSTICS_READPARMS
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_readparms.F 468 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(A,I4,A,I4,2A)')
./pkg/diagnostics/diagnostics_readparms.F 471 DIAGNOSTICS_READPARMS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 472 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(2A,I4,A,I4,2A)')
./pkg/diagnostics/diagnostics_readparms.F 475 DIAGNOSTICS_READPARMS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 491 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(2A,I4)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 493 DIAGNOSTICS_READPARMS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 494 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(2A,I4,3A,I4,2A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 496 DIAGNOSTICS_READPARMS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 497 DIAGNOSTICS_READPARMS
             WRITE(msgBuf,'(2A,I4,2A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 499 DIAGNOSTICS_READPARMS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 506 DIAGNOSTICS_READPARMS
         WRITE(msgBuf,'(2A,I4)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 508 DIAGNOSTICS_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 509 DIAGNOSTICS_READPARMS
         WRITE(msgBuf,'(2A,I4)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 511 DIAGNOSTICS_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 512 DIAGNOSTICS_READPARMS
         WRITE(msgBuf,'(2A,F18.6,2A)') 'DIAGNOSTICS_READPARMS: ',
./pkg/diagnostics/diagnostics_readparms.F 514 DIAGNOSTICS_READPARMS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_readparms.F 522 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_readparms.F 524 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 544 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_readparms.F 546 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 547 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_readparms.F 549 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 550 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_readparms.F 552 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 554 DIAGNOSTICS_READPARMS
        WRITE(msgBuf,'(2A)') 'Creating Output Stream: ', fnames(n)
./pkg/diagnostics/diagnostics_readparms.F 555 DIAGNOSTICS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 556 DIAGNOSTICS_READPARMS
        WRITE(msgBuf,'(2(A,F18.6))') 'Output Frequency:', freq(n),
./pkg/diagnostics/diagnostics_readparms.F 558 DIAGNOSTICS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 559 DIAGNOSTICS_READPARMS
        WRITE(msgBuf,'(2(A,F18.6),A,I4)')
./pkg/diagnostics/diagnostics_readparms.F 562 DIAGNOSTICS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 567 DIAGNOSTICS_READPARMS
          WRITE(msgBuf,'(A,1PE20.12,3A)')
./pkg/diagnostics/diagnostics_readparms.F 574 DIAGNOSTICS_READPARMS
          WRITE(msgBuf,'(A,1PE20.12,3A)')
./pkg/diagnostics/diagnostics_readparms.F 578 DIAGNOSTICS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 580 DIAGNOSTICS_READPARMS
          WRITE(msgBuf,'(A)') ' Cumulate all Levels (to be set later)'
./pkg/diagnostics/diagnostics_readparms.F 581 DIAGNOSTICS_READPARMS
          CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 583 DIAGNOSTICS_READPARMS
          WRITE(msgBuf,'(A,A)') ' Levels:    ','will be set later'
./pkg/diagnostics/diagnostics_readparms.F 584 DIAGNOSTICS_READPARMS
          CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 588 DIAGNOSTICS_READPARMS
          WRITE(msgBuf,'(A,1P10E10.3)')' interp:  ', (levs(k,n),k=l,m)
./pkg/diagnostics/diagnostics_readparms.F 589 DIAGNOSTICS_READPARMS
          CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 596 DIAGNOSTICS_READPARMS
          WRITE(msgBuf,'(A,20F5.0)') suffix, (levs(k,n),k=l,m)
./pkg/diagnostics/diagnostics_readparms.F 597 DIAGNOSTICS_READPARMS
          CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 602 DIAGNOSTICS_READPARMS
          WRITE(msgBuf,'(21A)') ' Fields:   ',(' ',flds(l,n),l=nf,m)
./pkg/diagnostics/diagnostics_readparms.F 603 DIAGNOSTICS_READPARMS
          CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 606 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_readparms.F 608 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 609 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_readparms.F 611 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 613 DIAGNOSTICS_READPARMS
        WRITE(msgBuf,'(2A)') 'Creating Stats. Output Stream: ',
./pkg/diagnostics/diagnostics_readparms.F 615 DIAGNOSTICS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 616 DIAGNOSTICS_READPARMS
        WRITE(msgBuf,'(2(A,F18.6))') 'Output Frequency:',
./pkg/diagnostics/diagnostics_readparms.F 618 DIAGNOSTICS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 619 DIAGNOSTICS_READPARMS
        WRITE(msgBuf,'(A)') ' Regions: '
./pkg/diagnostics/diagnostics_readparms.F 624 DIAGNOSTICS_READPARMS
          IF (l.LE.MAX_LEN_MBUF) WRITE(msgBuf(l-2:l),'(I3)') j
./pkg/diagnostics/diagnostics_readparms.F 627 DIAGNOSTICS_READPARMS
        CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 630 DIAGNOSTICS_READPARMS
          WRITE(msgBuf,'(21A)') ' Fields:   ',
./pkg/diagnostics/diagnostics_readparms.F 632 DIAGNOSTICS_READPARMS
          CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 635 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_readparms.F 637 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 638 DIAGNOSTICS_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagnostics_readparms.F 639 DIAGNOSTICS_READPARMS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_readparms.F 81 DIAGNOSTICS_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_set_calc.F 143 DIAGNOSTICS_SET_CALC
        WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_SET_CALC: ',
./pkg/diagnostics/diagnostics_set_calc.F 145 DIAGNOSTICS_SET_CALC
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_calc.F 147 DIAGNOSTICS_SET_CALC
        WRITE(msgBuf,'(A,1P1E19.6,A,0PF16.3)')
./pkg/diagnostics/diagnostics_set_calc.F 149 DIAGNOSTICS_SET_CALC
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_calc.F 152 DIAGNOSTICS_SET_CALC
          WRITE(msgBuf,'(2A)') 'DIAGNOSTICS_SET_CALC: ',
./pkg/diagnostics/diagnostics_set_calc.F 154 DIAGNOSTICS_SET_CALC
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_set_calc.F 172 DIAGNOSTICS_SET_CALC
               WRITE(msgBuf,'(2(A,2I5),A,F16.3)')
./pkg/diagnostics/diagnostics_set_calc.F 175 DIAGNOSTICS_SET_CALC
               CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_calc.F 180 DIAGNOSTICS_SET_CALC
               WRITE(msgBuf,'(2(A,2I5),A,F16.3)')
./pkg/diagnostics/diagnostics_set_calc.F 183 DIAGNOSTICS_SET_CALC
               CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_calc.F 192 DIAGNOSTICS_SET_CALC
        WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagnostics_set_calc.F 194 DIAGNOSTICS_SET_CALC
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_calc.F 43 DIAGNOSTICS_SET_CALC
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_set_levels.F 106 DIAGNOSTICS_SET_LEVELS
          WRITE(msgBuf,'(2A,I4,3A)')
./pkg/diagnostics/diagnostics_set_levels.F 109 DIAGNOSTICS_SET_LEVELS
          CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_set_levels.F 114 DIAGNOSTICS_SET_LEVELS
          WRITE(msgBuf,'(2A,4A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 117 DIAGNOSTICS_SET_LEVELS
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 122 DIAGNOSTICS_SET_LEVELS
        WRITE(msgBuf,'(2A,I6,3A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 124 DIAGNOSTICS_SET_LEVELS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 134 DIAGNOSTICS_SET_LEVELS
        WRITE(msgBuf,'(2A,4A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 136 DIAGNOSTICS_SET_LEVELS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 141 DIAGNOSTICS_SET_LEVELS
        WRITE(msgBuf,'(2A,I6,3A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 143 DIAGNOSTICS_SET_LEVELS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 151 DIAGNOSTICS_SET_LEVELS
        WRITE(msgBuf,'(2A,I6,3A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 153 DIAGNOSTICS_SET_LEVELS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 159 DIAGNOSTICS_SET_LEVELS
        WRITE(msgBuf,'(6A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 162 DIAGNOSTICS_SET_LEVELS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 167 DIAGNOSTICS_SET_LEVELS
        WRITE(msgBuf,'(2A,I6,3A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 169 DIAGNOSTICS_SET_LEVELS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 175 DIAGNOSTICS_SET_LEVELS
      WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagnostics_set_levels.F 177 DIAGNOSTICS_SET_LEVELS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_set_levels.F 178 DIAGNOSTICS_SET_LEVELS
      WRITE(msgBuf,'(A)') 'DIAGNOSTICS_SET_LEVELS: done'
./pkg/diagnostics/diagnostics_set_levels.F 179 DIAGNOSTICS_SET_LEVELS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_set_levels.F 180 DIAGNOSTICS_SET_LEVELS
      WRITE(msgBuf,'(A,I6)')
./pkg/diagnostics/diagnostics_set_levels.F 182 DIAGNOSTICS_SET_LEVELS
      CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_set_levels.F 188 DIAGNOSTICS_SET_LEVELS
        WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagnostics_set_levels.F 191 DIAGNOSTICS_SET_LEVELS
        CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_set_levels.F 247 DIAGNOSTICS_SET_LEVELS
            WRITE(msgBuf,'(4A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 249 DIAGNOSTICS_SET_LEVELS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 250 DIAGNOSTICS_SET_LEVELS
            WRITE(msgBuf,'(2A,I4,2A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 252 DIAGNOSTICS_SET_LEVELS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 253 DIAGNOSTICS_SET_LEVELS
            WRITE(msgBuf,'(2A,I4,2A)') 'DIAGNOSTICS_SET_LEVELS: ',
./pkg/diagnostics/diagnostics_set_levels.F 255 DIAGNOSTICS_SET_LEVELS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_levels.F 66 DIAGNOSTICS_SET_LEVELS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_set_pointers.F 103 DIAGNOSTICS_SET_POINTERS
         WRITE(msgBuf,'(2A,I4,A)') 'DIAGNOSTICS_SET_POINTERS: ',
./pkg/diagnostics/diagnostics_set_pointers.F 105 DIAGNOSTICS_SET_POINTERS
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 109 DIAGNOSTICS_SET_POINTERS
           WRITE(msgBuf,'(21A)') ' Fields:   ',(' ',flds(i,ld),i=md,j)
./pkg/diagnostics/diagnostics_set_pointers.F 110 DIAGNOSTICS_SET_POINTERS
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 149 DIAGNOSTICS_SET_POINTERS
             WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_SET_POINTERS: ',
./pkg/diagnostics/diagnostics_set_pointers.F 151 DIAGNOSTICS_SET_POINTERS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 162 DIAGNOSTICS_SET_POINTERS
        WRITE(msgBuf,'(A,I8,A)')
./pkg/diagnostics/diagnostics_set_pointers.F 165 DIAGNOSTICS_SET_POINTERS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 169 DIAGNOSTICS_SET_POINTERS
         WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagnostics_set_pointers.F 172 DIAGNOSTICS_SET_POINTERS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 173 DIAGNOSTICS_SET_POINTERS
         WRITE(msgBuf,'(A,I8,A,I8)')
./pkg/diagnostics/diagnostics_set_pointers.F 176 DIAGNOSTICS_SET_POINTERS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 179 DIAGNOSTICS_SET_POINTERS
         WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagnostics_set_pointers.F 182 DIAGNOSTICS_SET_POINTERS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 183 DIAGNOSTICS_SET_POINTERS
         WRITE(msgBuf,'(A,I6,A,I6)')
./pkg/diagnostics/diagnostics_set_pointers.F 186 DIAGNOSTICS_SET_POINTERS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 215 DIAGNOSTICS_SET_POINTERS
          WRITE(msgBuf,'(A,I6,5A,I6)') '  set mate pointer for diag #',
./pkg/diagnostics/diagnostics_set_pointers.F 218 DIAGNOSTICS_SET_POINTERS
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 238 DIAGNOSTICS_SET_POINTERS
            WRITE(msgBuf,'(2A,I4,2A)')
./pkg/diagnostics/diagnostics_set_pointers.F 241 DIAGNOSTICS_SET_POINTERS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 244 DIAGNOSTICS_SET_POINTERS
            WRITE(msgBuf,'(A,2(I6,A))')
./pkg/diagnostics/diagnostics_set_pointers.F 247 DIAGNOSTICS_SET_POINTERS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 248 DIAGNOSTICS_SET_POINTERS
            WRITE(msgBuf,'(2A,I4,2A)') 'DIAGNOSTICS_SET_POINTERS: in',
./pkg/diagnostics/diagnostics_set_pointers.F 250 DIAGNOSTICS_SET_POINTERS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 257 DIAGNOSTICS_SET_POINTERS
          WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_SET_POINTERS: ',
./pkg/diagnostics/diagnostics_set_pointers.F 259 DIAGNOSTICS_SET_POINTERS
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 265 DIAGNOSTICS_SET_POINTERS
            WRITE(msgBuf,'(A,20F5.0)') suffix, (levs(k,ld),k=k1,k2)
./pkg/diagnostics/diagnostics_set_pointers.F 266 DIAGNOSTICS_SET_POINTERS
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 282 DIAGNOSTICS_SET_POINTERS
             WRITE(msgBuf,'(A,I4,A,I6,2A)')
./pkg/diagnostics/diagnostics_set_pointers.F 285 DIAGNOSTICS_SET_POINTERS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 286 DIAGNOSTICS_SET_POINTERS
             WRITE(msgBuf,'(2A,I4,A,I6,2A)')
./pkg/diagnostics/diagnostics_set_pointers.F 289 DIAGNOSTICS_SET_POINTERS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 290 DIAGNOSTICS_SET_POINTERS
             WRITE(msgBuf,'(4A)') 'DIAGNOSTICS_SET_POINTERS: ',
./pkg/diagnostics/diagnostics_set_pointers.F 292 DIAGNOSTICS_SET_POINTERS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_set_pointers.F 299 DIAGNOSTICS_SET_POINTERS
        WRITE(msgBuf,'(A)') 'DIAGNOSTICS_SET_POINTERS: done'
./pkg/diagnostics/diagnostics_set_pointers.F 300 DIAGNOSTICS_SET_POINTERS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 302 DIAGNOSTICS_SET_POINTERS
        WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagnostics_set_pointers.F 304 DIAGNOSTICS_SET_POINTERS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 40 DIAGNOSTICS_SET_POINTERS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_set_pointers.F 73 DIAGNOSTICS_SET_POINTERS
             WRITE(msgBuf,'(3A)') 'DIAGNOSTICS_SET_POINTERS: ',
./pkg/diagnostics/diagnostics_set_pointers.F 75 DIAGNOSTICS_SET_POINTERS
             CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 80 DIAGNOSTICS_SET_POINTERS
             WRITE(msgBuf,'(2A,2(A,I4),2A)')
./pkg/diagnostics/diagnostics_set_pointers.F 83 DIAGNOSTICS_SET_POINTERS
             CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_set_pointers.F 90 DIAGNOSTICS_SET_POINTERS
             WRITE(msgBuf,'(2A,2(A,I4),2A)')
./pkg/diagnostics/diagnostics_set_pointers.F 93 DIAGNOSTICS_SET_POINTERS
             CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagnostics_setdiag.F 111 DIAGNOSTICS_SETDIAG
        WRITE(msgBuf,'(2(A,I6,1X,A))')
./pkg/diagnostics/diagnostics_setdiag.F 114 DIAGNOSTICS_SETDIAG
        CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_setdiag.F 135 DIAGNOSTICS_SETDIAG
         WRITE(msgBuf,'(A,I6,1X,A)')
./pkg/diagnostics/diagnostics_setdiag.F 137 DIAGNOSTICS_SETDIAG
         CALL PRINT_MESSAGE(msgBuf, errUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_setdiag.F 139 DIAGNOSTICS_SETDIAG
         WRITE(msgBuf,'(A,2(I3,A),I6,1X,A)') 'SETDIAG: Allocate',
./pkg/diagnostics/diagnostics_setdiag.F 142 DIAGNOSTICS_SETDIAG
         CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_setdiag.F 146 DIAGNOSTICS_SETDIAG
        WRITE(msgBuf,'(3A,I6,1X,2A)') '- NOTE - SETDIAG: ',tmpMsg,
./pkg/diagnostics/diagnostics_setdiag.F 148 DIAGNOSTICS_SETDIAG
        CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_setdiag.F 200 DIAGNOSTICS_SETDIAG
           WRITE(msgBuf,'(3A,I6,1X,A)')
./pkg/diagnostics/diagnostics_setdiag.F 203 DIAGNOSTICS_SETDIAG
           CALL PRINT_MESSAGE(msgBuf, errUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_setdiag.F 205 DIAGNOSTICS_SETDIAG
           WRITE(msgBuf,'(A,2(I3,A),I6,1X,A)') 'SETDIAG: Allocate',
./pkg/diagnostics/diagnostics_setdiag.F 208 DIAGNOSTICS_SETDIAG
           CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_setdiag.F 211 DIAGNOSTICS_SETDIAG
          WRITE(msgBuf,'(3A,I6,1X,2A)') '- NOTE - SETDIAG: ',tmpMsg,
./pkg/diagnostics/diagnostics_setdiag.F 213 DIAGNOSTICS_SETDIAG
          CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_setdiag.F 54 DIAGNOSTICS_SETDIAG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_status_error.F 101 DIAGNOSTICS_STATUS_ERROR
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_status_error.F 103 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': before ',
./pkg/diagnostics/diagnostics_status_error.F 106 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': before ',
./pkg/diagnostics/diagnostics_status_error.F 109 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': before ',
./pkg/diagnostics/diagnostics_status_error.F 112 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': before ',
./pkg/diagnostics/diagnostics_status_error.F 115 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': before ',
./pkg/diagnostics/diagnostics_status_error.F 118 DIAGNOSTICS_STATUS_ERROR
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_status_error.F 123 DIAGNOSTICS_STATUS_ERROR
        WRITE(msgBuf,'(4A)') callerSubR,
./pkg/diagnostics/diagnostics_status_error.F 125 DIAGNOSTICS_STATUS_ERROR
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_status_error.F 45 DIAGNOSTICS_STATUS_ERROR
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_status_error.F 52 DIAGNOSTICS_STATUS_ERROR
      WRITE(msgBuf,'(4A)') '*** DIAGNOSTICS_STATUS_ERROR ***',
./pkg/diagnostics/diagnostics_status_error.F 54 DIAGNOSTICS_STATUS_ERROR
      CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_status_error.F 57 DIAGNOSTICS_STATUS_ERROR
        WRITE(msgBuf,'(1A,2(A,I3),2A)') callerSubR,
./pkg/diagnostics/diagnostics_status_error.F 60 DIAGNOSTICS_STATUS_ERROR
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_status_error.F 62 DIAGNOSTICS_STATUS_ERROR
        WRITE(msgBuf,'(3A,2(A,I3))') callerSubR,
./pkg/diagnostics/diagnostics_status_error.F 65 DIAGNOSTICS_STATUS_ERROR
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_status_error.F 69 DIAGNOSTICS_STATUS_ERROR
        WRITE(msgBuf,'(4A)') callerSubR,
./pkg/diagnostics/diagnostics_status_error.F 71 DIAGNOSTICS_STATUS_ERROR
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_status_error.F 76 DIAGNOSTICS_STATUS_ERROR
        WRITE(msgBuf,'(3A)') callerSubR,
./pkg/diagnostics/diagnostics_status_error.F 78 DIAGNOSTICS_STATUS_ERROR
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_status_error.F 80 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': after ',
./pkg/diagnostics/diagnostics_status_error.F 83 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': after ',
./pkg/diagnostics/diagnostics_status_error.F 86 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': after ',
./pkg/diagnostics/diagnostics_status_error.F 89 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': after ',
./pkg/diagnostics/diagnostics_status_error.F 92 DIAGNOSTICS_STATUS_ERROR
         WRITE(msgBuf,'(3A)') callerSubR, ': after ',
./pkg/diagnostics/diagnostics_status_error.F 95 DIAGNOSTICS_STATUS_ERROR
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_status_error.F 99 DIAGNOSTICS_STATUS_ERROR
        WRITE(msgBuf,'(2A)') callerSubR,
./pkg/diagnostics/diagnostics_summary.F 114 DIAGNOSTICS_SUMMARY
           WRITE(msgBuf,'(I6,3A,2(I7,A),I4,A)')
./pkg/diagnostics/diagnostics_summary.F 133 DIAGNOSTICS_SUMMARY
                 iLen = ILNBLNK(msgBuf)
./pkg/diagnostics/diagnostics_summary.F 134 DIAGNOSTICS_SUMMARY
                 tmpBuf(1:iLen) = msgBuf(1:iLen)
./pkg/diagnostics/diagnostics_summary.F 136 DIAGNOSTICS_SUMMARY
                   WRITE(msgBuf,'(A,I7,A)') tmpBuf(1:iLen),xOld,cSep
./pkg/diagnostics/diagnostics_summary.F 138 DIAGNOSTICS_SUMMARY
                   WRITE(msgBuf,'(A,I7,A,I3,2A)') tmpBuf(1:iLen),xOld,
./pkg/diagnostics/diagnostics_summary.F 146 DIAGNOSTICS_SUMMARY
            iLen = ILNBLNK(msgBuf)
./pkg/diagnostics/diagnostics_summary.F 147 DIAGNOSTICS_SUMMARY
            tmpBuf(1:iLen) = msgBuf(1:iLen)
./pkg/diagnostics/diagnostics_summary.F 148 DIAGNOSTICS_SUMMARY
            WRITE(msgBuf,'(A,I8,A)') tmpBuf(1:iLen),ndiag(ipt,1,1),' |'
./pkg/diagnostics/diagnostics_summary.F 151 DIAGNOSTICS_SUMMARY
             iLen = ILNBLNK(msgBuf)
./pkg/diagnostics/diagnostics_summary.F 152 DIAGNOSTICS_SUMMARY
             tmpBuf(1:iLen) = msgBuf(1:iLen)
./pkg/diagnostics/diagnostics_summary.F 153 DIAGNOSTICS_SUMMARY
             WRITE(msgBuf,'(A,I8,A)') tmpBuf(1:iLen),ndiag(im,1,1),' |'
./pkg/diagnostics/diagnostics_summary.F 156 DIAGNOSTICS_SUMMARY
           iLen = ILNBLNK(msgBuf)
./pkg/diagnostics/diagnostics_summary.F 157 DIAGNOSTICS_SUMMARY
           WRITE(dUnit,'(A)') msgBuf(1:iLen)
./pkg/diagnostics/diagnostics_summary.F 186 DIAGNOSTICS_SUMMARY
         WRITE(msgBuf,'(A)') ' Regions: '
./pkg/diagnostics/diagnostics_summary.F 191 DIAGNOSTICS_SUMMARY
             tmpBuf(1:iLen) = msgBuf(1:iLen)
./pkg/diagnostics/diagnostics_summary.F 192 DIAGNOSTICS_SUMMARY
             WRITE(msgBuf,'(A,I3)') tmpBuf(1:iLen),j
./pkg/diagnostics/diagnostics_summary.F 196 DIAGNOSTICS_SUMMARY
         WRITE(dUnit,'(A)') msgBuf(1:iLen)
./pkg/diagnostics/diagnostics_summary.F 200 DIAGNOSTICS_SUMMARY
           WRITE(msgBuf,'(I6,3A,2(I7,A))')
./pkg/diagnostics/diagnostics_summary.F 205 DIAGNOSTICS_SUMMARY
            iLen = ILNBLNK(msgBuf)
./pkg/diagnostics/diagnostics_summary.F 206 DIAGNOSTICS_SUMMARY
            tmpBuf(1:iLen) = msgBuf(1:iLen)
./pkg/diagnostics/diagnostics_summary.F 207 DIAGNOSTICS_SUMMARY
            WRITE(msgBuf,'(A,1PE12.5,A)') tmpBuf(1:iLen),
./pkg/diagnostics/diagnostics_summary.F 212 DIAGNOSTICS_SUMMARY
            iLen = ILNBLNK(msgBuf)
./pkg/diagnostics/diagnostics_summary.F 213 DIAGNOSTICS_SUMMARY
            tmpBuf(1:iLen) = msgBuf(1:iLen)
./pkg/diagnostics/diagnostics_summary.F 214 DIAGNOSTICS_SUMMARY
            WRITE(msgBuf,'(A,1PE12.5,A)') tmpBuf(1:iLen),
./pkg/diagnostics/diagnostics_summary.F 217 DIAGNOSTICS_SUMMARY
           iLen = ILNBLNK(msgBuf)
./pkg/diagnostics/diagnostics_summary.F 218 DIAGNOSTICS_SUMMARY
           WRITE(dUnit,'(A)') msgBuf(1:iLen)
./pkg/diagnostics/diagnostics_summary.F 38 DIAGNOSTICS_SUMMARY
      CHARACTER*(MAX_LEN_MBUF) msgBuf, tmpBuf
./pkg/diagnostics/diagnostics_summary.F 54 DIAGNOSTICS_SUMMARY
        WRITE(msgBuf,'(A,I6)')
./pkg/diagnostics/diagnostics_summary.F 56 DIAGNOSTICS_SUMMARY
        CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_summary.F 64 DIAGNOSTICS_SUMMARY
         WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagnostics_summary.F 66 DIAGNOSTICS_SUMMARY
         CALL PRINT_MESSAGE( msgBuf, stdUnit,SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagnostics_switch_onoff.F 147 DIAGNOSTICS_SWITCH_ONOFF
          WRITE(msgBuf,'(2A,I3,A,I4)') 'DIAGNOSTICS_SWITCH_ONOFF:',
./pkg/diagnostics/diagnostics_switch_onoff.F 149 DIAGNOSTICS_SWITCH_ONOFF
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_switch_onoff.F 150 DIAGNOSTICS_SWITCH_ONOFF
          WRITE(msgBuf,'(2A,I4,A,F17.6)') 'DIAGNOSTICS_SWITCH_ONOFF:',
./pkg/diagnostics/diagnostics_switch_onoff.F 152 DIAGNOSTICS_SWITCH_ONOFF
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagnostics_switch_onoff.F 44 DIAGNOSTICS_SWITCH_ONOFF
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_utils.F 339 DIAGNOSTICS_SETKLEV
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_utils.F 361 DIAGNOSTICS_SETKLEV
        WRITE(msgBuf,'(4A)') 'DIAGNOSTICS_SETKLEV: ',
./pkg/diagnostics/diagnostics_utils.F 363 DIAGNOSTICS_SETKLEV
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_utils.F 374 DIAGNOSTICS_SETKLEV
        WRITE(msgBuf,'(4A,I5)') '** WARNING ** DIAGNOSTICS_SETKLEV: ',
./pkg/diagnostics/diagnostics_utils.F 376 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 378 DIAGNOSTICS_SETKLEV
        WRITE(msgBuf,'(2A,I5,A)')'** WARNING ** DIAGNOSTICS_SETKLEV:',
./pkg/diagnostics/diagnostics_utils.F 380 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 384 DIAGNOSTICS_SETKLEV
        WRITE(msgBuf,'(4A,I5)') 'DIAGNOSTICS_SETKLEV: ',
./pkg/diagnostics/diagnostics_utils.F 386 DIAGNOSTICS_SETKLEV
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_utils.F 387 DIAGNOSTICS_SETKLEV
        WRITE(msgBuf,'(2A,I5,3A)') 'DIAGNOSTICS_SETKLEV: ',
./pkg/diagnostics/diagnostics_utils.F 389 DIAGNOSTICS_SETKLEV
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_utils.F 392 DIAGNOSTICS_SETKLEV
        WRITE(msgBuf,'(4A,I5)') '** WARNING ** DIAGNOSTICS_SETKLEV: ',
./pkg/diagnostics/diagnostics_utils.F 394 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 396 DIAGNOSTICS_SETKLEV
        WRITE(msgBuf,'(2A,I5,3A)') '** WARNING ** will set level Nb',
./pkg/diagnostics/diagnostics_utils.F 398 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 400 DIAGNOSTICS_SETKLEV
        WRITE(msgBuf,'(4A)') '** WARNING ** DIAGNOSTICS_SETKLEV',
./pkg/diagnostics/diagnostics_utils.F 402 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 442 DIAGNOSTICS_SETKLEV
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_utils.F 454 DIAGNOSTICS_SETKLEV
         WRITE(msgBuf,'(4A)') 'DIAGS_GET_PARMS_I: ',
./pkg/diagnostics/diagnostics_utils.F 456 DIAGNOSTICS_SETKLEV
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/diagnostics/diagnostics_utils.F 492 DIAGNOSTICS_SETKLEV
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_utils.F 530 DIAGNOSTICS_SETKLEV
         WRITE(msgBuf,'(2A,I4,A)') '** WARNING ** ',
./pkg/diagnostics/diagnostics_utils.F 532 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 534 DIAGNOSTICS_SETKLEV
         WRITE(msgBuf,'(3A)') '** WARNING ** ',
./pkg/diagnostics/diagnostics_utils.F 536 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 572 DIAGNOSTICS_SETKLEV
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_utils.F 599 DIAGNOSTICS_SETKLEV
         WRITE(msgBuf,'(2A,I4,A)') '** WARNING ** ',
./pkg/diagnostics/diagnostics_utils.F 601 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 603 DIAGNOSTICS_SETKLEV
         WRITE(msgBuf,'(3A)') '** WARNING ** ',
./pkg/diagnostics/diagnostics_utils.F 605 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 645 DIAGNOSTICS_SETKLEV
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagnostics_utils.F 664 DIAGNOSTICS_SETKLEV
        WRITE(msgBuf,'(6A)') '** WARNING ** (DIAGS_RENAMED):',
./pkg/diagnostics/diagnostics_utils.F 666 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagnostics_utils.F 668 DIAGNOSTICS_SETKLEV
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_close_io.F 40 DIAGSTATS_CLOSE_IO
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagstats_close_io.F 63 DIAGSTATS_CLOSE_IO
          WRITE(msgBuf,'(4A,I6)') 'DIAGSTATS_CLOSE_IO: ',
./pkg/diagnostics/diagstats_close_io.F 65 DIAGSTATS_CLOSE_IO
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_fill.F 110 DIAGSTATS_FILL
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagstats_fill.F 200 DIAGSTATS_FILL
          WRITE(msgBuf,'(2A,I4,A)') 'DIAGSTATS_FILL: ',
./pkg/diagnostics/diagstats_fill.F 202 DIAGSTATS_FILL
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_fill.F 203 DIAGSTATS_FILL
          WRITE(msgBuf,'(2A,I6,2A)') 'DIAGSTATS_FILL: ',
./pkg/diagnostics/diagstats_fill.F 205 DIAGSTATS_FILL
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_fill.F 206 DIAGSTATS_FILL
          WRITE(msgBuf,'(2A,2I4,I3)') 'calling DIAGSTATS_FILL ',
./pkg/diagnostics/diagstats_fill.F 208 DIAGSTATS_FILL
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_fill.F 209 DIAGSTATS_FILL
          WRITE(msgBuf,'(2A,I6,A)') 'DIAGSTATS_FILL: ',
./pkg/diagnostics/diagstats_fill.F 211 DIAGSTATS_FILL
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_ini_io.F 40 DIAGSTATS_INI_IO
      CHARACTER*(MAX_LEN_MBUF) msgBuf, tmpBuf
./pkg/diagnostics/diagstats_ini_io.F 66 DIAGSTATS_INI_IO
          WRITE(msgBuf,'(4A,I6)') 'DIAGSTATS_INI_IO: ',
./pkg/diagnostics/diagstats_ini_io.F 68 DIAGSTATS_INI_IO
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_ini_io.F 76 DIAGSTATS_INI_IO
          WRITE(msgBuf,'(A)')      '# Regions      : '
./pkg/diagnostics/diagstats_ini_io.F 80 DIAGSTATS_INI_IO
              tmpBuf(1:iL) = msgBuf(1:iL)
./pkg/diagnostics/diagstats_ini_io.F 81 DIAGSTATS_INI_IO
              WRITE(msgBuf,'(A,I3)') tmpBuf(1:iL),j
./pkg/diagnostics/diagstats_ini_io.F 85 DIAGSTATS_INI_IO
          WRITE(nUnit,'(A)') msgBuf(1:iL)
./pkg/diagnostics/diagstats_output.F 100 DIAGSTATS_OUTPUT
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagstats_output.F 103 DIAGSTATS_OUTPUT
              WRITE(msgBuf,'(2(A,I4))') '- WARNING - kdiag=',
./pkg/diagnostics/diagstats_output.F 106 DIAGSTATS_OUTPUT
              WRITE(msgBuf,'(2A)') '- WARNING - has not been filled,',
./pkg/diagnostics/diagstats_output.F 109 DIAGSTATS_OUTPUT
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagstats_output.F 111 DIAGSTATS_OUTPUT
             WRITE(msgBuf,'(A)')
./pkg/diagnostics/diagstats_output.F 113 DIAGSTATS_OUTPUT
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagstats_output.F 56 DIAGSTATS_OUTPUT
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagstats_output.F 92 DIAGSTATS_OUTPUT
             WRITE(msgBuf,'(A,I10,A,I4)')
./pkg/diagnostics/diagstats_output.F 95 DIAGSTATS_OUTPUT
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/diagnostics/diagstats_output.F 97 DIAGSTATS_OUTPUT
             WRITE(msgBuf,'(A,I6,3A,I4,2A)')
./pkg/diagnostics/diagstats_set_pointers.F 118 DIAGSTATS_SET_POINTERS
        WRITE(msgBuf,'(A,I8,A)')
./pkg/diagnostics/diagstats_set_pointers.F 121 DIAGSTATS_SET_POINTERS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_set_pointers.F 125 DIAGSTATS_SET_POINTERS
         WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagstats_set_pointers.F 128 DIAGSTATS_SET_POINTERS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_pointers.F 129 DIAGSTATS_SET_POINTERS
         WRITE(msgBuf,'(A,I8,A,I8)')
./pkg/diagnostics/diagstats_set_pointers.F 132 DIAGSTATS_SET_POINTERS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_pointers.F 135 DIAGSTATS_SET_POINTERS
         WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagstats_set_pointers.F 138 DIAGSTATS_SET_POINTERS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_pointers.F 139 DIAGSTATS_SET_POINTERS
         WRITE(msgBuf,'(A,I6,A,I6)')
./pkg/diagnostics/diagstats_set_pointers.F 142 DIAGSTATS_SET_POINTERS
         CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_pointers.F 156 DIAGSTATS_SET_POINTERS
            WRITE(msgBuf,'(A,3(A,I5))') 'DIAGSTATS_SET_POINTERS:',
./pkg/diagnostics/diagstats_set_pointers.F 159 DIAGSTATS_SET_POINTERS
            CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_pointers.F 166 DIAGSTATS_SET_POINTERS
        WRITE(msgBuf,'(2A)') 'DIAGSTATS_SET_POINTERS:',
./pkg/diagnostics/diagstats_set_pointers.F 168 DIAGSTATS_SET_POINTERS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_pointers.F 174 DIAGSTATS_SET_POINTERS
        WRITE(msgBuf,'(A)') 'DIAGSTATS_SET_POINTERS: done'
./pkg/diagnostics/diagstats_set_pointers.F 175 DIAGSTATS_SET_POINTERS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_set_pointers.F 177 DIAGSTATS_SET_POINTERS
        WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagstats_set_pointers.F 179 DIAGSTATS_SET_POINTERS
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_set_pointers.F 41 DIAGSTATS_SET_POINTERS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagstats_set_pointers.F 78 DIAGSTATS_SET_POINTERS
             WRITE(msgBuf,'(3A)') 'DIAGSTATS_SET_POINTERS: ',
./pkg/diagnostics/diagstats_set_pointers.F 80 DIAGSTATS_SET_POINTERS
             CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_regions.F 135 DIAGSTATS_SET_REGIONS
          WRITE(msgBuf,'(2A,I3,A,I4)') 'DIAGSTATS_SET_REGIONS: ',
./pkg/diagnostics/diagstats_set_regions.F 137 DIAGSTATS_SET_REGIONS
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_regions.F 141 DIAGSTATS_SET_REGIONS
          WRITE(msgBuf,'(2A,I3,A,I3,A)') 'DIAGSTATS_SET_REGIONS: ',
./pkg/diagnostics/diagstats_set_regions.F 144 DIAGSTATS_SET_REGIONS
          CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_regions.F 169 DIAGSTATS_SET_REGIONS
      WRITE(msgBuf,'(A,I4,A)') 'DIAGSTATS_SET_REGIONS: define',
./pkg/diagnostics/diagstats_set_regions.F 171 DIAGSTATS_SET_REGIONS
      iLen = ILNBLNK(msgBuf)
./pkg/diagnostics/diagstats_set_regions.F 175 DIAGSTATS_SET_REGIONS
          tmpBuf(1:iLen) = msgBuf(1:iLen)
./pkg/diagnostics/diagstats_set_regions.F 176 DIAGSTATS_SET_REGIONS
          WRITE(msgBuf,'(A,I3)') tmpBuf(1:iLen),j
./pkg/diagnostics/diagstats_set_regions.F 180 DIAGSTATS_SET_REGIONS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_set_regions.F 182 DIAGSTATS_SET_REGIONS
      WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagstats_set_regions.F 184 DIAGSTATS_SET_REGIONS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_set_regions.F 213 DIAGSTATS_SET_REGIONS
        WRITE(msgBuf,'(2A)') 'DIAGSTATS_SET_REGIONS:',
./pkg/diagnostics/diagstats_set_regions.F 215 DIAGSTATS_SET_REGIONS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_regions.F 219 DIAGSTATS_SET_REGIONS
      WRITE(msgBuf,'(A)') 'DIAGSTATS_SET_REGIONS: define no region'
./pkg/diagnostics/diagstats_set_regions.F 220 DIAGSTATS_SET_REGIONS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_set_regions.F 222 DIAGSTATS_SET_REGIONS
      WRITE(msgBuf,'(2A)')
./pkg/diagnostics/diagstats_set_regions.F 224 DIAGSTATS_SET_REGIONS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/diagnostics/diagstats_set_regions.F 36 DIAGSTATS_SET_REGIONS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagstats_set_regions.F 73 DIAGSTATS_SET_REGIONS
        WRITE(msgBuf,'(2A)') 'DIAGSTATS_SET_REGIONS:',
./pkg/diagnostics/diagstats_set_regions.F 75 DIAGSTATS_SET_REGIONS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_set_regions.F 79 DIAGSTATS_SET_REGIONS
        WRITE(msgBuf,'(2A,I4,A,I4)') 'DIAGSTATS_SET_REGIONS:',
./pkg/diagnostics/diagstats_set_regions.F 82 DIAGSTATS_SET_REGIONS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/diagnostics/diagstats_setdiag.F 100 DIAGSTATS_SETDIAG
        CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagstats_setdiag.F 128 DIAGSTATS_SETDIAG
           WRITE(msgBuf,'(A,I6,1X,A)')
./pkg/diagnostics/diagstats_setdiag.F 131 DIAGSTATS_SETDIAG
           CALL PRINT_MESSAGE(msgBuf, errUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagstats_setdiag.F 133 DIAGSTATS_SETDIAG
           WRITE(msgBuf,'(A,I3,A,I6,1X,A)') 'SETDIAG: Allocate',
./pkg/diagnostics/diagstats_setdiag.F 135 DIAGSTATS_SETDIAG
           CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagstats_setdiag.F 140 DIAGSTATS_SETDIAG
          WRITE(msgBuf,'(A,I6,1X,2A)')
./pkg/diagnostics/diagstats_setdiag.F 143 DIAGSTATS_SETDIAG
          CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagstats_setdiag.F 53 DIAGSTATS_SETDIAG
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/diagnostics/diagstats_setdiag.F 86 DIAGSTATS_SETDIAG
         WRITE(msgBuf,'(A,I6,1X,A)')
./pkg/diagnostics/diagstats_setdiag.F 88 DIAGSTATS_SETDIAG
         CALL PRINT_MESSAGE(msgBuf, errUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagstats_setdiag.F 90 DIAGSTATS_SETDIAG
         WRITE(msgBuf,'(A,I3,A,I6,1X,A)') 'SETDIAG: Allocate',
./pkg/diagnostics/diagstats_setdiag.F 92 DIAGSTATS_SETDIAG
         CALL PRINT_MESSAGE(msgBuf, stdUnit, SQUEEZE_RIGHT, myThid)
./pkg/diagnostics/diagstats_setdiag.F 97 DIAGSTATS_SETDIAG
        WRITE(msgBuf,'(A,I6,1X,2A)')
./pkg/dic/dic_fields_load.F 220 DIC_FIELDS_LOAD
            WRITE(msgBuf,'(2A)')
./pkg/dic/dic_fields_load.F 223 DIC_FIELDS_LOAD
            CALL PRINT_ERROR( msgBuf, myThid )
./pkg/dic/dic_fields_load.F 40 DIC_FIELDS_LOAD
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/dic/dic_ini_forcing.F 35 DIC_INI_FORCING
       CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/dic/dic_ini_forcing.F 66 DIC_INI_FORCING
        WRITE(msgBuf,'(2A)')
./pkg/dic/dic_ini_forcing.F 69 DIC_INI_FORCING
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/dic/dic_init_fixed.F 32 DIC_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/dic/dic_init_fixed.F 90 DIC_INIT_FIXED
      WRITE(msgBuf,'(A)') ' '
./pkg/dic/dic_init_fixed.F 91 DIC_INIT_FIXED
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/dic/dic_init_fixed.F 92 DIC_INIT_FIXED
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/dic/dic_init_fixed.F 93 DIC_INIT_FIXED
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/dic/dic_init_fixed.F 94 DIC_INIT_FIXED
      WRITE(msgBuf,'(A)') '//  DIC_INIT_FIXED parameters :'
./pkg/dic/dic_init_fixed.F 95 DIC_INIT_FIXED
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/dic/dic_read_co2_pickup.F 33 DIC_READ_CO2_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/dic/dic_read_co2_pickup.F 64 DIC_READ_CO2_PICKUP
          WRITE(msgBuf,'(4A)') 'DIC_READ_CO2_PICKUP: ',
./pkg/dic/dic_read_co2_pickup.F 66 DIC_READ_CO2_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/dic/dic_read_pickup.F 31 DIC_READ_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/dic/dic_read_pickup.F 72 DIC_READ_PICKUP
          WRITE(msgBuf,'(4A)') 'DIC_READ_PICKUP: ',
./pkg/dic/dic_read_pickup.F 75 DIC_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/dic/dic_read_pickup.F 78 DIC_READ_PICKUP
          WRITE(msgBuf,'(2A)') 'WARNING >> DIC_READ_PICKUP: ',
./pkg/dic/dic_read_pickup.F 80 DIC_READ_PICKUP
          CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/dic/dic_readparms.F 152 DIC_READPARMS
      WRITE(msgBuf,'(A)') ' DIC_READPARMS: opening data.dic'
./pkg/dic/dic_readparms.F 153 DIC_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/dic/dic_readparms.F 172 DIC_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/dic/dic_readparms.F 174 DIC_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/dic/dic_readparms.F 203 DIC_READPARMS
      WRITE(msgBuf,'(A)') ' '
./pkg/dic/dic_readparms.F 204 DIC_READPARMS
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/dic/dic_readparms.F 205 DIC_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/dic/dic_readparms.F 206 DIC_READPARMS
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/dic/dic_readparms.F 207 DIC_READPARMS
      WRITE(msgBuf,'(A)') '// DIC package parameters :'
./pkg/dic/dic_readparms.F 208 DIC_READPARMS
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/dic/dic_readparms.F 209 DIC_READPARMS
      WRITE(msgBuf,'(A)') '// ==================================='
./pkg/dic/dic_readparms.F 210 DIC_READPARMS
      CALL PRINT_MESSAGE(msgBuf,iUnit,SQUEEZE_RIGHT,myThid)
./pkg/dic/dic_readparms.F 310 DIC_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/dic/dic_readparms.F 312 DIC_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/dic/dic_readparms.F 318 DIC_READPARMS
        WRITE(msgBuf,'(2A)') 'DIC_READPARMS: ',
./pkg/dic/dic_readparms.F 320 DIC_READPARMS
        CALL PRINT_ERROR( msgBuf, myThid )
./pkg/dic/dic_readparms.F 322 DIC_READPARMS
         WRITE(msgBuf,'(2A)') 'DIC_READPARMS: ',
./pkg/dic/dic_readparms.F 324 DIC_READPARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/dic/dic_readparms.F 327 DIC_READPARMS
         WRITE(msgBuf,'(2A)') 'DIC_READPARMS: ',
./pkg/dic/dic_readparms.F 329 DIC_READPARMS
         CALL PRINT_ERROR( msgBuf, myThid )
./pkg/dic/dic_readparms.F 40 DIC_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/dic/dic_tr_register.F 38 DIC_TR_REGISTER
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/dic/dic_tr_register.F 52 DIC_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') '  DIC_TR_REGISTER: ',
./pkg/dic/dic_tr_register.F 54 DIC_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/dic/dic_tr_register.F 56 DIC_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') '  DIC_TR_REGISTER: ',
./pkg/dic/dic_tr_register.F 58 DIC_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/dic/dic_tr_register.F 64 DIC_TR_REGISTER
      WRITE(msgBuf,'(2A,2I5)') '  DIC_TR_REGISTER: ',
./pkg/dic/dic_tr_register.F 66 DIC_TR_REGISTER
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/dic/dic_write_pickup.F 101 DIC_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/dic/dic_write_pickup.F 54 DIC_WRITE_PICKUP
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/dic/dic_write_pickup.F 96 DIC_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'DIC_WRITE_PICKUP: ',
./pkg/dic/dic_write_pickup.F 98 DIC_WRITE_PICKUP
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/dic/dic_write_pickup.F 99 DIC_WRITE_PICKUP
          WRITE(msgBuf,'(2A,I5,A)') 'DIC_WRITE_PICKUP: ',
./pkg/down_slope/dwnslp_init_fixed.F 199 DWNSLP_INIT_FIXED
          WRITE(msgBuf,'(A,I8,A)')
./pkg/down_slope/dwnslp_init_fixed.F 201 DWNSLP_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/down_slope/dwnslp_init_fixed.F 202 DWNSLP_INIT_FIXED
          WRITE(msgBuf,'(A,2I4,A,I8)')
./pkg/down_slope/dwnslp_init_fixed.F 204 DWNSLP_INIT_FIXED
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/down_slope/dwnslp_init_fixed.F 297 DWNSLP_INIT_FIXED
        WRITE(msgBuf,'(A,2I4,I8)')
./pkg/down_slope/dwnslp_init_fixed.F 299 DWNSLP_INIT_FIXED
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/down_slope/dwnslp_init_fixed.F 41 DWNSLP_INIT_FIXED
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/down_slope/dwnslp_readparms.F 101 DWNSLP_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/down_slope/dwnslp_readparms.F 103 DWNSLP_READPARMS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/down_slope/dwnslp_readparms.F 35 DWNSLP_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/down_slope/dwnslp_readparms.F 58 DWNSLP_READPARMS
      WRITE(msgBuf,'(A)')' DWNSLP_READPARMS: opening data.down_slope'
./pkg/down_slope/dwnslp_readparms.F 59 DWNSLP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/down_slope/dwnslp_readparms.F 77 DWNSLP_READPARMS
      WRITE(msgBuf,'(A)')
./pkg/down_slope/dwnslp_readparms.F 79 DWNSLP_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/down_slope/dwnslp_readparms.F 95 DWNSLP_READPARMS
        WRITE(msgBuf,'(A)')
./pkg/down_slope/dwnslp_readparms.F 97 DWNSLP_READPARMS
        CALL PRINT_ERROR( msgBuf , myThid )
./pkg/ebm/ebm_readparms.F 105 EBM_READPARMS
          WRITE(msgBuf,'(2A)') 'EBM_READPARMS: ',
./pkg/ebm/ebm_readparms.F 107 EBM_READPARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ebm/ebm_readparms.F 108 EBM_READPARMS
          WRITE(msgBuf,'(2A)') 'EBM_READPARMS: ',
./pkg/ebm/ebm_readparms.F 110 EBM_READPARMS
          CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ebm/ebm_readparms.F 113 EBM_READPARMS
          WRITE(msgBuf,'(2A)') ' EBM_READPARMS: ',
./pkg/ebm/ebm_readparms.F 115 EBM_READPARMS
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ebm/ebm_readparms.F 38 EBM_READPARMS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ebm/ebm_readparms.F 61 EBM_READPARMS
      WRITE(msgBuf,'(A)') ' EBM_READPARMS: opening data.ebm'
./pkg/ebm/ebm_readparms.F 62 EBM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ebm/ebm_readparms.F 81 EBM_READPARMS
       WRITE(msgBuf,'(A)') 'S/R EBM_READPARMS'
./pkg/ebm/ebm_readparms.F 82 EBM_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ebm/ebm_readparms.F 83 EBM_READPARMS
       WRITE(msgBuf,'(A)') 'Error reading numerical model '
./pkg/ebm/ebm_readparms.F 84 EBM_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ebm/ebm_readparms.F 85 EBM_READPARMS
       WRITE(msgBuf,'(A)') 'parameter file "data.ebm"'
./pkg/ebm/ebm_readparms.F 86 EBM_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ebm/ebm_readparms.F 87 EBM_READPARMS
       WRITE(msgBuf,'(A)') 'Problem in namelist EBM_PARM01'
./pkg/ebm/ebm_readparms.F 88 EBM_READPARMS
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ebm/ebm_readparms.F 98 EBM_READPARMS
      WRITE(msgBuf,'(A)') ' EBM_READPARMS: finished reading data.ebm'
./pkg/ebm/ebm_readparms.F 99 EBM_READPARMS
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/cost_averagesfields.F 132 COST_AVERAGESFIELDS
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ecco/cost_averagesfields.F 205 COST_AVERAGESFIELDS
         WRITE(msgBuf,'(A,I6,A,1PE21.14)')
./pkg/ecco/cost_averagesfields.F 207 COST_AVERAGESFIELDS
         CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/cost_gencost_boxmean.F 159 COST_GENCOST_BOXMEAN
      WRITE(msgBuf,'(A,I3,A,1PE21.14)')
./pkg/ecco/cost_gencost_boxmean.F 161 COST_GENCOST_BOXMEAN
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/cost_gencost_boxmean.F 172 COST_GENCOST_BOXMEAN
      WRITE(msgBuf,'(A,1PE21.14)') 'boxmean/horflux fc :',mySumGlo
./pkg/ecco/cost_gencost_boxmean.F 173 COST_GENCOST_BOXMEAN
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/cost_gencost_glbmean.F 270 COST_GENCOST_GLBMEAN
        WRITE(msgBuf,'(A,i6,2e16.5)') gencost_name(kgen)(1:10),irec, 
./pkg/ecco/cost_gencost_glbmean.F 272 COST_GENCOST_GLBMEAN
        CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/cost_gencost_sstv4.F 226 COST_GENCOST_SSTV4
        WRITE(msgBuf,'(A,I4,A,I4,A,I10,A,1PE15.2)') 'sstv4 reading ',
./pkg/ecco/cost_gencost_sstv4.F 228 COST_GENCOST_SSTV4
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ecco/cost_gencost_sstv4.F 384 COST_GENCOST_SSTV4
        WRITE(msgBuf,'(A,I4,A,I4,A,I10,A,1PE15.2)') 'sstv4 reading ',
./pkg/ecco/cost_gencost_sstv4.F 386 COST_GENCOST_SSTV4
        CALL PRINT_MESSAGE( msgBuf, ioUnit, SQUEEZE_RIGHT, myThid )
./pkg/ecco/cost_gencost_sstv4.F 83 COST_GENCOST_SSTV4
      character*(MAX_LEN_MBUF) msgBuf
./pkg/ecco/cost_gencost_transp.F 108 COST_GENCOST_TRANSP
      CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/cost_gencost_transp.F 120 COST_GENCOST_TRANSP
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/cost_gencost_transp.F 175 COST_GENCOST_TRANSP
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/cost_gencost_transp.F 187 COST_GENCOST_TRANSP
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/cost_gencost_transp.F 191 COST_GENCOST_TRANSP
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/cost_gencost_transp.F 276 COST_GENCOST_TRANSP
            WRITE(msgBuf,'(2A,I3,A,1PE21.14,1PE21.14)')
./pkg/ecco/cost_gencost_transp.F 279 COST_GENCOST_TRANSP
            CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_check.F 101 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 106 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 109 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 114 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 117 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 122 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 125 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 130 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 133 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 138 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 141 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 146 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 149 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 154 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 157 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 162 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 165 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 170 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 173 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 178 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 181 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 186 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 189 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 194 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 197 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 202 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 205 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 210 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 213 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 219 ECCO_CHECK
       WRITE(msgBuf,'(2A)') 'S/R ECCO_CHECK: ',
./pkg/ecco/ecco_check.F 221 ECCO_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ecco/ecco_check.F 232 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 235 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 240 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 243 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 248 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 251 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 256 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 259 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 268 ECCO_CHECK
       WRITE(msgBuf,'(2A)') 'S/R ECCO_CHECK: ',
./pkg/ecco/ecco_check.F 270 ECCO_CHECK
       CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ecco/ecco_check.F 306 ECCO_CHECK
       WRITE(msgBuf,'(2A,2I10)')
./pkg/ecco/ecco_check.F 310 ECCO_CHECK
       CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 312 ECCO_CHECK
       CALL PRINT_ERROR( msgBuf , myThid )
./pkg/ecco/ecco_check.F 324 ECCO_CHECK
           WRITE(msgBuf,'(2A)')
./pkg/ecco/ecco_check.F 327 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 329 ECCO_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/ecco/ecco_check.F 334 ECCO_CHECK
           WRITE(msgBuf,'(2A)')
./pkg/ecco/ecco_check.F 337 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 339 ECCO_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/ecco/ecco_check.F 359 ECCO_CHECK
               WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 362 ECCO_CHECK
               CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 383 ECCO_CHECK
           WRITE(msgBuf,'(2A)')
./pkg/ecco/ecco_check.F 386 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 388 ECCO_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/ecco/ecco_check.F 392 ECCO_CHECK
           WRITE(msgBuf,'(2A)')
./pkg/ecco/ecco_check.F 395 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 397 ECCO_CHECK
           CALL PRINT_ERROR( msgBuf , myThid )
./pkg/ecco/ecco_check.F 415 ECCO_CHECK
              WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 418 ECCO_CHECK
              CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 424 ECCO_CHECK
             WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 427 ECCO_CHECK
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 435 ECCO_CHECK
           WRITE(msgBuf,'(A,i3,L5)')
./pkg/ecco/ecco_check.F 438 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_check.F 442 ECCO_CHECK
              WRITE(msgBuf,'(3A)') 'S/R ECCO_CHECK: boxmean now ',
./pkg/ecco/ecco_check.F 445 ECCO_CHECK
              CALL PRINT_ERROR( msgBuf, myThid )
./pkg/ecco/ecco_check.F 452 ECCO_CHECK
              WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 456 ECCO_CHECK
              CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 45 ECCO_CHECK
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ecco/ecco_check.F 468 ECCO_CHECK
               WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 471 ECCO_CHECK
               CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 484 ECCO_CHECK
               WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 487 ECCO_CHECK
               CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 497 ECCO_CHECK
               WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 500 ECCO_CHECK
               CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 516 ECCO_CHECK
            WRITE(msgBuf,'(3A)')
./pkg/ecco/ecco_check.F 519 ECCO_CHECK
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 521 ECCO_CHECK
            WRITE(msgBuf,'(A)') 'Edit cost_gencost_customize to fix. '
./pkg/ecco/ecco_check.F 522 ECCO_CHECK
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 525 ECCO_CHECK
          WRITE(msgBuf,'(2A)') gencost_name(k)(1:il),' is switched off'
./pkg/ecco/ecco_check.F 526 ECCO_CHECK
            CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 534 ECCO_CHECK
          WRITE(msgBuf,'(A,i3,L5)')
./pkg/ecco/ecco_check.F 537 ECCO_CHECK
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_check.F 545 ECCO_CHECK
           write(msgBuf,'(2A,L5)') 'ecco_check file, exst: ',
./pkg/ecco/ecco_check.F 547 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_check.F 551 ECCO_CHECK
             WRITE(msgBuf,'(2A)')
./pkg/ecco/ecco_check.F 554 ECCO_CHECK
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 557 ECCO_CHECK
             WRITE(msgBuf,'(3A)')
./pkg/ecco/ecco_check.F 559 ECCO_CHECK
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 579 ECCO_CHECK
           write(msgBuf,'(2A,L5)') 'ecco_check file, exst: ',
./pkg/ecco/ecco_check.F 581 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_check.F 585 ECCO_CHECK
             WRITE(msgBuf,'(2A)')
./pkg/ecco/ecco_check.F 588 ECCO_CHECK
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 591 ECCO_CHECK
             WRITE(msgBuf,'(3A)')
./pkg/ecco/ecco_check.F 593 ECCO_CHECK
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 606 ECCO_CHECK
           WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 609 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 620 ECCO_CHECK
           WRITE(msgBuf,'(3A)')
./pkg/ecco/ecco_check.F 623 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 625 ECCO_CHECK
           WRITE(msgBuf,'(A)') 'Edit cost_gencost_customize to fix. '
./pkg/ecco/ecco_check.F 626 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 629 ECCO_CHECK
           WRITE(msgBuf,'(2A)') gencost_name(k)(1:il),' is switched off'
./pkg/ecco/ecco_check.F 630 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 637 ECCO_CHECK
          WRITE(msgBuf,'(2A,i3,L5)')
./pkg/ecco/ecco_check.F 640 ECCO_CHECK
          CALL PRINT_MESSAGE( msgBuf, standardMessageUnit,
./pkg/ecco/ecco_check.F 660 ECCO_CHECK
        WRITE(msgBuf,'(2A)')
./pkg/ecco/ecco_check.F 663 ECCO_CHECK
        CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 711 ECCO_CHECK_FILES
      CHARACTER*(MAX_LEN_MBUF) msgBuf
./pkg/ecco/ecco_check.F 731 ECCO_CHECK_FILES
             WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 734 ECCO_CHECK_FILES
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 762 ECCO_CHECK_FILES
             WRITE(msgBuf,'(5A)')
./pkg/ecco/ecco_check.F 765 ECCO_CHECK_FILES
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 778 ECCO_CHECK_FILES
             WRITE(msgBuf,'(4A)')
./pkg/ecco/ecco_check.F 781 ECCO_CHECK_FILES
             CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 82 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 85 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 90 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_check.F 93 ECCO_CHECK
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_check.F 98 ECCO_CHECK
           WRITE(msgBuf,'(3A)') '** WARNING ** ECCO_CHECK:',
./pkg/ecco/ecco_cost_final.F 1214 ECCO_COST_FINAL
         write(msgBuf,'(A,D22.15,i2.0,i2.0)')
./pkg/ecco/ecco_cost_final.F 1217 ECCO_COST_FINAL
         call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1224 ECCO_COST_FINAL
         write(msgBuf,'(A,D22.15,i2.0,i2.0)')
./pkg/ecco/ecco_cost_final.F 1227 ECCO_COST_FINAL
         call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1236 ECCO_COST_FINAL
         write(msgBuf,'(A,D22.15,i2.0)')
./pkg/ecco/ecco_cost_final.F 1239 ECCO_COST_FINAL
         call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1247 ECCO_COST_FINAL
         write(msgBuf,'(A,D22.15,i2.0)')
./pkg/ecco/ecco_cost_final.F 1250 ECCO_COST_FINAL
         call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1258 ECCO_COST_FINAL
         write(msgBuf,'(A,D22.15,i2.0)')
./pkg/ecco/ecco_cost_final.F 1261 ECCO_COST_FINAL
         call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1269 ECCO_COST_FINAL
         write(msgBuf,'(A,D22.15,i2.0)')
./pkg/ecco/ecco_cost_final.F 1272 ECCO_COST_FINAL
         call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1325 ECCO_COST_FINAL
        write(msgBuf,'(A,D22.15)')
./pkg/ecco/ecco_cost_final.F 1327 ECCO_COST_FINAL
        call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1617 ECCO_COST_FINAL
      write(msgBuf,'(a,D22.15)')
./pkg/ecco/ecco_cost_final.F 1619 ECCO_COST_FINAL
      call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1621 ECCO_COST_FINAL
      write(msgBuf,'(a)') ' '
./pkg/ecco/ecco_cost_final.F 1622 ECCO_COST_FINAL
      call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1624 ECCO_COST_FINAL
      write(msgBuf,'(a)')
./pkg/ecco/ecco_cost_final.F 1626 ECCO_COST_FINAL
      call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 1628 ECCO_COST_FINAL
      write(msgBuf,'(a)') ' '
./pkg/ecco/ecco_cost_final.F 1629 ECCO_COST_FINAL
      call PRINT_MESSAGE( msgBuf, standardmessageunit,
./pkg/ecco/ecco_cost_final.F 172 ECCO_COST_FINAL
      character*(MAX_LEN_MBUF) msgBuf
./pkg/ecco/ecco_cost_init_fixed.F 236 ECCO_COST_INIT_FIXED
        WRITE(msgBuf,'(2A,2i8)') 'ecco_cost_init_fixed: ',
./pkg/ecco/ecco_cost_init_fixed.F 238 ECCO_COST_INIT_FIXED
        CALL PRINT_ERROR( msgBuf, myThid)
./pkg/ecco/ecco_cost_init_fixed.F 395 ECCO_COST_INIT_FIXED
           WRITE(msgBuf,'(2A,I10)')
./pkg/ecco/ecco_cost_init_fixed.F 398 ECCO_COST_INIT_FIXED
           CALL PRINT_MESSAGE( msgBuf, errorMessageUnit,
./pkg/ecco/ecco_cost_init_fixed.F 400 ECCO_COST_INIT_FIXED
           CALL PRINT_ERROR( msgBuf , myThid )