Require Export UniMath.Tactics.EnsureStructuredProofs.
Require Export UniMath.Foundations.PartD.
Require Export UniMath.Foundations.Propositions.

(*
Notation "'∏'  x .. y , P" := (∏ x, .. (∏ y, P) ..)
  (at level 200, x binder, y binder, right associativity) : type_scope.
Notation "'∑'  x .. y , P" := (total2 (λ x, .. (total2 (λ y, P)) ..))
  (at level 200, x binder, y binder, right associativity) : type_scope.
Notation "A × B" := (A × B) (at level 80, no associativity) : type_scope.
Notation "X ≃ Y" := (weq X Y) (at level 80, no associativity) : type_scope.
*)

(*
Notation "'λ' x .. y , t" := (λ x, .. (λ y, t) ..)
  (at level 200, x binder, y binder, right associativity).

Notation "∥ A ∥" := (ishinh A) (at level 200) : type_scope.
*)
