X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_transformations%2FcicAstPp.ml;h=dda70793f62c7d3ad9495fed7df032de7b60b185;hb=f55b5800229c0819448abf38dfeb1527b4ec08e2;hp=2cc83e74312f8f2e62ac70ab9835048553fcedc4;hpb=a116385a421555776ac3e31616dc6567b2557992;p=helm.git diff --git a/helm/ocaml/cic_transformations/cicAstPp.ml b/helm/ocaml/cic_transformations/cicAstPp.ml index 2cc83e743..dda70793f 100644 --- a/helm/ocaml/cic_transformations/cicAstPp.ml +++ b/helm/ocaml/cic_transformations/cicAstPp.ml @@ -82,7 +82,7 @@ and pp_subst (name, term) = sprintf "%s \\Assign %s" name (pp_term term) and pp_substs substs = String.concat "; " (List.map pp_subst substs) and pp_pattern ((head, vars), term) = - sprintf "%s \Rightarrow %s" + sprintf "%s \\Rightarrow %s" (match vars with | [] -> head | _ ->