/[MITgcm]/MITgcm/pkg/ecco/ecco_check.F
ViewVC logotype

Diff of /MITgcm/pkg/ecco/ecco_check.F

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

revision 1.5 by heimbach, Fri Mar 13 01:58:37 2009 UTC revision 1.6 by jmc, Mon Mar 23 23:29:29 2009 UTC
# Line 41  C     msgBuf      - Informational/error Line 41  C     msgBuf      - Informational/error
41        _BEGIN_MASTER(myThid)        _BEGIN_MASTER(myThid)
42    
43        IF ( ndaysrec .GT. maxNumDays ) THEN        IF ( ndaysrec .GT. maxNumDays ) THEN
44         WRITE(msgBuf,'(2A,2I)')         WRITE(msgBuf,'(2A,2I10)')
45       &        'ECCO_CHECK: for ALLOW_TRANSPORT_COST_CONTRIBUTION: ',       &        'ECCO_CHECK: for ALLOW_TRANSPORT_COST_CONTRIBUTION: ',
46       &        'ndaysrec > maxNumDays in ecco_cost.h ',       &        'ndaysrec > maxNumDays in ecco_cost.h ',
47       &        ndaysrec, maxNumDays       &        ndaysrec, maxNumDays
Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6
  ViewVC Help
Powered by ViewVC 1.1.22