let f x = (x : [8]) == x :check f :exhaust f