/*
* call-seq:
* dtable.remainder(number) -> a_dtable
* dtable.remainder(other) -> a_dtable
*
* When the argument is a number, this operation returns a copy of _dtable_ with each entry x replaced by the remainder of x divided by _number_.
* When the argument is a data array, this operation returns a copy of _dtable_ with each entry x replaced
* by the remainder of x divided by the corresponding entry in the _other_ data array.
*/ VALUE dtable_remainder(VALUE ary, VALUE arg) {