unofficial mirror of bug-gnu-emacs@gnu.org 
 help / color / mirror / code / Atom feed
* bug#66433: 30.0.50; Update astronomial length units in Calc
@ 2023-10-10 10:09 Ulrich Müller
  2023-10-10 12:16 ` Eli Zaretskii
  2023-10-10 12:29 ` Mattias Engdegård
  0 siblings, 2 replies; 5+ messages in thread
From: Ulrich Müller @ 2023-10-10 10:09 UTC (permalink / raw)
  To: 66433

OK to merge this to master?

From 44fcab5b4ec5e1175dd03e7c1b92e577ec689189 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ulrich=20M=C3=BCller?= <ulm@gentoo.org>
Date: Tue, 10 Oct 2023 11:58:03 +0200
Subject: [PATCH] Update astronomical length units in Calc

* lisp/calc/calc-units.el (math-standard-units): Update the
astronomical unit and the parsec, using their definitions by the
International Astronomical Union.
---
 lisp/calc/calc-units.el | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/lisp/calc/calc-units.el b/lisp/calc/calc-units.el
index 988fef2fcd2..96cf0840d15 100644
--- a/lisp/calc/calc-units.el
+++ b/lisp/calc/calc-units.el
@@ -57,12 +57,14 @@ math-standard-units
     ( ft      "12 in"                "Foot")
     ( yd      "3 ft"                 "Yard" )
     ( mi      "5280 ft"              "Mile" )
-    ( au      "149597870691. m"      "Astronomical Unit" nil
-              "149597870691 m (*)")
-              ;; (approx) NASA JPL (https://neo.jpl.nasa.gov/glossary/au.html)
+    ( au      "149597870700. m"      "Astronomical Unit" nil
+              "149597870700 m")
+              ;; "149 597 870 700 m exactly"
+              ;; http://www.iau.org/static/resolutions/IAU2012_English.pdf
     ( lyr     "c yr"                 "Light Year" )
-    ( pc      "3.0856775854*10^16 m" "Parsec  (**)" nil
-              "3.0856775854 10^16 m (*)") ;; (approx) ESUWM
+    ( pc      "(648000/pi) au"       "Parsec (**)")
+              ;; "The parsec is defined as exactly (648 000/π) au"
+              ;; http://www.iau.org/static/resolutions/IAU2015_English.pdf
     ( nmi     "1852 m"               "Nautical Mile" )
     ( fath    "6 ft"                 "Fathom" )
     ( fur     "660 ft"               "Furlong")
-- 
2.42.0






^ permalink raw reply related	[flat|nested] 5+ messages in thread

* bug#66433: 30.0.50; Update astronomial length units in Calc
  2023-10-10 10:09 bug#66433: 30.0.50; Update astronomial length units in Calc Ulrich Müller
@ 2023-10-10 12:16 ` Eli Zaretskii
  2023-10-10 12:29 ` Mattias Engdegård
  1 sibling, 0 replies; 5+ messages in thread
From: Eli Zaretskii @ 2023-10-10 12:16 UTC (permalink / raw)
  To: Ulrich Müller; +Cc: 66433

> From: Ulrich Müller <ulm@gentoo.org>
> Date: Tue, 10 Oct 2023 12:09:39 +0200
> 
> OK to merge this to master?
> 
> >From 44fcab5b4ec5e1175dd03e7c1b92e577ec689189 Mon Sep 17 00:00:00 2001
> From: =?UTF-8?q?Ulrich=20M=C3=BCller?= <ulm@gentoo.org>
> Date: Tue, 10 Oct 2023 11:58:03 +0200
> Subject: [PATCH] Update astronomical length units in Calc
> 
> * lisp/calc/calc-units.el (math-standard-units): Update the
> astronomical unit and the parsec, using their definitions by the
> International Astronomical Union.

Yes, thanks.





^ permalink raw reply	[flat|nested] 5+ messages in thread

* bug#66433: 30.0.50; Update astronomial length units in Calc
  2023-10-10 10:09 bug#66433: 30.0.50; Update astronomial length units in Calc Ulrich Müller
  2023-10-10 12:16 ` Eli Zaretskii
@ 2023-10-10 12:29 ` Mattias Engdegård
  2023-10-10 13:02   ` Ulrich Mueller
  1 sibling, 1 reply; 5+ messages in thread
From: Mattias Engdegård @ 2023-10-10 12:29 UTC (permalink / raw)
  To: Ulrich Müller; +Cc: 66433

> -    ( au      "149597870691. m"      "Astronomical Unit" nil
> -              "149597870691 m (*)")
> -              ;; (approx) NASA JPL (https://neo.jpl.nasa.gov/glossary/au.html)
> +    ( au      "149597870700. m"      "Astronomical Unit" nil

Other units with exact definitions don't seem to use floats, so perhaps the dot should go?

> +              "149597870700 m")
> +              ;; "149 597 870 700 m exactly"
> +              ;; http://www.iau.org/static/resolutions/IAU2012_English.pdf






^ permalink raw reply	[flat|nested] 5+ messages in thread

* bug#66433: 30.0.50; Update astronomial length units in Calc
  2023-10-10 12:29 ` Mattias Engdegård
@ 2023-10-10 13:02   ` Ulrich Mueller
  2023-10-10 13:35     ` Mattias Engdegård
  0 siblings, 1 reply; 5+ messages in thread
From: Ulrich Mueller @ 2023-10-10 13:02 UTC (permalink / raw)
  To: Mattias Engdegård; +Cc: 66433

>>>>> On Tue, 10 Oct 2023, Mattias Engdegård wrote:

>> -    ( au      "149597870691. m"      "Astronomical Unit" nil
>> -              "149597870691 m (*)")
>> -              ;; (approx) NASA JPL (https://neo.jpl.nasa.gov/glossary/au.html)
>> +    ( au      "149597870700. m"      "Astronomical Unit" nil

> Other units with exact definitions don't seem to use floats, so
> perhaps the dot should go?

Good point. Commit updated and merged.

>> +              "149597870700 m")
>> +              ;; "149 597 870 700 m exactly"
>> +              ;; http://www.iau.org/static/resolutions/IAU2012_English.pdf





^ permalink raw reply	[flat|nested] 5+ messages in thread

* bug#66433: 30.0.50; Update astronomial length units in Calc
  2023-10-10 13:02   ` Ulrich Mueller
@ 2023-10-10 13:35     ` Mattias Engdegård
  0 siblings, 0 replies; 5+ messages in thread
From: Mattias Engdegård @ 2023-10-10 13:35 UTC (permalink / raw)
  To: Ulrich Mueller; +Cc: 66433

10 okt. 2023 kl. 15.02 skrev Ulrich Mueller <ulm@gentoo.org>:

>> Other units with exact definitions don't seem to use floats, so
>> perhaps the dot should go?
> 
> Good point. Commit updated and merged.

Excellent, and thank you for doing this!






^ permalink raw reply	[flat|nested] 5+ messages in thread

end of thread, other threads:[~2023-10-10 13:35 UTC | newest]

Thread overview: 5+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2023-10-10 10:09 bug#66433: 30.0.50; Update astronomial length units in Calc Ulrich Müller
2023-10-10 12:16 ` Eli Zaretskii
2023-10-10 12:29 ` Mattias Engdegård
2023-10-10 13:02   ` Ulrich Mueller
2023-10-10 13:35     ` Mattias Engdegård

Code repositories for project(s) associated with this public inbox

	https://git.savannah.gnu.org/cgit/emacs.git

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).