From 750c0504a2ff7060736a513ddc698e2bd8a5026c Mon Sep 17 00:00:00 2001
From: Guillaume Demesy <guillaume.demesy@fresnel.fr>
Date: Tue, 14 Jan 2020 10:18:13 +0100
Subject: [PATCH] pp
---
DiffractionGratings/grating3D.pro | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/DiffractionGratings/grating3D.pro b/DiffractionGratings/grating3D.pro
index f3e06e8..a7871b4 100644
--- a/DiffractionGratings/grating3D.pro
+++ b/DiffractionGratings/grating3D.pro
@@ -165,7 +165,7 @@ Function{
ts[] = 2.*k1z[] /(k1z[]+k2z[]);
rp[] = (k1z[]*epsr2[]-k2z[]*epsr1[])/(k1z[]*epsr2[]+k2z[]*epsr1[]);
tp[] = (2.*k1z[]*epsr2[])/(k1z[]*epsr2[]+k2z[]*epsr1[]);
-
+
spol[] = Vector[Sin[phi0],-Cos[phi0],0];
AmplEis[] = spol[];
AmplErs[] = rs[]*spol[];
--
GitLab