Verwirrung mit showIntAtBase Unterschrift

Question

Ich habe versucht, eine Zahl im Binärformat zu drucken, und die Funktion fand ich ist

showIntAtBase :: (Integral a, Show a) => a -> (Int -> Char) -> a -> ShowS 

aber ich verstehe nicht, wie es funktioniert, vor allem weiß ich nicht, was ist der Zweck der Funktionsparameter konvertiert von Int zu Char. Intuitiv sollte diese Funktion nur zwei Parameter übernehmen, um die Nummer zu zeigen, und eine Basis, sie zeigen in, und dies scheint der Fall in spezifischere Funktionen von Numeric zu sein, wie

showHex :: (Integral a, Show a) => a -> ShowS 

oder

showOct :: (Integral a, Show a) => a -> ShowS 

Also was ist der Zweck der (Int -> Char) Parameter in showIntAtBase?

Answer 1

Prelude Numeric> putStrLn $ showIntAtBase 10 (\n -> ['0'..'9']!!n) 26734 "" 
26734 
Prelude Numeric> putStrLn $ showIntAtBase 10 ("⁰¹²³⁴⁵⁶⁷⁸⁹"!!) 26734 "" 
²⁶⁷³⁴ 
Prelude Numeric> putStrLn $ showIntAtBase 16 ("ABCdef"!!) 0xbeef "" 
Beef 

Beachten Sie, dass !! sollte nicht für ernsthafte Anwendungen verwendet werden, ist es ineffizient. Besser nutzen so etwas wie

Prelude Numeric> let c0 = fromEnum '0' in showIntAtBase 10 (toEnum . (+c0)) 26734 "" 
"26734"