-- -*- M2-comint -*- hash: 14186157723182826687

i1 : n = 5;

i2 : isBounded chain n

o2 = true

i3 : B = booleanLattice n;

i4 : isBounded B

o4 = true

i5 : isBounded flagPoset(B, {1,2,3,4})

o5 = false

i6 : 
