module Gro.Test ( have ) where have a b = filter (==a) b