X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fmathql%2FmathQL.ml;h=ed6abf54f454c0b6b6c32afd5d9b6858a5fe5059;hb=7646d66b5a68ad83611e19ac2634c86c16bc7d21;hp=a24dc4ed8492e0e659ad11abe6298eeb0e7f6c04;hpb=32f737bea2029db1f4870ec8a3a39ba6d2e4a57d;p=helm.git diff --git a/helm/ocaml/mathql/mathQL.ml b/helm/ocaml/mathql/mathQL.ml index a24dc4ed8..ed6abf54f 100644 --- a/helm/ocaml/mathql/mathQL.ml +++ b/helm/ocaml/mathql/mathQL.ml @@ -47,13 +47,13 @@ type refine_op = ExactOp | SubOp | SuperOp -type attr_list = vvar list +type vvar_list = vvar list type set_exp = SVar of svar | RVar of rvar | Ref of val_exp | Pattern of val_exp - | Relation of refine_op * string * set_exp * attr_list + | Relation of refine_op * string * set_exp * vvar_list | Select of rvar * set_exp * boole_exp | Union of set_exp * set_exp | Intersect of set_exp * set_exp