654 |
(defcalcmodevar calc-matrix-mode nil |
(defcalcmodevar calc-matrix-mode nil |
655 |
"If `matrix', variables are assumed to be matrix-valued. |
"If `matrix', variables are assumed to be matrix-valued. |
656 |
If a number, variables are assumed to be NxN matrices. |
If a number, variables are assumed to be NxN matrices. |
657 |
|
If `square', variables are assumed to be square matrices of an unspecified size. |
658 |
If `scalar', variables are assumed to be scalar-valued. |
If `scalar', variables are assumed to be scalar-valued. |
659 |
If nil, symbolic math routines make no assumptions about variables.") |
If nil, symbolic math routines make no assumptions about variables.") |
660 |
|
|
1552 |
(cond ((eq calc-matrix-mode 'matrix) "Matrix ") |
(cond ((eq calc-matrix-mode 'matrix) "Matrix ") |
1553 |
((integerp calc-matrix-mode) |
((integerp calc-matrix-mode) |
1554 |
(format "Matrix%d " calc-matrix-mode)) |
(format "Matrix%d " calc-matrix-mode)) |
1555 |
|
((eq calc-matrix-mode 'square) "SqMatrix ") |
1556 |
((eq calc-matrix-mode 'scalar) "Scalar ") |
((eq calc-matrix-mode 'scalar) "Scalar ") |
1557 |
(t "")) |
(t "")) |
1558 |
(if (eq calc-complex-mode 'polar) "Polar " "") |
(if (eq calc-complex-mode 'polar) "Polar " "") |