let equal a b = (a.po_gid = b.po_gid)