Proposition irrefl_dcpo_not_specialization (x : X) : ¬(x ⊄ x). Proof. use factor_through_squash. { apply isapropempty. } intro P. induction P as [ P [ HP [ p n ]]]. exact (n p). Qed.
Require Import UniMath.MoreFoundations.All. Require Import UniMath.OrderTheory.DCPOs.Core.DirectedSets. Require Import UniMath.OrderTheory.DCPOs.Core.Basics. Require Import UniMath.OrderTheory.DCPOs.Core.WayBelow. Require Import UniMath.OrderTheory.DCPOs.Core.ScottTopology. Require Import UniMath.OrderTheory.DCPOs.Basis.Continuous.