405 |
pascal Use Pascal language notation. |
pascal Use Pascal language notation. |
406 |
fortran Use Fortran language notation. |
fortran Use Fortran language notation. |
407 |
tex Use TeX notation. |
tex Use TeX notation. |
408 |
|
latex Use LaTeX notation. |
409 |
eqn Use eqn notation. |
eqn Use eqn notation. |
410 |
math Use Mathematica(tm) notation. |
math Use Mathematica(tm) notation. |
411 |
maple Use Maple notation.") |
maple Use Maple notation.") |
705 |
(defvar math-eval-rules-cache-tag t) |
(defvar math-eval-rules-cache-tag t) |
706 |
(defvar math-radix-explicit-format t) |
(defvar math-radix-explicit-format t) |
707 |
(defvar math-expr-function-mapping nil) |
(defvar math-expr-function-mapping nil) |
708 |
|
(defvar math-expr-special-function-mapping nil) |
709 |
(defvar math-expr-variable-mapping nil) |
(defvar math-expr-variable-mapping nil) |
710 |
(defvar math-read-expr-quotes nil) |
(defvar math-read-expr-quotes nil) |
711 |
(defvar math-working-step nil) |
(defvar math-working-step nil) |
1370 |
(if calc-leading-zeros "Zero " "") |
(if calc-leading-zeros "Zero " "") |
1371 |
(cond ((null calc-language) "") |
(cond ((null calc-language) "") |
1372 |
((eq calc-language 'tex) "TeX ") |
((eq calc-language 'tex) "TeX ") |
1373 |
|
((eq calc-language 'latex) "LaTeX ") |
1374 |
(t (concat |
(t (concat |
1375 |
(capitalize (symbol-name calc-language)) |
(capitalize (symbol-name calc-language)) |
1376 |
" "))) |
" "))) |