3 |
;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. |
;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. |
4 |
|
|
5 |
;; Author: David Gillespie <daveg@synaptics.com> |
;; Author: David Gillespie <daveg@synaptics.com> |
6 |
;; Maintainer: Colin Walters <walters@debian.org> |
;; Maintainers: D. Goel <deego@gnufans.org> |
7 |
|
;; Colin Walters <walters@debian.org> |
8 |
|
|
9 |
;; This file is part of GNU Emacs. |
;; This file is part of GNU Emacs. |
10 |
|
|
326 |
(math-div |
(math-div |
327 |
(math-pow -2 (- tn)) |
(math-pow -2 (- tn)) |
328 |
(math-double-factorial-iter (* -2 tn) 3 1 2)) |
(math-double-factorial-iter (* -2 tn) 3 1 2)) |
329 |
(math-div |
(math-div |
330 |
(math-double-factorial-iter (* 2 tn) 3 1 2) |
(math-double-factorial-iter (* 2 tn) 3 1 2) |
331 |
(math-pow 2 tn))))) |
(math-pow 2 tn))))) |
332 |
(math-mul q (if calc-symbolic-mode |
(math-mul q (if calc-symbolic-mode |