fact: Definition Req_trans := λ"x" λ"y" λ"f" "x" @ λ"x₁" λ"x₂" "y" @ λ"y₁" λ"y₂" "f" @ (Rle_trans @ "x₁" @ "y₁") @ (Rle_trans @ "y₂" @ "x₂").
imports: QArith Psatz ClassicalRealizability.Kbase ClassicalRealizability.Rationals