2 |
C $Name$ |
C $Name$ |
3 |
|
|
4 |
C---------------------------------------- |
C---------------------------------------- |
5 |
C subroutine diagnostics_switch_onoff |
C SUBROUTINE DIAGNOSTICS_SWITCH_ONOFF |
6 |
C---------------------------------------- |
C---------------------------------------- |
7 |
CADJ SUBROUTINE diagnostics_switch_onoff INPUT = 1,2,3 |
CADJ SUBROUTINE DIAGNOSTICS_SWITCH_ONOFF INPUT = 1,2,3 |
8 |
CADJ SUBROUTINE diagnostics_switch_onoff OUTPUT = |
CADJ SUBROUTINE DIAGNOSTICS_SWITCH_ONOFF OUTPUT = |
9 |
CADJ SUBROUTINE diagnostics_switch_onoff DEPEND = 1,2,3 |
CADJ SUBROUTINE DIAGNOSTICS_SWITCH_ONOFF DEPEND = 1,2,3 |
10 |
CADJ SUBROUTINE diagnostics_switch_onoff REQUIRED |
CADJ SUBROUTINE DIAGNOSTICS_SWITCH_ONOFF REQUIRED |
11 |
|
|
12 |
C---------------------------------------- |
C---------------------------------------- |
13 |
C subroutine diagnostics_count |
C SUBROUTINE DIAGNOSTICS_COUNT |
14 |
C---------------------------------------- |
C---------------------------------------- |
15 |
CADJ SUBROUTINE diagnostics_count INPUT = 1,2,3,4 |
CADJ SUBROUTINE DIAGNOSTICS_COUNT INPUT = 1,2,3,4 |
16 |
CADJ SUBROUTINE diagnostics_count OUTPUT = |
CADJ SUBROUTINE DIAGNOSTICS_COUNT OUTPUT = |
17 |
|
|
18 |
C---------------------------------------- |
C---------------------------------------- |
19 |
C subroutine diagnostics_init_varia |
C SUBROUTINE DIAGNOSTICS_INIT_VARIA |
20 |
C---------------------------------------- |
C---------------------------------------- |
21 |
CADJ SUBROUTINE diagnostics_init_varia INPUT = 1 |
CADJ SUBROUTINE DIAGNOSTICS_INIT_VARIA INPUT = 1 |
22 |
CADJ SUBROUTINE diagnostics_init_varia OUTPUT = |
CADJ SUBROUTINE DIAGNOSTICS_INIT_VARIA OUTPUT = |
23 |
CADJ SUBROUTINE diagnostics_init_varia DEPEND = 1 |
CADJ SUBROUTINE DIAGNOSTICS_INIT_VARIA DEPEND = 1 |
24 |
CADJ SUBROUTINE diagnostics_init_varia REQUIRED |
CADJ SUBROUTINE DIAGNOSTICS_INIT_VARIA REQUIRED |
|
|
|
25 |
|
|
26 |
C---------------------------------------- |
C---------------------------------------- |
27 |
C FUNCTION diagnostics_is_on |
C FUNCTION DIAGNOSTICS_IS_ON |
28 |
C---------------------------------------- |
C---------------------------------------- |
29 |
CADJ FUNCTION diagnostics_is_on INPUT = 1,2 |
CADJ FUNCTION DIAGNOSTICS_IS_ON INPUT = 1,2 |
30 |
CADJ FUNCTION diagnostics_is_on OUTPUT = |
CADJ FUNCTION DIAGNOSTICS_IS_ON OUTPUT = |
31 |
|
|
32 |
C---------------------------------------- |
C---------------------------------------- |
33 |
C FUNCTION GAD_DIAG_SUFX |
C FUNCTION GAD_DIAG_SUFX |
34 |
C---------------------------------------- |
C---------------------------------------- |
35 |
CADJ FUNCTION GAD_DIAG_SUFX INPUT = 1,2 |
CADJ FUNCTION GAD_DIAG_SUFX INPUT = 1,2 |
36 |
CADJ FUNCTION GAD_DIAG_SUFX OUTPUT = |
CADJ FUNCTION GAD_DIAG_SUFX OUTPUT = |
37 |
|
|
38 |
C---------------------------------------- |
C---------------------------------------- |
39 |
C subroutine diags_rho |
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 |
|
40 |
C---------------------------------------- |
C---------------------------------------- |
41 |
CADJ SUBROUTINE diagnostics_fill INPUT = 1,2,3,4,5,6,7,8 |
cphCADJ SUBROUTINE DIAGS_RHO INPUT = 1,2,3,4,5,6,7,8 |
42 |
CADJ SUBROUTINE diagnostics_fill OUTPUT = |
cphCADJ SUBROUTINE DIAGS_RHO OUTPUT = |
|
cphCADJ SUBROUTINE diagnostics_fill DEPEND = 1,2,3,4,5,6,7,8 |
|
|
cphCADJ SUBROUTINE diagnostics_fill REQUIRED |
|
43 |
|
|
44 |
C---------------------------------------- |
C---------------------------------------- |
45 |
C subroutine DIAGS_OCEANIC_SURF_FLUX |
C SUBROUTINE DIAGS_OCEANIC_SURF_FLUX |
46 |
C---------------------------------------- |
C---------------------------------------- |
47 |
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX INPUT = 1,2,3 |
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX INPUT = 1,2,3 |
48 |
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX OUTPUT = |
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX OUTPUT = |
50 |
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX REQUIRED |
CADJ SUBROUTINE DIAGS_OCEANIC_SURF_FLUX REQUIRED |
51 |
|
|
52 |
C---------------------------------------- |
C---------------------------------------- |
53 |
C subroutine DIAGNOSTICS_SCALE_FILL |
C SUBROUTINE DIAGNOSTICS_FILL |
54 |
|
C---------------------------------------- |
55 |
|
CADJ SUBROUTINE DIAGNOSTICS_FILL INPUT = 1,2,3,4,5,6,7,8 |
56 |
|
CADJ SUBROUTINE DIAGNOSTICS_FILL OUTPUT = |
57 |
|
cphCADJ SUBROUTINE DIAGNOSTICS_FILL DEPEND = 1,2,3,4,5,6,7,8 |
58 |
|
cphCADJ SUBROUTINE DIAGNOSTICS_FILL REQUIRED |
59 |
|
|
60 |
|
C---------------------------------------- |
61 |
|
C SUBROUTINE DIAGNOSTICS_FILL_RS |
62 |
|
C---------------------------------------- |
63 |
|
CADJ SUBROUTINE DIAGNOSTICS_FILL_RS INPUT = 1,2,3,4,5,6,7,8 |
64 |
|
CADJ SUBROUTINE DIAGNOSTICS_FILL_RS OUTPUT = |
65 |
|
|
66 |
|
C---------------------------------------- |
67 |
|
C SUBROUTINE DIAGNOSTICS_SCALE_FILL |
68 |
C---------------------------------------- |
C---------------------------------------- |
69 |
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL INPUT = 1,2,3,4,5,6,7,8,9,10 |
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL INPUT = 1,2,3,4,5,6,7,8,9,10 |
70 |
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL OUTPUT = |
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL OUTPUT = |
71 |
|
|
72 |
C---------------------------------------- |
C---------------------------------------- |
73 |
C subroutine diagnostics_fract_fill |
C SUBROUTINE DIAGNOSTICS_SCALE_FILL_RS |
74 |
C---------------------------------------- |
C---------------------------------------- |
75 |
CADJ SUBROUTINE diagnostics_fract_fill INPUT = |
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL_RS INPUT = 1,2,3,4,5,6,7,8,9,10 |
76 |
CADJ & 1,2,3,4,5,6,7,8,9,10,11 |
CADJ SUBROUTINE DIAGNOSTICS_SCALE_FILL_RS OUTPUT = |
|
CADJ SUBROUTINE diagnostics_fract_fill OUTPUT = |
|
|
|
|
77 |
|
|
78 |
|
C---------------------------------------- |
79 |
|
C SUBROUTINE DIAGNOSTICS_FRACT_FILL |
80 |
|
C---------------------------------------- |
81 |
|
CADJ SUBROUTINE DIAGNOSTICS_FRACT_FILL INPUT = 1,2,3,4,5,6,7,8,9,10,11 |
82 |
|
CADJ SUBROUTINE DIAGNOSTICS_FRACT_FILL OUTPUT = |
83 |
|
|