for L being non empty join-commutative join-associative Huntington ComplLLattStr
for a being Element of L holds a + (a `) = (a `) + ((a `) `)