13 |
CADJ STORE vvel = tapelev2, key = ilev_2 |
CADJ STORE vvel = tapelev2, key = ilev_2 |
14 |
CADJ STORE wvel = tapelev2, key = ilev_2 |
CADJ STORE wvel = tapelev2, key = ilev_2 |
15 |
CADJ STORE etan = tapelev2, key = ilev_2 |
CADJ STORE etan = tapelev2, key = ilev_2 |
|
CADJ STORE gu = tapelev2, key = ilev_2 |
|
|
CADJ STORE gv = tapelev2, key = ilev_2 |
|
16 |
CADJ STORE totphihyd = tapelev2, key = ilev_2 |
CADJ STORE totphihyd = tapelev2, key = ilev_2 |
|
CADJ STORE empmr = tapelev2, key = ilev_2 |
|
17 |
|
|
18 |
#ifdef INCLUDE_CD_CODE |
#ifdef INCLUDE_CD_CODE |
19 |
CADJ STORE uveld = tapelev2, key = ilev_2 |
CADJ STORE uveld = tapelev2, key = ilev_2 |
23 |
CADJ STORE vnm1 = tapelev2, key = ilev_2 |
CADJ STORE vnm1 = tapelev2, key = ilev_2 |
24 |
#endif /* INCLUDE_CD_CODE */ |
#endif /* INCLUDE_CD_CODE */ |
25 |
|
|
26 |
|
#ifdef EXACT_CONSERV |
27 |
|
CADJ STORE empmr = tapelev2, key = ilev_2 |
28 |
|
#endif /* EXACT_CONSERV */ |
29 |
|
|
30 |
#ifdef ALLOW_PASSIVE_TRACER |
#ifdef ALLOW_PASSIVE_TRACER |
31 |
CADJ STORE tr1 = tapelev2, key = ilev_2 |
CADJ STORE tr1 = tapelev2, key = ilev_2 |
32 |
CADJ STORE gtr1nm1 = tapelev2, key = ilev_2 |
CADJ STORE gtr1nm1 = tapelev2, key = ilev_2 |
35 |
#ifdef ALLOW_PTRACERS |
#ifdef ALLOW_PTRACERS |
36 |
CADJ STORE ptracer = tapelev2, key = ilev_2 |
CADJ STORE ptracer = tapelev2, key = ilev_2 |
37 |
CADJ STORE gptrnm1 = tapelev2, key = ilev_2 |
CADJ STORE gptrnm1 = tapelev2, key = ilev_2 |
38 |
|
CADJ STORE surfacetendencys = |
39 |
|
CADJ & tapelev2, key = ilev_2 |
40 |
#endif /* ALLOW_PTRACERS */ |
#endif /* ALLOW_PTRACERS */ |
41 |
|
|
42 |
#ifdef EXACT_CONSERV |
#ifdef EXACT_CONSERV |