Definition EffectiveOrder (X : UU) := ∑ le lt : hrel X, isEffectiveOrder le lt.
Require Import UniMath.MoreFoundations.Tactics. Require Import UniMath.MoreFoundations.Sets. Require Import UniMath.MoreFoundations.Orders. Require Import UniMath.Algebra.BinaryOperations