60 double const prec)
const
62 double constexpr acceptError = 1.e-10;
63 double relXError = 1.0;
64 double relYError = 1.0;
65 double y = eta * prec / (sqrt(2) *
C);
67 double kCut = 1.0/eta;
69 while (relXError > acceptError || relYError > acceptError)
72 kCut -= 2 * kCut / (1 + 2*pow(kCut * eta,2.0))
73 * (-1 + sqrt(kCut) * exp(pow(kCut * eta,2.0)/2) * y);
81 relXError = abs((kCut - kCutOld) / kCut);
82 relYError = abs((1/sqrt(kCut)
83 * exp(-pow(kCut * eta,2.0) / 2) - y) / y);