Import sources from 2011-03-30 iso image

1 files changed, 15 insertions, 0 deletions

diff --git a/sys/src/libmp/port/mpmod.c b/sys/src/libmp/port/mpmod.c
new file mode 100755
index 000000000..91bebfa27
--- /dev/null
+++ b/sys/src/libmp/port/mpmod.c
@@ -0,0 +1,15 @@
+#include "os.h"
+#include <mp.h>
+#include "dat.h"
+
+// remainder = b mod m
+//
+// knuth, vol 2, pp 398-400
+
+void
+mpmod(mpint *b, mpint *m, mpint *remainder)
+{
+	mpdiv(b, m, nil, remainder);
+	if(remainder->sign < 0)
+		mpadd(m, remainder, remainder);
+}