Data commit

2023-07-01 11:58:00 -04:00 · 2023-07-01 11:58:00 -04:00 · cb5bb5e222
commit cb5bb5e222
parent 7387c8f97b
199093 changed files with 3378972 additions and 0 deletions
--- a/Task/Modular-inverse/EasyLang/modular-inverse.easy
+++ b/Task/Modular-inverse/EasyLang/modular-inverse.easy
@ -0,0 +1,21 @@
+proc mod_inv a b . x1 .
+   b0 = b
+   x1 = 1
+   if b = 1
+      break 1
+   .
+   while a > 1
+      q = a div b
+      t = b
+      b = a mod b
+      a = t
+      t = x0
+      x0 = x1 - q * x0
+      x1 = t
+   .
+   if x1 < 0
+      x1 += b0
+   .
+.
+call mod_inv 42 2017 r
+print r