author | paulson |
Fri, 12 Jan 2001 16:07:20 +0100 | |
changeset 10878 | b254d5ad6dd4 |
parent 10790 | 520dd8696927 |
child 10950 | aa788fcb75a5 |
permissions | -rw-r--r-- |
paulson@10602 | 1 |
% |
paulson@10602 | 2 |
\begin{isabellebody}% |
paulson@10602 | 3 |
\def\isabellecontext{Numbers}% |
paulson@10602 | 4 |
\isanewline |
wenzelm@10776 | 5 |
\isacommand{theory}\ Numbers\ {\isacharequal}\ Real{\isacharcolon}\isanewline |
paulson@10602 | 6 |
\isanewline |
nipkow@10790 | 7 |
\isacommand{ML}\ {\isachardoublequote}Pretty{\isachardot}setmargin\ {\isadigit{6}}{\isadigit{4}}{\isachardoublequote}\isanewline |
nipkow@10790 | 8 |
\isacommand{ML}\ {\isachardoublequote}IsarOutput{\isachardot}indent\ {\isacharcolon}{\isacharequal}\ {\isadigit{0}}{\isachardoublequote}% |
paulson@10602 | 9 |
\begin{isamarkuptext}% |
paulson@10602 | 10 |
numeric literals; default simprules; can re-orient% |
paulson@10602 | 11 |
\end{isamarkuptext}% |
paulson@10878 | 12 |
\isacommand{lemma}\ {\isachardoublequote}{\isacharhash}{\isadigit{2}}\ {\isacharasterisk}\ m\ {\isacharequal}\ m\ {\isacharplus}\ m{\isachardoublequote}% |
paulson@10878 | 13 |
\begin{isamarkuptxt}% |
paulson@10878 | 14 |
\begin{isabelle}% |
paulson@10878 | 15 |
\ {\isadigit{1}}{\isachardot}\ {\isacharparenleft}{\isacharhash}{\isadigit{2}}{\isasymColon}{\isacharprime}a{\isacharparenright}\ {\isacharasterisk}\ m\ {\isacharequal}\ m\ {\isacharplus}\ m% |
paulson@10878 | 16 |
\end{isabelle}% |
paulson@10878 | 17 |
\end{isamarkuptxt}% |
paulson@10878 | 18 |
\isacommand{oops}\isanewline |
paulson@10878 | 19 |
\isanewline |
paulson@10878 | 20 |
\isacommand{consts}\ h\ {\isacharcolon}{\isacharcolon}\ {\isachardoublequote}nat\ {\isasymRightarrow}\ nat{\isachardoublequote}\isanewline |
paulson@10878 | 21 |
\isacommand{recdef}\ h\ {\isachardoublequote}{\isacharbraceleft}{\isacharbraceright}{\isachardoublequote}\isanewline |
paulson@10878 | 22 |
{\isachardoublequote}h\ i\ {\isacharequal}\ {\isacharparenleft}if\ i\ {\isacharequal}\ {\isacharhash}{\isadigit{3}}\ then\ {\isacharhash}{\isadigit{2}}\ else\ i{\isacharparenright}{\isachardoublequote}% |
paulson@10602 | 23 |
\begin{isamarkuptext}% |
paulson@10878 | 24 |
\isa{h\ {\isacharhash}{\isadigit{3}}\ {\isacharequal}\ {\isacharhash}{\isadigit{2}}} |
paulson@10878 | 25 |
\isa{h\ i\ {\isacharequal}\ i}% |
paulson@10878 | 26 |
\end{isamarkuptext}% |
paulson@10878 | 27 |
% |
paulson@10878 | 28 |
\begin{isamarkuptext}% |
paulson@10602 | 29 |
\begin{isabelle}% |
nipkow@10790 | 30 |
{\isacharhash}{\isadigit{0}}\ {\isacharequal}\ {\isadigit{0}}% |
paulson@10602 | 31 |
\end{isabelle} |
paulson@10602 | 32 |
\rulename{numeral_0_eq_0} |
paulson@10602 | 33 |
|
paulson@10602 | 34 |
\begin{isabelle}% |
nipkow@10790 | 35 |
{\isacharhash}{\isadigit{1}}\ {\isacharequal}\ {\isadigit{1}}% |
paulson@10602 | 36 |
\end{isabelle} |
paulson@10602 | 37 |
\rulename{numeral_1_eq_1} |
paulson@10602 | 38 |
|
paulson@10602 | 39 |
\begin{isabelle}% |
nipkow@10790 | 40 |
{\isacharhash}{\isadigit{2}}\ {\isacharplus}\ n\ {\isacharequal}\ Suc\ {\isacharparenleft}Suc\ n{\isacharparenright}% |
paulson@10602 | 41 |
\end{isabelle} |
paulson@10602 | 42 |
\rulename{add_2_eq_Suc} |
paulson@10602 | 43 |
|
paulson@10602 | 44 |
\begin{isabelle}% |
nipkow@10790 | 45 |
n\ {\isacharplus}\ {\isacharhash}{\isadigit{2}}\ {\isacharequal}\ Suc\ {\isacharparenleft}Suc\ n{\isacharparenright}% |
paulson@10602 | 46 |
\end{isabelle} |
paulson@10602 | 47 |
\rulename{add_2_eq_Suc'} |
paulson@10602 | 48 |
|
paulson@10602 | 49 |
\begin{isabelle}% |
nipkow@10790 | 50 |
m\ {\isacharplus}\ n\ {\isacharplus}\ k\ {\isacharequal}\ m\ {\isacharplus}\ {\isacharparenleft}n\ {\isacharplus}\ k{\isacharparenright}% |
paulson@10602 | 51 |
\end{isabelle} |
paulson@10602 | 52 |
\rulename{add_assoc} |
paulson@10602 | 53 |
|
paulson@10602 | 54 |
\begin{isabelle}% |
nipkow@10790 | 55 |
m\ {\isacharplus}\ n\ {\isacharequal}\ n\ {\isacharplus}\ m% |
paulson@10602 | 56 |
\end{isabelle} |
paulson@10602 | 57 |
\rulename{add_commute} |
paulson@10602 | 58 |
|
paulson@10602 | 59 |
\begin{isabelle}% |
nipkow@10790 | 60 |
x\ {\isacharplus}\ {\isacharparenleft}y\ {\isacharplus}\ z{\isacharparenright}\ {\isacharequal}\ y\ {\isacharplus}\ {\isacharparenleft}x\ {\isacharplus}\ z{\isacharparenright}% |
paulson@10602 | 61 |
\end{isabelle} |
paulson@10602 | 62 |
\rulename{add_left_commute} |
paulson@10602 | 63 |
|
paulson@10602 | 64 |
these form add_ac; similarly there is mult_ac% |
paulson@10602 | 65 |
\end{isamarkuptext}% |
paulson@10878 | 66 |
\isacommand{lemma}\ {\isachardoublequote}Suc{\isacharparenleft}i\ {\isacharplus}\ j{\isacharasterisk}l{\isacharasterisk}k\ {\isacharplus}\ m{\isacharasterisk}n{\isacharparenright}\ {\isacharequal}\ f\ {\isacharparenleft}n{\isacharasterisk}m\ {\isacharplus}\ i\ {\isacharplus}\ k{\isacharasterisk}j{\isacharasterisk}l{\isacharparenright}{\isachardoublequote}% |
paulson@10878 | 67 |
\begin{isamarkuptxt}% |
paulson@10878 | 68 |
\begin{isabelle}% |
paulson@10878 | 69 |
\ {\isadigit{1}}{\isachardot}\ Suc\ {\isacharparenleft}i\ {\isacharplus}\ j\ {\isacharasterisk}\ l\ {\isacharasterisk}\ k\ {\isacharplus}\ m\ {\isacharasterisk}\ n{\isacharparenright}\ {\isacharequal}\ f\ {\isacharparenleft}n\ {\isacharasterisk}\ m\ {\isacharplus}\ i\ {\isacharplus}\ k\ {\isacharasterisk}\ j\ {\isacharasterisk}\ l{\isacharparenright}% |
paulson@10878 | 70 |
\end{isabelle}% |
paulson@10878 | 71 |
\end{isamarkuptxt}% |
paulson@10878 | 72 |
\isacommand{apply}\ {\isacharparenleft}simp\ add{\isacharcolon}\ add{\isacharunderscore}ac\ mult{\isacharunderscore}ac{\isacharparenright}% |
paulson@10878 | 73 |
\begin{isamarkuptxt}% |
paulson@10878 | 74 |
\begin{isabelle}% |
paulson@10602 | 75 |
\ {\isadigit{1}}{\isachardot}\ Suc\ {\isacharparenleft}i\ {\isacharplus}\ {\isacharparenleft}m\ {\isacharasterisk}\ n\ {\isacharplus}\ j\ {\isacharasterisk}\ {\isacharparenleft}k\ {\isacharasterisk}\ l{\isacharparenright}{\isacharparenright}{\isacharparenright}\ {\isacharequal}\isanewline |
paulson@10602 | 76 |
\ \ \ \ f\ {\isacharparenleft}i\ {\isacharplus}\ {\isacharparenleft}m\ {\isacharasterisk}\ n\ {\isacharplus}\ j\ {\isacharasterisk}\ {\isacharparenleft}k\ {\isacharasterisk}\ l{\isacharparenright}{\isacharparenright}{\isacharparenright}% |
paulson@10878 | 77 |
\end{isabelle}% |
paulson@10878 | 78 |
\end{isamarkuptxt}% |
paulson@10878 | 79 |
\isacommand{oops}% |
paulson@10602 | 80 |
\begin{isamarkuptext}% |
paulson@10602 | 81 |
\begin{isabelle}% |
nipkow@10790 | 82 |
{\isasymlbrakk}i\ {\isasymle}\ j{\isacharsemicolon}\ k\ {\isasymle}\ l{\isasymrbrakk}\ {\isasymLongrightarrow}\ i\ {\isacharasterisk}\ k\ {\isasymle}\ j\ {\isacharasterisk}\ l% |
paulson@10602 | 83 |
\end{isabelle} |
paulson@10602 | 84 |
\rulename{mult_le_mono} |
paulson@10602 | 85 |
|
paulson@10602 | 86 |
\begin{isabelle}% |
nipkow@10790 | 87 |
{\isasymlbrakk}i\ {\isacharless}\ j{\isacharsemicolon}\ {\isadigit{0}}\ {\isacharless}\ k{\isasymrbrakk}\ {\isasymLongrightarrow}\ i\ {\isacharasterisk}\ k\ {\isacharless}\ j\ {\isacharasterisk}\ k% |
paulson@10602 | 88 |
\end{isabelle} |
paulson@10602 | 89 |
\rulename{mult_less_mono1} |
paulson@10602 | 90 |
|
paulson@10602 | 91 |
\begin{isabelle}% |
nipkow@10790 | 92 |
m\ {\isasymle}\ n\ {\isasymLongrightarrow}\ m\ div\ k\ {\isasymle}\ n\ div\ k% |
paulson@10602 | 93 |
\end{isabelle} |
paulson@10602 | 94 |
\rulename{div_le_mono} |
paulson@10602 | 95 |
|
paulson@10602 | 96 |
\begin{isabelle}% |
nipkow@10790 | 97 |
{\isacharparenleft}m\ {\isacharplus}\ n{\isacharparenright}\ {\isacharasterisk}\ k\ {\isacharequal}\ m\ {\isacharasterisk}\ k\ {\isacharplus}\ n\ {\isacharasterisk}\ k% |
paulson@10602 | 98 |
\end{isabelle} |
paulson@10602 | 99 |
\rulename{add_mult_distrib} |
paulson@10602 | 100 |
|
paulson@10602 | 101 |
\begin{isabelle}% |
nipkow@10790 | 102 |
{\isacharparenleft}m\ {\isacharminus}\ n{\isacharparenright}\ {\isacharasterisk}\ k\ {\isacharequal}\ m\ {\isacharasterisk}\ k\ {\isacharminus}\ n\ {\isacharasterisk}\ k% |
paulson@10602 | 103 |
\end{isabelle} |
paulson@10602 | 104 |
\rulename{diff_mult_distrib} |
paulson@10602 | 105 |
|
paulson@10602 | 106 |
\begin{isabelle}% |
nipkow@10790 | 107 |
m\ mod\ n\ {\isacharasterisk}\ k\ {\isacharequal}\ m\ {\isacharasterisk}\ k\ mod\ {\isacharparenleft}n\ {\isacharasterisk}\ k{\isacharparenright}% |
paulson@10602 | 108 |
\end{isabelle} |
paulson@10602 | 109 |
\rulename{mod_mult_distrib} |
paulson@10602 | 110 |
|
paulson@10602 | 111 |
\begin{isabelle}% |
nipkow@10790 | 112 |
P\ {\isacharparenleft}a\ {\isacharminus}\ b{\isacharparenright}\ {\isacharequal}\ {\isacharparenleft}{\isacharparenleft}a\ {\isacharless}\ b\ {\isasymlongrightarrow}\ P\ {\isadigit{0}}{\isacharparenright}\ {\isasymand}\ {\isacharparenleft}{\isasymforall}d{\isachardot}\ a\ {\isacharequal}\ b\ {\isacharplus}\ d\ {\isasymlongrightarrow}\ P\ d{\isacharparenright}{\isacharparenright}% |
paulson@10602 | 113 |
\end{isabelle} |
paulson@10602 | 114 |
\rulename{nat_diff_split}% |
paulson@10602 | 115 |
\end{isamarkuptext}% |
paulson@10602 | 116 |
\isacommand{lemma}\ {\isachardoublequote}{\isacharparenleft}n{\isacharminus}{\isadigit{1}}{\isacharparenright}{\isacharasterisk}{\isacharparenleft}n{\isacharplus}{\isadigit{1}}{\isacharparenright}\ {\isacharequal}\ n{\isacharasterisk}n\ {\isacharminus}\ {\isadigit{1}}{\isachardoublequote}\isanewline |
paulson@10602 | 117 |
\isacommand{apply}\ {\isacharparenleft}simp\ split{\isacharcolon}\ nat{\isacharunderscore}diff{\isacharunderscore}split{\isacharparenright}\isanewline |
paulson@10602 | 118 |
\isacommand{done}% |
paulson@10602 | 119 |
\begin{isamarkuptext}% |
paulson@10602 | 120 |
\begin{isabelle}% |
nipkow@10790 | 121 |
m\ mod\ n\ {\isacharequal}\ {\isacharparenleft}if\ m\ {\isacharless}\ n\ then\ m\ else\ {\isacharparenleft}m\ {\isacharminus}\ n{\isacharparenright}\ mod\ n{\isacharparenright}% |
paulson@10602 | 122 |
\end{isabelle} |
paulson@10602 | 123 |
\rulename{mod_if} |
paulson@10602 | 124 |
|
paulson@10602 | 125 |
\begin{isabelle}% |
nipkow@10790 | 126 |
m\ div\ n\ {\isacharasterisk}\ n\ {\isacharplus}\ m\ mod\ n\ {\isacharequal}\ m% |
paulson@10602 | 127 |
\end{isabelle} |
paulson@10602 | 128 |
\rulename{mod_div_equality} |
paulson@10602 | 129 |
|
paulson@10602 | 130 |
|
paulson@10602 | 131 |
\begin{isabelle}% |
nipkow@10790 | 132 |
a\ {\isacharasterisk}\ b\ div\ c\ {\isacharequal}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ div\ c{\isacharparenright}\ {\isacharplus}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ mod\ c{\isacharparenright}\ div\ c% |
paulson@10602 | 133 |
\end{isabelle} |
paulson@10602 | 134 |
\rulename{div_mult1_eq} |
paulson@10602 | 135 |
|
paulson@10602 | 136 |
\begin{isabelle}% |
nipkow@10790 | 137 |
a\ {\isacharasterisk}\ b\ mod\ c\ {\isacharequal}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ mod\ c{\isacharparenright}\ mod\ c% |
paulson@10602 | 138 |
\end{isabelle} |
paulson@10602 | 139 |
\rulename{mod_mult1_eq} |
paulson@10602 | 140 |
|
paulson@10602 | 141 |
\begin{isabelle}% |
nipkow@10790 | 142 |
a\ div\ {\isacharparenleft}b\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\ a\ div\ b\ div\ c% |
paulson@10602 | 143 |
\end{isabelle} |
paulson@10602 | 144 |
\rulename{div_mult2_eq} |
paulson@10602 | 145 |
|
paulson@10602 | 146 |
\begin{isabelle}% |
nipkow@10790 | 147 |
a\ mod\ {\isacharparenleft}b\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\ b\ {\isacharasterisk}\ {\isacharparenleft}a\ div\ b\ mod\ c{\isacharparenright}\ {\isacharplus}\ a\ mod\ b% |
paulson@10602 | 148 |
\end{isabelle} |
paulson@10602 | 149 |
\rulename{mod_mult2_eq} |
paulson@10602 | 150 |
|
paulson@10602 | 151 |
\begin{isabelle}% |
nipkow@10790 | 152 |
{\isadigit{0}}\ {\isacharless}\ c\ {\isasymLongrightarrow}\ c\ {\isacharasterisk}\ a\ div\ {\isacharparenleft}c\ {\isacharasterisk}\ b{\isacharparenright}\ {\isacharequal}\ a\ div\ b% |
paulson@10602 | 153 |
\end{isabelle} |
paulson@10602 | 154 |
\rulename{div_mult_mult1} |
paulson@10602 | 155 |
|
paulson@10602 | 156 |
\begin{isabelle}% |
nipkow@10790 | 157 |
a\ div\ {\isadigit{0}}\ {\isacharequal}\ {\isadigit{0}}% |
paulson@10602 | 158 |
\end{isabelle} |
paulson@10602 | 159 |
\rulename{DIVISION_BY_ZERO_DIV} |
paulson@10602 | 160 |
|
paulson@10602 | 161 |
\begin{isabelle}% |
nipkow@10790 | 162 |
a\ mod\ {\isadigit{0}}\ {\isacharequal}\ a% |
paulson@10602 | 163 |
\end{isabelle} |
paulson@10602 | 164 |
\rulename{DIVISION_BY_ZERO_MOD} |
paulson@10602 | 165 |
|
paulson@10602 | 166 |
\begin{isabelle}% |
nipkow@10790 | 167 |
{\isasymlbrakk}m\ dvd\ n{\isacharsemicolon}\ n\ dvd\ m{\isasymrbrakk}\ {\isasymLongrightarrow}\ m\ {\isacharequal}\ n% |
paulson@10602 | 168 |
\end{isabelle} |
paulson@10602 | 169 |
\rulename{dvd_anti_sym} |
paulson@10602 | 170 |
|
paulson@10602 | 171 |
\begin{isabelle}% |
nipkow@10790 | 172 |
{\isasymlbrakk}k\ dvd\ m{\isacharsemicolon}\ k\ dvd\ n{\isasymrbrakk}\ {\isasymLongrightarrow}\ k\ dvd\ m\ {\isacharplus}\ n% |
paulson@10602 | 173 |
\end{isabelle} |
paulson@10602 | 174 |
\rulename{dvd_add} |
paulson@10602 | 175 |
|
paulson@10602 | 176 |
For the integers, I'd list a few theorems that somehow involve negative |
paulson@10602 | 177 |
numbers. |
paulson@10602 | 178 |
|
paulson@10602 | 179 |
Division, remainder of negatives |
paulson@10602 | 180 |
|
paulson@10602 | 181 |
|
paulson@10602 | 182 |
\begin{isabelle}% |
nipkow@10790 | 183 |
{\isacharhash}{\isadigit{0}}\ {\isacharless}\ b\ {\isasymLongrightarrow}\ {\isacharhash}{\isadigit{0}}\ {\isasymle}\ a\ mod\ b% |
paulson@10602 | 184 |
\end{isabelle} |
paulson@10602 | 185 |
\rulename{pos_mod_sign} |
paulson@10602 | 186 |
|
paulson@10602 | 187 |
\begin{isabelle}% |
nipkow@10790 | 188 |
{\isacharhash}{\isadigit{0}}\ {\isacharless}\ b\ {\isasymLongrightarrow}\ a\ mod\ b\ {\isacharless}\ b% |
paulson@10602 | 189 |
\end{isabelle} |
paulson@10602 | 190 |
\rulename{pos_mod_bound} |
paulson@10602 | 191 |
|
paulson@10602 | 192 |
\begin{isabelle}% |
nipkow@10790 | 193 |
b\ {\isacharless}\ {\isacharhash}{\isadigit{0}}\ {\isasymLongrightarrow}\ a\ mod\ b\ {\isasymle}\ {\isacharhash}{\isadigit{0}}% |
paulson@10602 | 194 |
\end{isabelle} |
paulson@10602 | 195 |
\rulename{neg_mod_sign} |
paulson@10602 | 196 |
|
paulson@10602 | 197 |
\begin{isabelle}% |
nipkow@10790 | 198 |
b\ {\isacharless}\ {\isacharhash}{\isadigit{0}}\ {\isasymLongrightarrow}\ b\ {\isacharless}\ a\ mod\ b% |
paulson@10602 | 199 |
\end{isabelle} |
paulson@10602 | 200 |
\rulename{neg_mod_bound} |
paulson@10602 | 201 |
|
paulson@10602 | 202 |
\begin{isabelle}% |
nipkow@10790 | 203 |
{\isacharparenleft}a\ {\isacharplus}\ b{\isacharparenright}\ div\ c\ {\isacharequal}\ a\ div\ c\ {\isacharplus}\ b\ div\ c\ {\isacharplus}\ {\isacharparenleft}a\ mod\ c\ {\isacharplus}\ b\ mod\ c{\isacharparenright}\ div\ c% |
paulson@10602 | 204 |
\end{isabelle} |
paulson@10602 | 205 |
\rulename{zdiv_zadd1_eq} |
paulson@10602 | 206 |
|
paulson@10602 | 207 |
\begin{isabelle}% |
nipkow@10790 | 208 |
{\isacharparenleft}a\ {\isacharplus}\ b{\isacharparenright}\ mod\ c\ {\isacharequal}\ {\isacharparenleft}a\ mod\ c\ {\isacharplus}\ b\ mod\ c{\isacharparenright}\ mod\ c% |
paulson@10602 | 209 |
\end{isabelle} |
paulson@10602 | 210 |
\rulename{zmod_zadd1_eq} |
paulson@10602 | 211 |
|
paulson@10602 | 212 |
\begin{isabelle}% |
nipkow@10790 | 213 |
a\ {\isacharasterisk}\ b\ div\ c\ {\isacharequal}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ div\ c{\isacharparenright}\ {\isacharplus}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ mod\ c{\isacharparenright}\ div\ c% |
paulson@10602 | 214 |
\end{isabelle} |
paulson@10602 | 215 |
\rulename{zdiv_zmult1_eq} |
paulson@10602 | 216 |
|
paulson@10602 | 217 |
\begin{isabelle}% |
nipkow@10790 | 218 |
a\ {\isacharasterisk}\ b\ mod\ c\ {\isacharequal}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ mod\ c{\isacharparenright}\ mod\ c% |
paulson@10602 | 219 |
\end{isabelle} |
paulson@10602 | 220 |
\rulename{zmod_zmult1_eq} |
paulson@10602 | 221 |
|
paulson@10602 | 222 |
\begin{isabelle}% |
nipkow@10790 | 223 |
{\isacharhash}{\isadigit{0}}\ {\isacharless}\ c\ {\isasymLongrightarrow}\ a\ div\ {\isacharparenleft}b\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\ a\ div\ b\ div\ c% |
paulson@10602 | 224 |
\end{isabelle} |
paulson@10602 | 225 |
\rulename{zdiv_zmult2_eq} |
paulson@10602 | 226 |
|
paulson@10602 | 227 |
\begin{isabelle}% |
nipkow@10790 | 228 |
{\isacharhash}{\isadigit{0}}\ {\isacharless}\ c\ {\isasymLongrightarrow}\ a\ mod\ {\isacharparenleft}b\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\ b\ {\isacharasterisk}\ {\isacharparenleft}a\ div\ b\ mod\ c{\isacharparenright}\ {\isacharplus}\ a\ mod\ b% |
paulson@10602 | 229 |
\end{isabelle} |
paulson@10602 | 230 |
\rulename{zmod_zmult2_eq} |
paulson@10602 | 231 |
|
paulson@10602 | 232 |
\begin{isabelle}% |
nipkow@10790 | 233 |
{\isasymbar}x\ {\isacharasterisk}\ y{\isasymbar}\ {\isacharequal}\ {\isasymbar}x{\isasymbar}\ {\isacharasterisk}\ {\isasymbar}y{\isasymbar}% |
paulson@10602 | 234 |
\end{isabelle} |
paulson@10602 | 235 |
\rulename{abs_mult}% |
paulson@10602 | 236 |
\end{isamarkuptext}% |
paulson@10878 | 237 |
\isacommand{lemma}\ {\isachardoublequote}{\isasymlbrakk}abs\ x\ {\isacharless}\ a{\isacharsemicolon}\ abs\ y\ {\isacharless}\ b{\isasymrbrakk}\ {\isasymLongrightarrow}\ abs\ x\ {\isacharplus}\ abs\ y\ {\isacharless}\ {\isacharparenleft}a\ {\isacharplus}\ b\ {\isacharcolon}{\isacharcolon}\ int{\isacharparenright}{\isachardoublequote}\isanewline |
paulson@10878 | 238 |
\isacommand{by}\ arith% |
wenzelm@10776 | 239 |
\begin{isamarkuptext}% |
wenzelm@10776 | 240 |
REALS |
wenzelm@10776 | 241 |
|
wenzelm@10776 | 242 |
\begin{isabelle}% |
nipkow@10790 | 243 |
{\isasymbar}r{\isasymbar}\ {\isacharcircum}\ n\ {\isacharequal}\ {\isasymbar}r\ {\isacharcircum}\ n{\isasymbar}% |
wenzelm@10776 | 244 |
\end{isabelle} |
wenzelm@10776 | 245 |
\rulename{realpow_abs} |
wenzelm@10776 | 246 |
|
wenzelm@10776 | 247 |
\begin{isabelle}% |
nipkow@10790 | 248 |
x\ {\isacharless}\ y\ {\isasymLongrightarrow}\ {\isasymexists}r{\isachardot}\ x\ {\isacharless}\ r\ {\isasymand}\ r\ {\isacharless}\ y% |
wenzelm@10776 | 249 |
\end{isabelle} |
wenzelm@10776 | 250 |
\rulename{real_dense} |
wenzelm@10776 | 251 |
|
wenzelm@10776 | 252 |
\begin{isabelle}% |
nipkow@10790 | 253 |
{\isasymbar}r{\isasymbar}\ {\isacharcircum}\ n\ {\isacharequal}\ {\isasymbar}r\ {\isacharcircum}\ n{\isasymbar}% |
wenzelm@10776 | 254 |
\end{isabelle} |
wenzelm@10776 | 255 |
\rulename{realpow_abs} |
wenzelm@10776 | 256 |
|
wenzelm@10776 | 257 |
\begin{isabelle}% |
nipkow@10790 | 258 |
x\ {\isacharasterisk}\ {\isacharparenleft}y\ {\isacharslash}\ z{\isacharparenright}\ {\isacharequal}\ x\ {\isacharasterisk}\ y\ {\isacharslash}\ z% |
wenzelm@10776 | 259 |
\end{isabelle} |
wenzelm@10776 | 260 |
\rulename{real_times_divide1_eq} |
wenzelm@10776 | 261 |
|
wenzelm@10776 | 262 |
\begin{isabelle}% |
nipkow@10790 | 263 |
y\ {\isacharslash}\ z\ {\isacharasterisk}\ x\ {\isacharequal}\ y\ {\isacharasterisk}\ x\ {\isacharslash}\ z% |
wenzelm@10776 | 264 |
\end{isabelle} |
wenzelm@10776 | 265 |
\rulename{real_times_divide2_eq} |
wenzelm@10776 | 266 |
|
wenzelm@10776 | 267 |
\begin{isabelle}% |
nipkow@10790 | 268 |
x\ {\isacharslash}\ {\isacharparenleft}y\ {\isacharslash}\ z{\isacharparenright}\ {\isacharequal}\ x\ {\isacharasterisk}\ z\ {\isacharslash}\ y% |
wenzelm@10776 | 269 |
\end{isabelle} |
wenzelm@10776 | 270 |
\rulename{real_divide_divide1_eq} |
wenzelm@10776 | 271 |
|
wenzelm@10776 | 272 |
\begin{isabelle}% |
nipkow@10790 | 273 |
x\ {\isacharslash}\ y\ {\isacharslash}\ z\ {\isacharequal}\ x\ {\isacharslash}\ {\isacharparenleft}y\ {\isacharasterisk}\ z{\isacharparenright}% |
wenzelm@10776 | 274 |
\end{isabelle} |
wenzelm@10776 | 275 |
\rulename{real_divide_divide2_eq} |
wenzelm@10776 | 276 |
|
wenzelm@10776 | 277 |
\begin{isabelle}% |
nipkow@10790 | 278 |
{\isacharminus}\ x\ {\isacharslash}\ y\ {\isacharequal}\ {\isacharminus}\ {\isacharparenleft}x\ {\isacharslash}\ y{\isacharparenright}% |
wenzelm@10776 | 279 |
\end{isabelle} |
wenzelm@10776 | 280 |
\rulename{real_minus_divide_eq} |
wenzelm@10776 | 281 |
|
wenzelm@10776 | 282 |
\begin{isabelle}% |
nipkow@10790 | 283 |
x\ {\isacharslash}\ {\isacharminus}\ y\ {\isacharequal}\ {\isacharminus}\ {\isacharparenleft}x\ {\isacharslash}\ y{\isacharparenright}% |
wenzelm@10776 | 284 |
\end{isabelle} |
wenzelm@10776 | 285 |
\rulename{real_divide_minus_eq} |
wenzelm@10776 | 286 |
|
wenzelm@10776 | 287 |
This last NOT a simprule |
wenzelm@10776 | 288 |
|
nipkow@10790 | 289 |
\begin{isabelle}% |
nipkow@10790 | 290 |
{\isacharparenleft}x\ {\isacharplus}\ y{\isacharparenright}\ {\isacharslash}\ z\ {\isacharequal}\ x\ {\isacharslash}\ z\ {\isacharplus}\ y\ {\isacharslash}\ z% |
nipkow@10790 | 291 |
\end{isabelle} |
nipkow@10790 | 292 |
\rulename{real_add_divide_distrib}% |
wenzelm@10776 | 293 |
\end{isamarkuptext}% |
paulson@10602 | 294 |
\isacommand{end}\isanewline |
paulson@10602 | 295 |
\end{isabellebody}% |
paulson@10602 | 296 |
%%% Local Variables: |
paulson@10602 | 297 |
%%% mode: latex |
paulson@10602 | 298 |
%%% TeX-master: "root" |
paulson@10602 | 299 |
%%% End: |