/usr/web/sources/contrib/fernan/nhc98/src/prelude/Prelude/Bounded_3.hs

Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Prelude/Bounded_3.hs


module Prelude(Bounded(..)) where

instance (Bounded a, Bounded b, Bounded c) => Bounded (a,b,c) where
  minBound = (minBound, minBound, minBound)
  maxBound = (maxBound, maxBound, maxBound)

(Return to Plan 9 Home Page)