Deze website werkt beter met JavaScript.
Beginscherm
Verkennen
lain.church
Help
Registreren
Inloggen
tA
/
Spiral
Volgen
1
Ster
0
Vork
0
Code
Kwesties
0
Pull-aanvragen
0
Publicaties
0
Wiki
Activiteit
Bladeren bron
remembered to filter even numbers
master
Thorn Avery
4 jaren geleden
bovenliggende
b071c13cf8
commit
088ff88052
1 gewijzigde bestanden
met
toevoegingen van 5
en
2 verwijderingen
Zij-aan-zij weergave
Diff Options
Show Stats
Download Patch File
Download Diff File
+5
-2
spiral.hs
+ 5
- 2
spiral.hs
Bestand weergeven
@@ -54,5 +54,8 @@ main = do
(words args)
aura :: String -> Bool
aura s = foldr (&&) True
(map (`elem` ['0'..'9']) s)
aura s = if (foldr (&&) True (map (`elem` ['0'..'9']) s))
then ((mod rs 2) == 1)
else False
where
rs = (read s)::Int
Schrijf
Voorbeeld
Laden…
Annuleren
Opslaan