121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
# File 'ext/Gaussian/Gaussian.c', line 121
static VALUE gaussian_filter1d(VALUE self, VALUE ary, VALUE sd){
VALUE ary_class = rb_funcall(ary, rb_intern("class"), 0);
// rb_p(na_cast_object(ary, NA_DFLOAT));
if(rb_funcall(ary_class, rb_intern("=="), 1, numo_cDFloat) == Qtrue){
return gaussian_filter1d_dfloat(self, ary, sd);
}else if(TYPE(ary) == T_ARRAY){
return gaussian_filter1d_ary(self, ary, sd);
}
// rb_funcall(rb_stderr, rb_intern("puts"), 1, );
return Qfalse;
}
|