author | wenzelm |
Mon, 29 Nov 1999 15:52:49 +0100 | |
changeset 8039 | a901bafe4578 |
parent 7032 | d6efb3b8e669 |
child 9509 | 0f3ee1f89ca8 |
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 *) NatBin = IntDiv + instance nat :: number defs nat_number_of_def "number_of v == nat (number_of v)" (*::bin=>nat ::bin=>int*) end