Haskell zurück benutzerdefinierte Datentyp

Question

Ich kann diese Methode überhaupt nicht funktionieren. Immer Fehler bekommen. Wo mache ich einen Fehler? Es soll String-Array von Zahlen akzeptieren, den Kopf nehmen, einen Punkt erstellen. Ich denke jedoch, dass das Problem im Rekursionsaufruf liegt.

data Point = Point(Int, Int) -- y, x 
instance Show Point where 
    show (Point(y, x)) = "(" ++ show x ++ "," ++ show y ++ ")" 

gimmePoints :: String -> Point      
gimmePoints (x:xs) = do Point(1,2) 
         gimmePoints xs 

Answer 1

Wenn Ihre Funktion Signatur ... -> Point, das bedeutet, dass das Ergebnis ein Punkt sein sollte. Nichts anderes. So können Sie sicherlich schreiben

gimmePoints :: String -> Point      
gimmePoints (x:xs) = Point(1,2) 

Das bedeutet natürlich nur das erste Zeichen in der Zeichenfolge verarbeitet werden. In der Tat, da Sie nicht wirklich Gebrauch machen das Zeichen oder irgendetwas anderes in der Zeichenfolge in irgendeiner Weise könnten Sie auch diese schreiben als

gimmePoints _ = Point(1,2) 

Ich glaube nicht, dass das, was Sie wollen.

do Syntax jedenfalls macht keinen Sinn hier, dass für ist monadischen („side-effekt“) Aktionen. Zum Beispiel, wenn Sie der Punkt für jedes Zeichen wollen auf den Bildschirm ausgegeben wird, könnten Sie

gimmePoints' (_:xs) = do 
     print $ Point(1,2) 
     gimmePoints' xs 

In diesem Fall zu tun, das Ergebnis gimmePoints wäre nicht Point überhaupt, sondern eine IO-Aktion mit nein Ergebnis (weil die „Ergebnisse“ wird auf den Bildschirm statt gesendet)

gimmePoints' :: String -> IO() 

Eine sinnvolle oder zumindest mehr funktionelle-Programmierung-ish Version Sie eigentlich wollen könnten, ist

gimmePoints'' :: String -> [Point] 
gimmePoints'' [] = [] 
gimmePoints'' (_:xs) = Point (1,2) : gimmePoints'' xs 

, d. H. Für jedes Zeichen in der Zeichenfolge ergibt sich ein Punkt im Ergebnis. Dies würde eigentlich besser geschrieben werden