Distinct(Project(BGP( ?s ?type), {?type}))