Add even/odd Octave functions.

[octave.git] / even.m

diff --git a/even.m b/even.m
new file mode 100644 (file)
index 0000000..f4f3767
--- /dev/null
+++ b/even.m
@@ -0,0 +1,14 @@
+function even = even(integer_n)
+  ## Returns true if its argument is even; false otherwise.
+  ##
+  ## INPUTS:
+  ##
+  ##   * ``integer_n`` - The integer whose parity you're determining.
+  ##
+  ##
+  ## OUTPUTS:
+  ##
+  ##   * ``even`` - True if `integer_n` is even, false otherwise.
+  ##
+  even = rem(integer_n, 2) == 0;
+end