Correct a typo in the description of the elliptic function dn (K.Koehler)

arjenmarkusdeltaresnl · arjenmarkusdeltaresnl · commit 935e0f929c42 · 2024-11-15T08:12:01.000Z
diff --git a/modules/math/ChangeLog b/modules/math/ChangeLog
@@ -1,3 +1,6 @@
+2024-11-15  Arjen Markus <arjenmarkus@users.sourceforge.net>
+        * elliptic.tcl: Correct the description of dn (pers.comm. K. Koehler)
+
 2024-01-21  Arjen Markus <arjenmarkus@users.sourceforge.net>
         * statistics.test: Correct mistake with srand function (pers.comm. A. Kupries)
 
diff --git a/modules/math/elliptic.tcl b/modules/math/elliptic.tcl
@@ -188,7 +188,7 @@ proc ::math::special::sn { u k } {
 }
 
 # dn --
-#     Compute the elliptic function sn
+#     Compute the elliptic function dn
 #
 # Arguments:
 #     u           Independent variable

-Original file line number
+Diff line change
 +2024-11-15  Arjen Markus <[email protected]>
 +        * elliptic.tcl: Correct the description of dn (pers.comm. K. Koehler)
++
 -01-21  Arjen Markus <[email protected]>
         * statistics.test: Correct mistake with srand function (pers.comm. A. Kupries)
Original file line number	Diff line number	Diff line change
`@@ -188,7 +188,7 @@ proc ::math::special::sn { u k } {`
`188`	`188`	`}`
`189`	`189`
`190`	`190`	`# dn --`
`191`		`-# Compute the elliptic function sn`
	`191`	`+# Compute the elliptic function dn`
`192`	`192`	`#`
`193`	`193`	`# Arguments:`
`194`	`194`	`# u Independent variable`