« Suite de Conway » : différence entre les versions
Contenu supprimé Contenu ajouté
→En Haskell : ajouté un main pour la clareté |
|||
Ligne 160 :
<div class="exemple">
<source lang="haskell">
import Data.List
conway = iterate step [1] where
step l = [f x | x <- group l, f <- [length,head] ]
main = print . take 10 $ conway
</source>
</div>
|