dgoldberg/streamice/streamice_ad_check_lev3_dir.h

C $Header: /u/gcmpack/MITgcm/pkg/streamice/streamice_ad_check_lev3_dir.h,v 1.3 2014/06/04 12:55:58 dgoldberg Exp $
C $Name:  $

#ifdef ALLOW_STREAMICE

CADJ STORE area_shelf_streamice = tapelev3, key = ilev_3
CADJ STORE streamice_hmask = tapelev3, key = ilev_3
CADJ STORE u_streamice = tapelev3, key = ilev_3
CADJ STORE v_streamice = tapelev3, key = ilev_3
CADJ STORE h_streamice = tapelev3, key = ilev_3
CADJ STORE visc_streamice = tapelev3, key = ilev_3
CADJ STORE tau_beta_eff_streamice = tapelev3, key = ilev_3
CADJ STORE streamice_cg_a1 = tapelev3, key = ilev_3
CADJ STORE streamice_cg_a2 = tapelev3, key = ilev_3
CADJ STORE streamice_cg_a3 = tapelev3, key = ilev_3
CADJ STORE streamice_cg_a4 = tapelev3, key = ilev_3

#ifdef ALLOW_STREAMICE_2DTRACER
CADJ STORE trac2d
CADJ &     = tapelev3, key = ilev_3
#endif


CADJ STORE cost_func1_streamice
CADJ &     = tapelev3, key = ilev_3

CADJ STORE surf_el_streamice
CADJ &     = tapelev3, key=ilev_3
CADJ STORE float_frac_streamice
CADJ &     = tapelev3, key=ilev_3

CADJ STORE c_basal_friction
CADJ &     = tapelev3, key=ilev_3

# ifdef STREAMICE_HYBRID_STRESS
CADJ STORE visc_streamice_full
CADJ &     = tapelev3, key = ilev_3
# endif

# ifdef ALLOW_GENTIM2D_CONTROL
CADJ STORE bdot_streamice
CADJ &     = tapelev3, key = ilev_3
#ifdef  STREAMICE_STRESS_BOUNDARY_CONTROL
CADJ STORE streamice_u_normal_stress
CADJ &     = tapelev3, key=ilev_3
CADJ STORE streamice_v_normal_stress
CADJ &     = tapelev3, key=ilev_3
CADJ STORE streamice_u_shear_stress
CADJ &     = tapelev3, key=ilev_3
CADJ STORE streamice_v_shear_stress
CADJ &     = tapelev3, key=ilev_3
CADJ STORE streamice_u_normal_pert
CADJ &     = tapelev3, key=ilev_3
CADJ STORE streamice_v_normal_pert
CADJ &     = tapelev3, key=ilev_3
CADJ STORE streamice_u_shear_pert
CADJ &     = tapelev3, key=ilev_3
CADJ STORE streamice_v_shear_pert
CADJ &     = tapelev3, key=ilev_3
#endif
# endif

#ifdef ALLOW_STREAMICE_TIMEDEP_FORCING
CADJ STORE bdot_streamice0
CADJ &     = tapelev3, key = ilev_3
CADJ STORE bdot_streamice1
CADJ &     = tapelev3, key = ilev_3
#ifdef  STREAMICE_STRESS_BOUNDARY_CONTROL
CADJ STORE streamice_u_normal_stress0
CADJ &     = tapelev3, key = ilev_3
CADJ STORE streamice_v_normal_stress0
CADJ &     = tapelev3, key = ilev_3
CADJ STORE streamice_u_shear_stress0
CADJ &     = tapelev3, key = ilev_3
CADJ STORE streamice_v_shear_stress0
CADJ &     = tapelev3, key = ilev_3
CADJ STORE streamice_u_normal_stress1
CADJ &     = tapelev3, key = ilev_3
CADJ STORE streamice_v_normal_stress1
CADJ &     = tapelev3, key = ilev_3
CADJ STORE streamice_u_shear_stress1
CADJ &     = tapelev3, key = ilev_3
CADJ STORE streamice_v_shear_stress1
CADJ &     = tapelev3, key = ilev_3
#endif
#endif


#ifdef STREAMICE_TRACER_AB
CADJ STORE GAD_trac_2d
CADJ &     = tapelev3, key = ilev_3
#endif


