let a, b be Element of B_6 ; :: thesis: ( a = 3 \ 2 & b = 1 implies ( a "\/" b = 3 & a "/\" b = 0 ) )
Z1:
the carrier of B_6 = {0 ,1,(3 \ 1),2,(3 \ 2),3}
by YELLOW_1:1;
assume Z:
( a = 3 \ 2 & b = 1 )
; :: thesis: ( a "\/" b = 3 & a "/\" b = 0 )
( 3 in {0 ,1,(3 \ 1),2,(3 \ 2),3} & 0 in {0 ,1,(3 \ 1),2,(3 \ 2),3} )
by ENUMSET1:def 4;
then reconsider t = 3, z = 0 as Element of B_6 by YELLOW_1:1;
( a c= t & b c= t )
by Z, NAT_1:40;
then A0:
( a <= t & b <= t )
by YELLOW_1:3;
a1:
for d being Element of B_6 st d >= a & d >= b holds
t <= d
( z c= a & z c= b )
by XBOOLE_1:2;
then Z0:
( z <= a & z <= b )
by YELLOW_1:3;
for d being Element of B_6 st a >= d & b >= d holds
d <= z
hence
( a "\/" b = 3 & a "/\" b = 0 )
by a1, Z0, A0, YELLOW_0:22, YELLOW_0:23; :: thesis: verum