]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/components/ng_refiner/nCicCoercion.mli
Use of standard OCaml syntax
[helm.git] / matita / components / ng_refiner / nCicCoercion.mli
index 4f1fa4186af564daef4316cbfb69a75dd32ec95b..d2b3c7ae22ac660939d6ebd75e4fc1dd8517a81a 100644 (file)
@@ -33,7 +33,7 @@ val empty_db: db
    index_coercion db c A B \arity_left(c ??x??) \position(x,??x??) 
 *)
 val index_coercion: 
-  #status as 'status -> string ->
+  (#status as 'status) -> string ->
    NCic.term -> NCic.term -> NCic.term -> int -> int -> 'status
 
 (* NOTE: the name of the coercion is used to sort coercions, thus