let L be B_Lattice; :: thesis: for a being Element of L holds (a `) "/\" a = Bottom L
let a be Element of L; :: thesis: (a `) "/\" a = Bottom L
a ` is_a_complement_of a by Def21;
hence (a `) "/\" a = Bottom L ; :: thesis: verum