26 ε_m
= ε
_drude(ε_inf
, ω_p
, γ_p
, ω
)
32 k_i
= cmath
.sqrt(ε_m
)*ω
/c
33 k_e
= cmath
.sqrt(ε_b
)*ω
/c
34 RH
, RV
, TH
, TV
= mie_coefficients(a
=R
, nmax
=lMax
, k_i
=k_i
, k_e
=k_e
, J_ext
=1, J_scat
=3)
40 spec
= BaseSpec(lMax
=lMax
)
41 cT
= CTMatrix
.spherical(spec
, R
, k_i
, k_e
, 1, 1)
47 print(np
.diag(cT
[...]))