On 29 March 2012 04:34, Richard O'Keefe <o...@cs.otago.ac.nz> wrote:

> u f (PS x)        = PS $ map f x
> b f (PS x) (PS y) = PS $ zipWith f x y
> to_ps x           = PS (x : repeat 0)
>

Also see: http://hackage.haskell.org/package/newtype

-- 
Ozgur Akgun
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to