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	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	C $Name: $
3
4	#ifdef ALLOW_STREAMICE
5
6	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
18	#ifdef ALLOW_STREAMICE_2DTRACER
19	CADJ STORE trac2d
20	CADJ & = tapelev3, key = ilev_3
21	#endif
22
23
24	CADJ STORE cost_func1_streamice
25	CADJ & = tapelev3, key = ilev_3
26
27	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	CADJ STORE c_basal_friction
33	CADJ & = tapelev3, key=ilev_3
34
35	# ifdef STREAMICE_HYBRID_STRESS
36	CADJ STORE visc_streamice_full
37	CADJ & = tapelev3, key = ilev_3
38	# endif
39
40	# ifdef ALLOW_GENTIM2D_CONTROL
41	CADJ STORE bdot_streamice
42	CADJ & = tapelev3, key = ilev_3
43	#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	# endif
62
63	#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	#ifdef STREAMICE_TRACER_AB
90	CADJ STORE GAD_trac_2d
91	CADJ & = tapelev3, key = ilev_3
92	#endif
93
94
95	#endif /* ALLOW_STREAMICE */