diff options
| author | Maxime Dénès | 2017-04-06 23:12:31 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2017-04-06 23:12:31 +0200 |
| commit | f81d1b2a0b22f45c82f061ba408468c28b47535c (patch) | |
| tree | 649bfdf0012da16bf5b5b0f70314a553a180c407 /plugins/firstorder | |
| parent | 06ae65cc88069763fe05184e3ea3dc73dd8f9794 (diff) | |
| parent | ca82e1ff51108a3dac37f52a96f3af4b4e8d1a18 (diff) | |
Merge PR#455: Farewell decl_mode
Diffstat (limited to 'plugins/firstorder')
| -rw-r--r-- | plugins/firstorder/g_ground.ml4 | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/plugins/firstorder/g_ground.ml4 b/plugins/firstorder/g_ground.ml4 index e28d6aa626..3c03193196 100644 --- a/plugins/firstorder/g_ground.ml4 +++ b/plugins/firstorder/g_ground.ml4 @@ -159,21 +159,3 @@ END open Proofview.Notations open Cc_plugin -open Decl_mode_plugin - -let default_declarative_automation = - Proofview.tclUNIT () >>= fun () -> (* delay for [congruence_depth] *) - Tacticals.New.tclORELSE - (Tacticals.New.tclORELSE (Auto.h_trivial [] None) - (Cctac.congruence_tac !congruence_depth [])) - (Proofview.V82.tactic (gen_ground_tac true - (Some (Tacticals.New.tclTHEN - (snd (default_solver ())) - (Cctac.congruence_tac !congruence_depth []))) - [] [])) - - - -let () = - Decl_proof_instr.register_automation_tac default_declarative_automation - |
