| author | paulson |
| Tue, 19 Aug 2003 13:53:58 +0200 | |
| changeset 14152 | 12f6f18e7afc |
| parent 13958 | c1c67582c9b5 |
| child 14411 | 7851e526b8b7 |
| permissions | -rw-r--r-- |
(* Title : HLog.thy Author : Jacques D. Fleuriot Copyright : 2000,2001 University of Edinburgh Description : hyperreal base logarithms *) HLog = Log + HTranscendental + constdefs powhr :: [hypreal,hypreal] => hypreal (infixr 80) "x powhr a == ( *f* exp) (a * ( *f* ln) x)" hlog :: [hypreal,hypreal] => hypreal "hlog a x == Abs_hypreal(UN A: Rep_hypreal(a).UN X: Rep_hypreal(x). hyprel `` {%n. log (A n) (X n)})" end