Skip to content

Instantly share code, notes, and snippets.

@msakai
msakai / TuplingExample.hs
Created March 25, 2011 14:36
タプル化の簡単な例
module TuplingExample where
import Prelude hiding (even, odd)
even :: Int -> Bool
even n = if n==0 then True else odd (n-1)
odd :: Int -> Bool
odd n = if n==0 then False else even (n-1)