Geant4 Cross Reference |
1 // Define a parameter for later use 1 // Define a parameter for later use 2 :P POSZ 50. 2 :P POSZ 50. 3 3 4 // Define rotation matrix 4 // Define rotation matrix 5 :ROTM R00 1. 0. 0. 0. 1. 0. 0. 0. 1. // unit 5 :ROTM R00 1. 0. 0. 0. 1. 0. 0. 0. 1. // unit matrix 6 6 7 // Define volumes and place them 7 // Define volumes and place them 8 :VOLU world BOX 50. 50. 3*$POSZ G4_AIR 8 :VOLU world BOX 50. 50. 3*$POSZ G4_AIR 9 :VIS world OFF 9 :VIS world OFF 10 10 11 // some defined as solids, some as volumes 11 // some defined as solids, some as volumes 12 :SOLID box1 BOX 5. 5. 10. 12 :SOLID box1 BOX 5. 5. 10. 13 :SOLID box2 BOX 10. 10. 20. 13 :SOLID box2 BOX 10. 10. 20. 14 :SOLID box3 BOX 15. 15. 30. 14 :SOLID box3 BOX 15. 15. 30. 15 :SOLID BOX_UNION UNION box1 box2 R00 0. 0. 30. 15 :SOLID BOX_UNION UNION box1 box2 R00 0. 0. 30. 16 :VOLU BOX_SUBT SUBTRACTION box3 box2 R00 0. 0. 16 :VOLU BOX_SUBT SUBTRACTION box3 box2 R00 0. 0. 15. G4_Cu 17 :SOLID BOX_INTERS INTERSECTION BOX_UNION box3 17 :SOLID BOX_INTERS INTERSECTION BOX_UNION box3 R00 0. 10. 0. 18 18 19 :VOLU BOX_UNION BOX_UNION G4_AIR 19 :VOLU BOX_UNION BOX_UNION G4_AIR 20 :COLOUR BOX_UNION 1. 0. 0. // red 20 :COLOUR BOX_UNION 1. 0. 0. // red 21 :PLACE BOX_UNION 1 world R00 0. 0. -2.*$POSZ 21 :PLACE BOX_UNION 1 world R00 0. 0. -2.*$POSZ 22 22 23 :PLACE BOX_SUBT 1 world R00 0. 0. $POSZ 23 :PLACE BOX_SUBT 1 world R00 0. 0. $POSZ 24 :COLOUR BOX_SUBT 0. 1. 0. // green 24 :COLOUR BOX_SUBT 0. 1. 0. // green 25 25 26 :VOLU BOX_INTERS BOX_INTERS G4_Fe 26 :VOLU BOX_INTERS BOX_INTERS G4_Fe 27 :PLACE BOX_INTERS 1 world R00 0. 0. 3*$POSZ 27 :PLACE BOX_INTERS 1 world R00 0. 0. 3*$POSZ 28 :COLOUR BOX_INTERS 0. 0. 1. // blue 28 :COLOUR BOX_INTERS 0. 0. 1. // blue 29 29 30 30