pkg/monitor/MONITOR.h

C $Header: /u/gcmpack/MITgcm/pkg/monitor/MONITOR.h,v 1.9 2009/07/01 14:49:22 jmc Exp $
C $Name:  $
C

CBOP
C     !ROUTINE: MONITOR.h

C     !INTERFACE:
C     #include "MONITOR.h"

C     !DESCRIPTION:
C     Contains the state (parameters) for the ``monitor'' package.
C
C     Monitor routines (prefixed MON\_) provide a simple set of
C     utilities for outputting useful runtime diagnostic
C     information. They use a standard format so that the monitor output
C     can be parsed offline to help in trouble shooting.
C
C     Monitor setup params should be set through appropriate MON\_
C     routines to ensure that changes are made in a thread-safe fashion.

CEOP

C--   Monitor head and tail strings
      CHARACTER*(*) mon_head
      PARAMETER (   mon_head         = '%MON'     )
      CHARACTER*(*) mon_foot_min
      PARAMETER (   mon_foot_min     = '_min'     )
      CHARACTER*(*) mon_foot_max
      PARAMETER (   mon_foot_max     = '_max'     )
      CHARACTER*(*) mon_foot_sd
      PARAMETER (   mon_foot_sd      = '_sd'      )
      CHARACTER*(*) mon_foot_mean
      PARAMETER (   mon_foot_mean    = '_mean'    )
      CHARACTER*(*) mon_foot_volint
      PARAMETER (   mon_foot_volint  = '_volint'  )
      CHARACTER*(*) mon_foot_volmean
      PARAMETER (   mon_foot_volmean = '_volmean' )
      CHARACTER*(*) mon_foot_del2
      PARAMETER (   mon_foot_del2    = '_del2'    )
      CHARACTER*(*) mon_foot_vol
      PARAMETER (   mon_foot_vol     = '_vol'     )
      CHARACTER*(*) mon_string_none
      PARAMETER (   mon_string_none  = 'NONE'     )

C--   COMMON /MON_I/ Monitor integer variables
C     mon_ioUnit :: Used to specify the output unit for monitor IO.
C     mon_prefL  :: Prefix length of current mon_ prefix
      COMMON /MON_I/ mon_ioUnit, mon_prefL
      INTEGER mon_ioUnit
      INTEGER mon_prefL

C--   COMMON /MON_C/ Monitor character variables
C     mon_pref   :: Prefix used for monitor output
      COMMON /MON_C/ mon_pref
      CHARACTER*(MAX_LEN_MBUF) mon_pref

C--   COMMON /MON_R/ Monitor real variables
C     monSolutionMaxRange :: Maximum allowed Range for solution
      COMMON /MON_R/ monSolutionMaxRange
      _RL  monSolutionMaxRange

C--   COMMON /MON_L/ Monitor logical variables
C     mon_overrideStop :: Allow code to continue even if model state is
C                         heading out of bounds
C     mon_output_AM    :: output Angular momentum
C     mon_write_stdout :: hold True when writing monitor to standard output
C     mon_write_mnc    :: hold True when writing monitor to MNC file
      COMMON /MON_L/
     &               mon_output_AM,
     &               mon_write_stdout, mon_write_mnc
c     LOGICAL mon_overrideStop
      LOGICAL mon_output_AM
      LOGICAL mon_write_stdout, mon_write_mnc

C     File names and time steps
C     mon_fname    ::  monitor file group name
      COMMON /MON_F/
     &     mon_fname
      CHARACTER*(MAX_LEN_FNAM) mon_fname

C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----|

CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***
1	C $Header: /u/gcmpack/MITgcm/pkg/monitor/MONITOR.h,v 1.9 2009/07/01 14:49:22 jmc Exp $
2	C $Name: $
3	C
4
5	CBOP
6	C !ROUTINE: MONITOR.h
7
8	C !INTERFACE:
9	C #include "MONITOR.h"
10
11	C !DESCRIPTION:
12	C Contains the state (parameters) for the ``monitor'' package.
13	C
14	C Monitor routines (prefixed MON\_) provide a simple set of
15	C utilities for outputting useful runtime diagnostic
16	C information. They use a standard format so that the monitor output
17	C can be parsed offline to help in trouble shooting.
18	C
19	C Monitor setup params should be set through appropriate MON\_
20	C routines to ensure that changes are made in a thread-safe fashion.
21
22	CEOP
23
24	C-- Monitor head and tail strings
25	CHARACTER() mon_head
26	PARAMETER ( mon_head = '%MON' )
27	CHARACTER() mon_foot_min
28	PARAMETER ( mon_foot_min = '_min' )
29	CHARACTER() mon_foot_max
30	PARAMETER ( mon_foot_max = '_max' )
31	CHARACTER() mon_foot_sd
32	PARAMETER ( mon_foot_sd = '_sd' )
33	CHARACTER() mon_foot_mean
34	PARAMETER ( mon_foot_mean = '_mean' )
35	CHARACTER() mon_foot_volint
36	PARAMETER ( mon_foot_volint = '_volint' )
37	CHARACTER() mon_foot_volmean
38	PARAMETER ( mon_foot_volmean = '_volmean' )
39	CHARACTER() mon_foot_del2
40	PARAMETER ( mon_foot_del2 = '_del2' )
41	CHARACTER() mon_foot_vol
42	PARAMETER ( mon_foot_vol = '_vol' )
43	CHARACTER() mon_string_none
44	PARAMETER ( mon_string_none = 'NONE' )
45
46	C-- COMMON /MON_I/ Monitor integer variables
47	C mon_ioUnit :: Used to specify the output unit for monitor IO.
48	C mon_prefL :: Prefix length of current mon_ prefix
49	COMMON /MON_I/ mon_ioUnit, mon_prefL
50	INTEGER mon_ioUnit
51	INTEGER mon_prefL
52
53	C-- COMMON /MON_C/ Monitor character variables
54	C mon_pref :: Prefix used for monitor output
55	COMMON /MON_C/ mon_pref
56	CHARACTER*(MAX_LEN_MBUF) mon_pref
57
58	C-- COMMON /MON_R/ Monitor real variables
59	C monSolutionMaxRange :: Maximum allowed Range for solution
60	COMMON /MON_R/ monSolutionMaxRange
61	_RL monSolutionMaxRange
62
63	C-- COMMON /MON_L/ Monitor logical variables
64	C mon_overrideStop :: Allow code to continue even if model state is
65	C heading out of bounds
66	C mon_output_AM :: output Angular momentum
67	C mon_write_stdout :: hold True when writing monitor to standard output
68	C mon_write_mnc :: hold True when writing monitor to MNC file
69	COMMON /MON_L/
70	& mon_output_AM,
71	& mon_write_stdout, mon_write_mnc
72	c LOGICAL mon_overrideStop
73	LOGICAL mon_output_AM
74	LOGICAL mon_write_stdout, mon_write_mnc
75
76	C File names and time steps
77	C mon_fname :: monitor file group name
78	COMMON /MON_F/
79	& mon_fname
80	CHARACTER*(MAX_LEN_FNAM) mon_fname
81
82	C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-\|--+----\|
83
84	CEH3 ;;; Local Variables: ***
85	CEH3 ;;; mode:fortran ***
86	CEH3 ;;; End: ***