-- -*- M2-comint -*- {* hash: -1761820891 *} i1 : G = {a,b,c,d}; i2 : R = {(a,b), (a,c), (c,d)}; i3 : P = poset (G,R); i4 : O = filter (P,c) o4 = {a, c} o4 : List i5 :
-- -*- M2-comint -*- {* hash: -1761820891 *} i1 : G = {a,b,c,d}; i2 : R = {(a,b), (a,c), (c,d)}; i3 : P = poset (G,R); i4 : O = filter (P,c) o4 = {a, c} o4 : List i5 :