@@ -151,38 +151,38 @@ namespace detail {
151
151
152
152
if (std::abs (u) >= std::abs (w)) {
153
153
// u has greatest absolute value. Absorb ugh into the others.
154
- if (std::abs ((v_prime - u_prime) * (v - 0.5 )) < 100 * ugh and v > 100 ) {
154
+ if (std::abs ((v_prime - u_prime) * (v - 0.5 )) < 100 * ugh && v > 100 ) {
155
155
/* Special case where base is close to 1. Condition taken from
156
156
* Boost's beta function implementation. */
157
157
result *= std::exp ((v - 0.5 ) * std::log1p ((v_prime - u_prime) / ugh));
158
158
} else {
159
159
result *= std::pow (vgh / ugh, v - 0.5 );
160
160
}
161
161
162
- if (std::abs ((u_prime - w_prime) * (w - 0.5 )) < 100 * wgh and u > 100 ) {
162
+ if (std::abs ((u_prime - w_prime) * (w - 0.5 )) < 100 * wgh && u > 100 ) {
163
163
result *= std::exp ((w - 0.5 ) * std::log1p ((u_prime - w_prime) / wgh));
164
164
} else {
165
165
result *= std::pow (ugh / wgh, w - 0.5 );
166
166
}
167
167
168
- if (std::abs ((u_prime - x_prime) * (x - 0.5 )) < 100 * xgh and u > 100 ) {
168
+ if (std::abs ((u_prime - x_prime) * (x - 0.5 )) < 100 * xgh && u > 100 ) {
169
169
result *= std::exp ((x - 0.5 ) * std::log1p ((u_prime - x_prime) / xgh));
170
170
} else {
171
171
result *= std::pow (ugh / xgh, x - 0.5 );
172
172
}
173
173
} else {
174
174
// w has greatest absolute value. Absorb wgh into the others.
175
- if (std::abs ((u_prime - w_prime) * (u - 0.5 )) < 100 * wgh and u > 100 ) {
175
+ if (std::abs ((u_prime - w_prime) * (u - 0.5 )) < 100 * wgh && u > 100 ) {
176
176
result *= std::exp ((u - 0.5 ) * std::log1p ((u_prime - w_prime) / wgh));
177
177
} else {
178
178
result *= pow (ugh / wgh, u - 0.5 );
179
179
}
180
- if (std::abs ((v_prime - w_prime) * (v - 0.5 )) < 100 * wgh and v > 100 ) {
180
+ if (std::abs ((v_prime - w_prime) * (v - 0.5 )) < 100 * wgh && v > 100 ) {
181
181
result *= std::exp ((v - 0.5 ) * std::log1p ((v_prime - w_prime) / wgh));
182
182
} else {
183
183
result *= std::pow (vgh / wgh, v - 0.5 );
184
184
}
185
- if (std::abs ((w_prime - x_prime) * (x - 0.5 )) < 100 * xgh and x > 100 ) {
185
+ if (std::abs ((w_prime - x_prime) * (x - 0.5 )) < 100 * xgh && x > 100 ) {
186
186
result *= std::exp ((x - 0.5 ) * std::log1p ((w_prime - x_prime) / xgh));
187
187
} else {
188
188
result *= std::pow (wgh / xgh, x - 0.5 );
@@ -539,7 +539,7 @@ XSF_HOST_DEVICE inline std::complex<double> hyp2f1(double a, double b, double c,
539
539
}
540
540
bool a_neg_int = a == std::trunc (a) && a < 0 ;
541
541
bool b_neg_int = b == std::trunc (b) && b < 0 ;
542
- bool c_non_pos_int = c == std::trunc (c) and c <= 0 ;
542
+ bool c_non_pos_int = c == std::trunc (c) && c <= 0 ;
543
543
/* Diverges when c is a non-positive integer unless a is an integer with
544
544
* c <= a <= 0 or b is an integer with c <= b <= 0, (or z equals 0 with
545
545
* c != 0) Cases z = 0, a = 0, or b = 0 have already been handled. We follow
0 commit comments