Instanz einer gebrochenen [Char]-Zahl erforderlich für die Definition?

Question

Dies ist einfacher Code, der dazu gedacht ist, eine Dezimalzahl zu nehmen und eine Zeichenfolge zurückzugeben, die dem Äquivalent in Binärcode entspricht.

b2d :: Int -> String

b2d 1 = "1"
b2d x = show (x `mod` 2) ++ b2d  x/2

Wenn ich jedoch versuche, dies durch hugs laufen zu lassen, gibt es mir einen Fehler:

:3 - Instanz von Bruchteil [Char] erforderlich für die Definition von b2d

Ich weiß nicht, was das bedeutet. Kann mir jemand sagen, wie ich das beheben kann?

Prost.

Answer 1

Du wolltest wahrscheinlich (Funktionsaufrufe haben eine höhere Präzedenz als Operatoren):

b2d (x/2)

Auch dein erster Fall sollte wahrscheinlich keine 2 Argumente enthalten

Answer 2

/ ist der Bruchteilungsbetreiber. Für Ganzzahlen müssen Sie div verwenden (und wie newacct erwähnt, Klammern hinzufügen):

b2d x = show (x `mod` 2) ++ b2d (x `div` 2)

Für zusätzliche Effizienzpunkte verwenden Sie divMod, um nur eine Division durchzuführen:

b2d x = let (q,r) = x `divMod` 2
        in show r ++ b2d q