]> matita.cs.unibo.it Git - helm.git/blobdiff - matita/components/ng_tactics/nTactics.ml
Changes in "destruct" tactic (allowing performance improvements):
[helm.git] / matita / components / ng_tactics / nTactics.ml
index dbc134319424b94f1397903077ebc1e38e68772c..104a044f696111f9b58ad5c0cae00793123ac160 100644 (file)
@@ -390,7 +390,7 @@ let select0_tac ~where ~job  =
    let status, instance = 
      mk_meta status newgoalctx (`Decl newgoalty) `IsTerm
    in
-   instantiate ~refine:false status goal instance)
+   instantiate ~refine:false status goal instance) 
 ;;
 
 let select_tac ~where:((txt,txtlen,(wanted,hyps,path)) as where) ~job