Lemma filtersubtype_htrue : isfilter_htrue filtersubtype. Proof. apply Himp with (2 := Htrue). intros x H _. exact H. Qed.
Require Import UniMath.Foundations.Preamble. Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.MoreFoundations.PartA.