このサイトはJavaScriptを使用しています
ホーム
エクスプローラー
lain.church
ヘルプ
登録
サインイン
tA
/
Spiral
ウォッチ
1
スター
0
フォーク
0
コード
課題
0
プルリクエスト
0
リリース
0
Wiki
アクティビティ
ソースを参照
remembered to filter even numbers
master
Thorn Avery
4年前
親
b071c13cf8
コミット
088ff88052
1個のファイルの変更
、
5行の追加
、
2行の削除
分割表示
差分オプション
統計情報を表示
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
書き込み
プレビュー
読み込み中…
キャンセル
保存