# HG changeset patch # User webertj # Date 1362485004 -3600 # Node ID 1012626af0bca71f7d5965b0dedb014e632a11cc # Parent 6c06b8de72f919c469843de703eb04f31a6442b6 Avoid ML warning about unreferenced identifier. diff -r 6c06b8de72f9 -r 1012626af0bc src/HOL/ex/SAT_Examples.thy --- a/src/HOL/ex/SAT_Examples.thy Tue Mar 05 11:59:58 2013 +0100 +++ b/src/HOL/ex/SAT_Examples.thy Tue Mar 05 13:03:24 2013 +0100 @@ -535,7 +535,7 @@ val terms = map (HOLogic.mk_Trueprop o Prop_Logic.term_of_prop_formula) clauses val cterms = map (Thm.cterm_of @{theory}) terms val start = Timing.start () - val thm = sat.rawsat_thm @{context} cterms + val _ = sat.rawsat_thm @{context} cterms in (Timing.result start, ! sat.counter) end;