]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/ocaml/cic_transformations/tacticAst.ml
added Variant theorem flavour
[helm.git] / helm / ocaml / cic_transformations / tacticAst.ml
index 31e2093530f33d6a1c22dd601204c3cafa2b27e3..e4f454ed61fd4cd3a0e80486470c01669b114544 100644 (file)
@@ -71,13 +71,7 @@ type ('term, 'ident) tactic =
   | Symmetry of loc
   | Transitivity of loc * 'term
 
-type thm_flavour =
-  [ `Definition
-  | `Fact
-  | `Lemma
-  | `Remark
-  | `Theorem
-  ]
+type thm_flavour = Cic.object_flavour
 
   (** <name, inductive/coinductive, type, constructor list>
   * true means inductive, false coinductive *)