Troubles with some IMSL routines (eg EVLRG, and some other)

Hi,

I tried to compile the following example program (copy/pasted from the
original Visual Numerics user's manual):

! Declare variables
USE IMSL
INTEGER LDA, N
PARAMETER (N=4, LDA=N)
REAL A(LDA,N)
COMPLEX EVAL(N)
EXTERNAL EVLRG, WRCRN
! Set values of A
! A = ( -2.0 2.0 2.0 2.0 )
! ( -3.0 3.0 2.0 2.0 )
! ( -2.0 0.0 4.0 2.0 )
! ( -1.0 0.0 0.0 5.0 )
DATA A/-2.0, -3.0, -2.0, -1.0, 2.0, 3.0, 0.0, 0.0, 2.0, 2.0, &
4.0, 0.0, 2.0, 2.0, 2.0, 5.0/
! Find eigenvalues of A
CALL EVLRG (N, A, LDA, EVAL)
! Print results
CALL WRCRN ('EVAL', 1, N, EVAL, 1, 0)
END

The following error messages appear:

--------------------Configuration: IMSL_Test - Win32
Debug--------------------
Compiling Fortran...
E:\Work\IMSL_Test\RealSvojstvene1.F90
E:\Work\IMSL_Test\RealSvojstvene1.F90(30) : Error: The attributes of
this name conflict with those made accessible by a USE statement.
[EVLRG]
CALL EVLRG (N, A, LDA, EVAL)
-----------^
E:\Work\IMSL_Test\RealSvojstvene1.F90(32) : Error: The attributes of
this name conflict with those made accessible by a USE statement.
[WRCRN]
CALL WRCRN ('EVAL', 1, N, EVAL, 1, 0)
-----------^
Error executing df.exe.

IMSL_Test.exe - 2 error(s), 0 warning(s)


Oh, yes, the system is CVF 6.6C Pro under PC Win2000. The IMSL library
is a part of a system. I contacted Visual Numerics but to date nobody
replied.

Have you any suggestion to resolve the problem? Thanks in advance.

Gojko Magazinovic

---------------------------------------------------------
CADEA d.o.o. E-mail:
Split, Croatia gmag AT cadea DOT hr
.