Definition FilterPr1 {X Y : UU} (F : Filter (X × Y)) : Filter X := (FilterIm pr1 F).
Require Import UniMath.Foundations.Preamble. Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.MoreFoundations.PartA.