Parameters of the solution for MieScatter at dielectric cylinder (infinite height in z direction)
Type  Visibility  Attributes  Name  Initial  

real(kind=rk),  public  ::  center(2)  =  [0.0_rk, 0.0_rk] 
The center of the cylinder (in the xy plane) 

real(kind=rk),  public  ::  radius  =  1.0_rk 
The radius of the cylinder 

real(kind=rk),  public  ::  permeability_background  =  1.0_rk 
Permeability (mu) of the background. 

real(kind=rk),  public  ::  permitivity_background  =  1.0_rk 
Permitivity (epsilon) of the background. 

real(kind=rk),  public  ::  permeability_cylinder  =  1.0_rk 
Permeability (mu) of the cylinder. 

real(kind=rk),  public  ::  permitivity_cylinder  =  1.0_rk 
Permitivity (epsilon) of the cylinder. 

real(kind=rk),  public  ::  wavenumber_background 
Wave number for the background 

real(kind=rk),  public  ::  wavenumber_cylinder 
Wave number for the cylinder 

real(kind=rk),  public  ::  omega  =  2.0_rk*PI*1.0_rk 
Angular frequency ( = 2 * pi * f , where f is the original frequency in Hertz) 
type tem_miescatter_type
!> The center of the cylinder (in the xy plane)
real(kind=rk) :: center(2) = [ 0.0_rk, 0.0_rk ]
!> The radius of the cylinder
real(kind=rk) :: radius = 1.0_rk
!> Permeability (mu) of the background.
real(kind=rk) :: permeability_background = 1.0_rk
!> Permitivity (epsilon) of the background.
real(kind=rk) :: permitivity_background = 1.0_rk
!> Permeability (mu) of the cylinder.
real(kind=rk) :: permeability_cylinder = 1.0_rk
!> Permitivity (epsilon) of the cylinder.
real(kind=rk) :: permitivity_cylinder = 1.0_rk
!> Wave number for the background
real(kind=rk) :: wavenumber_background
!> Wave number for the cylinder
real(kind=rk) :: wavenumber_cylinder
!> Angular frequency ( = 2 * pi * f , where
!! f is the original frequency in Hertz)
real(kind=rk) :: omega = 2.0_rk * PI * 1.0_rk
end type tem_miescatter_type