f (coe a) : B
g (λ x, coe (h x)) : B
filter (λ x, bool_to_Prop (negb x)) [tt, ff, tt, ff] : list bool
[ff, ff]