diff options
Diffstat (limited to 'plugins/rtauto/refl_tauto.ml')
-rw-r--r-- | plugins/rtauto/refl_tauto.ml | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/plugins/rtauto/refl_tauto.ml b/plugins/rtauto/refl_tauto.ml index f30f8a943..3655df895 100644 --- a/plugins/rtauto/refl_tauto.ml +++ b/plugins/rtauto/refl_tauto.ml @@ -95,7 +95,6 @@ let rec make_form atom_env gls term = let normalize=special_nf gls in let cciterm=special_whd gls term in let sigma = Tacmach.project gls in - let inj = EConstr.Unsafe.to_constr in match EConstr.kind sigma cciterm with Prod(_,a,b) -> if noccurn sigma 1 b && |