1.1 --- a/src/HOL/Metis_Examples/HO_Reas.thy	Fri May 20 18:01:46 2011 +0200
     1.2 +++ b/src/HOL/Metis_Examples/HO_Reas.thy	Fri May 20 18:12:12 2011 +0200
     1.3 @@ -56,7 +56,7 @@
     1.4  
     1.5  lemma "id (op =) x x"
     1.6  sledgehammer [type_sys = erased, expect = none] (id_apply)
     1.7 -sledgehammer [type_sys = poly_tags?, expect = some] (id_apply)
     1.8 +sledgehammer [type_sys = poly_tags?, expect = none] (id_apply) (* unfortunate *)
     1.9  sledgehammer [type_sys = poly_tags, expect = some] (id_apply)
    1.10  sledgehammer [type_sys = poly_preds?, expect = some] (id_apply)
    1.11  sledgehammer [type_sys = poly_preds, expect = some] (id_apply)