56{
59 G4double x = a*yTrack[0], y = a*yTrack[1], z = a*yTrack[2] ;
60 G4double x2 = x*x, y2 = y*y, z2 = z*z, r2 = x2 + y2 ;
61 G4double r4 = r2*r2, z4 = z2*z2, r6 = r4*r2, z6 = z4*z2 ;
62 G4double r8 = r4*r4, z8 = z4*z4, r10 = r8*r2, z10 = z8*z2 ;
63 G4double rz = z*std::sqrt(r2), r = std::sqrt(r2+a*a) ;
67 {
68 -9.26e-5, -3.51e-5, 2.94e-6, -1.10e-6,
69 6.25e-8, -1.77e-8, -6.88e-10, -7.52e-11
70 } ;
71 P[0] = 2*rz ;
72 P[1] = 4*rz*(r2 - 4.0*z2/3.0) ;
73 P[2] = 6*rz*(r4 - 4*r2*z2 + 1.6*z4) ;
74 P[3] = 8*rz*(r6 - 8*r4*z2 + 9.6*r2*z4 - 64.0*z6/35.0) ;
75 P[4] = 10*rz*(r8 - 40.0*r6*z2/3.0 + 32*r4*z4
76 - 128.0*r2*z6/7.0 + 128.0*z8/63.0);
77 P[5] = 0 ;
78 P[6] = 0 ;
79 P[7] = 0 ;
80
81 Q[0] = r2 - 2*z2 ;
82 Q[1] = r4 - 8*r2*z2 + 8.0*z4/3.0 ;
83 Q[2] = r6 - 18*r4*z2 + 24*r2*z4 - 3.2*z6 ;
84 Q[3] = r8 - 32*r6*z2 + 96*r4*z4 - 51.2*r2*z6 +128.0*z8/35.0 ;
85 Q[4] = r10 - 50*r8*z2 + 800.0*r6*z4/3.0 - 320*r4*z6
86 + 640.0*r2*z8/7.0 - 256.0*z10/63.0 ;
87 Q[5] = 0 ;
88 Q[6] = 0 ;
89 Q[7] = 0 ;
90
91 Br = 0 ;
94 {
95 Br += c[i]*P[i] ;
97 }
100 return ;
101}
double B(double temperature)