diff options
| author | herbelin | 2001-08-07 15:17:28 +0000 |
|---|---|---|
| committer | herbelin | 2001-08-07 15:17:28 +0000 |
| commit | d0231fa8e99ee7edd62535a0c194ab656eaba213 (patch) | |
| tree | 860b2fdeecf4a6941163594084fe865bd1abe4d5 /parsing | |
| parent | 38f147b8a5299a6bee27784cf9dc8401d29ee9f5 (diff) | |
Ajout tactique TrueCut qui fait la coupure du calcul des séquents; nouvelle tactique primitive Cut basé sur un Let non dépendant; amélioration efficacité ancien Cut
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1883 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/g_tactic.ml4 | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/parsing/g_tactic.ml4 b/parsing/g_tactic.ml4 index 647a4179e4..08deeb8d10 100644 --- a/parsing/g_tactic.ml4 +++ b/parsing/g_tactic.ml4 @@ -318,6 +318,7 @@ GEXTEND Gram | IDENT "Decompose"; "["; l = ne_qualidarg_list; "]"; c = constrarg -> <:ast< (DecomposeThese $c ($LIST $l)) >> | IDENT "Cut"; c = constrarg -> <:ast< (Cut $c) >> + | IDENT "TrueCut"; c = constrarg -> <:ast< (TrueCut $c) >> | IDENT "Specialize"; n = pure_numarg; lcb = constrarg_binding_list -> <:ast< (Specialize $n ($LIST $lcb))>> | IDENT "Specialize"; lcb = constrarg_binding_list -> |