1 // NOLINT(legal/copyright)
2 // SYMBOL "densify"
3 template<typename T1, typename T2>
casadi_densify(const T1 * x,const casadi_int * sp_x,T2 * y,casadi_int tr)4 void casadi_densify(const T1* x, const casadi_int* sp_x, T2* y, casadi_int tr) {
5 casadi_int nrow_x, ncol_x, i, el;
6 const casadi_int *colind_x, *row_x;
7 // Quick return - output ignored
8 if (!y) return;
9 nrow_x = sp_x[0]; ncol_x = sp_x[1];
10 colind_x = sp_x+2; row_x = sp_x+ncol_x+3;
11 // Zero out return value
12 casadi_clear(y, nrow_x*ncol_x);
13 // Quick return - input is zero
14 if (!x) return;
15 // Copy nonzeros
16 if (tr) {
17 for (i=0; i<ncol_x; ++i) {
18 for (el=colind_x[i]; el!=colind_x[i+1]; ++el) {
19 y[i + row_x[el]*ncol_x] = CASADI_CAST(T2, *x++);
20 }
21 }
22 } else {
23 for (i=0; i<ncol_x; ++i) {
24 for (el=colind_x[i]; el!=colind_x[i+1]; ++el) {
25 y[row_x[el]] = CASADI_CAST(T2, *x++);
26 }
27 y += nrow_x;
28 }
29 }
30 }
31