fact: Definition Req_trans := λ"Ty" λ"Eqxy" λ"Eqyz" λ"ε₁" λ"ε₂" λ"q₁" λ"q₂" λ"X" λ"Z" ℚadd @ "ε₁" @ "ε₂" @ (ℚsub @ "q₁" @ "q₂" @ absℚ_tight) @ (λ"ε" (ℚdiv @ "ε" @ Rat 2) @ λ"ε/2" "Ty" @ "ε/2" @ (λ"q" λ"Y" ("Eqxy" @ "ε₁" @ "ε/2" @ "q₁" @ "q" @ "X" @ "Y") @ ("Eqyz" @ "ε/2" @ "ε₂" @ "q" @ "q₂" @ "Y" @ "Z"))).
imports: QArith Psatz ClassicalRealizability.Kbase ClassicalRealizability.Rationals ClassicalRealizability.Real_definitions