Method: Vdsp::UnsafeDouble.vsmsma

Defined in:
ext/vdsp/vdsp.c

.vsmsma(a, a_offset, a_stride, b, c, c_offset, c_stride, d, e, e_offset, e_stride, n) ⇒ Object

e = (a * b) + (c * d)



1827
1828
1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857
# File 'ext/vdsp/vdsp.c', line 1827

VALUE rb_double_vsmsma(
  VALUE cls,
  VALUE a, VALUE a_offset, VALUE a_stride,
  VALUE b,
  VALUE c, VALUE c_offset, VALUE c_stride,
  VALUE d,
  VALUE e, VALUE e_offset, VALUE e_stride,
  VALUE n)
{
  VdspArrayParam _a;
  VdspArrayParam _c;
  VdspArrayParam _e;

  array_param(&_a, a, a_offset, a_stride);
  double _b = NUM2DBL(b);
  array_param(&_c, c, c_offset, c_stride);
  double _d = NUM2DBL(d);
  array_param(&_e, e, e_offset, e_stride);

  vDSP_Length _n = NUM2LONG(n);

  vDSP_vsmsmaD(
    _a.res0->v.d+_a.offset, _a.stride,
    &_b,
    _c.res0->v.d+_c.offset, _c.stride,
    &_d,
    _e.res0->v.d+_e.offset, _e.stride,
    _n);

  return e;
}