changeset 30:9b19f04208e4

julia: num
author Lewin Bormann <lbo@spheniscida.de>
date Sat, 04 Mar 2023 22:10:49 +0100
parents af82fbc3d6c0
children e3af2d3890ce
files julia/num.jl
diffstat 1 files changed, 15 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/julia/num.jl	Sat Mar 04 22:10:49 2023 +0100
@@ -0,0 +1,15 @@
+
+function reverse_digits(n::Integer)
+    pot = floor(Int, log10(n))
+    d = 0
+    for i = pot:-1:0
+        dig = div(n, 10^i)
+        if dig == 0
+            continue
+        end
+        d += dig * 10^(pot-i)
+        n = rem(n, (dig * 10^i))
+    end
+    d
+end
+