Searched refs:gzp2 (Results 1 – 2 of 2) sorted by relevance
| /dports/comms/xnec2c/xnec2c-3.4/src/ |
| H A D | fields.c | 374 complex double gz1, gz2, gp1, gp2, gzp1, gzp2; in eksc() local
389 gzp2= gp2* z2a; in eksc()
396 gzp2= gzp2* z2a; in eksc()
400 *ers= -CONST1*(( gzp2+ gzp1+ gz2+ gz1)* in eksc()
402 *erc= -CONST1*(( gzp2- gzp1+ gz2- gz1)* in eksc()
426 complex double gz1, gz2, gzp1, gzp2, gr1, gr2; in ekscx() local
469 &gzp2, &gr2, &grp2, &grk2, &gzz2); in ekscx()
473 gzp2= grk2* z2a; in ekscx()
475 grp2= gzp2/ rhx; in ekscx()
480 *ezs= CONST1*(( gz2- gz1)* cs* xk-( gzp2+ gzp1)* ss); in ekscx()
[all …]
|
| /dports/comms/nec2c/nec2c/ |
| H A D | nec2c.c | 4201 complex double gz1, gz2, gp1, gp2, gzp1, gzp2; in eksc() local
4216 gzp2= gp2* z2a; in eksc()
4223 gzp2= gzp2* z2a; in eksc()
4227 *ers= - CONST1*(( gzp2+ gzp1+ gz2+ gz1)* in eksc()
4229 *erc= - CONST1*(( gzp2- gzp1+ gz2- gz1)* in eksc()
4252 complex double gz1, gz2, gzp1, gzp2, gr1, gr2; in ekscx() local
4295 &gzp2, &gr2, &grp2, &grk2, &gzz2); in ekscx()
4299 gzp2= grk2* z2a; in ekscx()
4301 grp2= gzp2/ rhx; in ekscx()
4306 *ezs= CONST1*(( gz2- gz1)* cs* xk-( gzp2+ gzp1)* ss); in ekscx()
[all …]
|