/* * call-seq: * dvector.log10 -> a_dvector * * Returns of copy of _dvector_ with each entry x replaced by log10(x). * * a = Dvector[ 1.1, -2.2, 5.3 ] * a.log10 -> Dvector[ log10(1.1), log10(-2.2), log10(5.3) ] */ VALUE dvector_log10(VALUE ary) {