Merge pull request #8 from lxvm/patch-1

Update SRCWA.jl

Author: jonschlipf

src/SRCWA/SRCWA.jl

@@ -64,7 +64,7 @@ lation)
 function srcwa_amplitudes(ψin,m::RCWAModel,grd::RCWAGrid,λ)
 	mtr=[scattermatrix_layer(eigenmodes(grd,λ,l),grd.V0) for l in m.layers] #compute scattering matrices of layers
 	ref=scattermatrix_ref(halfspace(grd.Kx,grd.Ky,m.εsup,λ),grd.V0) #superstrate and substrate halfspaces
-	tra=scattermatrix_ref(halfspace(grd.Kx,grd.Ky,m.εsub,λ),grd.V0)
+	tra=scattermatrix_tra(halfspace(grd.Kx,grd.Ky,m.εsub,λ),grd.V0)
 	mtr=cat(ref,mtr,tra,dims=1) # store all matrices in an array
 	a,b=srcwa_amplitudes(ψin,grd,mtr)
 	return a,b