scilab/modules/ast/src/cpp/operations/interface_addition.cpp

   1 /*
   2 *  Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
   3 *  Copyright (C) 2014 - Scilab Enterprises - Antoine ELIAS
   4 *
   5 *  This file must be used under the terms of the CeCILL.
   6 *  This source file is licensed as described in the file COPYING, which
   7 *  you should have received as part of this distribution.  The terms
   8 *  are also available at
   9 *  http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt
  10 *
  11 */
  12
  13 #include "types_addition.hxx"
  14 extern "C"
  15 {
  16 #include "matrix_addition.h"
  17 }
  18
  19 //D +
  20 void add_ll_D_D(double* l, size_t size, double* r, double* o)
  21 {
  22     add(l, size, r, o);
  23 }
  24
  25 void add_ll_D_DC(double* l, size_t size, double* r, double* rc, double* o, double* oc)
  26 {
  27     add(l, size, r, rc, o, oc);
  28 }
  29
  30 void add_ll_D_D1(double* l, size_t size, double r, double* o)
  31 {
  32     add(l, size, r, o);
  33 }
  34
  35 void add_ll_D_D1C(double* l, size_t size, double r, double rc, double* o, double* oc)
  36 {
  37     add(l, size, r, rc, o, oc);
  38 }
  39
  40 void add_ll_D_E(double* l, size_t size, double* o)
  41 {
  42     add(l, size, o);
  43 }
  44
  45 //DC +
  46 void add_ll_DC_D(double* l, double* lc, size_t size, double* r, double* o, double* oc)
  47 {
  48     add(l, lc, size, r, o, oc);
  49 }
  50
  51 void add_ll_DC_DC(double* l, double* lc, size_t size, double* r, double* rc, double* o, double* oc)
  52 {
  53     add(l, lc, size, r , rc, o, oc);
  54 }
  55
  56 void add_ll_DC_D1(double* l, double* lc, size_t size, double r, double* o, double* oc)
  57 {
  58     add(l, lc, size, r, o, oc);
  59 }
  60
  61 void add_ll_DC_D1C(double* l, double* lc, size_t size, double r, double rc, double* o, double* oc)
  62 {
  63     add(l, lc, size, r, rc, o, oc);
  64 }
  65
  66 void add_ll_DC_E(double* l, double* lc, size_t size, double* o, double* oc)
  67 {
  68     add(l, lc, size, o, oc);
  69 }
  70
  71 //D1 +
  72 void add_ll_D1_D(double l, size_t size, double* r, double* o)
  73 {
  74     add(l, size, r, o);
  75 }
  76
  77 void add_ll_D1_DC(double l, size_t size, double* r, double* rc, double* o, double* oc)
  78 {
  79     add(l, size, r, rc, o, oc);
  80 }
  81
  82 void add_ll_D1_D1(double l, double r, double* o)
  83 {
  84     add(l, r, o);
  85 }
  86
  87 void add_ll_D1_D1C(double l, double r, double rc, double* o, double* oc)
  88 {
  89     add(&l, 1, r, rc, o, oc);
  90 }
  91
  92 void add_ll_D1_E(double l, double* o)
  93 {
  94     add(l, o);
  95 }
  96
  97 //D1C +
  98 void add_ll_D1C_D(double l, double lc, size_t size, double* r, double* o, double* oc)
  99 {
 100     add(l, lc, size, r, o, oc);
 101 }
 102
 103 void add_ll_D1C_DC(double l, double lc, size_t size, double* r, double* rc, double* o, double* oc)
 104 {
 105     add(l, lc, size, r, rc, o, oc);
 106 }
 107
 108 void add_ll_D1C_D1(double l, double lc, double r, double* o, double* oc)
 109 {
 110     add(&l, &lc, 1, r, o, oc);
 111 }
 112
 113 void add_ll_D1C_D1C(double l, double lc, double r, double rc, double* o, double* oc)
 114 {
 115     add(l, lc, r, rc, o, oc);
 116 }
 117
 118 void add_ll_D1C_E(double l, double lc, double* o, double* oc)
 119 {
 120     add(l, lc, o, oc);
 121 }
 122
 123 //E +
 124 void add_ll_E_D(double* r, size_t size, double* o)
 125 {
 126     add(r, size, o);
 127 }
 128
 129 void add_ll_E_DC(double* r, double* rc, size_t size, double* o, double* oc)
 130 {
 131     add(r, rc, size, o, oc);
 132 }
 133
 134 void add_ll_E_D1(double r, double* o)
 135 {
 136     add(r, o);
 137 }
 138
 139 void add_ll_E_D1C(double r, double rc, double* o, double* oc)
 140 {
 141     add(r, rc, o, oc);
 142 }
 143
 144 void add_ll_E_E()
 145 {
 146     add();
 147 }