[Wien] Error compile information in Linux 9.0 system

[Hongjun Xiang]

Dear Laurence,
No, ifc (Intel(R) Fortran Compiler for 32-bit applications, Version 7.1 
Build 20040713Z) has the amax1 intrinsic.
I have tested it using two simple programs:
The first:
program test
print*, amax1(1.0,2.0)
end program test
The second:
program test
print*, amax1(1.0d0,2.0d0)
end program test

It turns out that I can compile the first program, but fail to compile 
the second program.
The error information is:
$ ifc 2.f90
program TEST
print*, amax1(1.0d0,2.0d0)
^
Error 191 at (2:2.f90) : This argument has either the wrong type or no type

1 Error
compilation aborted for 2.f90 (code 1)

I don't know exactly the problem, maybe it is due to a bug of ifc.

Best regards,
Hongjun Xiang



Laurence Marks wrote:
> This does not matter, and I also don't understand why you are getting
> an error -- maybe you have a version which does not have the standard
> amax1 intrinsic.
>
> On 11/6/06, Hongjun Xiang <xhongjun at mail.ustc.edu.cn> wrote:
>   
>> Dear Li,
>> I have just compiled wien2k_06 successfully using Intel compiler70+mkl72.
>> I made one modification:
>> Line 74 of matcon.f (in directory SRC_pairhess)should be changed from
>> ANORMI = AMAX1(ANORMI,T)
>> to
>> ANORMI = MAX(ANORMI,T)
>>
>> Good luck.
>>
>> Best regards,
>> Hongjun Xiang
>>
>> =============================================================
>>  H. J. Xiang
>>  Postdoctoral Research Assistant
>>  Department of Chemistry
>>  North Carolina State University
>>  Raleigh, NC 27695-8204
>>  Tel: 001-919-515-8919
>>  http://www4.ncsu.edu/~hxiang/
>> =============================================================
>>
>>
>>