pkg/streamice/streamice_ad_check_lev4_dir.h

C $Header: /u/gcmpack/MITgcm/pkg/streamice/streamice_ad_check_lev4_dir.h,v 1.1 2013/06/12 21:30:22 dgoldberg Exp $
C $Name:  $

#ifdef ALLOW_STREAMICE

CADJ STORE area_shelf_streamice = tapelev4, key = ilev_4
CADJ STORE streamice_hmask = tapelev4, key = ilev_4
CADJ STORE u_streamice = tapelev4, key = ilev_4
CADJ STORE v_streamice = tapelev4, key = ilev_4
CADJ STORE h_streamice = tapelev4, key = ilev_4
CADJ STORE visc_streamice = tapelev4, key = ilev_4
CADJ STORE tau_beta_eff_streamice = tapelev4, key = ilev_4

#ifdef ALLOW_STREAMICE_2DTRACER
CADJ STORE trac2d
CADJ &     = tapelev4, key = ilev_4
#endif


CADJ STORE cost_func1_streamice
CADJ &     = tapelev4, key = ilev_4

CADJ STORE surf_el_streamice
CADJ &     = tapelev4, key=ilev_4
CADJ STORE float_frac_streamice
CADJ &     = tapelev4, key=ilev_4

CADJ STORE c_basal_friction
CADJ &     = tapelev4, key=ilev_4

# ifdef STREAMICE_HYBRID_STRESS
CADJ STORE visc_streamice_full
CADJ &     = tapelev4, key = ilev_4
# endif

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

#ifdef STREAMICE_TRACER_AB
CADJ STORE GAD_trac_2d
CADJ &     = tapelev4, key = ilev_4
#endif

#endif /* ALLOW_STREAMICE */
1	C $Header: /u/gcmpack/MITgcm/pkg/streamice/streamice_ad_check_lev4_dir.h,v 1.1 2013/06/12 21:30:22 dgoldberg Exp $
2	C $Name: $
3
4	#ifdef ALLOW_STREAMICE
5
6	CADJ STORE area_shelf_streamice = tapelev4, key = ilev_4
7	CADJ STORE streamice_hmask = tapelev4, key = ilev_4
8	CADJ STORE u_streamice = tapelev4, key = ilev_4
9	CADJ STORE v_streamice = tapelev4, key = ilev_4
10	CADJ STORE h_streamice = tapelev4, key = ilev_4
11	CADJ STORE visc_streamice = tapelev4, key = ilev_4
12	CADJ STORE tau_beta_eff_streamice = tapelev4, key = ilev_4
13
14	#ifdef ALLOW_STREAMICE_2DTRACER
15	CADJ STORE trac2d
16	CADJ & = tapelev4, key = ilev_4
17	#endif
18
19
20	CADJ STORE cost_func1_streamice
21	CADJ & = tapelev4, key = ilev_4
22
23	CADJ STORE surf_el_streamice
24	CADJ & = tapelev4, key=ilev_4
25	CADJ STORE float_frac_streamice
26	CADJ & = tapelev4, key=ilev_4
27
28	CADJ STORE c_basal_friction
29	CADJ & = tapelev4, key=ilev_4
30
31	# ifdef STREAMICE_HYBRID_STRESS
32	CADJ STORE visc_streamice_full
33	CADJ & = tapelev4, key = ilev_4
34	# endif
35
36	# ifdef ALLOW_GENTIM2D_CONTROL
37	CADJ STORE bdot_streamice
38	CADJ & = tapelev4, key = ilev_4
39	#ifdef STREAMICE_STRESS_BOUNDARY_CONTROL
40	CADJ STORE streamice_u_normal_stress
41	CADJ & = tapelev4, key = ilev_4
42	CADJ STORE streamice_v_normal_stress
43	CADJ & = tapelev4, key = ilev_4
44	CADJ STORE streamice_u_shear_stress
45	CADJ & = tapelev4, key = ilev_4
46	CADJ STORE streamice_v_shear_stress
47	CADJ & = tapelev4, key = ilev_4
48	CADJ STORE streamice_u_normal_pert
49	CADJ & = tapelev4, key = ilev_4
50	CADJ STORE streamice_v_normal_pert
51	CADJ & = tapelev4, key = ilev_4
52	CADJ STORE streamice_u_shear_pert
53	CADJ & = tapelev4, key = ilev_4
54	CADJ STORE streamice_v_shear_pert
55	CADJ & = tapelev4, key = ilev_4
56	#endif
57	# endif
58
59	#ifdef STREAMICE_TRACER_AB
60	CADJ STORE GAD_trac_2d
61	CADJ & = tapelev4, key = ilev_4
62	#endif
63
64	#endif /* ALLOW_STREAMICE */