let X1, X2 be Subset of Q; :: thesis: ( ( for y being Element of Q holds
( y in X1 iff for x, z being Element of Q holds (x * y) * z = x * (y * z) ) ) & ( for y being Element of Q holds
( y in X2 iff for x, z being Element of Q holds (x * y) * z = x * (y * z) ) ) implies X1 = X2 )

assume that
A3: for x being Element of Q holds
( x in X1 iff S2[x] ) and
A4: for x being Element of Q holds
( x in X2 iff S2[x] ) ; :: thesis: X1 = X2
thus X1 = X2 from SUBSET_1:sch 2(A3, A4); :: thesis: verum