data Pair a b = Pair a b
data Either a b = Left a | Right b
data Maybe a = Nothing | Just a
(1,True)::(Int,Bool)
für 0, 2, 3,... Komponenten