# HG changeset patch # User wenzelm # Date 1728244493 -7200 # Node ID 84e459f091984f5c28ecc411868acfe0870f8239 # Parent 7cacedbddba71d8c71e75e2788bfc0aff40e9aa8 tuned comments: all times are < 1ms; diff -r 7cacedbddba7 -r 84e459f09198 src/ZF/ex/BinEx.thy --- a/src/ZF/ex/BinEx.thy Sun Oct 06 18:34:35 2024 +0200 +++ b/src/ZF/ex/BinEx.thy Sun Oct 06 21:54:53 2024 +0200 @@ -6,39 +6,37 @@ *) theory BinEx imports ZF begin -(*All runtimes below are on a 300MHz Pentium*) lemma "#13 $+ #19 = #32" -by simp (*0 secs*) +by simp lemma "#1234 $+ #5678 = #6912" -by simp (*190 msec*) +by simp lemma "#1359 $+ #-2468 = #-1109" -by simp (*160 msec*) +by simp lemma "#93746 $+ #-46375 = #47371" -by simp (*300 msec*) +by simp lemma "$- #65745 = #-65745" -by simp (*80 msec*) +by simp -(* negation of \54321 *) lemma "$- #-54321 = #54321" -by simp (*90 msec*) +by simp lemma "#13 $* #19 = #247" -by simp (*110 msec*) +by simp lemma "#-84 $* #51 = #-4284" -by simp (*210 msec*) +by simp (*The worst case for 8-bit operands *) lemma "#255 $* #255 = #65025" -by simp (*730 msec*) +by simp lemma "#1359 $* #-2468 = #-3354012" -by simp (*1.04 secs*) +by simp (** Comparisons **) @@ -62,7 +60,7 @@ by simp -(*** Quotient and remainder\[they could be faster] ***) +(*** Quotient and remainder [they could be faster] ***) lemma "#23 zdiv #3 = #7" by simp @@ -86,7 +84,7 @@ lemma "#23 zmod #-3 = #-1" by simp -(** Negative dividend and divisor **) +(** negative dividend and divisor **) lemma "#-23 zdiv #-3 = #7" by simp @@ -95,4 +93,3 @@ by simp end -