filipg/geval
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Fix formatting precision

Browse Source
This commit is contained in:
Filip Gralinski 2020-08-03 22:30:49 +02:00
parent 5fc5f6ac64
commit 787a94c085
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/GEval/Formatting.hs
View File

@ -27,7 +27,7 @@ formatTheResultWithErrorBounds format pointEstimate (Just errorBound) = (formatS
formatSimpleResult :: FormattingOptions -> MetricValue -> String formatSimpleResult :: FormattingOptions -> MetricValue -> String
formatSimpleResult = \case formatSimpleResult = \case
FormattingOptions (Just prec) True -> printf "%.*f" (prec-2) . (*100) FormattingOptions (Just prec) True -> printf "%.*f" (prec-2) . (*100)
FormattingOptions (Just prec) _ -> printf "0.*f" prec FormattingOptions (Just prec) _ -> printf "%.*f" prec
_ -> show _ -> show
selectLowerPrecision :: Int -> FormattingOptions -> FormattingOptions selectLowerPrecision :: Int -> FormattingOptions -> FormattingOptions