實例fractionnal INT所需，簡單的功能

Question

的我想一個簡單的整數除法，我得到這個擁抱

Hugs> :load prog.hs 
ERROR file:prog.hs:30 - Instance of Fractional Int required for definition of lastf 

我簡單的程序是這樣的

lastf::Int->Int 
lastf 1 = 0 
lastf n = if even n then (2*n+1) else (n/2) 

我在做什麼錯了？我怎麼能簡單地做一個部門？

Answer 1

如果你想做整數除法，只要使用div：

lastf n = if even n then 2 * n + 1 else n `div` 2 

的原因是因爲Int沒有實現/運營商，它被保留用於Fractional類型，如Float和Double。顯然，如果你做3/2並且你想要1.5回來，你不能將它表示爲Int，你必須使用Float或Double（或實現Fractional typeclass的任何類型）。