/[MITgcm]/MITgcm/eesupp/src/comm_stats.F
ViewVC logotype

Diff of /MITgcm/eesupp/src/comm_stats.F

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

revision 1.2 by cnh, Wed Oct 28 03:11:33 1998 UTC revision 1.4 by cnh, Sun Feb 4 14:38:42 2001 UTC
# Line 1  Line 1 
1    C $Header$
2    C $Name$
3  #include "CPP_EEOPTIONS.h"  #include "CPP_EEOPTIONS.h"
4    
5        SUBROUTINE COMM_STATS        SUBROUTINE COMM_STATS
# Line 17  C     == Global variables == Line 19  C     == Global variables ==
19  C     == Local variables ==  C     == Local variables ==
20        INTEGER bi, bj, I        INTEGER bi, bj, I
21        CHARACTER*(MAX_LEN_MBUF) msgBuf        CHARACTER*(MAX_LEN_MBUF) msgBuf
       CHARACTER*8 orientation  
22            
23  C      o For each tile print its excange statistics  C      o For each tile print its excange statistics
24         WRITE(msgBuf,'(A)')         WRITE(msgBuf,'(A)')
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22