fact: Definition Rle_proper := λ"Tx₁" λ"Ty₁" λ"eq₁" λ"eq₂" λ"le" Rle_trans @ "Ty₁" @ (Rle_trans @ "Tx₁" @ (Req_sym @ "eq₁") @ "le") @ "eq₂".
imports: QArith Psatz ClassicalRealizability.Kbase ClassicalRealizability.Rationals ClassicalRealizability.Real_definitions