1 files changed, 20 insertions, 0 deletions
diff --git a/awklib/eg/lib/intdiv.awk b/awklib/eg/lib/intdiv.awk
new file mode 100644
index 00000000..dbc553b0
--- /dev/null
+++ b/awklib/eg/lib/intdiv.awk
@@ -0,0 +1,20 @@
+# intdiv --- do integer division
+
+#
+# Arnold Robbins, arnold@skeeve.com, Public Domain
+# July, 2014
+#
+# Name changed from div() to intdiv()
+# April, 2015
+
+function intdiv(numerator, denominator, result)
+{
+    split("", result)
+
+    numerator = int(numerator)
+    denominator = int(denominator)
+    result["quotient"] = int(numerator / denominator)
+    result["remainder"] = int(numerator % denominator)
+
+    return 0.0
+}