summaryrefslogtreecommitdiff
path: root/rsa.ivy
diff options
context:
space:
mode:
Diffstat (limited to 'rsa.ivy')
-rw-r--r--rsa.ivy3
1 files changed, 2 insertions, 1 deletions
diff --git a/rsa.ivy b/rsa.ivy
index 433c801..511236e 100644
--- a/rsa.ivy
+++ b/rsa.ivy
@@ -2,7 +2,8 @@ op E public p = E, */p
op E private p =
phi = */p-1
- d = 1 take (1 == (E * iota phi) mod phi) sel iota phi
+ n = iota phi
+ d = 1 take (1 == (E * n) mod phi) sel n
d, */p
op C rsa Key = (C ** Key[1]) mod Key[2]