cpu.c 1.92 KB
Newer Older
rusty1s's avatar
rusty1s committed
1
#ifndef TH_GENERIC_FILE
rusty1s's avatar
rusty1s committed
2
#define TH_GENERIC_FILE "generic/cpu.c"
rusty1s's avatar
rusty1s committed
3
4
5
#else

void scatter_(add)(THTensor *output, THLongTensor *index, THTensor *input, int dim) {
rusty1s's avatar
rusty1s committed
6
  int64_t idx;
rusty1s's avatar
bugfix  
rusty1s committed
7
  TH_TENSOR_DIM_APPLY3(real, output, real, input, int64_t, index, dim, TH_TENSOR_DIM_APPLY3_SIZE_EQ_EXCEPT_DIM,
rusty1s's avatar
rusty1s committed
8
9
10
11
12
13
14
15
16
    for (int64_t i = 0; i < THLongTensor_size(index, dim); i++) {
      idx = *(index_data + i * index_stride);
      assertIndexInBoundaries(idx, output_size, TH_TENSOR_DIM_APPLY_counter);
      output_data[idx] += *(input_data + i * input_stride);
    })
}

void scatter_(sub)(THTensor *output, THLongTensor *index, THTensor *input, int dim) {
  int64_t idx;
rusty1s's avatar
bugfix  
rusty1s committed
17
  TH_TENSOR_DIM_APPLY3(real, output, real, input, int64_t, index, dim, TH_TENSOR_DIM_APPLY3_SIZE_EQ_EXCEPT_DIM,
rusty1s's avatar
rusty1s committed
18
19
20
    for (int64_t i = 0; i < THLongTensor_size(index, dim); i++) {
      idx = *(index_data + i * index_stride);
      assertIndexInBoundaries(idx, output_size, TH_TENSOR_DIM_APPLY_counter);
rusty1s's avatar
bugfix  
rusty1s committed
21
      output_data[idx] -= *(input_data + i * input_stride);
rusty1s's avatar
rusty1s committed
22
23
24
25
26
    })
}

void scatter_(mul)(THTensor *output, THLongTensor *index, THTensor *input, int dim) {
  int64_t idx;
rusty1s's avatar
bugfix  
rusty1s committed
27
  TH_TENSOR_DIM_APPLY3(real, output, real, input, int64_t, index, dim, TH_TENSOR_DIM_APPLY3_SIZE_EQ_EXCEPT_DIM,
rusty1s's avatar
rusty1s committed
28
29
30
    for (int64_t i = 0; i < THLongTensor_size(index, dim); i++) {
      idx = *(index_data + i * index_stride);
      assertIndexInBoundaries(idx, output_size, TH_TENSOR_DIM_APPLY_counter);
rusty1s's avatar
bugfix  
rusty1s committed
31
      output_data[idx] *= *(input_data + i * input_stride);
rusty1s's avatar
rusty1s committed
32
33
34
35
36
    })
}

void scatter_(div)(THTensor *output, THLongTensor *index, THTensor *input, int dim) {
  int64_t idx;
rusty1s's avatar
bugfix  
rusty1s committed
37
  TH_TENSOR_DIM_APPLY3(real, output, real, input, int64_t, index, dim, TH_TENSOR_DIM_APPLY3_SIZE_EQ_EXCEPT_DIM,
rusty1s's avatar
rusty1s committed
38
    for (int64_t i = 0; i < THLongTensor_size(index, dim); i++) {
rusty1s's avatar
rusty1s committed
39
      idx = *(index_data + i * index_stride);
rusty1s's avatar
rusty1s committed
40
      assertIndexInBoundaries(idx, output_size, TH_TENSOR_DIM_APPLY_counter);
rusty1s's avatar
bugfix  
rusty1s committed
41
      output_data[idx] /= *(input_data + i * input_stride);
rusty1s's avatar
rusty1s committed
42
43
44
45
    })
}

#endif