1 |
edhill |
1.5 |
C $Header: /u/gcmpack/MITgcm/pkg/monitor/MONITOR.h,v 1.4 2003/05/13 18:18:05 adcroft Exp $ |
2 |
cnh |
1.1 |
C $Name: $ |
3 |
|
|
C |
4 |
edhill |
1.5 |
|
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 |
cnh |
1.1 |
|
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 |
jmc |
1.2 |
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 |
jmc |
1.3 |
CHARACTER*(*) mon_foot_vol |
42 |
|
|
PARAMETER ( mon_foot_vol = '_vol' ) |
43 |
cnh |
1.1 |
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 |
adcroft |
1.4 |
|
58 |
|
|
C-- COMMON /MON_L/ Monitor logical variables |
59 |
|
|
C mon_overrideStop - Allow code to continue even if model state is |
60 |
|
|
C heading out of bounds |
61 |
|
|
COMMON /MON_L/ mon_overrideStop |
62 |
|
|
LOGICAL mon_overrideStop |
63 |
edhill |
1.5 |
|
64 |
|
|
C---+----1----+----2----+----3----+----4----+----5----+----6----+----7-|--+----| |
65 |
|
|
|
66 |
|
|
CEH3 ;;; Local Variables: *** |
67 |
|
|
CEH3 ;;; mode:fortran *** |
68 |
|
|
CEH3 ;;; End: *** |