ction  : cplx [1:100] 0+0i 0+0i 0+0i ...
##  $ transmission: cplx [1:100] 1+0i 1+0i 1+0i ...
##  $ R           : num [1:100] 0 0 0 0 0 0 0 0 0 0 ...
##  $ T           : num [1:100] 1 1 1 1 1 1 1 1 1 1 ...
##  $ A           : num [1:100] 0 0 0 0 0 0 0 0 0 0 ...
##  $ dist        :List of 2
##   ..$ : num -1
##   ..$ : num 1
##  $ fields      :List of 4
##   ..$ Eix.E1 : cplx [1, 1:100, 1:2] 1+0i 0.999+0i 0.998+0i ...
##   ..$ Epix.E1: cplx [1, 1:100, 1:2] 0+0i 0+0i 0+0i ...
##   ..$ Eiz.E1 : cplx [1, 1:100, 