Function sctr 

pub fn sctr<T: ComplexScalar>(
    x: &[T],
    indx: &[aoclsparse_int],
    y: &mut [T],
) -> Result<()>

y[indx[i]] := x[i] (sparse scatter).