使用 JavaScript能使本网站更好的工作。
首页
探索
lain.church
帮助
注册
登录
tA
/
Spiral
关注
1
点赞
0
派生
0
代码
工单
0
合并请求
0
版本发布
0
百科
动态
浏览代码
remembered to filter even numbers
master
Thorn Avery
4 年前
父节点
b071c13cf8
当前提交
088ff88052
共有
1 个文件被更改
,包括
5 次插入
和
2 次删除
分列视图
Diff 选项
显示统计
下载 Patch 文件
下载 Diff 文件
+5
-2
spiral.hs
+ 5
- 2
spiral.hs
查看文件
@@ -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
撰写
预览
正在加载...
取消
保存