哈斯克爾：強制浮有兩位小數

Question

使用下面的代碼片段：

(fromIntegral 100)/10.00 

使用哈斯克爾'98標準的前奏，我怎麼代表與兩位小數的結果呢？

謝謝。

Answer 1

只是爲了記錄：

import Numeric 
formatFloatN floatNum numOfDecimals = showFFloat (Just numOfDecimals) floatNum "" 

Answer 2

您可以使用printf :: PrintfType r => String -> r從Text.Printf：

Prelude> import Text.Printf 
Prelude Text.Printf> printf "%.2f\n" (100 :: Float) 
100.00 
Prelude Text.Printf> printf "%.2f\n" $ fromIntegral 100/10.00 
10.00 

%f格式的第二個參數是一個浮點數。 %.2f表示應僅打印小數點後兩位數字。 \n代表換行符。這個例子並不是絕對必要的。

請注意，該函數根據上下文返回類型String或IO a的值。演示：

Prelude Text.Printf> printf "%.2f" (1337 :: Float) ++ " is a number" 
"1337.00 is a number" 

在這種情況下printf返回字符串"1337.00"，因爲結果被作爲參數傳遞給(++)，這是預計列表參數（注意String相同[Char]）函數傳遞。因此，printf在其他語言中也會表現爲sprintf。當然，不需要附加第二個字符串等技巧。你可以明確地指定類型：

Prelude Text.Printf> printf "%.2f\n" (1337 :: Float) :: IO a 
1337.00 
Prelude Text.Printf> printf "%.2f\n" (1337 :: Float) :: String 
"1337.00\n"