]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/ocaml/mathql_generator/cGSearchPattern.ml
sort CProp added
[helm.git] / helm / ocaml / mathql_generator / cGSearchPattern.ml
index 77f3b488c6e896a7285e3ef2a0c73e2f415f87d9..a56d65959448421f872acc554e00edb194359ab8 100644 (file)
@@ -96,6 +96,7 @@ let get_constraints term =
                 Cic.Prop -> T.Prop
               | Cic.Set -> T.Set
               | Cic.Type -> T.Type
+             | Cic.CProp -> T.CProp
             in
             [],[],[!!kind,s']
          | _ -> [],[],[])