;ELC
;;; compiled by jimb@geech.gnu.ai.mit.edu on Mon Jul 5 23:03:51 1993
;;; from file /gd/gnu/emacs/19.0/lisp/float-sup.el
;;; emacs version 19.15.16.
;;; 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 "This file was compiled for Emacs 19"))
(byte-code "ÀÁ!„\nÂÃ!ˆÀ‡" [fboundp atan error "Floating point was disabled at compile time"] 2)
(defconst pi (byte-code "ÀÁ!Â_‡" [atan 1 4] 2) "\
The value of Pi (3.1415926...)")
(defconst e (exp 1) "\
The value of e (2.7182818...)")
(defconst degrees-to-radians (/ pi 180.0) "\
Degrees to radian conversion constant")
(defconst radians-to-degrees (/ 180.0 pi) "\
Radian to degree conversion constant")
(defalias 'degrees-to-radians '(macro . #[(x) "À Â¥E‡" [* pi 180.0 x] 3 "\
Convert ARG from degrees to radians."]))
(defalias 'radians-to-degrees '(macro . #[(x) "ÀÁ\n¥E‡" [* 180.0 pi x] 3 "\
Convert ARG from radians to degrees."]))
(provide (quote lisp-float-type))