diff options
Diffstat (limited to 'contrib')
| -rw-r--r-- | contrib/funind/invfun.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/contrib/funind/invfun.ml b/contrib/funind/invfun.ml index a8429d3c4..4e87c4c95 100644 --- a/contrib/funind/invfun.ml +++ b/contrib/funind/invfun.ml @@ -3,10 +3,10 @@ open Names open Term open Tacinvutils open Pp -open Indfun_common open Libnames open Tacticals open Tactics +open Indfun_common open Tacmach open Sign @@ -107,7 +107,7 @@ let invfun (hypname:identifier) (fid:identifier) : tactic= ) with _ -> assert false) in - compute_elim_sig princ_type + Indfun_common.compute_elim_sig princ_type in let _,_,typhyp = List.find (fun (id,_,_) -> hypname=id) (pf_hyps g) in let do_invert fargs appf : tactic = |