From: treecity <treecity@6904cdf7-2833-49b9-980b-463876255000>
Date: Mon, 19 Apr 2010 12:48:22 +0000 (+0000)
Subject: fermat hinzugefügt
X-Git-Url: https://git.leopard-lacewing.eu/?a=commitdiff_plain;h=162a107be2c7f5cf34fc0fcee2c6de95d3f145dc;p=crypt.git

fermat hinzugefügt

und sqmult und lrexp Matrix ausgeblendet

git-svn-id: https://drops.fb12.tu-berlin.de/svn/crypt/trunk@3 6904cdf7-2833-49b9-980b-463876255000
---

diff --git a/fermat.m b/fermat.m
new file mode 100644
index 0000000..f189891
--- /dev/null
+++ b/fermat.m
@@ -0,0 +1,12 @@
+function ret = fermat( x , base )
+%Der kleine Fermat
+
+
+if(sqmult(base,x-1,x,'*',1)==1)
+    ret = 1;
+else
+    ret = 0;
+end
+
+end
+
diff --git a/lrexp.m b/lrexp.m
index 9e52362..c706038 100644
--- a/lrexp.m
+++ b/lrexp.m
@@ -27,7 +27,7 @@ while(m~=1)
     mat(z,:)=[y,k,m];
 end
 
-mat
+%mat
 
 end
 
diff --git a/sqmult.m b/sqmult.m
index cd0900e..068e886 100644
--- a/sqmult.m
+++ b/sqmult.m
@@ -20,7 +20,7 @@ while(k~=0)
     mat(z,:)=[y,x,k];
 end
 
-mat
+%mat
 
 end