From 6a543a3596eac5be4a59e21c2ee3b420c14f2cc5 Mon Sep 17 00:00:00 2001 From: eschnett Date: Fri, 2 Jan 2015 14:53:28 +0000 Subject: Correct constant name git-svn-id: http://svn.cactuscode.org/projects/ExternalLibraries/LAPACK/trunk@56 c7ba4c71-c2f2-49b2-85d5-cb7b5f04bdfb --- src/lapack.F90 | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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, & -- cgit v1.2.3