diff options
| author | eschnett <eschnett@c7ba4c71-c2f2-49b2-85d5-cb7b5f04bdfb> | 2015-01-02 14:53:28 +0000 |
|---|---|---|
| committer | eschnett <eschnett@c7ba4c71-c2f2-49b2-85d5-cb7b5f04bdfb> | 2015-01-02 14:53:28 +0000 |
| commit | 6a543a3596eac5be4a59e21c2ee3b420c14f2cc5 (patch) | |
| tree | 00df7155b4ab3fb3269047ca83a83b54614281b6 | |
| parent | c8695990bf7154264f87d790f5e3b472923f72e8 (diff) | |
Correct constant namesvn
git-svn-id: http://svn.cactuscode.org/projects/ExternalLibraries/LAPACK/trunk@56 c7ba4c71-c2f2-49b2-85d5-cb7b5f04bdfb
| -rw-r--r-- | src/lapack.F90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/lapack.F90 b/src/lapack.F90 index e330c7f..2a47923 100644 --- a/src/lapack.F90 +++ b/src/lapack.F90 @@ -2,7 +2,7 @@ module lapack implicit none integer, parameter :: izero = 0 - integer, parameter :: blas_integer_kind = kind(izero) + integer, parameter :: lapack_integer_kind = kind(izero) interface geev SUBROUTINE SGEEV( JOBVL, JOBVR, N, A, LDA, WR, WI, VL, LDVL, VR, & |