35 |
|
|
36 |
# ifdef ALLOW_GENTIM2D_CONTROL |
# ifdef ALLOW_GENTIM2D_CONTROL |
37 |
CADJ STORE bdot_streamice |
CADJ STORE bdot_streamice |
|
CADJ & = tapelev4, key = ilev_4 |
|
38 |
#ifdef STREAMICE_STRESS_BOUNDARY_CONTROL |
#ifdef STREAMICE_STRESS_BOUNDARY_CONTROL |
39 |
|
CADJ & = tapelev4, key = ilev_4 |
40 |
CADJ STORE streamice_u_normal_stress |
CADJ STORE streamice_u_normal_stress |
41 |
CADJ & = tapelev4, key = ilev_4 |
CADJ & = tapelev4, key = ilev_4 |
42 |
CADJ STORE streamice_v_normal_stress |
CADJ STORE streamice_v_normal_stress |
56 |
#endif |
#endif |
57 |
# endif |
# endif |
58 |
|
|
59 |
|
#ifdef ALLOW_STREAMICE_TIMEDEP_FORCING |
60 |
|
CADJ STORE bdot_streamice0 |
61 |
|
CADJ & = tapelev4, key = ilev_4 |
62 |
|
CADJ STORE bdot_streamice1 |
63 |
|
CADJ & = tapelev4, key = ilev_4 |
64 |
|
#ifdef STREAMICE_STRESS_BOUNDARY_CONTROL |
65 |
|
CADJ STORE streamice_u_normal_stress0 |
66 |
|
CADJ & = tapelev4, key = ilev_4 |
67 |
|
CADJ STORE streamice_v_normal_stress0 |
68 |
|
CADJ & = tapelev4, key = ilev_4 |
69 |
|
CADJ STORE streamice_u_shear_stress0 |
70 |
|
CADJ & = tapelev4, key = ilev_4 |
71 |
|
CADJ STORE streamice_v_shear_stress0 |
72 |
|
CADJ & = tapelev4, key = ilev_4 |
73 |
|
CADJ STORE streamice_u_normal_stress1 |
74 |
|
CADJ & = tapelev4, key = ilev_4 |
75 |
|
CADJ STORE streamice_v_normal_stress1 |
76 |
|
CADJ & = tapelev4, key = ilev_4 |
77 |
|
CADJ STORE streamice_u_shear_stress1 |
78 |
|
CADJ & = tapelev4, key = ilev_4 |
79 |
|
CADJ STORE streamice_v_shear_stress1 |
80 |
|
CADJ & = tapelev4, key = ilev_4 |
81 |
|
#endif |
82 |
|
#endif |
83 |
|
|
84 |
#ifdef STREAMICE_TRACER_AB |
#ifdef STREAMICE_TRACER_AB |
85 |
CADJ STORE GAD_trac_2d |
CADJ STORE GAD_trac_2d |
86 |
CADJ & = tapelev4, key = ilev_4 |
CADJ & = tapelev4, key = ilev_4 |