92 |
CADJ STORE hfac_surfc = tapelev4, key = ilev_4 |
CADJ STORE hfac_surfc = tapelev4, key = ilev_4 |
93 |
CADJ STORE hfac_surfs = tapelev4, key = ilev_4 |
CADJ STORE hfac_surfs = tapelev4, key = ilev_4 |
94 |
CADJ STORE hfac_surfw = tapelev4, key = ilev_4 |
CADJ STORE hfac_surfw = tapelev4, key = ilev_4 |
95 |
CADJ STORE hfacc = tapelev4, key = ilev_4 |
CADJ STORE hFac_surfNm1C= tapelev4, key = ilev_4 |
96 |
CADJ STORE hfacs = tapelev4, key = ilev_4 |
CADJ STORE hFac_surfNm1S= tapelev4, key = ilev_4 |
97 |
CADJ STORE hfacw = tapelev4, key = ilev_4 |
CADJ STORE hFac_surfNm1W= tapelev4, key = ilev_4 |
|
CADJ STORE recip_hfacc = tapelev4, key = ilev_4 |
|
|
CADJ STORE recip_hfacs = tapelev4, key = ilev_4 |
|
|
CADJ STORE recip_hfacw = tapelev4, key = ilev_4 |
|
98 |
|
|
99 |
# ifndef DISABLE_RSTAR_CODE |
# ifndef DISABLE_RSTAR_CODE |
100 |
CADJ STORE rstarexpc,rstarexps,rstarexpw |
CADJ STORE rstarexpc,rstarexps,rstarexpw |
101 |
CADJ & = tapelev4, key = ilev_4 |
CADJ & = tapelev4, key = ilev_4 |
102 |
CADJ STORE rstarfacc,rstarfacs,rstarfacw |
CADJ STORE rstarfacc,rstarfacs,rstarfacw |
103 |
CADJ & = tapelev4, key = ilev_4 |
CADJ & = tapelev4, key = ilev_4 |
104 |
CADJ STORE rstardhcdt,rstardhsdt,rstardhwdt |
CADJ STORE rStarFacNm1C,rStarFacNm1S,rStarFacNm1W |
105 |
CADJ & = tapelev4, key = ilev_4 |
CADJ & = tapelev4, key = ilev_4 |
106 |
CADJ STORE h0facc,h0facs,h0facw |
CADJ STORE rstardhcdt,rstardhsdt,rstardhwdt |
107 |
CADJ & = tapelev4, key = ilev_4 |
CADJ & = tapelev4, key = ilev_4 |
108 |
# endif |
# endif |
109 |
#endif /* NONLIN_FRSURF */ |
#endif /* NONLIN_FRSURF */ |