;ELC   
;;; compiled by erik@naggum.no on Sun Jan 14 05:13:54 1996
;;; from file /gd/gnu/emacs/19.0/lisp/float-sup.el
;;; emacs version 19.30.70.6.
;;; bytecomp version FSF 2.10
;;; optimization is on.
;;; this file uses opcodes which do not exist in Emacs 18.

(if (and (boundp 'emacs-version)
	 (or (and (boundp 'epoch::version) epoch::version)
	     (string-lessp emacs-version "19.29")))
    (error "`float-sup.el' was compiled for Emacs 19.29 or later"))


(byte-code "ÀÁ!„\n ÂÃ!ˆÀ‡" [fboundp atan error "Floating point was disabled at compile time"] 2)
#@32 The value of Pi (3.1415926...)
(defconst pi (byte-code "ÀÁ!Â_‡" [atan 1 4] 2) (#$ . 565))
#@31 The value of e (2.7182818...)
(defconst e (exp 1) (#$ . 661))
#@39 Degrees to radian conversion constant
(defconst degrees-to-radians (/ pi 180.0) (#$ . 729))
#@38 Radian to degree conversion constant
(defconst radians-to-degrees (/ 180.0 pi) (#$ . 827))
#@38 Convert ARG from degrees to radians.
(defalias 'degrees-to-radians '(macro . #[(x) "À	Â¥E‡" [* pi 180.0 x] 3 (#$ . 924)]))
#@38 Convert ARG from radians to degrees.
(defalias 'radians-to-degrees '(macro . #[(x) "ÀÁ\n¥E‡" [* 180.0 pi x] 3 (#$ . 1054)]))
(provide (quote lisp-float-type))