Data update

2023-12-16 21:33:55 -08:00 · 2023-12-16 21:33:55 -08:00 · 74c69a0df6
commit 74c69a0df6
parent 35bcdeebf8
2427 changed files with 31826 additions and 3468 deletions
--- a/Task/Digital-root/J/digital-root-1.j
+++ b/Task/Digital-root/J/digital-root-1.j
@ -1,2 +1,3 @@
-digrot=: +/@(#.inv~&10)^:_
-addper=: _1 + [: # +/@(#.inv~&10)^:a:
+digrt=: 10&$: :(|&.<:^:<:)"0
+
+addps=: 10&$: :([: <:@# +/@(#.inv)^:a:)"0
--- a/Task/Digital-root/J/digital-root-2.j
+++ b/Task/Digital-root/J/digital-root-2.j
@ -1,5 +1,10 @@
-   (, addper, digrot)&> 627615 39390 588225 393900588225
+   (,. addps ,. digrt) 627615 39390 588225 393900588225
      627615 2 9
       39390 2 6
      588225 2 3
 393900588225 2 9
+
+   8 digrt 8b4321
+3
+   8 addps 8b4321
+2
--- a/Task/Digital-root/J/digital-root-5.j
+++ b/Task/Digital-root/J/digital-root-5.j
@ -1,2 +0,0 @@
-digrt=: +/@(#.inv)^:_
-addpr=: _1 + [: # +/@(#.inv)^:a:
--- a/Task/Digital-root/J/digital-root-6.j
+++ b/Task/Digital-root/J/digital-root-6.j
@ -1,4 +0,0 @@
-   10 digrt 627615
-9
-   10 addpr 627615
-2