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