Denna sida fungerar bättre med Javascript igång.
Startsida
Utforska
lain.church
Hjälp
Registrera dig
Logga in
tA
/
Spiral
Bevaka
1
Stjärnmärk
0
Förgrening
0
Kod
Ärenden
0
Pull-förfrågningar
0
Släpp
0
Wiki
Aktiviteter
Bläddra i källkod
remembered to filter even numbers
master
Thorn Avery
4 år sedan
förälder
b071c13cf8
incheckning
088ff88052
1 ändrade filer
med
5 tillägg
och
2 borttagningar
Delad Vy
Diff Options
Show Stats
Download Patch File
Download Diff File
+5
-2
spiral.hs
+ 5
- 2
spiral.hs
Visa fil
@@ -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
Write
Förhandsgranska
Laddar…
Avbryt
Spara