Lemma rdistr_gullibility_consensus {X : hSet} (b : distributive_prebilattice X) : isrdistr (gullibility b) (consensus b) . Proof. exact (distrlattice_Lmax_rdistr (make_distributive_lattice (is_distributive_klattice b))) . Defined.
Require Import UniMath.OrderTheory.Prebilattice.Prebilattice. Require Import UniMath.OrderTheory.Prebilattice.Interlaced. Require Import UniMath.Foundations.Sets. Require Import UniMath.Algebra.BinaryOperations. Require Import UniMath.OrderTheory.Lattice.Distributive.