フォーマットHaskellで印刷するときに浮動小数点として

Question

このHaskellプログラムは "1.0"を印刷します。どのようにして "1"を印刷できますか？ /操作を使用することにより

fact 0 = 1 
fact x = x * fact (x-1) 

place m n = (fact m)/(fact n) * (fact (m-n)) 

main = do 
    print (place 0 0) 

Answer 1

、あなたは分数のデータ型を使用するHaskellのを求めています。この場合、おそらくあなたは望んでいないでしょう。 IntまたはIntegerのような積分型を使用することが好ましい。だから私は次を行うことをお勧めします： 1. 関数の型宣言を追加します。fact :: Integer -> Integer のようにします。/の代わりにquotを使用してください。

だからあなたのコードは次のようになります。@leftaroundaboutが指摘したように

fact :: Integer -> Integer 
fact 0 = 1 
fact x = x * fact (x-1) 

place :: Integer -> Integer -> Integer 
place m n = (fact m) `quot` (fact n) * (fact (m-n)) 

main = do 
    print (place 0 0) 

また、あなたはおそらくそれらの二項の数字を計算するために、より良いアルゴリズムを使用します。

Answer 2

あなただけroundを使用することができます。

print (round $ place 0 0)

これはあなたが望むものに書式設定を変更します。しかし、rednebの答えは、正しいアプローチです。