diff options
author | Sunil Shetye | 2019-05-17 17:30:07 +0530 |
---|---|---|
committer | Sunil Shetye | 2019-05-29 11:08:06 +0530 |
commit | 716c7a821a76e65bff30d0292095c585e37c3ac0 (patch) | |
tree | e56be10d77d70990c749b139d063b6bda69523ec /src/c/matrixOperations/expm/dexpma.c | |
parent | 953447ba5cd043470d0f35c8a780e1b4c4d0aebf (diff) | |
download | scilab2c-master.tar.gz scilab2c-master.tar.bz2 scilab2c-master.zip |
Diffstat (limited to 'src/c/matrixOperations/expm/dexpma.c')
-rw-r--r-- | src/c/matrixOperations/expm/dexpma.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/c/matrixOperations/expm/dexpma.c b/src/c/matrixOperations/expm/dexpma.c index d9b42327..8939813d 100644 --- a/src/c/matrixOperations/expm/dexpma.c +++ b/src/c/matrixOperations/expm/dexpma.c @@ -67,7 +67,7 @@ void dexpma (double* in, double* out, int _iLeadDim){ for ( iIndex1 = 0 ; iIndex1 < iSquare ; iIndex1++ ) pdblMatrixX[iIndex1] = pdblMatrixA[iIndex1] ; - deyea(pdblMatrixEye, _iLeadDim, _iLeadDim); + deyea(pdblMatrixEye, _iLeadDim, _iLeadDim); /*cA = A * c*/ @@ -106,7 +106,7 @@ void dexpma (double* in, double* out, int _iLeadDim){ pdblMatrixcX[iIndex1] = pdblMatrixX[iIndex1] * dblCst ; /*E = E + cX*/ - dadda ( out, iSquare , pdblMatrixcX , iSquare , out ) ; + dadda ( out, iSquare , pdblMatrixcX , iSquare , out ) ; if(iFlag == 1) /*D = D + cX*/ { |