# HG changeset patch
# User blanchet
# Date 1321613232 -3600
# Node ID d7fc474e5a511bb17a38fdc5e2ca6d8f48124d38
# Parent  93d5aab90d8b6da8de4b60b99f9099c9eb06f63e
more aggressive lambda hiding (if we anyway need to pass an option to Metis)

diff -r 93d5aab90d8b -r d7fc474e5a51 src/HOL/Tools/Sledgehammer/sledgehammer_provers.ML
--- a/src/HOL/Tools/Sledgehammer/sledgehammer_provers.ML	Fri Nov 18 11:47:12 2011 +0100
+++ b/src/HOL/Tools/Sledgehammer/sledgehammer_provers.ML	Fri Nov 18 11:47:12 2011 +0100
@@ -147,7 +147,7 @@
 
 fun bunch_of_reconstructors needs_full_types lam_trans =
   [(false, Metis (hd partial_type_encs, lam_trans metis_default_lam_trans)),
-   (true, Metis (hd full_type_encs, lam_trans metis_default_lam_trans)),
+   (true, Metis (hd full_type_encs, lam_trans hide_lamsN)),
    (false, Metis (no_type_enc, lam_trans hide_lamsN)),
    (true, SMT)]
   |> map_filter (fn (full_types, reconstr) =>