let L be non empty LattStr ; :: thesis: ( ( for v0 being Element of L holds v0 "/\" v0 = v0 ) & ( for v1, v0 being Element of L holds v0 "/\" v1 = v1 "/\" v0 ) & ( for v0 being Element of L holds v0 "\/" v0 = v0 ) & ( for v1, v0 being Element of L holds v0 "\/" v1 = v1 "\/" v0 ) & ( for v2, v1, v0 being Element of L holds ((v0 "\/" v1) "/\" (v2 "\/" v1)) "/\" v1 = v1 ) & ( for v2, v1, v0 being Element of L holds ((v0 "/\" v1) "\/" (v2 "/\" v1)) "\/" v1 = v1 ) & ( for v1, v2, v0 being Element of L holds v0 "/\" (v1 "\/" (v0 "\/" v2)) = v0 ) implies for v0, v1, v2 being Element of L holds (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2) )
assume A2: for v0 being Element of L holds v0 "/\" v0 = v0 ; :: thesis: ( ex v1, v0 being Element of L st not v0 "/\" v1 = v1 "/\" v0 or ex v0 being Element of L st not v0 "\/" v0 = v0 or ex v1, v0 being Element of L st not v0 "\/" v1 = v1 "\/" v0 or ex v2, v1, v0 being Element of L st not ((v0 "\/" v1) "/\" (v2 "\/" v1)) "/\" v1 = v1 or ex v2, v1, v0 being Element of L st not ((v0 "/\" v1) "\/" (v2 "/\" v1)) "\/" v1 = v1 or ex v1, v2, v0 being Element of L st not v0 "/\" (v1 "\/" (v0 "\/" v2)) = v0 or for v0, v1, v2 being Element of L holds (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2) )
assume A3: for v1, v0 being Element of L holds v0 "/\" v1 = v1 "/\" v0 ; :: thesis: ( ex v0 being Element of L st not v0 "\/" v0 = v0 or ex v1, v0 being Element of L st not v0 "\/" v1 = v1 "\/" v0 or ex v2, v1, v0 being Element of L st not ((v0 "\/" v1) "/\" (v2 "\/" v1)) "/\" v1 = v1 or ex v2, v1, v0 being Element of L st not ((v0 "/\" v1) "\/" (v2 "/\" v1)) "\/" v1 = v1 or ex v1, v2, v0 being Element of L st not v0 "/\" (v1 "\/" (v0 "\/" v2)) = v0 or for v0, v1, v2 being Element of L holds (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2) )
assume A4: for v0 being Element of L holds v0 "\/" v0 = v0 ; :: thesis: ( ex v1, v0 being Element of L st not v0 "\/" v1 = v1 "\/" v0 or ex v2, v1, v0 being Element of L st not ((v0 "\/" v1) "/\" (v2 "\/" v1)) "/\" v1 = v1 or ex v2, v1, v0 being Element of L st not ((v0 "/\" v1) "\/" (v2 "/\" v1)) "\/" v1 = v1 or ex v1, v2, v0 being Element of L st not v0 "/\" (v1 "\/" (v0 "\/" v2)) = v0 or for v0, v1, v2 being Element of L holds (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2) )
assume A5: for v1, v0 being Element of L holds v0 "\/" v1 = v1 "\/" v0 ; :: thesis: ( ex v2, v1, v0 being Element of L st not ((v0 "\/" v1) "/\" (v2 "\/" v1)) "/\" v1 = v1 or ex v2, v1, v0 being Element of L st not ((v0 "/\" v1) "\/" (v2 "/\" v1)) "\/" v1 = v1 or ex v1, v2, v0 being Element of L st not v0 "/\" (v1 "\/" (v0 "\/" v2)) = v0 or for v0, v1, v2 being Element of L holds (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2) )
assume A6: for v2, v1, v0 being Element of L holds ((v0 "\/" v1) "/\" (v2 "\/" v1)) "/\" v1 = v1 ; :: thesis: ( ex v2, v1, v0 being Element of L st not ((v0 "/\" v1) "\/" (v2 "/\" v1)) "\/" v1 = v1 or ex v1, v2, v0 being Element of L st not v0 "/\" (v1 "\/" (v0 "\/" v2)) = v0 or for v0, v1, v2 being Element of L holds (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2) )
A8: for v2, v1, v0 being Element of L holds v1 "/\" ((v0 "\/" v1) "/\" (v2 "\/" v1)) = v1
proof
let v2, v1, v0 be Element of L; :: thesis: v1 "/\" ((v0 "\/" v1) "/\" (v2 "\/" v1)) = v1
((v0 "\/" v1) "/\" (v2 "\/" v1)) "/\" v1 = v1 "/\" ((v0 "\/" v1) "/\" (v2 "\/" v1)) by A3;
hence v1 "/\" ((v0 "\/" v1) "/\" (v2 "\/" v1)) = v1 by A6; :: thesis: verum
end;
assume A10: for v2, v1, v0 being Element of L holds ((v0 "/\" v1) "\/" (v2 "/\" v1)) "\/" v1 = v1 ; :: thesis: ( ex v1, v2, v0 being Element of L st not v0 "/\" (v1 "\/" (v0 "\/" v2)) = v0 or for v0, v1, v2 being Element of L holds (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2) )
A12: for v2, v1, v0 being Element of L holds v1 "\/" ((v0 "/\" v1) "\/" (v2 "/\" v1)) = v1
proof
let v2, v1, v0 be Element of L; :: thesis: v1 "\/" ((v0 "/\" v1) "\/" (v2 "/\" v1)) = v1
((v0 "/\" v1) "\/" (v2 "/\" v1)) "\/" v1 = v1 "\/" ((v0 "/\" v1) "\/" (v2 "/\" v1)) by A5;
hence v1 "\/" ((v0 "/\" v1) "\/" (v2 "/\" v1)) = v1 by A10; :: thesis: verum
end;
assume A14: for v1, v2, v0 being Element of L holds v0 "/\" (v1 "\/" (v0 "\/" v2)) = v0 ; :: thesis: for v0, v1, v2 being Element of L holds (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2)
A20: for v100, v102 being Element of L holds v100 "/\" (v102 "\/" v100) = v100
proof
let v100, v102 be Element of L; :: thesis: v100 "/\" (v102 "\/" v100) = v100
(v102 "\/" v100) "/\" (v102 "\/" v100) = v102 "\/" v100 by A2;
hence v100 "/\" (v102 "\/" v100) = v100 by A8; :: thesis: verum
end;
A23: for v2, v1, v0 being Element of L holds v0 "\/" ((v0 "/\" v1) "\/" (v2 "/\" v0)) = v0
proof
let v2, v1, v0 be Element of L; :: thesis: v0 "\/" ((v0 "/\" v1) "\/" (v2 "/\" v0)) = v0
v1 "/\" v0 = v0 "/\" v1 by A3;
hence v0 "\/" ((v0 "/\" v1) "\/" (v2 "/\" v0)) = v0 by A12; :: thesis: verum
end;
A25: for v2, v0, v1 being Element of L holds v0 "\/" ((v1 "/\" v0) "\/" (v0 "/\" v2)) = v0
proof
let v2, v0, v1 be Element of L; :: thesis: v0 "\/" ((v1 "/\" v0) "\/" (v0 "/\" v2)) = v0
v2 "/\" v0 = v0 "/\" v2 by A3;
hence v0 "\/" ((v1 "/\" v0) "\/" (v0 "/\" v2)) = v0 by A12; :: thesis: verum
end;
A28: for v100, v102 being Element of L holds v100 "\/" (v102 "/\" v100) = v100
proof
let v100, v102 be Element of L; :: thesis: v100 "\/" (v102 "/\" v100) = v100
(v102 "/\" v100) "\/" (v102 "/\" v100) = v102 "/\" v100 by A4;
hence v100 "\/" (v102 "/\" v100) = v100 by A12; :: thesis: verum
end;
A32: for v102, v2, v101, v1 being Element of L holds ((v1 "/\" v101) "\/" (v2 "/\" v101)) "/\" (v101 "/\" (v102 "\/" ((v1 "/\" v101) "\/" (v2 "/\" v101)))) = (v1 "/\" v101) "\/" (v2 "/\" v101)
proof
let v102, v2, v101, v1 be Element of L; :: thesis: ((v1 "/\" v101) "\/" (v2 "/\" v101)) "/\" (v101 "/\" (v102 "\/" ((v1 "/\" v101) "\/" (v2 "/\" v101)))) = (v1 "/\" v101) "\/" (v2 "/\" v101)
v101 "\/" ((v1 "/\" v101) "\/" (v2 "/\" v101)) = v101 by A12;
hence ((v1 "/\" v101) "\/" (v2 "/\" v101)) "/\" (v101 "/\" (v102 "\/" ((v1 "/\" v101) "\/" (v2 "/\" v101)))) = (v1 "/\" v101) "\/" (v2 "/\" v101) by A8; :: thesis: verum
end;
A35: for v1, v0, v2 being Element of L holds v0 "/\" (v1 "\/" (v2 "\/" v0)) = v0
proof
let v1, v0, v2 be Element of L; :: thesis: v0 "/\" (v1 "\/" (v2 "\/" v0)) = v0
v0 "\/" v2 = v2 "\/" v0 by A5;
hence v0 "/\" (v1 "\/" (v2 "\/" v0)) = v0 by A14; :: thesis: verum
end;
A38: for v102, v101, v1 being Element of L holds (v1 "\/" v101) "\/" (v101 "\/" (v102 "/\" (v1 "\/" v101))) = v1 "\/" v101
proof
let v102, v101, v1 be Element of L; :: thesis: (v1 "\/" v101) "\/" (v101 "\/" (v102 "/\" (v1 "\/" v101))) = v1 "\/" v101
v101 "/\" (v1 "\/" v101) = v101 by A20;
hence (v1 "\/" v101) "\/" (v101 "\/" (v102 "/\" (v1 "\/" v101))) = v1 "\/" v101 by A12; :: thesis: verum
end;
A41: for v1, v0 being Element of L holds v0 "\/" (v0 "/\" v1) = v0
proof
let v1, v0 be Element of L; :: thesis: v0 "\/" (v0 "/\" v1) = v0
v1 "/\" v0 = v0 "/\" v1 by A3;
hence v0 "\/" (v0 "/\" v1) = v0 by A28; :: thesis: verum
end;
A44: for v102, v1, v101 being Element of L holds (v101 "/\" v1) "/\" (v101 "/\" (v102 "\/" (v101 "/\" v1))) = v101 "/\" v1
proof
let v102, v1, v101 be Element of L; :: thesis: (v101 "/\" v1) "/\" (v101 "/\" (v102 "\/" (v101 "/\" v1))) = v101 "/\" v1
v101 "\/" (v101 "/\" v1) = v101 by A41;
hence (v101 "/\" v1) "/\" (v101 "/\" (v102 "\/" (v101 "/\" v1))) = v101 "/\" v1 by A8; :: thesis: verum
end;
A47: for v1, v0, v2 being Element of L holds v0 "/\" ((v2 "\/" v0) "\/" v1) = v0
proof
let v1, v0, v2 be Element of L; :: thesis: v0 "/\" ((v2 "\/" v0) "\/" v1) = v0
v1 "\/" (v2 "\/" v0) = (v2 "\/" v0) "\/" v1 by A5;
hence v0 "/\" ((v2 "\/" v0) "\/" v1) = v0 by A35; :: thesis: verum
end;
A51: for v101, v102, v1 being Element of L holds (v1 "/\" v102) "/\" (v101 "\/" v102) = v1 "/\" v102
proof
let v101, v102, v1 be Element of L; :: thesis: (v1 "/\" v102) "/\" (v101 "\/" v102) = v1 "/\" v102
v102 "\/" (v1 "/\" v102) = v102 by A28;
hence (v1 "/\" v102) "/\" (v101 "\/" v102) = v1 "/\" v102 by A35; :: thesis: verum
end;
A55: for v102, v101, v1 being Element of L holds (v1 "/\" v101) "/\" (v101 "\/" v102) = v1 "/\" v101
proof
let v102, v101, v1 be Element of L; :: thesis: (v1 "/\" v101) "/\" (v101 "\/" v102) = v1 "/\" v101
v101 "\/" (v1 "/\" v101) = v101 by A28;
hence (v1 "/\" v101) "/\" (v101 "\/" v102) = v1 "/\" v101 by A47; :: thesis: verum
end;
A58: for v2, v1, v0 being Element of L holds v0 "\/" ((v0 "/\" v1) "\/" (v0 "/\" v2)) = v0
proof
let v2, v1, v0 be Element of L; :: thesis: v0 "\/" ((v0 "/\" v1) "\/" (v0 "/\" v2)) = v0
v2 "/\" v0 = v0 "/\" v2 by A3;
hence v0 "\/" ((v0 "/\" v1) "\/" (v0 "/\" v2)) = v0 by A23; :: thesis: verum
end;
A61: for v102, v2, v101, v1 being Element of L holds ((v1 "/\" v101) "\/" (v101 "/\" v2)) "/\" (v101 "/\" (v102 "\/" ((v1 "/\" v101) "\/" (v101 "/\" v2)))) = (v1 "/\" v101) "\/" (v101 "/\" v2)
proof
let v102, v2, v101, v1 be Element of L; :: thesis: ((v1 "/\" v101) "\/" (v101 "/\" v2)) "/\" (v101 "/\" (v102 "\/" ((v1 "/\" v101) "\/" (v101 "/\" v2)))) = (v1 "/\" v101) "\/" (v101 "/\" v2)
v101 "\/" ((v1 "/\" v101) "\/" (v101 "/\" v2)) = v101 by A25;
hence ((v1 "/\" v101) "\/" (v101 "/\" v2)) "/\" (v101 "/\" (v102 "\/" ((v1 "/\" v101) "\/" (v101 "/\" v2)))) = (v1 "/\" v101) "\/" (v101 "/\" v2) by A8; :: thesis: verum
end;
A65: for v0, v1, v2 being Element of L holds (v2 "\/" v1) "\/" (v0 "/\" v1) = v2 "\/" v1
proof
let v0, v1, v2 be Element of L; :: thesis: (v2 "\/" v1) "\/" (v0 "/\" v1) = v2 "\/" v1
(v0 "/\" v1) "/\" (v2 "\/" v1) = v0 "/\" v1 by A51;
hence (v2 "\/" v1) "\/" (v0 "/\" v1) = v2 "\/" v1 by A28; :: thesis: verum
end;
A69: for v100, v1, v102 being Element of L holds (v100 "/\" (v102 "/\" v1)) "/\" v102 = v100 "/\" (v102 "/\" v1)
proof
let v100, v1, v102 be Element of L; :: thesis: (v100 "/\" (v102 "/\" v1)) "/\" v102 = v100 "/\" (v102 "/\" v1)
v102 "\/" (v102 "/\" v1) = v102 by A41;
hence (v100 "/\" (v102 "/\" v1)) "/\" v102 = v100 "/\" (v102 "/\" v1) by A51; :: thesis: verum
end;
A72: for v0, v2, v1 being Element of L holds v1 "/\" (v0 "/\" (v1 "/\" v2)) = v0 "/\" (v1 "/\" v2)
proof
let v0, v2, v1 be Element of L; :: thesis: v1 "/\" (v0 "/\" (v1 "/\" v2)) = v0 "/\" (v1 "/\" v2)
(v0 "/\" (v1 "/\" v2)) "/\" v1 = v1 "/\" (v0 "/\" (v1 "/\" v2)) by A3;
hence v1 "/\" (v0 "/\" (v1 "/\" v2)) = v0 "/\" (v1 "/\" v2) by A69; :: thesis: verum
end;
A76: for v101, v102 being Element of L holds ((v102 "/\" v101) "\/" (v102 "/\" v101)) "/\" (v101 "/\" v102) = (v102 "/\" v101) "\/" (v102 "/\" v101)
proof
let v101, v102 be Element of L; :: thesis: ((v102 "/\" v101) "\/" (v102 "/\" v101)) "/\" (v101 "/\" v102) = (v102 "/\" v101) "\/" (v102 "/\" v101)
v102 "\/" ((v102 "/\" v101) "\/" (v102 "/\" v101)) = v102 by A58;
hence ((v102 "/\" v101) "\/" (v102 "/\" v101)) "/\" (v101 "/\" v102) = (v102 "/\" v101) "\/" (v102 "/\" v101) by A32; :: thesis: verum
end;
A79: for v1, v0 being Element of L holds (v0 "/\" v1) "/\" (v1 "/\" v0) = (v0 "/\" v1) "\/" (v0 "/\" v1)
proof
let v1, v0 be Element of L; :: thesis: (v0 "/\" v1) "/\" (v1 "/\" v0) = (v0 "/\" v1) "\/" (v0 "/\" v1)
(v0 "/\" v1) "\/" (v0 "/\" v1) = v0 "/\" v1 by A4;
hence (v0 "/\" v1) "/\" (v1 "/\" v0) = (v0 "/\" v1) "\/" (v0 "/\" v1) by A76; :: thesis: verum
end;
A81: for v1, v0 being Element of L holds (v0 "/\" v1) "/\" (v1 "/\" v0) = v0 "/\" v1
proof
let v1, v0 be Element of L; :: thesis: (v0 "/\" v1) "/\" (v1 "/\" v0) = v0 "/\" v1
(v0 "/\" v1) "\/" (v0 "/\" v1) = v0 "/\" v1 by A4;
hence (v0 "/\" v1) "/\" (v1 "/\" v0) = v0 "/\" v1 by A79; :: thesis: verum
end;
A84: for v102, v100, v1 being Element of L holds v100 "\/" (v102 "/\" (v1 "/\" v100)) = v100 "\/" (v1 "/\" v100)
proof
let v102, v100, v1 be Element of L; :: thesis: v100 "\/" (v102 "/\" (v1 "/\" v100)) = v100 "\/" (v1 "/\" v100)
v100 "\/" (v1 "/\" v100) = v100 by A28;
hence v100 "\/" (v102 "/\" (v1 "/\" v100)) = v100 "\/" (v1 "/\" v100) by A65; :: thesis: verum
end;
A87: for v1, v0, v2 being Element of L holds v0 "\/" (v1 "/\" (v2 "/\" v0)) = v0
proof
let v1, v0, v2 be Element of L; :: thesis: v0 "\/" (v1 "/\" (v2 "/\" v0)) = v0
v0 "\/" (v2 "/\" v0) = v0 by A28;
hence v0 "\/" (v1 "/\" (v2 "/\" v0)) = v0 by A84; :: thesis: verum
end;
A90: for v102, v1, v100 being Element of L holds v100 "\/" (v102 "/\" (v100 "/\" v1)) = v100 "\/" (v100 "/\" v1)
proof
let v102, v1, v100 be Element of L; :: thesis: v100 "\/" (v102 "/\" (v100 "/\" v1)) = v100 "\/" (v100 "/\" v1)
v100 "\/" (v100 "/\" v1) = v100 by A41;
hence v100 "\/" (v102 "/\" (v100 "/\" v1)) = v100 "\/" (v100 "/\" v1) by A65; :: thesis: verum
end;
A93: for v1, v2, v0 being Element of L holds v0 "\/" (v1 "/\" (v0 "/\" v2)) = v0
proof
let v1, v2, v0 be Element of L; :: thesis: v0 "\/" (v1 "/\" (v0 "/\" v2)) = v0
v0 "\/" (v0 "/\" v2) = v0 by A41;
hence v0 "\/" (v1 "/\" (v0 "/\" v2)) = v0 by A90; :: thesis: verum
end;
A95: for v1, v0, v2 being Element of L holds v0 "\/" ((v2 "/\" v0) "/\" v1) = v0
proof
let v1, v0, v2 be Element of L; :: thesis: v0 "\/" ((v2 "/\" v0) "/\" v1) = v0
v1 "/\" (v2 "/\" v0) = (v2 "/\" v0) "/\" v1 by A3;
hence v0 "\/" ((v2 "/\" v0) "/\" v1) = v0 by A87; :: thesis: verum
end;
A99: for v102, v2, v100, v1 being Element of L holds v100 "\/" (((v1 "/\" v100) "/\" v2) "\/" (v102 "/\" (v100 "\/" ((v1 "/\" v100) "/\" v2)))) = v100 "\/" ((v1 "/\" v100) "/\" v2)
proof
let v102, v2, v100, v1 be Element of L; :: thesis: v100 "\/" (((v1 "/\" v100) "/\" v2) "\/" (v102 "/\" (v100 "\/" ((v1 "/\" v100) "/\" v2)))) = v100 "\/" ((v1 "/\" v100) "/\" v2)
v100 "\/" ((v1 "/\" v100) "/\" v2) = v100 by A95;
hence v100 "\/" (((v1 "/\" v100) "/\" v2) "\/" (v102 "/\" (v100 "\/" ((v1 "/\" v100) "/\" v2)))) = v100 "\/" ((v1 "/\" v100) "/\" v2) by A38; :: thesis: verum
end;
A102: for v3, v2, v0, v1 being Element of L holds v0 "\/" (((v1 "/\" v0) "/\" v2) "\/" (v3 "/\" v0)) = v0 "\/" ((v1 "/\" v0) "/\" v2)
proof
let v3, v2, v0, v1 be Element of L; :: thesis: v0 "\/" (((v1 "/\" v0) "/\" v2) "\/" (v3 "/\" v0)) = v0 "\/" ((v1 "/\" v0) "/\" v2)
v0 "\/" ((v1 "/\" v0) "/\" v2) = v0 by A95;
hence v0 "\/" (((v1 "/\" v0) "/\" v2) "\/" (v3 "/\" v0)) = v0 "\/" ((v1 "/\" v0) "/\" v2) by A99; :: thesis: verum
end;
A104: for v3, v2, v0, v1 being Element of L holds v0 "\/" (((v1 "/\" v0) "/\" v2) "\/" (v3 "/\" v0)) = v0
proof
let v3, v2, v0, v1 be Element of L; :: thesis: v0 "\/" (((v1 "/\" v0) "/\" v2) "\/" (v3 "/\" v0)) = v0
v0 "\/" ((v1 "/\" v0) "/\" v2) = v0 by A95;
hence v0 "\/" (((v1 "/\" v0) "/\" v2) "\/" (v3 "/\" v0)) = v0 by A102; :: thesis: verum
end;
A107: for v102, v0, v1 being Element of L holds (v0 "/\" v1) "/\" ((v1 "/\" v0) "\/" v102) = (v0 "/\" v1) "/\" (v1 "/\" v0)
proof
let v102, v0, v1 be Element of L; :: thesis: (v0 "/\" v1) "/\" ((v1 "/\" v0) "\/" v102) = (v0 "/\" v1) "/\" (v1 "/\" v0)
(v0 "/\" v1) "/\" (v1 "/\" v0) = v0 "/\" v1 by A81;
hence (v0 "/\" v1) "/\" ((v1 "/\" v0) "\/" v102) = (v0 "/\" v1) "/\" (v1 "/\" v0) by A55; :: thesis: verum
end;
A110: for v2, v0, v1 being Element of L holds (v0 "/\" v1) "/\" ((v1 "/\" v0) "\/" v2) = v0 "/\" v1
proof
let v2, v0, v1 be Element of L; :: thesis: (v0 "/\" v1) "/\" ((v1 "/\" v0) "\/" v2) = v0 "/\" v1
(v0 "/\" v1) "/\" (v1 "/\" v0) = v0 "/\" v1 by A81;
hence (v0 "/\" v1) "/\" ((v1 "/\" v0) "\/" v2) = v0 "/\" v1 by A107; :: thesis: verum
end;
A113: for v100, v101, v0 being Element of L holds (v100 "/\" v101) "/\" (v100 "/\" (v0 "\/" v101)) = v100 "/\" v101
proof
let v100, v101, v0 be Element of L; :: thesis: (v100 "/\" v101) "/\" (v100 "/\" (v0 "\/" v101)) = v100 "/\" v101
(v0 "\/" v101) "\/" (v100 "/\" v101) = v0 "\/" v101 by A65;
hence (v100 "/\" v101) "/\" (v100 "/\" (v0 "\/" v101)) = v100 "/\" v101 by A44; :: thesis: verum
end;
A117: for v100, v2, v102 being Element of L holds (v100 "/\" (v102 "/\" v2)) "/\" (v100 "/\" v102) = v100 "/\" (v102 "/\" v2)
proof
let v100, v2, v102 be Element of L; :: thesis: (v100 "/\" (v102 "/\" v2)) "/\" (v100 "/\" v102) = v100 "/\" (v102 "/\" v2)
v102 "\/" (v100 "/\" (v102 "/\" v2)) = v102 by A93;
hence (v100 "/\" (v102 "/\" v2)) "/\" (v100 "/\" v102) = v100 "/\" (v102 "/\" v2) by A44; :: thesis: verum
end;
A120: for v0, v2, v1 being Element of L holds (v0 "/\" v1) "/\" (v0 "/\" (v1 "/\" v2)) = v0 "/\" (v1 "/\" v2)
proof
let v0, v2, v1 be Element of L; :: thesis: (v0 "/\" v1) "/\" (v0 "/\" (v1 "/\" v2)) = v0 "/\" (v1 "/\" v2)
(v0 "/\" (v1 "/\" v2)) "/\" (v0 "/\" v1) = (v0 "/\" v1) "/\" (v0 "/\" (v1 "/\" v2)) by A3;
hence (v0 "/\" v1) "/\" (v0 "/\" (v1 "/\" v2)) = v0 "/\" (v1 "/\" v2) by A117; :: thesis: verum
end;
A123: for v101, v1, v2, v100 being Element of L holds v100 "\/" ((v100 "/\" v101) "\/" (v1 "/\" (v100 "/\" v2))) = v100
proof
let v101, v1, v2, v100 be Element of L; :: thesis: v100 "\/" ((v100 "/\" v101) "\/" (v1 "/\" (v100 "/\" v2))) = v100
v100 "/\" (v1 "/\" (v100 "/\" v2)) = v1 "/\" (v100 "/\" v2) by A72;
hence v100 "\/" ((v100 "/\" v101) "\/" (v1 "/\" (v100 "/\" v2))) = v100 by A58; :: thesis: verum
end;
A127: for v101, v102, v1 being Element of L holds (((v1 "/\" v102) "/\" v101) "\/" (v101 "/\" v102)) "/\" (v101 "/\" v102) = ((v1 "/\" v102) "/\" v101) "\/" (v101 "/\" v102)
proof
let v101, v102, v1 be Element of L; :: thesis: (((v1 "/\" v102) "/\" v101) "\/" (v101 "/\" v102)) "/\" (v101 "/\" v102) = ((v1 "/\" v102) "/\" v101) "\/" (v101 "/\" v102)
v102 "\/" (((v1 "/\" v102) "/\" v101) "\/" (v101 "/\" v102)) = v102 by A104;
hence (((v1 "/\" v102) "/\" v101) "\/" (v101 "/\" v102)) "/\" (v101 "/\" v102) = ((v1 "/\" v102) "/\" v101) "\/" (v101 "/\" v102) by A61; :: thesis: verum
end;
A130: for v2, v1, v0 being Element of L holds (v2 "/\" v1) "/\" (((v0 "/\" v1) "/\" v2) "\/" (v2 "/\" v1)) = ((v0 "/\" v1) "/\" v2) "\/" (v2 "/\" v1)
proof
let v2, v1, v0 be Element of L; :: thesis: (v2 "/\" v1) "/\" (((v0 "/\" v1) "/\" v2) "\/" (v2 "/\" v1)) = ((v0 "/\" v1) "/\" v2) "\/" (v2 "/\" v1)
(((v0 "/\" v1) "/\" v2) "\/" (v2 "/\" v1)) "/\" (v2 "/\" v1) = (v2 "/\" v1) "/\" (((v0 "/\" v1) "/\" v2) "\/" (v2 "/\" v1)) by A3;
hence (v2 "/\" v1) "/\" (((v0 "/\" v1) "/\" v2) "\/" (v2 "/\" v1)) = ((v0 "/\" v1) "/\" v2) "\/" (v2 "/\" v1) by A127; :: thesis: verum
end;
A133: for v0, v1, v2 being Element of L holds v0 "/\" v1 = ((v2 "/\" v1) "/\" v0) "\/" (v0 "/\" v1)
proof
let v0, v1, v2 be Element of L; :: thesis: v0 "/\" v1 = ((v2 "/\" v1) "/\" v0) "\/" (v0 "/\" v1)
(v0 "/\" v1) "/\" (((v2 "/\" v1) "/\" v0) "\/" (v0 "/\" v1)) = v0 "/\" v1 by A20;
hence v0 "/\" v1 = ((v2 "/\" v1) "/\" v0) "\/" (v0 "/\" v1) by A130; :: thesis: verum
end;
A138: for v101, v3, v100 being Element of L holds ((v100 "/\" v101) "\/" (v101 "/\" (v100 "/\" v3))) "/\" (v101 "/\" v100) = (v100 "/\" v101) "\/" (v101 "/\" (v100 "/\" v3))
proof
let v101, v3, v100 be Element of L; :: thesis: ((v100 "/\" v101) "\/" (v101 "/\" (v100 "/\" v3))) "/\" (v101 "/\" v100) = (v100 "/\" v101) "\/" (v101 "/\" (v100 "/\" v3))
v100 "\/" ((v100 "/\" v101) "\/" (v101 "/\" (v100 "/\" v3))) = v100 by A123;
hence ((v100 "/\" v101) "\/" (v101 "/\" (v100 "/\" v3))) "/\" (v101 "/\" v100) = (v100 "/\" v101) "\/" (v101 "/\" (v100 "/\" v3)) by A61; :: thesis: verum
end;
A141: for v1, v2, v0 being Element of L holds (v1 "/\" v0) "/\" ((v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" v2))) = (v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" v2))
proof
let v1, v2, v0 be Element of L; :: thesis: (v1 "/\" v0) "/\" ((v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" v2))) = (v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" v2))
((v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" v2))) "/\" (v1 "/\" v0) = (v1 "/\" v0) "/\" ((v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" v2))) by A3;
hence (v1 "/\" v0) "/\" ((v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" v2))) = (v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" v2)) by A138; :: thesis: verum
end;
A144: for v0, v2, v1 being Element of L holds v0 "/\" v1 = (v1 "/\" v0) "\/" (v0 "/\" (v1 "/\" v2))
proof
let v0, v2, v1 be Element of L; :: thesis: v0 "/\" v1 = (v1 "/\" v0) "\/" (v0 "/\" (v1 "/\" v2))
(v0 "/\" v1) "/\" ((v1 "/\" v0) "\/" (v0 "/\" (v1 "/\" v2))) = v0 "/\" v1 by A110;
hence v0 "/\" v1 = (v1 "/\" v0) "\/" (v0 "/\" (v1 "/\" v2)) by A141; :: thesis: verum
end;
A149: for v100, v101, v2 being Element of L holds (v100 "/\" v101) "\/" ((v100 "/\" (v2 "\/" v101)) "/\" v101) = (v100 "/\" (v2 "\/" v101)) "/\" v101
proof
let v100, v101, v2 be Element of L; :: thesis: (v100 "/\" v101) "\/" ((v100 "/\" (v2 "\/" v101)) "/\" v101) = (v100 "/\" (v2 "\/" v101)) "/\" v101
(v100 "/\" v101) "/\" (v100 "/\" (v2 "\/" v101)) = v100 "/\" v101 by A113;
hence (v100 "/\" v101) "\/" ((v100 "/\" (v2 "\/" v101)) "/\" v101) = (v100 "/\" (v2 "\/" v101)) "/\" v101 by A133; :: thesis: verum
end;
A152: for v0, v1, v2 being Element of L holds (v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" (v2 "\/" v1))) = (v0 "/\" (v2 "\/" v1)) "/\" v1
proof
let v0, v1, v2 be Element of L; :: thesis: (v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" (v2 "\/" v1))) = (v0 "/\" (v2 "\/" v1)) "/\" v1
(v0 "/\" (v2 "\/" v1)) "/\" v1 = v1 "/\" (v0 "/\" (v2 "\/" v1)) by A3;
hence (v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" (v2 "\/" v1))) = (v0 "/\" (v2 "\/" v1)) "/\" v1 by A149; :: thesis: verum
end;
A154: for v0, v1, v2 being Element of L holds v1 "/\" v0 = (v0 "/\" (v2 "\/" v1)) "/\" v1
proof
let v0, v1, v2 be Element of L; :: thesis: v1 "/\" v0 = (v0 "/\" (v2 "\/" v1)) "/\" v1
(v0 "/\" v1) "\/" (v1 "/\" (v0 "/\" (v2 "\/" v1))) = v1 "/\" v0 by A144;
hence v1 "/\" v0 = (v0 "/\" (v2 "\/" v1)) "/\" v1 by A152; :: thesis: verum
end;
A157: for v1, v0, v2 being Element of L holds v0 "/\" v1 = v0 "/\" (v1 "/\" (v2 "\/" v0))
proof
let v1, v0, v2 be Element of L; :: thesis: v0 "/\" v1 = v0 "/\" (v1 "/\" (v2 "\/" v0))
(v1 "/\" (v2 "\/" v0)) "/\" v0 = v0 "/\" (v1 "/\" (v2 "\/" v0)) by A3;
hence v0 "/\" v1 = v0 "/\" (v1 "/\" (v2 "\/" v0)) by A154; :: thesis: verum
end;
A160: for v1, v0, v2 being Element of L holds v0 "/\" ((v2 "\/" v0) "/\" v1) = v0 "/\" v1
proof
let v1, v0, v2 be Element of L; :: thesis: v0 "/\" ((v2 "\/" v0) "/\" v1) = v0 "/\" v1
v1 "/\" (v2 "\/" v0) = (v2 "\/" v0) "/\" v1 by A3;
hence v0 "/\" ((v2 "\/" v0) "/\" v1) = v0 "/\" v1 by A157; :: thesis: verum
end;
A164: for v102, v101, v1 being Element of L holds (v1 "/\" v101) "/\" (v101 "/\" v102) = (v1 "/\" v101) "/\" v102
proof
let v102, v101, v1 be Element of L; :: thesis: (v1 "/\" v101) "/\" (v101 "/\" v102) = (v1 "/\" v101) "/\" v102
v101 "\/" (v1 "/\" v101) = v101 by A28;
hence (v1 "/\" v101) "/\" (v101 "/\" v102) = (v1 "/\" v101) "/\" v102 by A160; :: thesis: verum
end;
A168: for v102, v1, v101 being Element of L holds (v101 "/\" v1) "/\" (v101 "/\" v102) = (v101 "/\" v1) "/\" v102
proof
let v102, v1, v101 be Element of L; :: thesis: (v101 "/\" v1) "/\" (v101 "/\" v102) = (v101 "/\" v1) "/\" v102
v101 "\/" (v101 "/\" v1) = v101 by A41;
hence (v101 "/\" v1) "/\" (v101 "/\" v102) = (v101 "/\" v1) "/\" v102 by A160; :: thesis: verum
end;
A171: for v2, v1, v0 being Element of L holds (v0 "/\" v1) "/\" (v1 "/\" v2) = v0 "/\" (v1 "/\" v2)
proof
let v2, v1, v0 be Element of L; :: thesis: (v0 "/\" v1) "/\" (v1 "/\" v2) = v0 "/\" (v1 "/\" v2)
(v0 "/\" v1) "/\" (v0 "/\" (v1 "/\" v2)) = (v0 "/\" v1) "/\" (v1 "/\" v2) by A168;
hence (v0 "/\" v1) "/\" (v1 "/\" v2) = v0 "/\" (v1 "/\" v2) by A120; :: thesis: verum
end;
A173: for v2, v1, v0 being Element of L holds (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2)
proof
let v2, v1, v0 be Element of L; :: thesis: (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2)
(v0 "/\" v1) "/\" (v1 "/\" v2) = (v0 "/\" v1) "/\" v2 by A164;
hence (v0 "/\" v1) "/\" v2 = v0 "/\" (v1 "/\" v2) by A171; :: thesis: verum
end;
A175: for v1, v2, v0 being Element of L holds v0 "/\" (v1 "/\" (v0 "/\" v2)) = (v0 "/\" v1) "/\" v2
proof
let v1, v2, v0 be Element of L; :: thesis: v0 "/\" (v1 "/\" (v0 "/\" v2)) = (v0 "/\" v1) "/\" v2
(v0 "/\" v1) "/\" (v0 "/\" v2) = v0 "/\" (v1 "/\" (v0 "/\" v2)) by A173;
hence v0 "/\" (v1 "/\" (v0 "/\" v2)) = (v0 "/\" v1) "/\" v2 by A168; :: thesis: verum
end;
A177: for v1, v2, v0 being Element of L holds v1 "/\" (v0 "/\" v2) = (v0 "/\" v1) "/\" v2
proof
let v1, v2, v0 be Element of L; :: thesis: v1 "/\" (v0 "/\" v2) = (v0 "/\" v1) "/\" v2
v0 "/\" (v1 "/\" (v0 "/\" v2)) = v1 "/\" (v0 "/\" v2) by A72;
hence v1 "/\" (v0 "/\" v2) = (v0 "/\" v1) "/\" v2 by A175; :: thesis: verum
end;
A180: for v0, v2, v1 being Element of L holds v0 "/\" (v1 "/\" v2) = v1 "/\" (v0 "/\" v2)
proof
let v0, v2, v1 be Element of L; :: thesis: v0 "/\" (v1 "/\" v2) = v1 "/\" (v0 "/\" v2)
(v1 "/\" v0) "/\" v2 = v1 "/\" (v0 "/\" v2) by A173;
hence v0 "/\" (v1 "/\" v2) = v1 "/\" (v0 "/\" v2) by A177; :: thesis: verum
end;
let v0, v2, v1 be Element of L; :: thesis: (v0 "/\" v2) "/\" v1 = v0 "/\" (v2 "/\" v1)
v1 "/\" (v0 "/\" v2) = v0 "/\" (v1 "/\" v2) by A180;
then v1 "/\" (v0 "/\" v2) = v0 "/\" (v2 "/\" v1) by A3;
hence (v0 "/\" v2) "/\" v1 = v0 "/\" (v2 "/\" v1) by A3; :: thesis: verum