pkg/diagnostics/diagnostics_ad.flow


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 =

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----------------------------------------
CADJ SUBROUTINE diags_rho INPUT  = 1,2,3,4,5,6,7,8
CADJ 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 =

C----------------------------------------
C subroutine  diagnostics_fill_surf_flux
C----------------------------------------
CADJ SUBROUTINE diagnostics_fill_surf_flux INPUT  = 1
CADJ SUBROUTINE diagnostics_fill_surf_flux OUTPUT =

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 =

C----------------------------------------
C subroutine  
C----------------------------------------
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL INPUT  = 1,2,3,4,5,6,7,8,9,10
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL OUTPUT =
1	heimbach	1.1
2			C----------------------------------------
3	heimbach	1.4	C subroutine diagnostics_switch_onoff
4	heimbach	1.3	C----------------------------------------
5	heimbach	1.4	CADJ SUBROUTINE diagnostics_switch_onoff INPUT = 1,2,3
6			CADJ SUBROUTINE diagnostics_switch_onoff OUTPUT =
7			CADJ SUBROUTINE diagnostics_switch_onoff DEPEND = 1,2,3
8			CADJ SUBROUTINE diagnostics_switch_onoff REQUIRED
9	heimbach	1.3
10			C----------------------------------------
11	heimbach	1.1	C subroutine diagnostics_count
12			C----------------------------------------
13			CADJ SUBROUTINE diagnostics_count INPUT = 1,2,3,4
14			CADJ SUBROUTINE diagnostics_count OUTPUT =
15
16			C----------------------------------------
17			C subroutine diagnostics_init_varia
18			C----------------------------------------
19			CADJ SUBROUTINE diagnostics_init_varia INPUT = 1
20			CADJ SUBROUTINE diagnostics_init_varia OUTPUT =
21
22			C----------------------------------------
23			C FUNCTION diagnostics_is_on
24			C----------------------------------------
25			CADJ FUNCTION diagnostics_is_on INPUT = 1,2
26			CADJ FUNCTION diagnostics_is_on OUTPUT =
27
28			C----------------------------------------
29			C FUNCTION GAD_DIAG_SUFX
30			C----------------------------------------
31			CADJ FUNCTION GAD_DIAG_SUFX INPUT = 1,2
32			CADJ FUNCTION GAD_DIAG_SUFX OUTPUT =
33
34			C----------------------------------------
35			C subroutine diags_rho
36			C----------------------------------------
37			CADJ SUBROUTINE diags_rho INPUT = 1,2,3,4,5,6,7,8
38			CADJ SUBROUTINE diags_rho OUTPUT =
39
40			C----------------------------------------
41			C subroutine diagnostics_fill
42			C----------------------------------------
43			CADJ SUBROUTINE diagnostics_fill INPUT = 1,2,3,4,5,6,7,8
44			CADJ SUBROUTINE diagnostics_fill OUTPUT =
45
46			C----------------------------------------
47			C subroutine diagnostics_fill_surf_flux
48			C----------------------------------------
49			CADJ SUBROUTINE diagnostics_fill_surf_flux INPUT = 1
50			CADJ SUBROUTINE diagnostics_fill_surf_flux OUTPUT =
51
52	heimbach	1.2	C----------------------------------------
53			C subroutine DIAGS_OCEANIC_SURF_FLUX
54			C----------------------------------------
55			CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX INPUT = 1,2,3
56			CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX OUTPUT =
57
58			C----------------------------------------
59			C subroutine
60			C----------------------------------------
61			CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL INPUT = 1,2,3,4,5,6,7,8,9,10
62			CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL OUTPUT =