let R be Relation; for a, b being set st a,b are_divergent_wrt R holds
b,a are_divergent_wrt R
let a, b be set ; ( a,b are_divergent_wrt R implies b,a are_divergent_wrt R )
assume
ex c being set st
( R reduces c,a & R reduces c,b )
; REWRITE1:def 8 b,a are_divergent_wrt R
hence
ex c being set st
( R reduces c,b & R reduces c,a )
; REWRITE1:def 8 verum