proposition: Lemma Rreal_axiom (x : R) : (0 <= x)%R || (x <= 0)%R.
proof: Proof. case: (Rle_dec 0 x)=> [/RleP ->|] //. by move/Rnot_le_lt/Rlt_le/RleP=> ->; rewrite orbT. Qed.
imports: Rdefinitions Raxioms RIneq Rbasic_fun Zwf Epsilon FunctionalExtensionality Ranalysis1 Rsqrt_def Rtrigo1 Reals mathcomp(all_ssreflect ssralg poly mxpoly ssrnum) HB(structures)