Added p>1

diff --git a/discrete_log.txt b/discrete_log.txt
index 1fe4944..21193ac 100644 (file)
--- a/discrete_log.txt
+++ b/discrete_log.txt
@@ -52,6 +52,7 @@ proc IntegerRoot(a:nat): nat
 }
 
 proc PowerMod(a:nat, b:nat, p:nat): nat
+   requires p>1;
 {
    var x:nat;