diff options
author | Josh Chen | 2020-05-22 15:43:14 +0200 |
---|---|---|
committer | Josh Chen | 2020-05-22 15:43:14 +0200 |
commit | 720da0f918118388d114e09664b129d2b29be2b1 (patch) | |
tree | e4411cceae3a790544e7bebb4eb7717c31e0fa63 /spartan/lib/tactics.ML | |
parent | 1571e03b7dc5c7e6f2a46be57a12dd0d25fea452 (diff) |
some tweaks and comments, in preparation for general inductive type elimination
Diffstat (limited to 'spartan/lib/tactics.ML')
-rw-r--r-- | spartan/lib/tactics.ML | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/spartan/lib/tactics.ML b/spartan/lib/tactics.ML index 0e09533..c72947a 100644 --- a/spartan/lib/tactics.ML +++ b/spartan/lib/tactics.ML @@ -104,8 +104,7 @@ fun intro_tac ctxt = SUBGOAL (fn (_, i) => SIDE_CONDS fun intros_tac ctxt = SUBGOAL (fn (_, i) => (CHANGED o REPEAT o CHANGED o intro_tac ctxt) i) -(* Basic elimination tactic *) -(*Only uses existing type judgments from the context +(*Basic elimination tactic, only uses existing type judgments from the context (performs no type synthesis)*) fun elims_tac opt_tm ctxt = case opt_tm of NONE => SUBGOAL (fn (_, i) => eresolve_tac ctxt (Elim.rules ctxt) i) |