1 |
C $Header: /u/gcmpack/models/MITgcmUV/pkg/monitor/MONITOR.h,v 1.1 2001/06/18 17:39:59 cnh Exp $ |
2 |
C $Name: $ |
3 |
C |
4 |
C /==========================================================\ |
5 |
C | MONITOR.h | |
6 |
C |==========================================================| |
7 |
C | Parameters for "monitor" setup. | |
8 |
C | Monitor routines ( prefixed MON_ ) provide a simple | |
9 |
C | set of utilities for outputting useful runtime diagnostic| |
10 |
C | information. They use a standard format so that the | |
11 |
C | monitor output can be parsed offline to help in trouble | |
12 |
C | shooting. | |
13 |
C | Monitor setup params should be set through appropriate | |
14 |
C | MON_ routines to ensure that changes are made in a | |
15 |
C | thread-safe fashion. | |
16 |
C \==========================================================/ |
17 |
|
18 |
C-- Monitor head and tail strings |
19 |
CHARACTER*(*) mon_head |
20 |
PARAMETER ( mon_head = '%MON' ) |
21 |
CHARACTER*(*) mon_foot_min |
22 |
PARAMETER ( mon_foot_min = '_min' ) |
23 |
CHARACTER*(*) mon_foot_max |
24 |
PARAMETER ( mon_foot_max = '_max' ) |
25 |
CHARACTER*(*) mon_foot_sd |
26 |
PARAMETER ( mon_foot_sd = '_sd' ) |
27 |
CHARACTER*(*) mon_foot_mean |
28 |
PARAMETER ( mon_foot_mean = '_mean' ) |
29 |
CHARACTER*(*) mon_foot_volint |
30 |
PARAMETER ( mon_foot_volint = '_volint' ) |
31 |
CHARACTER*(*) mon_foot_volmean |
32 |
PARAMETER ( mon_foot_volmean = '_volmean' ) |
33 |
CHARACTER*(*) mon_foot_del2 |
34 |
PARAMETER ( mon_foot_del2 = '_del2' ) |
35 |
CHARACTER*(*) mon_string_none |
36 |
PARAMETER ( mon_string_none = 'NONE') |
37 |
|
38 |
C-- COMMON /MON_I/ Monitor integer variables |
39 |
C mon_ioUnit - Used to specify the output unit for monitor IO. |
40 |
C mon_prefL - Prefix length of current mon_ prefix |
41 |
COMMON /MON_I/ mon_ioUnit, mon_prefL |
42 |
INTEGER mon_ioUnit |
43 |
INTEGER mon_prefL |
44 |
|
45 |
C-- COMMON /MON_C/ Monitor character variables |
46 |
C mon_pref - Prefix used for monitor output |
47 |
COMMON /MON_C/ mon_pref |
48 |
CHARACTER*(MAX_LEN_MBUF) mon_pref |