2011-01-30から1日間の記事一覧
ジェネリックな関数を定義してみます。 data Person = Japanese String | English String String sayHello :: Person -> String sayHello (English a b) = a++","++b++"!!" sayHello (Japanese a) = a++","++a++","++a ghci> sayHello (Japanese "hello") --…
ジェネリックな関数を定義してみます。 data Person = Japanese String | English String String sayHello :: Person -> String sayHello (English a b) = a++","++b++"!!" sayHello (Japanese a) = a++","++a++","++a ghci> sayHello (Japanese "hello") --…