dgoldberg/streamice/streamice_ad_check_lev3_dir.h

C $Header: /u/gcmpack/MITgcm_contrib/dgoldberg/streamice/streamice_ad_check_lev3_dir.h,v 1.5 2013/02/12 17:21:01 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

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
# endif

#endif /* ALLOW_STREAMICE */
1	dgoldberg	1.6	C $Header: /u/gcmpack/MITgcm_contrib/dgoldberg/streamice/streamice_ad_check_lev3_dir.h,v 1.5 2013/02/12 17:21:01 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	heimbach	1.3	CADJ STORE cost_func1_streamice
19			CADJ & = tapelev3, key = ilev_3
20
21	dgoldberg	1.4	CADJ STORE surf_el_streamice
22			CADJ & = tapelev3, key=ilev_3
23			CADJ STORE float_frac_streamice
24			CADJ & = tapelev3, key=ilev_3
25
26	dgoldberg	1.6	CADJ STORE c_basal_friction
27			CADJ & = tapelev3, key=ilev_3
28
29	heimbach	1.2	# ifdef STREAMICE_HYBRID_STRESS
30			CADJ STORE visc_streamice_full
31			CADJ & = tapelev3, key = ilev_3
32			# endif
33
34	dgoldberg	1.5	# ifdef ALLOW_GENTIM2D_CONTROL
35			CADJ STORE bdot_streamice
36			CADJ & = tapelev3, key = ilev_3
37			# endif
38
39	heimbach	1.1	#endif /* ALLOW_STREAMICE */