https://github.com/Helium4Haskell/lvm
Tip revision: af88819679f8853d65340d9b0faec42d975ffd9d authored by no_author on 12 November 2001, 11:30:05 UTC
This commit was manufactured by cvs2svn to create branch 'daan'.
This commit was manufactured by cvs2svn to create branch 'daan'.
Tip revision: af88819
Ones.core
module Ones where
data List a = Nil
| Cons a (List a)
main = let ones = Cons 1 ones
in head ones
head xs
= case xs of Cons x xx -> x