Distinct(Project(BGP( ?s ?p ?o), {?p}))