Commit aafe0013 authored by michel's avatar michel
Browse files

v4 A_times_B_kronecker_C.cc: removed remaining cast (int *)


git-svn-id: https://www.dynare.org/svn/dynare/dynare_v4@1818 ac1d8469-bf42-47a9-8791-bf33cf982152
parent 81fae5c1
......@@ -63,7 +63,7 @@ void full_A_times_kronecker_B_B(double *A, double *B, double *D, mwSize mA, mwSi
ka = 0 ;
for(unsigned long int row=0; row<mB; row++)
{
DGEMM(transpose, transpose, (int*)&mA, (int*)&nB, (int*)&mB, &B[mB*col+row], &A[ka], (int*)&mA, &B[0], (int*)&mB, &one, &D[kd], (int*)&mA);
DGEMM(transpose, transpose, &mA, &nB, &mB, &B[mB*col+row], &A[ka], &mA, &B[0], &mB, &one, &D[kd], &mA);
ka += shiftA;
}
kd += shiftD;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment