Searched refs:Hnkir (Results 1 – 1 of 1) sorted by relevance
412 Hnkir[n] = std::complex<double>(AltSpherical_j_n(n, kir), AltSpherical_y_n(n, kir)); in F_ElectricFieldDielectricSphereMwt()463 std::complex<double> dHnkir = - Hnkir[n + 1] + (n + 1.) * Hnkir[n] / kir; in F_ElectricFieldDielectricSphereMwt()472 std::complex<double> jnkir = Hnkir[n].real() / kir; in F_ElectricFieldDielectricSphereMwt()477 Etheta += an * (I * gan * dHnkir.real() * A1 + den * Hnkir[n].real() * A1 ); in F_ElectricFieldDielectricSphereMwt()478 Ephi += an * (I * gan * dHnkir.real() * A1 + den * Hnkir[n].real() * A1 ); in F_ElectricFieldDielectricSphereMwt()531 std::complex<double> dHnkir = - Hnkir[n + 1] + (n + 1.) * Hnkir[n] / kir; in F_ElectricFieldDielectricSphereMwt()540 std::complex<double> jnkir = Hnkir[n].real() / kir; in F_ElectricFieldDielectricSphereMwt()545 Etheta += an * (I * gan * dHnkir.real() * A3 + den * Hnkir[n].real() * A2 ); in F_ElectricFieldDielectricSphereMwt()546 Ephi += an * (I * gan * dHnkir.real() * A2 + den * Hnkir[n].real() * A3 ); in F_ElectricFieldDielectricSphereMwt()597 std::complex<double> dHnkir = - Hnkir[n + 1] + (n + 1.) * Hnkir[n] / kir; in F_ElectricFieldDielectricSphereMwt()[all …]