fact: Definition Rle_trans := λ"Ty" λ"Lexy" λ"Leyz" λ"ε₁" λ"ε₂" λ"q₁" λ"q₂" λ"X" λ"Z" ℚadd @ "q₂" @ "ε₁" @ ℚadd @ "ε₂" @ (leℚ_tight @ "q₁") @ (λ"ε" Qq 2 @ (ℚdiv @ "ε") @ "Ty" @ (λ"q" λ"Y" (Qq 2 @ (ℚdiv @ "ε") @ ("Lexy" @ "ε₁") @ "q₁" @ "q" @ "X" @ "Y") @ (Qq 2 @ (ℚdiv @ "ε") @ "Leyz" @ "ε₂" @ "q" @ "q₂" @ "Y" @ "Z"))).
imports: QArith Psatz ClassicalRealizability.Kbase ClassicalRealizability.Rationals ClassicalRealizability.Real_definitions