set L = the 1 -element Ortholattice;
the 1 -element Ortholattice is orthomodular by STRUCT_0:def 10;
hence ex b1 being Ortholattice st
( b1 is trivial & b1 is orthomodular & b1 is modular & b1 is Boolean ) ; :: thesis: verum