summaryrefslogtreecommitdiff
path: root/lapacke/src/lapacke_ctrttp.c
diff options
context:
space:
mode:
Diffstat (limited to 'lapacke/src/lapacke_ctrttp.c')
-rw-r--r--lapacke/src/lapacke_ctrttp.c10
1 files changed, 5 insertions, 5 deletions
diff --git a/lapacke/src/lapacke_ctrttp.c b/lapacke/src/lapacke_ctrttp.c
index 19ac66e9..2853e891 100644
--- a/lapacke/src/lapacke_ctrttp.c
+++ b/lapacke/src/lapacke_ctrttp.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,19 +33,19 @@
#include "lapacke_utils.h"
-lapack_int LAPACKE_ctrttp( int matrix_order, char uplo, lapack_int n,
+lapack_int LAPACKE_ctrttp( int matrix_layout, char uplo, lapack_int n,
const lapack_complex_float* a, lapack_int lda,
lapack_complex_float* ap )
{
- 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_ctrttp", -1 );
return -1;
}
#ifndef LAPACK_DISABLE_NAN_CHECK
/* Optionally check input matrices for NaNs */
- if( LAPACKE_cge_nancheck( matrix_order, n, n, a, lda ) ) {
+ if( LAPACKE_cge_nancheck( matrix_layout, n, n, a, lda ) ) {
return -4;
}
#endif
- return LAPACKE_ctrttp_work( matrix_order, uplo, n, a, lda, ap );
+ return LAPACKE_ctrttp_work( matrix_layout, uplo, n, a, lda, ap );
}