module Prelude where id :: a -> a id x = x