From 167273e1237987db92e4f11dcd99384b9a22c1a8 Mon Sep 17 00:00:00 2001
From: Artur Glavic <artur.glavic@psi.ch>
Date: Tue, 15 Feb 2022 18:14:49 +0100
Subject: [PATCH] Try reflecting from polarizer surface

---
 geometry/sm_reflectivity.i | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/geometry/sm_reflectivity.i b/geometry/sm_reflectivity.i
index 0851635..12cb4b0 100644
--- a/geometry/sm_reflectivity.i
+++ b/geometry/sm_reflectivity.i
@@ -15,6 +15,13 @@ REFLE32 208902 36 -208303
 c Selene 2
 REFLE41 208911 36 -206113
 REFLE42 208912 36 -206113
+c Polarizer
+REFLE51 230601 55 -230111
+REFLE52 230602 55 -230111
+REFLE53 230603 55 -230111
+REFLE54 230611 55 -230111
+REFLE55 230612 55 -230111
+REFLE56 230613 55 -230111
 c Split particles between reflection and transmission (0=analog, 2=split)
 RFLAG11 2
 RFLAG12 2
@@ -24,5 +31,12 @@ RFLAG31 2
 RFLAG32 2
 RFLAG41 2
 RFLAG42 2
+RFLAG51 0
+RFLAG52 0
+RFLAG53 0
+RFLAG54 0
+RFLAG55 0
+RFLAG56 0
 c Reflectivity parameters
-REFF36 0.99 2.19e-2   3.8   3.2 2.0e-3
+REFF36 0.99  2.19e-2   3.8   3.2 2.0e-3
+REFF55 0.495 2.19e-2   5.5   3.2 2.0e-3