47 |
c |
c |
48 |
CADJ STORE gs = tapelev4, key = ilev_4 |
CADJ STORE gs = tapelev4, key = ilev_4 |
49 |
CADJ STORE gt = tapelev4, key = ilev_4 |
CADJ STORE gt = tapelev4, key = ilev_4 |
50 |
|
#ifdef ALLOW_ADAMSBASHFORTH_3 |
51 |
|
CADJ STORE gtnm(:,:,:,:,1) = tapelev4, key = ilev_4 |
52 |
|
CADJ STORE gsnm(:,:,:,:,1) = tapelev4, key = ilev_4 |
53 |
|
CADJ STORE gunm(:,:,:,:,1) = tapelev4, key = ilev_4 |
54 |
|
CADJ STORE gvnm(:,:,:,:,1) = tapelev4, key = ilev_4 |
55 |
|
CADJ STORE gtnm(:,:,:,:,2) = tapelev4, key = ilev_4 |
56 |
|
CADJ STORE gsnm(:,:,:,:,2) = tapelev4, key = ilev_4 |
57 |
|
CADJ STORE gunm(:,:,:,:,2) = tapelev4, key = ilev_4 |
58 |
|
CADJ STORE gvnm(:,:,:,:,2) = tapelev4, key = ilev_4 |
59 |
|
#else |
60 |
CADJ STORE gtnm1 = tapelev4, key = ilev_4 |
CADJ STORE gtnm1 = tapelev4, key = ilev_4 |
61 |
CADJ STORE gsnm1 = tapelev4, key = ilev_4 |
CADJ STORE gsnm1 = tapelev4, key = ilev_4 |
62 |
CADJ STORE gunm1 = tapelev4, key = ilev_4 |
CADJ STORE gunm1 = tapelev4, key = ilev_4 |
63 |
CADJ STORE gvnm1 = tapelev4, key = ilev_4 |
CADJ STORE gvnm1 = tapelev4, key = ilev_4 |
64 |
|
#endif |
65 |
CADJ STORE theta = tapelev4, key = ilev_4 |
CADJ STORE theta = tapelev4, key = ilev_4 |
66 |
CADJ STORE salt = tapelev4, key = ilev_4 |
CADJ STORE salt = tapelev4, key = ilev_4 |
67 |
CADJ STORE uvel = tapelev4, key = ilev_4 |
CADJ STORE uvel = tapelev4, key = ilev_4 |
96 |
CADJ STORE recip_hfacc = tapelev4, key = ilev_4 |
CADJ STORE recip_hfacc = tapelev4, key = ilev_4 |
97 |
CADJ STORE recip_hfacs = tapelev4, key = ilev_4 |
CADJ STORE recip_hfacs = tapelev4, key = ilev_4 |
98 |
CADJ STORE recip_hfacw = tapelev4, key = ilev_4 |
CADJ STORE recip_hfacw = tapelev4, key = ilev_4 |
99 |
|
CADJ STORE phi0surf = tapelev4, key = ilev_4 |
100 |
# ifndef DISABLE_RSTAR_CODE |
# ifndef DISABLE_RSTAR_CODE |
101 |
CADJ STORE rstarexpc,rstarexps,rstarexpw |
CADJ STORE rstarexpc,rstarexps,rstarexpw |
102 |
CADJ & = tapelev4, key = ilev_4 |
CADJ & = tapelev4, key = ilev_4 |
113 |
# include "cd_code_ad_check_lev4_dir.h" |
# include "cd_code_ad_check_lev4_dir.h" |
114 |
#endif /* ALLOW_CD_CODE */ |
#endif /* ALLOW_CD_CODE */ |
115 |
|
|
116 |
|
#ifdef ALLOW_GGL90 |
117 |
|
# include "ggl90_ad_check_lev4_dir.h" |
118 |
|
#endif |
119 |
|
|
120 |
#ifdef ALLOW_EXF |
#ifdef ALLOW_EXF |
121 |
# include "exf_ad_check_lev4_dir.h" |
# include "exf_ad_check_lev4_dir.h" |
122 |
#endif /* ALLOW_EXF */ |
#endif /* ALLOW_EXF */ |