Возможно, лучше использовать printf
, но достаточно просто написать свою собственную функцию:
show2d :: Int -> String
show2d n | length (show n) == 1 = "0" ++ (show n)
| otherwise = show n
Работает следующим образом:
Prelude> show2d 1
"01"
Prelude> show2d 10
"10"
Prelude> show2d 100
"100"