C $Header: /u/gcmpack/MITgcm/pkg/monitor/MONITOR.h,v 1.11 2016/07/18 16:45:21 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 C mon_trAdvCFL :: Max CFL value (in 3 directions) for tracer advection COMMON /MON_R/ monSolutionMaxRange, mon_trAdvCFL _RL monSolutionMaxRange _RL mon_trAdvCFL(3) 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: ***