fact: Definition maponpaths_pr1_pathsdirprod {X Y : UU} {x₁ x₂ : X} {y₁ y₂ : Y} (p : x₁ = x₂) (q : y₁ = y₂) : maponpaths dirprod_pr1 (pathsdirprod p q) = p.
imports: UniMath.Foundations.All UniMath.MoreFoundations.Tactics