Geant4 Cross Reference |
1 // 1 // 2 // ******************************************* 2 // ******************************************************************** 3 // * License and Disclaimer 3 // * License and Disclaimer * 4 // * 4 // * * 5 // * The Geant4 software is copyright of th 5 // * The Geant4 software is copyright of the Copyright Holders of * 6 // * the Geant4 Collaboration. It is provided 6 // * the Geant4 Collaboration. It is provided under the terms and * 7 // * conditions of the Geant4 Software License 7 // * conditions of the Geant4 Software License, included in the file * 8 // * LICENSE and available at http://cern.ch/ 8 // * LICENSE and available at http://cern.ch/geant4/license . These * 9 // * include a list of copyright holders. 9 // * include a list of copyright holders. * 10 // * 10 // * * 11 // * Neither the authors of this software syst 11 // * Neither the authors of this software system, nor their employing * 12 // * institutes,nor the agencies providing fin 12 // * institutes,nor the agencies providing financial support for this * 13 // * work make any representation or warran 13 // * work make any representation or warranty, express or implied, * 14 // * regarding this software system or assum 14 // * regarding this software system or assume any liability for its * 15 // * use. Please see the license in the file 15 // * use. Please see the license in the file LICENSE and URL above * 16 // * for the full disclaimer and the limitatio 16 // * for the full disclaimer and the limitation of liability. * 17 // * 17 // * * 18 // * This code implementation is the result 18 // * This code implementation is the result of the scientific and * 19 // * technical work of the GEANT4 collaboratio 19 // * technical work of the GEANT4 collaboration. * 20 // * By using, copying, modifying or distri 20 // * By using, copying, modifying or distributing the software (or * 21 // * any work based on the software) you ag 21 // * any work based on the software) you agree to acknowledge its * 22 // * use in resulting scientific publicati 22 // * use in resulting scientific publications, and indicate your * 23 // * acceptance of all terms of the Geant4 Sof 23 // * acceptance of all terms of the Geant4 Software license. * 24 // ******************************************* 24 // ******************************************************************** 25 << 25 // >> 26 // 26 //-------------------------------------------- 27 //--------------------------------------------------------------------------- >> 28 // 27 // ClassName: G4UCNMicroRoughnessHelper 29 // ClassName: G4UCNMicroRoughnessHelper 28 // 30 // 29 // Class description: 31 // Class description: 30 // 32 // 31 // This file contains the headers of various f 33 // This file contains the headers of various functions all related to the 32 // calculation of microroughness. 34 // calculation of microroughness. 33 // see A. Steyerl, Z. Physik 254 (1972) 169. 35 // see A. Steyerl, Z. Physik 254 (1972) 169. 34 // 36 // 35 // Angular cut: for angles which are closer to 37 // Angular cut: for angles which are closer to the specular direction than a 36 // certain value (0.01°), the probability is 38 // certain value (0.01°), the probability is set to 0 in order to avoid a 37 // hang-up at the generation of the polar angl 39 // hang-up at the generation of the polar angle due to a very sharp angular 38 // distribution 40 // distribution 39 // 41 // >> 42 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... >> 43 40 // 12-05-14, adopted from Stefan Heule (PSI) T 44 // 12-05-14, adopted from Stefan Heule (PSI) Thesis by P.Gumplinger 41 // reported in F. Atchison et al., E 45 // reported in F. Atchison et al., Eur. Phys. J. A 44, 23–29 (2010) 42 // DOI: 10.1140/epja/i2 46 // DOI: 10.1140/epja/i2010-10926-x 43 // Thanks to Geza Zsigmond 47 // Thanks to Geza Zsigmond 44 // 48 // 45 // 02-11-19 Stefan Heule's thesis is availabl 49 // 02-11-19 Stefan Heule's thesis is available from PSI UCN group pages at 46 // https://www.psi.ch/en/ltp-ucn-phy 50 // https://www.psi.ch/en/ltp-ucn-physics/papers-and-theses 47 // or directly at https://opac.nebis 51 // or directly at https://opac.nebis.ch/ediss/20080426_002127549.pdf 48 52 49 #ifndef G4MICROROUGHNESSHELPER_HH 53 #ifndef G4MICROROUGHNESSHELPER_HH 50 #define G4MICROROUGHNESSHELPER_HH 1 54 #define G4MICROROUGHNESSHELPER_HH 1 51 55 52 #include "G4Types.hh" 56 #include "G4Types.hh" 53 57 >> 58 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo...... >> 59 54 class G4UCNMicroRoughnessHelper 60 class G4UCNMicroRoughnessHelper 55 { 61 { 56 public: // with description << 62 public: // with description 57 static G4UCNMicroRoughnessHelper* GetInstanc << 63 >> 64 static G4UCNMicroRoughnessHelper* GetInstance(); >> 65 >> 66 protected: >> 67 >> 68 G4UCNMicroRoughnessHelper(); >> 69 ~G4UCNMicroRoughnessHelper(); >> 70 >> 71 public: // with description >> 72 >> 73 // Transmitted intensity with k-vector in vacuum >> 74 >> 75 // arguments: >> 76 // 1) cos(theta)^2, >> 77 // 2) (k_l/k)^2 >> 78 >> 79 G4double S2(G4double, G4double) const; >> 80 >> 81 // Transmitted intensity with k-vector within the medium >> 82 >> 83 // arguments: >> 84 // 1) cos(theta')^2, >> 85 // 2) (k_l/k')^2 >> 86 >> 87 G4double SS2(G4double, G4double) const; >> 88 >> 89 // Fourier-tranform of the autocorrelation function with k-vector in vacuum >> 90 >> 91 // arguments: >> 92 // 1) k^2, >> 93 // 2) theta_i, >> 94 // 3) theta_o, >> 95 // 4) phi_o, >> 96 // 5) b^2, >> 97 // 6) w^2, >> 98 // 7) angular cut >> 99 >> 100 G4double Fmu(G4double, G4double, G4double, >> 101 G4double, G4double, G4double, G4double) const; >> 102 >> 103 // Fourier-tranform of the autocorrelation function with k-vector within >> 104 // the medium >> 105 >> 106 // arguments: >> 107 // 1) k, >> 108 // 2) k', >> 109 // 3) theta_i, >> 110 // 4) theta'_o, >> 111 // 5) phi'_o, >> 112 // 6) b^2, >> 113 // 7) w^2, >> 114 // 8) angular cut >> 115 // 9) theta_refract >> 116 >> 117 G4double FmuS(G4double, G4double, G4double, G4double, >> 118 G4double, G4double, G4double, G4double, G4double) const; >> 119 >> 120 // Integral probability for non-specular reflection >> 121 >> 122 // arguments: >> 123 // 1) E, >> 124 // 2) V_F, >> 125 // 3) theta_i, >> 126 // 4) number of angles theta_o for which the probability is calculated, >> 127 // 5) number of angles phi_o for which the probability is calculated, >> 128 // 6) b^2, >> 129 // 7) w^2, >> 130 // 8) pointer to G4double array with max values of the probability, >> 131 // 9) angular cut >> 132 >> 133 G4double IntIplus(G4double, G4double, G4double, G4int, G4int, >> 134 G4double, G4double, G4double*, G4double) const; >> 135 >> 136 // Probability of non-specular reflection with the microroughness model >> 137 >> 138 // arguments: >> 139 // 1) E, >> 140 // 2) V_F, >> 141 // 3) theta_i, >> 142 // 4) theta_o, >> 143 // 5) phi_o, >> 144 // 6) b, >> 145 // 7) w, >> 146 // 8) angular cut >> 147 >> 148 G4double ProbIplus (G4double, G4double, G4double, G4double, >> 149 G4double, G4double, G4double, G4double) const; >> 150 >> 151 // Integral probability for non-specular transmission >> 152 >> 153 // arguments: >> 154 // 1) E, >> 155 // 2) V_F, >> 156 // 3) theta_i, >> 157 // 4) number of angles theta_o for which the probability is calculated, >> 158 // 5) number of angles phi_o for which the probability is calculated, >> 159 // 6) b^2, >> 160 // 7) w^2, >> 161 // 8) pointer to G4double array with max values of the probability, >> 162 // 9) angular cut >> 163 >> 164 G4double IntIminus(G4double, G4double, G4double, G4int, G4int, >> 165 G4double, G4double, G4double*, G4double) const; >> 166 >> 167 // Probability of non-specular transmission with the microroughness model >> 168 >> 169 // arguments: >> 170 // 1) E, >> 171 // 2) V_F, >> 172 // 3) theta_i, >> 173 // 4) theta'_o, >> 174 // 5) phi'_o, >> 175 // 6) b, >> 176 // 7) w, >> 177 // 8) angular cut >> 178 >> 179 G4double ProbIminus (G4double, G4double, G4double, G4double, >> 180 G4double, G4double, G4double, G4double) const; >> 181 >> 182 private: 58 183 59 public: // with description << 184 static G4UCNMicroRoughnessHelper* fpInstance; 60 // Transmitted intensity with k-vector in va << 61 // arguments: << 62 // 1) cos(theta)^2, << 63 // 2) (k_l/k)^2 << 64 G4double S2(G4double, G4double) const; << 65 << 66 // Transmitted intensity with k-vector withi << 67 // arguments: << 68 // 1) cos(theta')^2, << 69 // 2) (k_l/k')^2 << 70 G4double SS2(G4double, G4double) const; << 71 << 72 // Fourier-tranform of the autocorrelation f << 73 // arguments: << 74 // 1) k^2, << 75 // 2) theta_i, << 76 // 3) theta_o, << 77 // 4) phi_o, << 78 // 5) b^2, << 79 // 6) w^2, << 80 // 7) angular cut << 81 G4double Fmu(G4double, G4double, G4double, G << 82 << 83 // Fourier-tranform of the autocorrelation f << 84 // the medium << 85 // arguments: << 86 // 1) k, << 87 // 2) k', << 88 // 3) theta_i, << 89 // 4) theta'_o, << 90 // 5) phi'_o, << 91 // 6) b^2, << 92 // 7) w^2, << 93 // 8) angular cut << 94 // 9) theta_refract << 95 G4double FmuS( << 96 G4double, G4double, G4double, G4double, G4 << 97 << 98 // Integral probability for non-specular ref << 99 // arguments: << 100 // 1) E, << 101 // 2) V_F, << 102 // 3) theta_i, << 103 // 4) number of angles theta_o for w << 104 // 5) number of angles phi_o for whi << 105 // 6) b^2, << 106 // 7) w^2, << 107 // 8) pointer to G4double array with << 108 // 9) angular cut << 109 G4double IntIplus( << 110 G4double, G4double, G4double, G4int, G4int << 111 << 112 // Probability of non-specular reflection wi << 113 // arguments: << 114 // 1) E, << 115 // 2) V_F, << 116 // 3) theta_i, << 117 // 4) theta_o, << 118 // 5) phi_o, << 119 // 6) b, << 120 // 7) w, << 121 // 8) angular cut << 122 G4double ProbIplus( << 123 G4double, G4double, G4double, G4double, G4 << 124 << 125 // Integral probability for non-specular tra << 126 // arguments: << 127 // 1) E, << 128 // 2) V_F, << 129 // 3) theta_i, << 130 // 4) number of angles theta_o for w << 131 // 5) number of angles phi_o for whi << 132 // 6) b^2, << 133 // 7) w^2, << 134 // 8) pointer to G4double array with << 135 // 9) angular cut << 136 G4double IntIminus( << 137 G4double, G4double, G4double, G4int, G4int << 138 << 139 // Probability of non-specular transmission << 140 // arguments: << 141 // 1) E, << 142 // 2) V_F, << 143 // 3) theta_i, << 144 // 4) theta'_o, << 145 // 5) phi'_o, << 146 // 6) b, << 147 // 7) w, << 148 // 8) angular cut << 149 G4double ProbIminus( << 150 G4double, G4double, G4double, G4double, G4 << 151 << 152 protected: << 153 G4UCNMicroRoughnessHelper() = default; << 154 ~G4UCNMicroRoughnessHelper(); << 155 185 156 private: << 157 static G4UCNMicroRoughnessHelper* fpInstance << 158 }; 186 }; 159 187 160 #endif // G4MICROROUGHNESSHELPER_HH << 188 #endif // G4MICROROUGHNESSHELPER_HH 161 189