unable to compile with lapack95
hello all,
i need to recompile a program that needs LAPACK95 (http://www.netlib.org/lapack95/)
So i compiled lapack95 on my sun V40z, solaris 10, Sun Studio 11.
Compilation went fine.
Tests aren't.
Now, i'm trying to compile a short example:
PROGRAM EXAMPLE
USE LA_PRECISION, ONLY: WP => DP
USE F95_LAPACK, ONLY: LA_GESV, LA_SYEV
IMPLICIT NONE
CHARACTER( LEN = * ), PARAMETER :: FMT = '(7(1X,F9.3))'
INTEGER :: J, N, NRHS
REAL( WP ), ALLOCATABLE :: A( :, : ), B( :, : )
N = 5; NRHS = 2
ALLOCATE( A( N, N ), B( N, NRHS ))
CALL RANDOM_NUMBER( A )
DO J = 1, NRHS; B( :, J ) = SUM( A, DIM = 2 )*J; END DO
CALL LA_GESV( A, B )
WRITE( *, * ) 'The solution:'
DO J = 1, NRHS; WRITE ( *, FMT ) B( :, J ); END DO
END PROGRAM EXAMPLE
but:
nemo-henry% f95 -free -xarch=amd64 -M/local/henry/LAPACK95/lapack95_modules -c exemple.f -xlic_lib=sunperf -L/local/henry/LAPACK95/ -llapack95
CALL LA_GESV( A, B )
^
"exemple.f", Line = 12, Column = 6: ERROR: Incorrect type/attribute of actual argument number 1 in generic procedure call "LA_GESV".
f90comp: 15 SOURCE LINES
f90comp: 1 ERRORS, 0 WARNINGS, 0 OTHER MESSAGES, 0 ANSI
What's the meaning of this error?
thanks for help
