/[MITgcm]/MITgcm/pkg/diagnostics/diagnostics_out.F
ViewVC logotype

Diff of /MITgcm/pkg/diagnostics/diagnostics_out.F

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.11 by jmc, Thu Mar 17 01:22:43 2005 UTC revision 1.12 by jmc, Mon Apr 4 22:05:14 2005 UTC
# Line 348  C--     end of Processing Fld # n Line 348  C--     end of Processing Fld # n
348          ENDIF          ENDIF
349        ENDDO        ENDDO
350    
351   2000 format(1x,'Computing Diagnostic # ',i3,2x,a8,5x,'Counter: ',   2000 format(1x,'Computing Diagnostic # ',i3,2x,a8,5x,
352       &     i4,6x,'Parms: ',a16)       &     'Counter:',i8,3x,'Parms: ',a16)
353   2001 format(1x,'          Vector  Mate for  ',a8,5x,   2001 format(1x,'          Vector  Mate for  ',a8,5x,
354       &     'Diagnostic # ',i3,2x,a8,' exists ')       &     'Diagnostic # ',i3,2x,a8,' exists ')
355   2002 format(1x,'        Vector  Mate for  ',a8,5x,   2002 format(1x,'          Vector  Mate for  ',a8,5x,
356       &     'Diagnostic # ',i3,2x,a8,' not enabled')       &     'Diagnostic # ',i3,2x,a8,' not enabled')
357   2003 format(1x,'      use Counter Mate for  ',a8,5x,   2003 format(1x,'      use Counter Mate for  ',a8,5x,
358       &     'Diagnostic # ',i3,2x,a8)       &     'Diagnostic # ',i3,2x,a8)
Legend:
Removed from v.1.11  
changed lines
  Added in v.1.12
  ViewVC Help
Powered by ViewVC 1.1.22