fact: Definition Rlt_irrefl := λ"Cx" λ"Lt" "Lt" @ (λ"ε₁" λ"ε" λ"ε₂" λ"q₁" λ"q₂" λ"X₁" λ"X₂" nId @ ("Cx" @ "ε₁" @ "ε₂" @ "q₁" @ "q₂" @ "X₁" @ "X₂")).
imports: QArith Psatz ClassicalRealizability.Kbase ClassicalRealizability.Rationals ClassicalRealizability.Real_definitions