let Y be non empty set ; :: thesis: for a, b, c being Element of Funcs Y,BOOLEAN holds a 'eqv' b '<' (a 'or' c) 'eqv' (b 'or' c)
let a, b, c be Element of Funcs Y,BOOLEAN ; :: thesis: a 'eqv' b '<' (a 'or' c) 'eqv' (b 'or' c)
let z be Element of Y; :: according to BVFUNC_1:def 15 :: thesis: ( not K90(Y,BOOLEAN ,(a 'eqv' b),z) = TRUE or K90(Y,BOOLEAN ,((a 'or' c) 'eqv' (b 'or' c)),z) = TRUE )
assume A1: (a 'eqv' b) . z = TRUE ; :: thesis: K90(Y,BOOLEAN ,((a 'or' c) 'eqv' (b 'or' c)),z) = TRUE
A2: (a 'eqv' b) . z = ((a 'imp' b) '&' (b 'imp' a)) . z by BVFUNC_4:7
.= ((a 'imp' b) . z) '&' ((b 'imp' a) . z) by MARGREL1:def 21 ;
then A3: ( (a 'imp' b) . z = TRUE & (b 'imp' a) . z = TRUE ) by A1, MARGREL1:45;
then A4: ('not' (a . z)) 'or' (b . z) = TRUE by BVFUNC_1:def 11;
A5: ( b . z = TRUE or b . z = FALSE ) by XBOOLEAN:def 3;
A6: (b 'imp' a) . z = ('not' (b . z)) 'or' (a . z) by BVFUNC_1:def 11;
A7: ('not' (b . z)) 'or' (a . z) = TRUE by A3, BVFUNC_1:def 11;
A8: ( a . z = TRUE or a . z = FALSE ) by XBOOLEAN:def 3;
A9: ((a 'or' c) 'eqv' (b 'or' c)) . z = (((a 'or' c) 'imp' (b 'or' c)) '&' ((b 'or' c) 'imp' (a 'or' c))) . z by BVFUNC_4:7
.= (((a 'or' c) 'imp' (b 'or' c)) . z) '&' (((b 'or' c) 'imp' (a 'or' c)) . z) by MARGREL1:def 21
.= (('not' ((a 'or' c) . z)) 'or' ((b 'or' c) . z)) '&' (((b 'or' c) 'imp' (a 'or' c)) . z) by BVFUNC_1:def 11
.= (('not' ((a 'or' c) . z)) 'or' ((b 'or' c) . z)) '&' (('not' ((b 'or' c) . z)) 'or' ((a 'or' c) . z)) by BVFUNC_1:def 11
.= (('not' ((a . z) 'or' (c . z))) 'or' ((b 'or' c) . z)) '&' (('not' ((b 'or' c) . z)) 'or' ((a 'or' c) . z)) by BVFUNC_1:def 7
.= (('not' ((a . z) 'or' (c . z))) 'or' ((b . z) 'or' (c . z))) '&' (('not' ((b 'or' c) . z)) 'or' ((a 'or' c) . z)) by BVFUNC_1:def 7
.= (('not' ((a . z) 'or' (c . z))) 'or' ((b . z) 'or' (c . z))) '&' (('not' ((b . z) 'or' (c . z))) 'or' ((a 'or' c) . z)) by BVFUNC_1:def 7
.= ((('not' (a . z)) '&' ('not' (c . z))) 'or' ((b . z) 'or' (c . z))) '&' ((('not' (b . z)) '&' ('not' (c . z))) 'or' ((a . z) 'or' (c . z))) by BVFUNC_1:def 7 ;

now

per cases ( 'not' (a . z) = TRUE or b . z = TRUE ) by A4, A5, BINARITH:7;

case A10: 'not' (a . z) = TRUE ; :: thesis: K90(Y,BOOLEAN ,((a 'or' c) 'eqv' (b 'or' c)),z) = TRUE

then A11: a . z = FALSE by MARGREL1:41;
then 'not' (b . z) = TRUE by A7, BINARITH:7;
then ((a 'or' c) 'eqv' (b 'or' c)) . z = (('not' (c . z)) 'or' (FALSE 'or' (c . z))) '&' (('not' (c . z)) 'or' (FALSE 'or' (c . z))) by A9, A10, A11, MARGREL1:50
.= (('not' (c . z)) 'or' (c . z)) '&' (('not' (c . z)) 'or' (c . z)) by BINARITH:7
.= TRUE by XBOOLEAN:102 ;
hence K90(Y,BOOLEAN ,((a 'or' c) 'eqv' (b 'or' c)),z) = TRUE ; :: thesis: verum

end;

case A12: b . z = TRUE ; :: thesis: K90(Y,BOOLEAN ,((a 'or' c) 'eqv' (b 'or' c)),z) = TRUE

then 'not' (b . z) = FALSE by MARGREL1:41;
then ((a 'or' c) 'eqv' (b 'or' c)) . z = (FALSE 'or' (TRUE 'or' (c . z))) '&' (FALSE 'or' (TRUE 'or' (c . z))) by A1, A2, A6, A8, A9, A12, MARGREL1:45
.= (TRUE 'or' (c . z)) '&' (TRUE 'or' (c . z)) by BINARITH:7
.= TRUE by BINARITH:19 ;
hence K90(Y,BOOLEAN ,((a 'or' c) 'eqv' (b 'or' c)),z) = TRUE ; :: thesis: verum

end;

end;

end;

hence K90(Y,BOOLEAN ,((a 'or' c) 'eqv' (b 'or' c)),z) = TRUE ; :: thesis: verum