/[MITgcm]/MITgcm/pkg/debug/debug_stats_rl.F
ViewVC logotype

Diff of /MITgcm/pkg/debug/debug_stats_rl.F

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

revision 1.5 by heimbach, Wed Feb 9 21:15:03 2005 UTC revision 1.6 by jmc, Tue Jul 26 16:23:52 2016 UTC
# Line 6  C $Name$ Line 6  C $Name$
6        SUBROUTINE DEBUG_STATS_RL(        SUBROUTINE DEBUG_STATS_RL(
7       I                myNr, arr, arrName,       I                myNr, arr, arrName,
8       I                myThid )       I                myThid )
9  C     /==========================================================\  C     *==========================================================*
10  C     | SUBROUTINE DEBUG_STATS_RL                                |  C     | SUBROUTINE DEBUG_STATS_RL                                |
11  C     | o Prints to STDOUT the bare statistics of global array   |  C     | o Prints to STDOUT the bare statistics of global array   |
12  C     |   "_RL arr" with label "arrName"                         |  C     |   "_RL arr" with label "arrName"                         |
13  C     | o This is an exact copy of MON_PRINTSTATS_RL but with    |  C     | o This routine is similar to MON_WRITESTATS_RL but with  |
14  C     |   a different label at left of screen                    |  C     |   a different label at left of screen                    |
15  C     |==========================================================|  C     *==========================================================*
 C     \==========================================================/  
16        IMPLICIT NONE        IMPLICIT NONE
17    
18  C     === Global data ===  C     === Global data ===
# Line 33  C     === Local variables ==== Line 32  C     === Local variables ====
32        _RL theSD        _RL theSD
33    
34        CALL DEBUG_FLD_STATS_RL(        CALL DEBUG_FLD_STATS_RL(
35       I                myNr, arr,       I                myNr, arr, zeroRL,
36       O                theMin,theMax,theMean,theSD,       O                theMin, theMax, theMean, theSD,
37       I                myThid )       I                myThid )
38    
39        _BEGIN_MASTER( myThid )        _BEGIN_MASTER( myThid )

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

  ViewVC Help
Powered by ViewVC 1.1.22