type spec = MustObj of uri list * position list * depth list
| MustSort of sort list * position list * depth list
- | MustRel of position list * depth list
- | OnlyObj of uri list * position list * depth list
+ | MustRel of position list * depth list
+ | OnlyObj of uri list * position list * depth list
| OnlySort of sort list * position list * depth list
- | OnlyRel of position list * depth list
- | Universe of position list
+ | OnlyRel of position list * depth list
+ | Universe of position list
val locate : string -> MathQL.query