pkg/diagnostics/diagnostics_ad.flow

C $Header: /u/gcmpack/MITgcm/pkg/diagnostics/diagnostics_ad.flow,v 1.9 2007/10/09 00:13:15 jmc Exp $
C $Name:  $

C----------------------------------------
C subroutine  diagnostics_switch_onoff
C----------------------------------------
CADJ SUBROUTINE diagnostics_switch_onoff INPUT  = 1,2,3
CADJ SUBROUTINE diagnostics_switch_onoff OUTPUT =
CADJ SUBROUTINE diagnostics_switch_onoff  DEPEND = 1,2,3
CADJ SUBROUTINE diagnostics_switch_onoff  REQUIRED

C----------------------------------------
C subroutine  diagnostics_count
C----------------------------------------
CADJ SUBROUTINE diagnostics_count INPUT  = 1,2,3,4
CADJ SUBROUTINE diagnostics_count OUTPUT =

C----------------------------------------
C subroutine  diagnostics_init_varia
C----------------------------------------
CADJ SUBROUTINE diagnostics_init_varia INPUT  = 1
CADJ SUBROUTINE diagnostics_init_varia OUTPUT =
CADJ SUBROUTINE diagnostics_init_varia  DEPEND = 1
CADJ SUBROUTINE diagnostics_init_varia  REQUIRED


C----------------------------------------
C FUNCTION  diagnostics_is_on
C----------------------------------------
CADJ FUNCTION diagnostics_is_on INPUT  = 1,2
CADJ FUNCTION diagnostics_is_on OUTPUT =

C----------------------------------------
C FUNCTION GAD_DIAG_SUFX
C----------------------------------------
CADJ FUNCTION GAD_DIAG_SUFX INPUT  = 1,2
CADJ FUNCTION GAD_DIAG_SUFX OUTPUT =

C----------------------------------------
C subroutine  diags_rho
C----------------------------------------
cphCADJ SUBROUTINE diags_rho INPUT  = 1,2,3,4,5,6,7,8
cphCADJ SUBROUTINE diags_rho OUTPUT =

C----------------------------------------
C subroutine  diagnostics_fill
C----------------------------------------
CADJ SUBROUTINE diagnostics_fill INPUT  = 1,2,3,4,5,6,7,8
CADJ SUBROUTINE diagnostics_fill OUTPUT =
cphCADJ SUBROUTINE diagnostics_fill DEPEND = 1,2,3,4,5,6,7,8
cphCADJ SUBROUTINE diagnostics_fill REQUIRED

C----------------------------------------
C subroutine  DIAGS_OCEANIC_SURF_FLUX
C----------------------------------------
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX INPUT  = 1,2,3
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX OUTPUT =
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX DEPEND = 1,2,3
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX REQUIRED

C----------------------------------------
C subroutine  DIAGNOSTICS_SCALE_FILL
C----------------------------------------
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL INPUT  = 1,2,3,4,5,6,7,8,9,10
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL OUTPUT =

C----------------------------------------
C subroutine  diagnostics_fract_fill
C----------------------------------------
CADJ SUBROUTINE diagnostics_fract_fill INPUT  =
CADJ &          1,2,3,4,5,6,7,8,9,10,11
CADJ SUBROUTINE diagnostics_fract_fill OUTPUT =
1	C $Header: /u/gcmpack/MITgcm/pkg/diagnostics/diagnostics_ad.flow,v 1.9 2007/10/09 00:13:15 jmc Exp $
2	C $Name: $
3
4	C----------------------------------------
5	C subroutine diagnostics_switch_onoff
6	C----------------------------------------
7	CADJ SUBROUTINE diagnostics_switch_onoff INPUT = 1,2,3
8	CADJ SUBROUTINE diagnostics_switch_onoff OUTPUT =
9	CADJ SUBROUTINE diagnostics_switch_onoff DEPEND = 1,2,3
10	CADJ SUBROUTINE diagnostics_switch_onoff REQUIRED
11
12	C----------------------------------------
13	C subroutine diagnostics_count
14	C----------------------------------------
15	CADJ SUBROUTINE diagnostics_count INPUT = 1,2,3,4
16	CADJ SUBROUTINE diagnostics_count OUTPUT =
17
18	C----------------------------------------
19	C subroutine diagnostics_init_varia
20	C----------------------------------------
21	CADJ SUBROUTINE diagnostics_init_varia INPUT = 1
22	CADJ SUBROUTINE diagnostics_init_varia OUTPUT =
23	CADJ SUBROUTINE diagnostics_init_varia DEPEND = 1
24	CADJ SUBROUTINE diagnostics_init_varia REQUIRED
25
26
27	C----------------------------------------
28	C FUNCTION diagnostics_is_on
29	C----------------------------------------
30	CADJ FUNCTION diagnostics_is_on INPUT = 1,2
31	CADJ FUNCTION diagnostics_is_on OUTPUT =
32
33	C----------------------------------------
34	C FUNCTION GAD_DIAG_SUFX
35	C----------------------------------------
36	CADJ FUNCTION GAD_DIAG_SUFX INPUT = 1,2
37	CADJ FUNCTION GAD_DIAG_SUFX OUTPUT =
38
39	C----------------------------------------
40	C subroutine diags_rho
41	C----------------------------------------
42	cphCADJ SUBROUTINE diags_rho INPUT = 1,2,3,4,5,6,7,8
43	cphCADJ SUBROUTINE diags_rho OUTPUT =
44
45	C----------------------------------------
46	C subroutine diagnostics_fill
47	C----------------------------------------
48	CADJ SUBROUTINE diagnostics_fill INPUT = 1,2,3,4,5,6,7,8
49	CADJ SUBROUTINE diagnostics_fill OUTPUT =
50	cphCADJ SUBROUTINE diagnostics_fill DEPEND = 1,2,3,4,5,6,7,8
51	cphCADJ SUBROUTINE diagnostics_fill REQUIRED
52
53	C----------------------------------------
54	C subroutine DIAGS_OCEANIC_SURF_FLUX
55	C----------------------------------------
56	CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX INPUT = 1,2,3
57	CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX OUTPUT =
58	CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX DEPEND = 1,2,3
59	CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX REQUIRED
60
61	C----------------------------------------
62	C subroutine DIAGNOSTICS_SCALE_FILL
63	C----------------------------------------
64	CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL INPUT = 1,2,3,4,5,6,7,8,9,10
65	CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL OUTPUT =
66
67	C----------------------------------------
68	C subroutine diagnostics_fract_fill
69	C----------------------------------------
70	CADJ SUBROUTINE diagnostics_fract_fill INPUT =
71	CADJ & 1,2,3,4,5,6,7,8,9,10,11
72	CADJ SUBROUTINE diagnostics_fract_fill OUTPUT =