author | kleing |
Thu, 17 Jan 2002 15:06:36 +0100 | |
changeset 12791 | ccc0f45ad2c4 |
parent 12018 | ec054019c910 |
child 14265 | 95b42e69436c |
permissions | -rw-r--r-- |
(* Title : HOL/Real/RealPow.thy ID : $Id$ Author : Jacques D. Fleuriot Copyright : 1998 University of Cambridge Description : Natural powers theory *) theory RealPow = RealAbs: (*belongs to theory RealAbs*) lemmas [arith_split] = abs_split instance real :: power .. primrec (realpow) realpow_0: "r ^ 0 = 1" realpow_Suc: "r ^ (Suc n) = (r::real) * (r ^ n)" end