diff options
| author | Jay Belanger | 2015-01-28 21:37:24 -0600 |
|---|---|---|
| committer | Jay Belanger | 2015-01-28 21:37:24 -0600 |
| commit | 4ba343984f1ea2bc87493339a315e13ba1410d28 (patch) | |
| tree | 87794159bd0e56687c060bcacc3710eb806cac50 | |
| parent | 43fdb2a08061afba00243b164111c289d711d976 (diff) | |
| download | emacs-4ba343984f1ea2bc87493339a315e13ba1410d28.tar.gz emacs-4ba343984f1ea2bc87493339a315e13ba1410d28.zip | |
* lisp/calc/calc-units.el (calc-convert-exact-units): Improve the
simplification.
| -rw-r--r-- | lisp/calc/calc-units.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-units.el b/lisp/calc/calc-units.el index 33cbcac7a2d..f3d02340fe3 100644 --- a/lisp/calc/calc-units.el +++ b/lisp/calc/calc-units.el | |||
| @@ -544,7 +544,7 @@ If COMP or STD is non-nil, put that in the units table instead." | |||
| 544 | (let ((res | 544 | (let ((res |
| 545 | (list '* (math-mul (math-remove-units expr) | 545 | (list '* (math-mul (math-remove-units expr) |
| 546 | (math-simplify-units | 546 | (math-simplify-units |
| 547 | (list '/ old-units units))) | 547 | (math-to-standard-units (list '/ old-units units) nil))) |
| 548 | units))) | 548 | units))) |
| 549 | (calc-enter-result 1 "cvxu" res)))))) | 549 | (calc-enter-result 1 "cvxu" res)))))) |
| 550 | 550 | ||