separate definition of surface optical properties of 6um mylar window

electron.mac

@@ -20,7 +20,7 @@
 /gps/energy 1682.232 keV
 
 # magnetic field
-/VK/field/maxbfield 0.125 tesla
+/VK/field/maxbfield 0.155 tesla
 
-/VK/output/openFile output/electron125.root                
+/VK/output/openFile output/electron155_mylarR90.root                
 /run/beamOn 1000

src/VKBetaDetector.cpp

@@ -338,13 +338,27 @@ void VKBetaDetector::SurfaceProperties()
         new G4OpticalSurface("photocathOptSurf", glisur, polished, dielectric_metal);
     photocathOptSurf -> SetMaterialPropertiesTable(photocath_mpt);
 
+    //
+    // 6um Mylar window (same properties as Reflective coating)
+    //
+    G4double mylarRefl[] = {fRefl, fRefl};
+    G4double mylarEff[]  = {0.0, 0.0};
+    G4MaterialPropertiesTable* mylarWindow_mpt = new G4MaterialPropertiesTable();
+    mylarWindow_mpt -> AddProperty("REFLECTIVITY", ephoton, mylarRefl, num);
+    mylarWindow_mpt -> AddProperty("EFFICIENCY", ephoton, mylarEff, num);
+    // Create optical surface
+    G4OpticalSurface* mylarWindowOptSurf =
+        new G4OpticalSurface("mylarWindowOptSurf", unified, polished, dielectric_metal);
+    mylarWindowOptSurf -> SetMaterialPropertiesTable(mylarWindow_mpt);
+
+
     //
     // Create logical skin surfaces
     //
     // *** NB: Mylar window gets same properties as reflective coating
     // 
     new G4LogicalSkinSurface("coating_surf", fCoating_log, reflCoatOptSurf);
-    new G4LogicalSkinSurface("window_surf", fWindow_log, reflCoatOptSurf);
+    new G4LogicalSkinSurface("window_surf", fWindow_log, mylarWindowOptSurf);
     new G4LogicalSkinSurface("photocathode_surf", fPhotocathode_log, photocathOptSurf);
 }