[Wien] Mixer: compilation error (IBM AIX Pwr5, XLF90)

[Ricardo Faccio]

Dear Wien users
    I compiled successfully almost all the packages of the latest Wien2k. 
The server is a IBM pwr5, AIX, XLF90, 64 bit.
    The only problem appears in the SRC_mixer where the compilation stops 
with this error:
################################################################################################
xlf90  -q64 -O5 -qarch=pwr5 -qtune=pwr5 -qcache=auto -qstrict   -c -o 
LimitDMIX.o LimitDMIX.F
"LimitDMIX.F", line 81.54: 1513-041 (S) Arguments of the wrong type were 
specified for the INTRINSIC procedure "max".
#################################################################################################
I guess the problem is related with argument type definition in the "max" 
operation.
Can someone tell me how to overcome this problem?
Thanks in advance
Best regards
Ricardo
-------------------------------------------------------------------------
-----   Dr. Ricardo Faccio

  Mail: Cryssmat-Lab., Cátedra de Física, DETEMA
  Facultad de Química, Universidad de la República
       Av. Gral. Flores 2124, C.C. 1157
       C.P. 11800, Montevideo, Uruguay.
  E-mail: rfaccio at fq.edu.uy
  Phone: 598 2 9241860 Int. 109
             598 2 9290705
  Fax:    598 2 9241906
  Web:  http://cryssmat.fq.edu.uy/ricardo/ricardo.htm