(math-standard-units): Give exact conversion for tsp.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c9452fde9db2fd57073e42defce19850320acd8c..df38de29e08841fd3e0a6bdffaa67e27d95ca081 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-08-17  Jay Belanger  <belanger@localhost.localdomain>
+
+       * calc/calc-units.el (math-standard-units): Give exact
+       conversion for tsp.
+
 2007-08-17  Bob Rogers  <rogers-emacs@rgrjr.dyndns.org>  (tiny change)
 
        * progmode/cperl-mode.el (cperl-look-at-leading-count)

diff --git a/lisp/calc/calc-units.el b/lisp/calc/calc-units.el
index ae94fc43ae1efdf7a42bc0c559f4416be11daafa..3724490169a6a3fce471aa674d373157622a377e 100644 (file)
--- a/lisp/calc/calc-units.el
+++ b/lisp/calc/calc-units.el
@@ -89,7 +89,9 @@
     ( ozfl    "2 tbsp"               "Fluid Ounce" )
     ( floz    "2 tbsp"               "Fluid Ounce" )
     ( tbsp    "3 tsp"                "Tablespoon" )
-    ( tsp     "4.92892159373 ml"     "Teaspoon" ) ;; (approx) ESUWM
+    ;; ESUWM defines a US gallon as 231 in^3.
+    ;; That gives the following exact value for tsp.
+    ( tsp     "492892159375*10^(-11) ml" "Teaspoon" ) 
     ( vol     "tsp+tbsp+ozfl+cup+pt+qt+gal" "Gallons + ... + teaspoons" )
     ( galC    "galUK"                "Canadian Gallon" )
     ( galUK   "454609*10^(-5) L"     "UK Gallon" ) ;; NIST