;ELC   
;;; compiled by kwzh@hal.gnu.ai.mit.edu on Mon Apr 17 19:39:58 1995
;;; from file /gd/gnu/emacs/19.0/lisp/float-sup.el
;;; emacs version 19.28.90.26.
;;; 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")))
    (error "`/gd/gnu/emacs/19.0/lisp/float-sup.el' was compiled for Emacs 19"))


(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) (#$ . 584))
#@31 The value of e (2.7182818...)
(defconst e (exp 1) (#$ . 680))
#@39 Degrees to radian conversion constant
(defconst degrees-to-radians (/ pi 180.0) (#$ . 748))
#@38 Radian to degree conversion constant
(defconst radians-to-degrees (/ 180.0 pi) (#$ . 846))
#@38 Convert ARG from degrees to radians.
(defalias 'degrees-to-radians '(macro . #[(x) "À	Â¥E‡" [* pi 180.0 x] 3 (#$ . 943)]))
#@38 Convert ARG from radians to degrees.
(defalias 'radians-to-degrees '(macro . #[(x) "ÀÁ\n¥E‡" [* 180.0 pi x] 3 (#$ . 1073)]))
(provide (quote lisp-float-type))