# HG changeset patch # User haftmann # Date 1268231361 -3600 # Node ID 564a49e8be44d14234b3f63b28cbd43817cc582e # Parent abf91fba0a70bbbb957f0ca484ccff92430547e8 tuned whitespace diff -r abf91fba0a70 -r 564a49e8be44 src/HOL/Code_Numeral.thy --- a/src/HOL/Code_Numeral.thy Wed Mar 10 08:04:50 2010 +0100 +++ b/src/HOL/Code_Numeral.thy Wed Mar 10 15:29:21 2010 +0100 @@ -247,7 +247,7 @@ "nat_of i = nat_of_aux i 0" by (simp add: nat_of_aux_def) -definition div_mod_code_numeral :: "code_numeral \ code_numeral \ code_numeral \ code_numeral" where +definition div_mod_code_numeral :: "code_numeral \ code_numeral \ code_numeral \ code_numeral" where [code del]: "div_mod_code_numeral n m = (n div m, n mod m)" lemma [code]: