@@ -259,17 +259,17 @@ function airyai_power_series(z::Complex{T}) where T
259
259
z2 = z * z
260
260
z3 = z2 * z
261
261
p = SIMDMath. horner_simd (z3, pack_AIRYAI_POW_COEF)
262
- ai = muladd (- complex (p . re [2 ]. value, p . im[ 2 ] . value), z, complex (p . re [1 ]. value, p . im[ 1 ] . value) )
263
- aip = muladd (complex (p . re [4 ]. value, p . im[ 4 ] . value), z2, - complex (p . re [3 ]. value, p . im[ 3 ] . value) )
262
+ ai = muladd (- p [2 ], z, p [1 ])
263
+ aip = muladd (p [4 ], z2, - p [3 ])
264
264
return ai, aip
265
265
end
266
266
267
267
function airybi_power_series (z:: Complex{T} ) where T
268
268
z2 = z * z
269
269
z3 = z2 * z
270
270
p = SIMDMath. horner_simd (z3, pack_AIRYBI_POW_COEF)
271
- bi = muladd (complex (p . re [2 ]. value, p . im[ 2 ] . value), z, complex (p . re [1 ]. value, p . im[ 1 ] . value) )
272
- bip = muladd (complex (p . re [4 ]. value, p . im[ 4 ] . value), z2, complex (p . re [3 ]. value, p . im[ 3 ] . value) )
271
+ bi = muladd (p [2 ], z, p [1 ])
272
+ bip = muladd (p [4 ], z2, p [3 ])
273
273
return bi, bip
274
274
end
275
275
368
368
a = SIMDMath. fadd (pvec1, zvec)
369
369
b = SIMDMath. fsub (pvec1, zvec)
370
370
371
- A = complex (b. re[1 ]. value, b. im[1 ]. value)
372
- B = complex (a. re[1 ]. value, a. im[1 ]. value)
373
- C = complex (b. re[2 ]. value, b. im[2 ]. value)
374
- D = complex (a. re[2 ]. value, a. im[2 ]. value)
371
+ A, B, C, D = b[1 ], a[1 ], b[2 ], a[2 ]
375
372
return A, B, C, D
376
373
end
377
374
0 commit comments