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/CACSD/lqr | |
| parent | 953447ba5cd043470d0f35c8a780e1b4c4d0aebf (diff) | |
| download | scilab2c-716c7a821a76e65bff30d0292095c585e37c3ac0.tar.gz scilab2c-716c7a821a76e65bff30d0292095c585e37c3ac0.tar.bz2 scilab2c-716c7a821a76e65bff30d0292095c585e37c3ac0.zip | |
Diffstat (limited to 'src/c/CACSD/lqr')
| -rw-r--r-- | src/c/CACSD/lqr/dlqra.c | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/src/c/CACSD/lqr/dlqra.c b/src/c/CACSD/lqr/dlqra.c index 1440c3a8..f977ffac 100644 --- a/src/c/CACSD/lqr/dlqra.c +++ b/src/c/CACSD/lqr/dlqra.c @@ -38,7 +38,6 @@ void dlqra(double* sys, int sys_rows, int sys_cols, double* Q, double* R, \ double *BRi, *StRi, *S_t; double *buf1, *buf2, *buf3, *buf4, *buf5, *buf6; - int ks; double *wsmall, *X12, *phi12; A = (double*) malloc (no_of_states*no_of_states*sizeof(double)); @@ -196,7 +195,7 @@ void dlqra(double* sys, int sys_rows, int sys_cols, double* Q, double* R, \ /*Find schur decomposition of LA*/ wsmall = (double*) malloc(4*no_of_states*no_of_states*sizeof(double)); - ks = (int)dschura(LA,2*no_of_states,1,2,wsmall,NULL); + dschura(LA,2*no_of_states,1,2,wsmall,NULL); X12 = (double*) malloc(no_of_states*no_of_states*sizeof(double)); phi12 = (double*) malloc(no_of_states*no_of_states*sizeof(double)); @@ -295,7 +294,7 @@ void dlqra(double* sys, int sys_rows, int sys_cols, double* Q, double* R, \ /*Find schur decomposition of LA*/ wsmall = (double*) malloc(4*no_of_states*no_of_states*sizeof(double)); - ks = (int)dgschura(LA,2*no_of_states,LE,2,2,wsmall,NULL,NULL,NULL); + dgschura(LA,2*no_of_states,LE,2,2,wsmall,NULL,NULL,NULL); X12 = (double*) malloc(no_of_states*no_of_states*sizeof(double)); phi12 = (double*) malloc(no_of_states*no_of_states*sizeof(double)); @@ -359,4 +358,4 @@ void dlqra(double* sys, int sys_rows, int sys_cols, double* Q, double* R, \ free(buf3); free(buf4); -}
\ No newline at end of file +} |