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 =

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