# HG changeset patch # User desharna # Date 1696929657 -7200 # Node ID f9c559d33ff301357e9f2633283cc10d4509e511 # Parent a11c461a1a3ac0afa4cb56fc14cdc41b07599c9c removed test failing on some platform diff -r a11c461a1a3a -r f9c559d33ff3 src/HOL/Metis_Examples/Sledgehammer_Isar_Proofs.thy --- a/src/HOL/Metis_Examples/Sledgehammer_Isar_Proofs.thy Mon Oct 09 21:41:26 2023 +0200 +++ b/src/HOL/Metis_Examples/Sledgehammer_Isar_Proofs.thy Tue Oct 10 11:20:57 2023 +0200 @@ -13,26 +13,4 @@ sledgehammer_params [verit, isar_proof, minimize = false, slices = 1, compress = 1] -lemma - fixes a b c :: int - shows "a + b = c \ c - b = a" - sledgehammer [expect = some_preplayed] () -proof - - assume a1: "a + b = c" - have "c - b \ a \ c \ a + b" - by force - then have f2: "c - b \ a" - using a1 by force - have "a \ c - b \ c \ a + b" - by force - then have "a \ c - b" - using a1 by force - then have f3: "c - b \ a \ a \ c - b" - using f2 by fastforce - have "c - b = a \ \ c - b \ a \ \ a \ c - b" - by auto - then show ?thesis - using f3 by meson -qed - end