Files
Estia-MCNP/geometry/sm_reflectivity.i

49 lines
1.4 KiB
OpenEdge ABL

c Specify the reflecitive surfaces for neutron supermirrors
c NBOA
REFLE11 201501 36 -201001 -201002 -201003 -201004
-201005 -201006 -201007 -201008
REFLE12 201502 36 -201001 -201002 -201003 -201004
-201005 -201006 -201007 -201008
c NFGA
REFLE21 203501 36 -203001 -203002 -203003 -203004 -203005 -203006 -203007
-203011 -203012 -203013 -203014 -203015 -203016 -203017
REFLE22 203502 36 -203001 -203002 -203003 -203004 -203005 -203006 -203007
-203011 -203012 -203013 -203014 -203015 -203016 -203017
c Selene 1
REFLE31 208901 36 -208303
REFLE32 208902 36 -208303
c Selene 2
REFLE41 208911 36 -206113
REFLE42 208912 36 -206113
c Polarizer
REFLE51 230611 55 -230661
REFLE52 230612 55 -230661
REFLE53 230613 55 -230661
REFLE54 230601 56 -230651
REFLE55 230602 56 -230651
REFLE56 230603 56 -230651
REFLE57 230620 55 -230674
REFLE58 230624 56 -230672
c Split particles between reflection and transmission (0=analog, 2=split)
RFLAG11 2
RFLAG12 2
RFLAG21 2
RFLAG22 2
RFLAG31 2
RFLAG32 2
RFLAG41 2
RFLAG42 2
c Polarizer
RFLAG51 0
RFLAG52 0
RFLAG53 0
RFLAG54 0
RFLAG55 0
RFLAG56 0
RFLAG57 0
RFLAG58 0
c Reflectivity parameters
REFF36 0.99 2.19e-2 3.8 3.2 2.0e-3 $ m=3.8 highest Selene coating
REFF55 0.495 2.19e-2 5.5 3.2 2.0e-3 $ m=5.5 polarizing SM
REFF56 0.02 2.19e-2 5.5 3.2 2.0e-3 $ m=5.5 but acting on pre-polarized beam