#endif /* ALLOW_STREAMICE */
1	dgoldberg	1.8	C $Header: /u/gcmpack/MITgcm/pkg/streamice/streamice_ad_check_lev3_dir.h,v 1.3 2014/06/04 12:55:58 dgoldberg Exp $
2	heimbach	1.1	C $Name: $
3
4			#ifdef ALLOW_STREAMICE
5	heimbach	1.2
6	heimbach	1.1	CADJ STORE area_shelf_streamice = tapelev3, key = ilev_3
7			CADJ STORE streamice_hmask = tapelev3, key = ilev_3
8			CADJ STORE u_streamice = tapelev3, key = ilev_3
9			CADJ STORE v_streamice = tapelev3, key = ilev_3
10			CADJ STORE h_streamice = tapelev3, key = ilev_3
11			CADJ STORE visc_streamice = tapelev3, key = ilev_3
12			CADJ STORE tau_beta_eff_streamice = tapelev3, key = ilev_3
13			CADJ STORE streamice_cg_a1 = tapelev3, key = ilev_3
14			CADJ STORE streamice_cg_a2 = tapelev3, key = ilev_3
15			CADJ STORE streamice_cg_a3 = tapelev3, key = ilev_3
16			CADJ STORE streamice_cg_a4 = tapelev3, key = ilev_3
17	heimbach	1.2
18	dgoldberg	1.7	#ifdef ALLOW_STREAMICE_2DTRACER
19			CADJ STORE trac2d
20			CADJ & = tapelev3, key = ilev_3
21			#endif
22
23
24	heimbach	1.3	CADJ STORE cost_func1_streamice
25			CADJ & = tapelev3, key = ilev_3
26
27	dgoldberg	1.4	CADJ STORE surf_el_streamice
28			CADJ & = tapelev3, key=ilev_3
29			CADJ STORE float_frac_streamice
30			CADJ & = tapelev3, key=ilev_3
31
32	dgoldberg	1.6	CADJ STORE c_basal_friction
33			CADJ & = tapelev3, key=ilev_3
34
35	heimbach	1.2	# ifdef STREAMICE_HYBRID_STRESS
36			CADJ STORE visc_streamice_full
37			CADJ & = tapelev3, key = ilev_3
38			# endif
39
40	dgoldberg	1.5	# ifdef ALLOW_GENTIM2D_CONTROL
41			CADJ STORE bdot_streamice
42			CADJ & = tapelev3, key = ilev_3
43	dgoldberg	1.8	#ifdef STREAMICE_STRESS_BOUNDARY_CONTROL
44			CADJ STORE streamice_u_normal_stress
45			CADJ & = tapelev3, key=ilev_3
46			CADJ STORE streamice_v_normal_stress
47			CADJ & = tapelev3, key=ilev_3
48			CADJ STORE streamice_u_shear_stress
49			CADJ & = tapelev3, key=ilev_3
50			CADJ STORE streamice_v_shear_stress
51			CADJ & = tapelev3, key=ilev_3
52			CADJ STORE streamice_u_normal_pert
53			CADJ & = tapelev3, key=ilev_3
54			CADJ STORE streamice_v_normal_pert
55			CADJ & = tapelev3, key=ilev_3
56			CADJ STORE streamice_u_shear_pert
57			CADJ & = tapelev3, key=ilev_3
58			CADJ STORE streamice_v_shear_pert
59			CADJ & = tapelev3, key=ilev_3
60			#endif
61	dgoldberg	1.5	# endif
62
63	dgoldberg	1.8	#ifdef ALLOW_STREAMICE_TIMEDEP_FORCING
64			CADJ STORE bdot_streamice0
65			CADJ & = tapelev3, key = ilev_3
66			CADJ STORE bdot_streamice1
67			CADJ & = tapelev3, key = ilev_3
68			#ifdef STREAMICE_STRESS_BOUNDARY_CONTROL
69			CADJ STORE streamice_u_normal_stress0
70			CADJ & = tapelev3, key = ilev_3
71			CADJ STORE streamice_v_normal_stress0
72			CADJ & = tapelev3, key = ilev_3
73			CADJ STORE streamice_u_shear_stress0
74			CADJ & = tapelev3, key = ilev_3
75			CADJ STORE streamice_v_shear_stress0
76			CADJ & = tapelev3, key = ilev_3
77			CADJ STORE streamice_u_normal_stress1
78			CADJ & = tapelev3, key = ilev_3
79			CADJ STORE streamice_v_normal_stress1
80			CADJ & = tapelev3, key = ilev_3
81			CADJ STORE streamice_u_shear_stress1
82			CADJ & = tapelev3, key = ilev_3
83			CADJ STORE streamice_v_shear_stress1
84			CADJ & = tapelev3, key = ilev_3
85			#endif
86			#endif
87
88
89	dgoldberg	1.7	#ifdef STREAMICE_TRACER_AB
90			CADJ STORE GAD_trac_2d
91			CADJ & = tapelev3, key = ilev_3
92			#endif
93
94
95	heimbach	1.1	#endif /* ALLOW_STREAMICE */