consider L being trivial Ortholattice;
L is orthomodular
proof
let x, y be Element of L; :: according to ROBBINS4:def 1 :: thesis: ( x [= y implies y = x "\/" ((x ` ) "/\" y) )
thus ( x [= y implies y = x "\/" ((x ` ) "/\" y) ) by STRUCT_0:def 10; :: thesis: verum
end;
hence ex b1 being Ortholattice st
( b1 is trivial & b1 is orthomodular & b1 is modular & b1 is Boolean ) ; :: thesis: verum