let R be Relation; :: thesis: for X being set st R quasi_orders X holds
R ~ quasi_orders X

let X be set ; :: thesis: ( R quasi_orders X implies R ~ quasi_orders X )
assume that
A1: R is_reflexive_in X and
A2: R is_transitive_in X ; :: according to ORDERS_1:def 6 :: thesis: R ~ quasi_orders X
thus ( R ~ is_reflexive_in X & R ~ is_transitive_in X ) by A1, A2, Lm11, Lm12; :: according to ORDERS_1:def 6 :: thesis: verum