Function: calc-hyperbolic

calc-hyperbolic is an interactive and byte-compiled function defined in calc-ext.el.gz.

Signature

(calc-hyperbolic &optional N)

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/calc/calc-ext.el.gz
(defun calc-hyperbolic (&optional n)
  (interactive "P")
  (let* ((inv-flag (if (or
                        (eq major-mode 'calc-keypad-mode)
                        (eq major-mode 'calc-trail-mode))
                       (with-current-buffer calc-main-buffer
                         calc-inverse-flag)
                     calc-inverse-flag))
         (opt-flag (if (or
                        (eq major-mode 'calc-keypad-mode)
                        (eq major-mode 'calc-trail-mode))
                       (with-current-buffer calc-main-buffer
                         calc-option-flag)
                     calc-option-flag))
         (msg
          (cond
           ((and opt-flag inv-flag) "Option Inverse Hyperbolic...")
           (opt-flag "Option Hyperbolic...")
           (inv-flag "Inverse Hyperbolic...")
           (t "Hyperbolic..."))))
    (calc-fancy-prefix 'calc-hyperbolic-flag msg n)))