;ELC   
;;; Compiled by pot@pot.cnuce.cnr.it on Tue Mar 18 15:41:38 2003
;;; from file /home/pot/gnu/emacs-pretest.new/lisp/float-sup.el
;;; in Emacs version 21.3
;;; with bytecomp version 2.85.4.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.
(if (and (boundp 'emacs-version)
	 (< (aref emacs-version (1- (length emacs-version))) ?A)
	 (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 "\300\301!\204\n \302\303!\210\300\207" [fboundp atan error "Floating point was disabled at compile time"] 2)
#@32 The value of Pi (3.1415926...)
(defconst pi (byte-code "\300\301!\302_\207" [atan 1 4] 2) (#$ . 741))
#@31 The value of e (2.7182818...)
(defconst e (exp 1) (#$ . 849))
#@39 Degrees to radian conversion constant
(defconst degrees-to-radians (/ pi 180.0) (#$ . 917))
#@38 Radian to degree conversion constant
(defconst radians-to-degrees (/ 180.0 pi) (#$ . 1015))
#@38 Convert ARG from degrees to radians.
(defalias 'degrees-to-radians '(macro . #[(x) "\302\303\245	E\207" [pi x * 180.0] 3 (#$ . 1113)]))
#@38 Convert ARG from radians to degrees.
(defalias 'radians-to-degrees '(macro . #[(x) "\302\303\245	E\207" [pi x * 180.0] 3 (#$ . 1256)]))
(provide 'lisp-float-type)