ทำไม GHCi ให้คำตอบที่ไม่ถูกต้องด้านล่าง
GHCi
λ> ((-20.24373193905347)^12)^2 - ((-20.24373193905347)^24)
4.503599627370496e15
Python3
>>> ((-20.24373193905347)**12)**2 - ((-20.24373193905347)**24)
0.0
อัพเดท ฉันจะใช้ฟังก์ชั่นของ Haskell (^) ดังนี้
powerXY :: Double -> Int -> Double
powerXY x 0 = 1
powerXY x y
| y < 0 = powerXY (1/x) (-y)
| otherwise =
let z = powerXY x (y `div` 2)
in if odd y then z*z*x else z*z
main = do
let x = -20.24373193905347
print $ powerXY (powerXY x 12) 2 - powerXY x 24 -- 0
print $ ((x^12)^2) - (x ^ 24) -- 4.503599627370496e15
แม้ว่ารุ่นของฉันจะไม่ปรากฏว่าถูกต้องมากไปกว่ารุ่นที่ระบุไว้ด้านล่างโดย @WillemVanOnsem แต่อย่างน้อยก็ให้คำตอบที่ถูกต้องสำหรับกรณีนี้อย่างน้อย
Python คล้ายกัน
def pw(x, y):
if y < 0:
return pw(1/x, -y)
if y == 0:
return 1
z = pw(x, y//2)
if y % 2 == 1:
return z*z*x
else:
return z*z
# prints 0.0
print(pw(pw(-20.24373193905347, 12), 2) - pw(-20.24373193905347, 24))
2.243746917640863e31 - 2.2437469176408626e31
ที่มีข้อผิดพลาดในการปัดเศษขนาดเล็กซึ่งได้รับการขยาย ดูเหมือนว่าปัญหาการยกเลิก
a^24
มีค่าประมาณ2.2437e31
และมีข้อผิดพลาดในการปัดเศษที่ทำให้เกิดสิ่งนี้