diff options
| author | Emilio Jesus Gallego Arias | 2019-07-17 15:32:57 +0200 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-07-31 11:13:04 +0200 |
| commit | ce22c1cb3bca8381d9b0ebfef2fbf27e92418b0c (patch) | |
| tree | ad8845c4bca61bf752c597574d6df5ab352fbd94 /plugins/funind/invfun.ml | |
| parent | 105269d6799356eb52f289e191217b153c3bdade (diff) | |
[funind] Move common `make_eq` to funind_common.
Diffstat (limited to 'plugins/funind/invfun.ml')
| -rw-r--r-- | plugins/funind/invfun.ml | 5 |
1 files changed, 0 insertions, 5 deletions
diff --git a/plugins/funind/invfun.ml b/plugins/funind/invfun.ml index 90631d8e55..1407585bff 100644 --- a/plugins/funind/invfun.ml +++ b/plugins/funind/invfun.ml @@ -30,11 +30,6 @@ let thin ids gl = Proofview.V82.of_tactic (Tactics.clear ids) gl (* raise (UserError ("",str "Cannot find " ++ Ppconstr.pr_id id)) *) -let make_eq () = - try - EConstr.of_constr (UnivGen.constr_of_monomorphic_global (Coqlib.lib_ref "core.eq.type")) - with _ -> assert false - (***********************************************) (* [revert_graph kn post_tac hid] transforme an hypothesis [hid] having type Ind(kn,num) t1 ... tn res |