pkg/mnc/MNC_PARAMS.h

C $Header: /u/gcmpack/MITgcm/pkg/mnc/MNC_PARAMS.h,v 1.1 2004/09/10 12:19:30 edhill Exp $
C $Name:  $
C

CBOP
C     !ROUTINE: PARAMS.h
C     !INTERFACE:
C     #include PARAMS.h

C     !DESCRIPTION:
C     Header file defining model "parameters".  The values from the
C     model standard input file are stored into the variables held
C     here. Notes describing the parameters can also be found here.
CEOP

C     ===  PARM_MNC_L Common Block  ===
C     useMNC           :: overall package run-time flag
C     mnc_use_indir    :: use "mnc_indir_str" as input filename prefix
C     mnc_use_outdir   :: use "mnc_outdir_str" as output filename prefix
C     mnc_outdir_date  :: use a date string within the output dir name
C     mnc_echo_gvtypes :: echo type names (fails on many platforms)
C     pickup_write_mnc :: use mnc to write pickups
C     pickup_read_mnc  :: use mnc to read  pickups
C     mon_write_mnc    :: use mnc to write monitor output
      COMMON /PARM_MNC_L/
     &     useMNC,
     &     mnc_use_indir, mnc_use_outdir, mnc_outdir_date,
     &     mnc_echo_gvtypes,
     &     pickup_write_mnc, pickup_read_mnc,
     &     timeave_mnc, snapshot_mnc, monitor_mnc, autodiff_mnc
      LOGICAL
     &     useMNC,
     &     mnc_use_indir, mnc_use_outdir, mnc_outdir_date,
     &     mnc_echo_gvtypes,
     &     pickup_write_mnc, pickup_read_mnc,
     &     timeave_mnc, snapshot_mnc, monitor_mnc, autodiff_mnc

C     ===  PARM_MNC_C Common Block  ===
C     mnc_outdir_str   :: name of the output directory
C     mnc_indir_str    :: name of the input directory
      COMMON /PARM_MNC_C/
     &     mnc_outdir_str,
     &     mnc_indir_str
      CHARACTER*(MAX_LEN_FNAM) mnc_outdir_str
      CHARACTER*(MAX_LEN_FNAM) mnc_indir_str


CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***
1	C $Header: /u/gcmpack/MITgcm/pkg/mnc/MNC_PARAMS.h,v 1.1 2004/09/10 12:19:30 edhill Exp $
2	C $Name: $
3	C
4
5	CBOP
6	C !ROUTINE: PARAMS.h
7	C !INTERFACE:
8	C #include PARAMS.h
9
10	C !DESCRIPTION:
11	C Header file defining model "parameters". The values from the
12	C model standard input file are stored into the variables held
13	C here. Notes describing the parameters can also be found here.
14	CEOP
15
16	C === PARM_MNC_L Common Block ===
17	C useMNC :: overall package run-time flag
18	C mnc_use_indir :: use "mnc_indir_str" as input filename prefix
19	C mnc_use_outdir :: use "mnc_outdir_str" as output filename prefix
20	C mnc_outdir_date :: use a date string within the output dir name
21	C mnc_echo_gvtypes :: echo type names (fails on many platforms)
22	C pickup_write_mnc :: use mnc to write pickups
23	C pickup_read_mnc :: use mnc to read pickups
24	C mon_write_mnc :: use mnc to write monitor output
25	COMMON /PARM_MNC_L/
26	& useMNC,
27	& mnc_use_indir, mnc_use_outdir, mnc_outdir_date,
28	& mnc_echo_gvtypes,
29	& pickup_write_mnc, pickup_read_mnc,
30	& timeave_mnc, snapshot_mnc, monitor_mnc, autodiff_mnc
31	LOGICAL
32	& useMNC,
33	& mnc_use_indir, mnc_use_outdir, mnc_outdir_date,
34	& mnc_echo_gvtypes,
35	& pickup_write_mnc, pickup_read_mnc,
36	& timeave_mnc, snapshot_mnc, monitor_mnc, autodiff_mnc
37
38	C === PARM_MNC_C Common Block ===
39	C mnc_outdir_str :: name of the output directory
40	C mnc_indir_str :: name of the input directory
41	COMMON /PARM_MNC_C/
42	& mnc_outdir_str,
43	& mnc_indir_str
44	CHARACTER*(MAX_LEN_FNAM) mnc_outdir_str
45	CHARACTER*(MAX_LEN_FNAM) mnc_indir_str
46
47
48	CEH3 ;;; Local Variables: ***
49	CEH3 ;;; mode:fortran ***
50	CEH3 ;;; End: ***