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 |
|
|
253 |
( conjg . calcFunc-conj ) |
( conjg . calcFunc-conj ) |
254 |
( log . calcFunc-ln ) |
( log . calcFunc-ln ) |
255 |
( nint . calcFunc-round ) |
( nint . calcFunc-round ) |
256 |
( real . calcFunc-re ))) |
( real . calcFunc-re ))) |
257 |
|
|
258 |
(put 'fortran 'math-input-filter 'calc-input-case-filter) |
(put 'fortran 'math-input-filter 'calc-input-case-filter) |
259 |
(put 'fortran 'math-output-filter 'calc-output-case-filter) |
(put 'fortran 'math-output-filter 'calc-output-case-filter) |