author | nipkow |
Thu, 10 May 2001 17:28:40 +0200 | |
changeset 11295 | 66925f23ac7f |
parent 10574 | 8f98f0301d67 |
child 11464 | ddea204de5bc |
permissions | -rw-r--r-- |
(* Title: HOL/NatBin.thy ID: $Id$ Author: Lawrence C Paulson, Cambridge University Computer Laboratory Copyright 1999 University of Cambridge Binary arithmetic for the natural numbers This case is simply reduced to that for the non-negative integers *) theory NatBin = IntPower files ("nat_bin.ML"): instance nat :: number .. defs nat_number_of_def: "number_of v == nat (number_of v)" (*::bin=>nat ::bin=>int*) use "nat_bin.ML" setup nat_bin_arith_setup end