for L being GAD_Lattice holds
( L is join-commutative iff ThetaOrder L is being_partial-order )