/[MITgcm]/MITgcm/pkg/monitor/mon_advcfl.F
ViewVC logotype

Diff of /MITgcm/pkg/monitor/mon_advcfl.F

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

revision 1.1 by adcroft, Wed May 30 19:33:18 2001 UTC revision 1.2 by adcroft, Wed Jun 6 14:50:23 2001 UTC
# Line 45  C     === Local variables ==== Line 45  C     === Local variables ====
45        _GLOBAL_MAX_R8(theMax,myThid)        _GLOBAL_MAX_R8(theMax,myThid)
46    
47        _BEGIN_MASTER( myThid )        _BEGIN_MASTER( myThid )
48        WRITE(*,'(A,A20,A,1PE22.14)')        WRITE(*,'(A,A27,A,1PE22.14)')
49       &      'MON_ADVCFL: ',label,'  max=',theMax       &      'MON_ADVCFL: ',label,'  max=',theMax
50        _END_MASTER( )        _END_MASTER( )
51    
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2
  ViewVC Help
Powered by ViewVC 1.1.22