Searched refs:gzp1 (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
388 gzp1= gp1* z1a; in eksc()
395 gzp1= gzp1* z1a; 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
456 &gzp1, &gr1, &grp1, &grk1, &gzz1); in ekscx()
460 gzp1= grk1* z1a; in ekscx()
462 grp1= gzp1/ 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
4215 gzp1= gp1* z1a; in eksc()
4222 gzp1= gzp1* z1a; 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
4282 &gzp1, &gr1, &grp1, &grk1, &gzz1); in ekscx()
4286 gzp1= grk1* z1a; in ekscx()
4288 grp1= gzp1/ rhx; in ekscx()
4306 *ezs= CONST1*(( gz2- gz1)* cs* xk-( gzp2+ gzp1)* ss); in ekscx()
[all …]
|