author | paulson |
Tue, 01 Feb 2005 18:01:57 +0100 | |
changeset 15481 | fc075ae929e4 |
parent 15364 | 0c3891c3528f |
child 15614 | b098158a3f39 |
permissions | -rw-r--r-- |
10602 | 1 |
% |
11187 | 2 |
\begin{isabellebody}% |
3 |
\def\isabellecontext{Numbers}% |
|
10602 | 4 |
\isanewline |
11187 | 5 |
\isacommand{theory}\ Numbers\ {\isacharequal}\ Real{\isacharcolon}\isanewline |
10602 | 6 |
\isanewline |
11866 | 7 |
\isamarkupfalse% |
8 |
\isamarkupfalse% |
|
15481 | 9 |
\isamarkupfalse% |
11866 | 10 |
% |
11187 | 11 |
\begin{isamarkuptext}% |
10602 | 12 |
numeric literals; default simprules; can re-orient% |
11187 | 13 |
\end{isamarkuptext}% |
11866 | 14 |
\isamarkuptrue% |
15 |
\isacommand{lemma}\ {\isachardoublequote}{\isadigit{2}}\ {\isacharasterisk}\ m\ {\isacharequal}\ m\ {\isacharplus}\ m{\isachardoublequote}\isamarkupfalse% |
|
16 |
\isamarkuptrue% |
|
15481 | 17 |
\isanewline |
10602 | 18 |
\isanewline |
11866 | 19 |
\isamarkupfalse% |
11187 | 20 |
\isacommand{consts}\ h\ {\isacharcolon}{\isacharcolon}\ {\isachardoublequote}nat\ {\isasymRightarrow}\ nat{\isachardoublequote}\isanewline |
11866 | 21 |
\isamarkupfalse% |
11187 | 22 |
\isacommand{recdef}\ h\ {\isachardoublequote}{\isacharbraceleft}{\isacharbraceright}{\isachardoublequote}\isanewline |
11866 | 23 |
{\isachardoublequote}h\ i\ {\isacharequal}\ {\isacharparenleft}if\ i\ {\isacharequal}\ {\isadigit{3}}\ then\ {\isadigit{2}}\ else\ i{\isacharparenright}{\isachardoublequote}\isamarkupfalse% |
24 |
% |
|
11187 | 25 |
\begin{isamarkuptext}% |
11708 | 26 |
\isa{h\ {\isadigit{3}}\ {\isacharequal}\ {\isadigit{2}}} |
11187 | 27 |
\isa{h\ i\ {\isacharequal}\ i}% |
28 |
\end{isamarkuptext}% |
|
11866 | 29 |
\isamarkuptrue% |
10878 | 30 |
% |
11187 | 31 |
\begin{isamarkuptext}% |
32 |
\begin{isabelle}% |
|
14387
e96d5c42c4b0
Polymorphic treatment of binary arithmetic using axclasses
paulson
parents:
14353
diff
changeset
|
33 |
Numeral{\isadigit{0}}\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isacharparenright}% |
11187 | 34 |
\end{isabelle} |
11174 | 35 |
\rulename{numeral_0_eq_0} |
10602 | 36 |
|
11187 | 37 |
\begin{isabelle}% |
14387
e96d5c42c4b0
Polymorphic treatment of binary arithmetic using axclasses
paulson
parents:
14353
diff
changeset
|
38 |
Numeral{\isadigit{1}}\ {\isacharequal}\ {\isacharparenleft}{\isadigit{1}}{\isasymColon}{\isacharprime}a{\isacharparenright}% |
10602 | 39 |
\end{isabelle} |
11187 | 40 |
\rulename{numeral_1_eq_1} |
11174 | 41 |
|
11187 | 42 |
\begin{isabelle}% |
11708 | 43 |
{\isadigit{2}}\ {\isacharplus}\ n\ {\isacharequal}\ Suc\ {\isacharparenleft}Suc\ n{\isacharparenright}% |
11187 | 44 |
\end{isabelle} |
10602 | 45 |
\rulename{add_2_eq_Suc} |
11187 | 46 |
|
47 |
\begin{isabelle}% |
|
11708 | 48 |
n\ {\isacharplus}\ {\isadigit{2}}\ {\isacharequal}\ Suc\ {\isacharparenleft}Suc\ n{\isacharparenright}% |
10602 | 49 |
\end{isabelle} |
11174 | 50 |
\rulename{add_2_eq_Suc'} |
51 |
||
11187 | 52 |
\begin{isabelle}% |
14270 | 53 |
a\ {\isacharplus}\ b\ {\isacharplus}\ c\ {\isacharequal}\ a\ {\isacharplus}\ {\isacharparenleft}b\ {\isacharplus}\ c{\isacharparenright}% |
11174 | 54 |
\end{isabelle} |
11187 | 55 |
\rulename{add_assoc} |
10602 | 56 |
|
11187 | 57 |
\begin{isabelle}% |
14270 | 58 |
a\ {\isacharplus}\ b\ {\isacharequal}\ b\ {\isacharplus}\ a% |
11174 | 59 |
\end{isabelle} |
11187 | 60 |
\rulename{add_commute} |
10602 | 61 |
|
11187 | 62 |
\begin{isabelle}% |
14270 | 63 |
a\ {\isacharplus}\ {\isacharparenleft}b\ {\isacharplus}\ c{\isacharparenright}\ {\isacharequal}\ b\ {\isacharplus}\ {\isacharparenleft}a\ {\isacharplus}\ c{\isacharparenright}% |
11187 | 64 |
\end{isabelle} |
11174 | 65 |
\rulename{add_left_commute} |
10602 | 66 |
|
67 |
these form add_ac; similarly there is mult_ac% |
|
11187 | 68 |
\end{isamarkuptext}% |
11866 | 69 |
\isamarkuptrue% |
70 |
\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}\isamarkupfalse% |
|
71 |
\isamarkuptrue% |
|
15481 | 72 |
\isamarkupfalse% |
11866 | 73 |
\isamarkuptrue% |
15481 | 74 |
\isamarkupfalse% |
11866 | 75 |
% |
11187 | 76 |
\begin{isamarkuptext}% |
77 |
\begin{isabelle}% |
|
78 |
m\ {\isasymle}\ n\ {\isasymLongrightarrow}\ m\ div\ k\ {\isasymle}\ n\ div\ k% |
|
79 |
\end{isabelle} |
|
11174 | 80 |
\rulename{div_le_mono} |
10602 | 81 |
|
11187 | 82 |
\begin{isabelle}% |
83 |
{\isacharparenleft}m\ {\isacharminus}\ n{\isacharparenright}\ {\isacharasterisk}\ k\ {\isacharequal}\ m\ {\isacharasterisk}\ k\ {\isacharminus}\ n\ {\isacharasterisk}\ k% |
|
84 |
\end{isabelle} |
|
11174 | 85 |
\rulename{diff_mult_distrib} |
10602 | 86 |
|
11187 | 87 |
\begin{isabelle}% |
88 |
m\ mod\ n\ {\isacharasterisk}\ k\ {\isacharequal}\ m\ {\isacharasterisk}\ k\ mod\ {\isacharparenleft}n\ {\isacharasterisk}\ k{\isacharparenright}% |
|
89 |
\end{isabelle} |
|
11174 | 90 |
\rulename{mod_mult_distrib} |
10602 | 91 |
|
11187 | 92 |
\begin{isabelle}% |
93 |
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}% |
|
10602 | 94 |
\end{isabelle} |
11187 | 95 |
\rulename{nat_diff_split}% |
96 |
\end{isamarkuptext}% |
|
11866 | 97 |
\isamarkuptrue% |
12156
d2758965362e
new-style numerals without leading #, along with generic 0 and 1
paulson
parents:
11870
diff
changeset
|
98 |
\isacommand{lemma}\ {\isachardoublequote}{\isacharparenleft}n\ {\isacharminus}\ {\isadigit{1}}{\isacharparenright}\ {\isacharasterisk}\ {\isacharparenleft}n\ {\isacharplus}\ {\isadigit{1}}{\isacharparenright}\ {\isacharequal}\ n\ {\isacharasterisk}\ n\ {\isacharminus}\ {\isacharparenleft}{\isadigit{1}}{\isacharcolon}{\isacharcolon}nat{\isacharparenright}{\isachardoublequote}\isanewline |
d2758965362e
new-style numerals without leading #, along with generic 0 and 1
paulson
parents:
11870
diff
changeset
|
99 |
\isamarkupfalse% |
15481 | 100 |
\isamarkupfalse% |
101 |
\isamarkupfalse% |
|
12156
d2758965362e
new-style numerals without leading #, along with generic 0 and 1
paulson
parents:
11870
diff
changeset
|
102 |
\isanewline |
d2758965362e
new-style numerals without leading #, along with generic 0 and 1
paulson
parents:
11870
diff
changeset
|
103 |
\isanewline |
d2758965362e
new-style numerals without leading #, along with generic 0 and 1
paulson
parents:
11870
diff
changeset
|
104 |
\isanewline |
d2758965362e
new-style numerals without leading #, along with generic 0 and 1
paulson
parents:
11870
diff
changeset
|
105 |
\isamarkupfalse% |
11708 | 106 |
\isacommand{lemma}\ {\isachardoublequote}{\isacharparenleft}n\ {\isacharminus}\ {\isadigit{2}}{\isacharparenright}\ {\isacharasterisk}\ {\isacharparenleft}n\ {\isacharplus}\ {\isadigit{2}}{\isacharparenright}\ {\isacharequal}\ n\ {\isacharasterisk}\ n\ {\isacharminus}\ {\isacharparenleft}{\isadigit{4}}{\isacharcolon}{\isacharcolon}nat{\isacharparenright}{\isachardoublequote}\isanewline |
11866 | 107 |
\isamarkupfalse% |
15481 | 108 |
\isamarkupfalse% |
11866 | 109 |
\isamarkupfalse% |
110 |
\isamarkupfalse% |
|
111 |
% |
|
11187 | 112 |
\begin{isamarkuptext}% |
113 |
\begin{isabelle}% |
|
114 |
m\ mod\ n\ {\isacharequal}\ {\isacharparenleft}if\ m\ {\isacharless}\ n\ then\ m\ else\ {\isacharparenleft}m\ {\isacharminus}\ n{\isacharparenright}\ mod\ n{\isacharparenright}% |
|
115 |
\end{isabelle} |
|
11174 | 116 |
\rulename{mod_if} |
11187 | 117 |
|
118 |
\begin{isabelle}% |
|
119 |
m\ div\ n\ {\isacharasterisk}\ n\ {\isacharplus}\ m\ mod\ n\ {\isacharequal}\ m% |
|
10602 | 120 |
\end{isabelle} |
11174 | 121 |
\rulename{mod_div_equality} |
10602 | 122 |
|
123 |
||
11187 | 124 |
\begin{isabelle}% |
125 |
a\ {\isacharasterisk}\ b\ div\ c\ {\isacharequal}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ div\ c{\isacharparenright}\ {\isacharplus}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ mod\ c{\isacharparenright}\ div\ c% |
|
126 |
\end{isabelle} |
|
11174 | 127 |
\rulename{div_mult1_eq} |
10602 | 128 |
|
11187 | 129 |
\begin{isabelle}% |
130 |
a\ {\isacharasterisk}\ b\ mod\ c\ {\isacharequal}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ mod\ c{\isacharparenright}\ mod\ c% |
|
131 |
\end{isabelle} |
|
11174 | 132 |
\rulename{mod_mult1_eq} |
10602 | 133 |
|
11187 | 134 |
\begin{isabelle}% |
135 |
a\ div\ {\isacharparenleft}b\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\ a\ div\ b\ div\ c% |
|
136 |
\end{isabelle} |
|
11174 | 137 |
\rulename{div_mult2_eq} |
10602 | 138 |
|
11187 | 139 |
\begin{isabelle}% |
140 |
a\ mod\ {\isacharparenleft}b\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\ b\ {\isacharasterisk}\ {\isacharparenleft}a\ div\ b\ mod\ c{\isacharparenright}\ {\isacharplus}\ a\ mod\ b% |
|
141 |
\end{isabelle} |
|
11174 | 142 |
\rulename{mod_mult2_eq} |
10602 | 143 |
|
11187 | 144 |
\begin{isabelle}% |
145 |
{\isadigit{0}}\ {\isacharless}\ c\ {\isasymLongrightarrow}\ c\ {\isacharasterisk}\ a\ div\ {\isacharparenleft}c\ {\isacharasterisk}\ b{\isacharparenright}\ {\isacharequal}\ a\ div\ b% |
|
146 |
\end{isabelle} |
|
11174 | 147 |
\rulename{div_mult_mult1} |
10602 | 148 |
|
11187 | 149 |
\begin{isabelle}% |
150 |
a\ div\ {\isadigit{0}}\ {\isacharequal}\ {\isadigit{0}}% |
|
151 |
\end{isabelle} |
|
11174 | 152 |
\rulename{DIVISION_BY_ZERO_DIV} |
10602 | 153 |
|
11187 | 154 |
\begin{isabelle}% |
155 |
a\ mod\ {\isadigit{0}}\ {\isacharequal}\ a% |
|
156 |
\end{isabelle} |
|
11174 | 157 |
\rulename{DIVISION_BY_ZERO_MOD} |
10602 | 158 |
|
11187 | 159 |
\begin{isabelle}% |
160 |
{\isasymlbrakk}m\ dvd\ n{\isacharsemicolon}\ n\ dvd\ m{\isasymrbrakk}\ {\isasymLongrightarrow}\ m\ {\isacharequal}\ n% |
|
161 |
\end{isabelle} |
|
11174 | 162 |
\rulename{dvd_anti_sym} |
10602 | 163 |
|
11187 | 164 |
\begin{isabelle}% |
165 |
{\isasymlbrakk}k\ dvd\ m{\isacharsemicolon}\ k\ dvd\ n{\isasymrbrakk}\ {\isasymLongrightarrow}\ k\ dvd\ m\ {\isacharplus}\ n% |
|
166 |
\end{isabelle} |
|
11174 | 167 |
\rulename{dvd_add} |
10602 | 168 |
|
169 |
For the integers, I'd list a few theorems that somehow involve negative |
|
13758 | 170 |
numbers.% |
171 |
\end{isamarkuptext}% |
|
172 |
\isamarkuptrue% |
|
173 |
% |
|
174 |
\begin{isamarkuptext}% |
|
10602 | 175 |
Division, remainder of negatives |
176 |
||
177 |
||
11187 | 178 |
\begin{isabelle}% |
11870
181bd2050cf4
Numerals now work for the integers: the binary numerals for 0 and 1 rewrite
paulson
parents:
11866
diff
changeset
|
179 |
{\isadigit{0}}\ {\isacharless}\ b\ {\isasymLongrightarrow}\ {\isadigit{0}}\ {\isasymle}\ a\ mod\ b% |
11187 | 180 |
\end{isabelle} |
11174 | 181 |
\rulename{pos_mod_sign} |
10602 | 182 |
|
11187 | 183 |
\begin{isabelle}% |
11870
181bd2050cf4
Numerals now work for the integers: the binary numerals for 0 and 1 rewrite
paulson
parents:
11866
diff
changeset
|
184 |
{\isadigit{0}}\ {\isacharless}\ b\ {\isasymLongrightarrow}\ a\ mod\ b\ {\isacharless}\ b% |
11174 | 185 |
\end{isabelle} |
11187 | 186 |
\rulename{pos_mod_bound} |
10602 | 187 |
|
11187 | 188 |
\begin{isabelle}% |
11870
181bd2050cf4
Numerals now work for the integers: the binary numerals for 0 and 1 rewrite
paulson
parents:
11866
diff
changeset
|
189 |
b\ {\isacharless}\ {\isadigit{0}}\ {\isasymLongrightarrow}\ a\ mod\ b\ {\isasymle}\ {\isadigit{0}}% |
11174 | 190 |
\end{isabelle} |
11187 | 191 |
\rulename{neg_mod_sign} |
10602 | 192 |
|
11187 | 193 |
\begin{isabelle}% |
11870
181bd2050cf4
Numerals now work for the integers: the binary numerals for 0 and 1 rewrite
paulson
parents:
11866
diff
changeset
|
194 |
b\ {\isacharless}\ {\isadigit{0}}\ {\isasymLongrightarrow}\ b\ {\isacharless}\ a\ mod\ b% |
11187 | 195 |
\end{isabelle} |
11174 | 196 |
\rulename{neg_mod_bound} |
10602 | 197 |
|
11187 | 198 |
\begin{isabelle}% |
199 |
{\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% |
|
11174 | 200 |
\end{isabelle} |
11187 | 201 |
\rulename{zdiv_zadd1_eq} |
10602 | 202 |
|
11187 | 203 |
\begin{isabelle}% |
204 |
{\isacharparenleft}a\ {\isacharplus}\ b{\isacharparenright}\ mod\ c\ {\isacharequal}\ {\isacharparenleft}a\ mod\ c\ {\isacharplus}\ b\ mod\ c{\isacharparenright}\ mod\ c% |
|
205 |
\end{isabelle} |
|
10602 | 206 |
\rulename{zmod_zadd1_eq} |
207 |
||
11187 | 208 |
\begin{isabelle}% |
209 |
a\ {\isacharasterisk}\ b\ div\ c\ {\isacharequal}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ div\ c{\isacharparenright}\ {\isacharplus}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ mod\ c{\isacharparenright}\ div\ c% |
|
10602 | 210 |
\end{isabelle} |
11187 | 211 |
\rulename{zdiv_zmult1_eq} |
10602 | 212 |
|
11187 | 213 |
\begin{isabelle}% |
214 |
a\ {\isacharasterisk}\ b\ mod\ c\ {\isacharequal}\ a\ {\isacharasterisk}\ {\isacharparenleft}b\ mod\ c{\isacharparenright}\ mod\ c% |
|
215 |
\end{isabelle} |
|
10602 | 216 |
\rulename{zmod_zmult1_eq} |
217 |
||
11187 | 218 |
\begin{isabelle}% |
11870
181bd2050cf4
Numerals now work for the integers: the binary numerals for 0 and 1 rewrite
paulson
parents:
11866
diff
changeset
|
219 |
{\isadigit{0}}\ {\isacharless}\ c\ {\isasymLongrightarrow}\ a\ div\ {\isacharparenleft}b\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\ a\ div\ b\ div\ c% |
11174 | 220 |
\end{isabelle} |
11187 | 221 |
\rulename{zdiv_zmult2_eq} |
10602 | 222 |
|
11187 | 223 |
\begin{isabelle}% |
11870
181bd2050cf4
Numerals now work for the integers: the binary numerals for 0 and 1 rewrite
paulson
parents:
11866
diff
changeset
|
224 |
{\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% |
11187 | 225 |
\end{isabelle} |
14400 | 226 |
\rulename{zmod_zmult2_eq}% |
11187 | 227 |
\end{isamarkuptext}% |
11866 | 228 |
\isamarkuptrue% |
11187 | 229 |
\isacommand{lemma}\ {\isachardoublequote}abs\ {\isacharparenleft}x{\isacharplus}y{\isacharparenright}\ {\isasymle}\ abs\ x\ {\isacharplus}\ abs\ {\isacharparenleft}y\ {\isacharcolon}{\isacharcolon}\ int{\isacharparenright}{\isachardoublequote}\isanewline |
11866 | 230 |
\isamarkupfalse% |
15481 | 231 |
\isanewline |
11174 | 232 |
\isanewline |
11866 | 233 |
\isamarkupfalse% |
11708 | 234 |
\isacommand{lemma}\ {\isachardoublequote}abs\ {\isacharparenleft}{\isadigit{2}}{\isacharasterisk}x{\isacharparenright}\ {\isacharequal}\ {\isadigit{2}}\ {\isacharasterisk}\ abs\ {\isacharparenleft}x\ {\isacharcolon}{\isacharcolon}\ int{\isacharparenright}{\isachardoublequote}\isanewline |
11866 | 235 |
\isamarkupfalse% |
15481 | 236 |
\isamarkupfalse% |
11866 | 237 |
% |
11187 | 238 |
\begin{isamarkuptext}% |
13758 | 239 |
Induction rules for the Integers |
240 |
||
241 |
\begin{isabelle}% |
|
242 |
{\isasymlbrakk}k\ {\isasymle}\ i{\isacharsemicolon}\ P\ k{\isacharsemicolon}\ {\isasymAnd}i{\isachardot}\ {\isasymlbrakk}k\ {\isasymle}\ i{\isacharsemicolon}\ P\ i{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ {\isacharparenleft}i\ {\isacharplus}\ {\isadigit{1}}{\isacharparenright}{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ i% |
|
243 |
\end{isabelle} |
|
244 |
\rulename{int_ge_induct} |
|
245 |
||
246 |
\begin{isabelle}% |
|
247 |
{\isasymlbrakk}k\ {\isacharless}\ i{\isacharsemicolon}\ P\ {\isacharparenleft}k\ {\isacharplus}\ {\isadigit{1}}{\isacharparenright}{\isacharsemicolon}\ {\isasymAnd}i{\isachardot}\ {\isasymlbrakk}k\ {\isacharless}\ i{\isacharsemicolon}\ P\ i{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ {\isacharparenleft}i\ {\isacharplus}\ {\isadigit{1}}{\isacharparenright}{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ i% |
|
248 |
\end{isabelle} |
|
249 |
\rulename{int_gr_induct} |
|
250 |
||
251 |
\begin{isabelle}% |
|
252 |
{\isasymlbrakk}i\ {\isasymle}\ k{\isacharsemicolon}\ P\ k{\isacharsemicolon}\ {\isasymAnd}i{\isachardot}\ {\isasymlbrakk}i\ {\isasymle}\ k{\isacharsemicolon}\ P\ i{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ {\isacharparenleft}i\ {\isacharminus}\ {\isadigit{1}}{\isacharparenright}{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ i% |
|
253 |
\end{isabelle} |
|
254 |
\rulename{int_le_induct} |
|
255 |
||
256 |
\begin{isabelle}% |
|
257 |
{\isasymlbrakk}i\ {\isacharless}\ k{\isacharsemicolon}\ P\ {\isacharparenleft}k\ {\isacharminus}\ {\isadigit{1}}{\isacharparenright}{\isacharsemicolon}\ {\isasymAnd}i{\isachardot}\ {\isasymlbrakk}i\ {\isacharless}\ k{\isacharsemicolon}\ P\ i{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ {\isacharparenleft}i\ {\isacharminus}\ {\isadigit{1}}{\isacharparenright}{\isasymrbrakk}\ {\isasymLongrightarrow}\ P\ i% |
|
258 |
\end{isabelle} |
|
259 |
\rulename{int_less_induct}% |
|
260 |
\end{isamarkuptext}% |
|
261 |
\isamarkuptrue% |
|
262 |
% |
|
263 |
\begin{isamarkuptext}% |
|
14400 | 264 |
FIELDS |
10776 | 265 |
|
11187 | 266 |
\begin{isabelle}% |
15364 | 267 |
a\ {\isacharless}\ b\ {\isasymLongrightarrow}\ {\isasymexists}r{\isachargreater}a{\isachardot}\ r\ {\isacharless}\ b% |
11187 | 268 |
\end{isabelle} |
14295 | 269 |
\rulename{dense} |
10776 | 270 |
|
11187 | 271 |
\begin{isabelle}% |
14288 | 272 |
a\ {\isacharasterisk}\ {\isacharparenleft}b\ {\isacharslash}\ c{\isacharparenright}\ {\isacharequal}\ a\ {\isacharasterisk}\ b\ {\isacharslash}\ c% |
11187 | 273 |
\end{isabelle} |
14288 | 274 |
\rulename{times_divide_eq_right} |
10776 | 275 |
|
11187 | 276 |
\begin{isabelle}% |
14288 | 277 |
b\ {\isacharslash}\ c\ {\isacharasterisk}\ a\ {\isacharequal}\ b\ {\isacharasterisk}\ a\ {\isacharslash}\ c% |
11187 | 278 |
\end{isabelle} |
14288 | 279 |
\rulename{times_divide_eq_left} |
10776 | 280 |
|
11187 | 281 |
\begin{isabelle}% |
14288 | 282 |
a\ {\isacharslash}\ {\isacharparenleft}b\ {\isacharslash}\ c{\isacharparenright}\ {\isacharequal}\ a\ {\isacharasterisk}\ c\ {\isacharslash}\ b% |
11187 | 283 |
\end{isabelle} |
14288 | 284 |
\rulename{divide_divide_eq_right} |
10776 | 285 |
|
11187 | 286 |
\begin{isabelle}% |
14288 | 287 |
a\ {\isacharslash}\ b\ {\isacharslash}\ c\ {\isacharequal}\ a\ {\isacharslash}\ {\isacharparenleft}b\ {\isacharasterisk}\ c{\isacharparenright}% |
11187 | 288 |
\end{isabelle} |
14288 | 289 |
\rulename{divide_divide_eq_left} |
10776 | 290 |
|
11187 | 291 |
\begin{isabelle}% |
14295 | 292 |
{\isacharminus}\ {\isacharparenleft}a\ {\isacharslash}\ b{\isacharparenright}\ {\isacharequal}\ {\isacharminus}\ a\ {\isacharslash}\ b% |
11187 | 293 |
\end{isabelle} |
14295 | 294 |
\rulename{minus_divide_left} |
10776 | 295 |
|
11187 | 296 |
\begin{isabelle}% |
14295 | 297 |
{\isacharminus}\ {\isacharparenleft}a\ {\isacharslash}\ b{\isacharparenright}\ {\isacharequal}\ a\ {\isacharslash}\ {\isacharminus}\ b% |
11187 | 298 |
\end{isabelle} |
14295 | 299 |
\rulename{minus_divide_right} |
10776 | 300 |
|
301 |
This last NOT a simprule |
|
302 |
||
11187 | 303 |
\begin{isabelle}% |
14295 | 304 |
{\isacharparenleft}a\ {\isacharplus}\ b{\isacharparenright}\ {\isacharslash}\ c\ {\isacharequal}\ a\ {\isacharslash}\ c\ {\isacharplus}\ b\ {\isacharslash}\ c% |
11174 | 305 |
\end{isabelle} |
14295 | 306 |
\rulename{add_divide_distrib}% |
11187 | 307 |
\end{isamarkuptext}% |
11866 | 308 |
\isamarkuptrue% |
11708 | 309 |
\isacommand{lemma}\ {\isachardoublequote}{\isadigit{3}}{\isacharslash}{\isadigit{4}}\ {\isacharless}\ {\isacharparenleft}{\isadigit{7}}{\isacharslash}{\isadigit{8}}\ {\isacharcolon}{\isacharcolon}\ real{\isacharparenright}{\isachardoublequote}\isanewline |
11866 | 310 |
\isamarkupfalse% |
11174 | 311 |
\isanewline |
11866 | 312 |
\isamarkupfalse% |
313 |
\isacommand{lemma}\ {\isachardoublequote}P\ {\isacharparenleft}{\isacharparenleft}{\isadigit{3}}{\isacharslash}{\isadigit{4}}{\isacharparenright}\ {\isacharasterisk}\ {\isacharparenleft}{\isadigit{8}}{\isacharslash}{\isadigit{1}}{\isadigit{5}}\ {\isacharcolon}{\isacharcolon}\ real{\isacharparenright}{\isacharparenright}{\isachardoublequote}\isamarkupfalse% |
|
314 |
\isamarkuptrue% |
|
15481 | 315 |
\isamarkupfalse% |
11866 | 316 |
\isamarkuptrue% |
15481 | 317 |
\isanewline |
11174 | 318 |
\isanewline |
11866 | 319 |
\isamarkupfalse% |
320 |
\isacommand{lemma}\ {\isachardoublequote}{\isacharparenleft}{\isadigit{3}}{\isacharslash}{\isadigit{4}}{\isacharparenright}\ {\isacharasterisk}\ {\isacharparenleft}{\isadigit{8}}{\isacharslash}{\isadigit{1}}{\isadigit{5}}{\isacharparenright}\ {\isacharless}\ {\isacharparenleft}x\ {\isacharcolon}{\isacharcolon}\ real{\isacharparenright}{\isachardoublequote}\isamarkupfalse% |
|
321 |
\isamarkuptrue% |
|
15481 | 322 |
\isamarkupfalse% |
11866 | 323 |
\isamarkuptrue% |
15481 | 324 |
\isanewline |
11187 | 325 |
\isanewline |
11866 | 326 |
\isamarkupfalse% |
11708 | 327 |
\isacommand{lemma}\ {\isachardoublequote}{\isacharparenleft}{\isadigit{3}}{\isacharslash}{\isadigit{4}}{\isacharparenright}\ {\isacharasterisk}\ {\isacharparenleft}{\isadigit{1}}{\isadigit{0}}{\isacharcircum}{\isadigit{1}}{\isadigit{5}}{\isacharparenright}\ {\isacharless}\ {\isacharparenleft}x\ {\isacharcolon}{\isacharcolon}\ real{\isacharparenright}{\isachardoublequote}\isanewline |
11866 | 328 |
\isamarkupfalse% |
329 |
\isamarkupfalse% |
|
15481 | 330 |
\isamarkupfalse% |
14400 | 331 |
% |
332 |
\begin{isamarkuptext}% |
|
333 |
Ring and Field |
|
334 |
||
335 |
Requires a field, or else an ordered ring |
|
336 |
||
337 |
\begin{isabelle}% |
|
338 |
{\isacharparenleft}a\ {\isacharasterisk}\ b\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isacharparenright}{\isacharparenright}\ {\isacharequal}\ {\isacharparenleft}a\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isacharparenright}\ {\isasymor}\ b\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isacharparenright}{\isacharparenright}% |
|
339 |
\end{isabelle} |
|
340 |
\rulename{mult_eq_0_iff} |
|
341 |
||
342 |
\begin{isabelle}% |
|
343 |
{\isacharparenleft}a\ {\isacharasterisk}\ b\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isacharparenright}{\isacharparenright}\ {\isacharequal}\ {\isacharparenleft}a\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isacharparenright}\ {\isasymor}\ b\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isacharparenright}{\isacharparenright}% |
|
344 |
\end{isabelle} |
|
345 |
\rulename{field_mult_eq_0_iff} |
|
346 |
||
347 |
\begin{isabelle}% |
|
348 |
{\isacharparenleft}a\ {\isacharasterisk}\ c\ {\isacharequal}\ b\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\ {\isacharparenleft}c\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isacharparenright}\ {\isasymor}\ a\ {\isacharequal}\ b{\isacharparenright}% |
|
349 |
\end{isabelle} |
|
350 |
\rulename{mult_cancel_right} |
|
351 |
||
352 |
\begin{isabelle}% |
|
353 |
{\isacharparenleft}a\ {\isacharasterisk}\ c\ {\isacharequal}\ b\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\ {\isacharparenleft}c\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isacharparenright}\ {\isasymor}\ a\ {\isacharequal}\ b{\isacharparenright}% |
|
354 |
\end{isabelle} |
|
355 |
\rulename{field_mult_cancel_right}% |
|
356 |
\end{isamarkuptext}% |
|
357 |
\isamarkuptrue% |
|
15481 | 358 |
\isamarkupfalse% |
14400 | 359 |
% |
360 |
\begin{isamarkuptext}% |
|
361 |
effect of show sorts on the above |
|
362 |
||
363 |
\begin{isabelle}% |
|
364 |
{\isacharparenleft}{\isacharparenleft}a{\isasymColon}{\isacharprime}a{\isasymColon}field{\isacharparenright}\ {\isacharasterisk}\ {\isacharparenleft}c{\isasymColon}{\isacharprime}a{\isasymColon}field{\isacharparenright}\ {\isacharequal}\ {\isacharparenleft}b{\isasymColon}{\isacharprime}a{\isasymColon}field{\isacharparenright}\ {\isacharasterisk}\ c{\isacharparenright}\ {\isacharequal}\isanewline |
|
365 |
{\isacharparenleft}c\ {\isacharequal}\ {\isacharparenleft}{\isadigit{0}}{\isasymColon}{\isacharprime}a{\isasymColon}field{\isacharparenright}\ {\isasymor}\ a\ {\isacharequal}\ b{\isacharparenright}% |
|
366 |
\end{isabelle} |
|
367 |
\rulename{field_mult_cancel_right}% |
|
368 |
\end{isamarkuptext}% |
|
369 |
\isamarkuptrue% |
|
15481 | 370 |
\isamarkupfalse% |
14400 | 371 |
% |
372 |
\begin{isamarkuptext}% |
|
373 |
absolute value |
|
374 |
||
375 |
\begin{isabelle}% |
|
376 |
{\isasymbar}a\ {\isacharasterisk}\ b{\isasymbar}\ {\isacharequal}\ {\isasymbar}a{\isasymbar}\ {\isacharasterisk}\ {\isasymbar}b{\isasymbar}% |
|
377 |
\end{isabelle} |
|
378 |
\rulename{abs_mult} |
|
379 |
||
380 |
\begin{isabelle}% |
|
381 |
{\isacharparenleft}{\isasymbar}a{\isasymbar}\ {\isasymle}\ b{\isacharparenright}\ {\isacharequal}\ {\isacharparenleft}a\ {\isasymle}\ b\ {\isasymand}\ {\isacharminus}\ a\ {\isasymle}\ b{\isacharparenright}% |
|
382 |
\end{isabelle} |
|
383 |
\rulename{abs_le_iff} |
|
384 |
||
385 |
\begin{isabelle}% |
|
386 |
{\isasymbar}a\ {\isacharplus}\ b{\isasymbar}\ {\isasymle}\ {\isasymbar}a{\isasymbar}\ {\isacharplus}\ {\isasymbar}b{\isasymbar}% |
|
387 |
\end{isabelle} |
|
388 |
\rulename{abs_triangle_ineq} |
|
389 |
||
390 |
\begin{isabelle}% |
|
391 |
a\ {\isacharcircum}\ {\isacharparenleft}m\ {\isacharplus}\ n{\isacharparenright}\ {\isacharequal}\ a\ {\isacharcircum}\ m\ {\isacharasterisk}\ a\ {\isacharcircum}\ n% |
|
392 |
\end{isabelle} |
|
393 |
\rulename{power_add} |
|
394 |
||
395 |
\begin{isabelle}% |
|
396 |
a\ {\isacharcircum}\ {\isacharparenleft}m\ {\isacharasterisk}\ n{\isacharparenright}\ {\isacharequal}\ {\isacharparenleft}a\ {\isacharcircum}\ m{\isacharparenright}\ {\isacharcircum}\ n% |
|
397 |
\end{isabelle} |
|
398 |
\rulename{power_mult} |
|
399 |
||
400 |
\begin{isabelle}% |
|
401 |
{\isasymbar}a\ {\isacharcircum}\ n{\isasymbar}\ {\isacharequal}\ {\isasymbar}a{\isasymbar}\ {\isacharcircum}\ n% |
|
402 |
\end{isabelle} |
|
403 |
\rulename{power_abs}% |
|
404 |
\end{isamarkuptext}% |
|
405 |
\isamarkuptrue% |
|
10602 | 406 |
\isacommand{end}\isanewline |
11866 | 407 |
\isamarkupfalse% |
11187 | 408 |
\end{isabellebody}% |
10602 | 409 |
%%% Local Variables: |
410 |
%%% mode: latex |
|
411 |
%%% TeX-master: "root" |
|
412 |
%%% End: |