Searched refs:ethm2 (Results 1 – 2 of 2) sorted by relevance
| /dports/comms/xnec2c/xnec2c-3.4/src/ |
| H A D | radiation.c | 575 double tha, ethm2, ethm; in rdpat() local
664 ethm2= creal( eth* conj( eth)); in rdpat()
665 ethm= sqrt( ethm2); in rdpat()
674 if( (ethm2 <= 1.0e-20) && (ephm2 <= 1.0e-20) ) in rdpat()
694 tstor1= ethm2- ephm2; in rdpat()
700 emajr2= -tstor1+ tstor2+ ethm2; in rdpat()
716 gnv = db10( gcon* ethm2); in rdpat()
718 gtot= db10( gcon* (ethm2+ ephm2) ); in rdpat()
|
| /dports/comms/nec2c/nec2c/ |
| H A D | nec2c.c | 8629 double phi, pha, thet, tha, erdm=0., erda=0., ethm2, ethm, *gain = NULL; in rdpat() local
8795 ethm2= creal( eth* conj( eth)); in rdpat()
8796 ethm= sqrt( ethm2); in rdpat()
8805 if( (ethm2 <= 1.0e-20) && (ephm2 <= 1.0e-20) ) in rdpat()
8825 tstor1= ethm2- ephm2; in rdpat()
8831 emajr2= - tstor1+ tstor2+ ethm2; in rdpat()
8850 gnv = db10( gcon* ethm2); in rdpat()
8852 gtot= db10( gcon*(ethm2+ ephm2) ); in rdpat()
8887 tstor1= gcop*( ethm2+ ephm2); in rdpat()
|