diff options
Diffstat (limited to 'lapacke/src/lapacke_chpevx.c')
| -rw-r--r-- | lapacke/src/lapacke_chpevx.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lapacke/src/lapacke_chpevx.c b/lapacke/src/lapacke_chpevx.c index f2f78104..8a8c1cf1 100644 --- a/lapacke/src/lapacke_chpevx.c +++ b/lapacke/src/lapacke_chpevx.c @@ -1,5 +1,5 @@ /***************************************************************************** - Copyright (c) 2011, Intel Corp. + Copyright (c) 2014, Intel Corp. All rights reserved. Redistribution and use in source and binary forms, with or without @@ -33,7 +33,7 @@ #include "lapacke_utils.h" -lapack_int LAPACKE_chpevx( int matrix_order, char jobz, char range, char uplo, +lapack_int LAPACKE_chpevx( int matrix_layout, char jobz, char range, char uplo, lapack_int n, lapack_complex_float* ap, float vl, float vu, lapack_int il, lapack_int iu, float abstol, lapack_int* m, float* w, lapack_complex_float* z, @@ -43,7 +43,7 @@ lapack_int LAPACKE_chpevx( int matrix_order, char jobz, char range, char uplo, lapack_int* iwork = NULL; float* rwork = NULL; lapack_complex_float* work = NULL; - if( matrix_order != LAPACK_COL_MAJOR && matrix_order != LAPACK_ROW_MAJOR ) { + if( matrix_layout != LAPACK_COL_MAJOR && matrix_layout != LAPACK_ROW_MAJOR ) { LAPACKE_xerbla( "LAPACKE_chpevx", -1 ); return -1; } @@ -84,7 +84,7 @@ lapack_int LAPACKE_chpevx( int matrix_order, char jobz, char range, char uplo, goto exit_level_2; } /* Call middle-level interface */ - info = LAPACKE_chpevx_work( matrix_order, jobz, range, uplo, n, ap, vl, vu, + info = LAPACKE_chpevx_work( matrix_layout, jobz, range, uplo, n, ap, vl, vu, il, iu, abstol, m, w, z, ldz, work, rwork, iwork, ifail ); /* Release memory and exit */ |