basit Haskell döngü

Question

Sadece Haskell'i öğrenmeye başladım, ancak döngülerin yokluğu şu anda sinir bozucu. Fonksiyonlar için döngüler yazmayı öğrendim. Bununla birlikte, benim sorunum, döngüleri tekrarlarken bazı sonuçlar çıkarmak istiyorum. Bu basit görevi gerçekleştirmek için debug kullanmam gerekiyor.

Yani şimdi ben ana yapısında bir dize 10 kez yazdırmak nasıl bir örnek takdir sadece ederim.

Başka bir deyişle, bu 10 kat yapmak istiyorum:

main = do 
    putStrLn "a string" 

teşekkür ederiz. Bunun benim görevim için çok aydınlatıcı olacağını hissediyorum. o monads dayalı beri sadece dışarı başlıyoruz

Answer 1

Böyle baskı "bir dizge" n kere (n işlevi parametresi olarak), tekrarlamalı bir fonksiyon tanımlama olabilir: bir fonksiyon tanımlama

printStringNTimes 0 = return() 
printStringNTimes n = 
do 
    putStrLn "a string" 
    printStringNTimes (n-1) 

main = printStringNTimes 10 

bir miktar daha genel bir yaklaşım olacaktır tüm ES eylem n defa tekrar:

repeatNTimes 0 _ = return() 
repeatNTimes n action = 
do 
    action 
    repeatNTimes (n-1) action 

main = repeatNTimes 10 (putStrLn "a string") 

yukarıdaki fonksiyon zaten adı replicateM_ altında Control.Monad bulunmaktadır.

Answer 2

Eh Haskell'ın IO biraz zordur. Bu Control.Monad

Bu beste ve monadic eylemlerin uygulanması için yararlı fonksiyonları çok sahip gelen bir bağdaştırıcının replicateM_ kullanıyor

main = replicateM_ 10 $ putStrLn "a string" 

:

Senin sorunun olsa basit bir çözümü vardır.

Answer 3

Ben de Haskell bir acemi değilim ve daha az zarif ve henüz pragmatik yararlı bir çözümümüz var.

main = do 
    putStr result 
    where 
     string = "a string" 
     result = concat [string ++ "\n" | i <- [1,2..10]] 

Yani burada biz bir liste tanımladık, bunların elemanları, yeni bir satır karakteri tarafından takip yazdırmak istediğiniz dizelerdir.