RelationPriv.ArbitraryCluster
Clusters when clustering is arbitrary (not necessarily downward-closed).
module ClusteringArg : ClusteringArg
module RD : RelationDomain.RD
val keep_only_protected_globals :
Queries.ask ->
LockDomain.MustLock.t ->
LRD.t ->
LRD.t