[Pw_forum] reporting a possible compilation problem

[Paolo Giannozzi]

On Tuesday 11 July 2006 11:49, Francesco Iori wrote:

> In file iotk_scan.spp:412
>
>      control = modulo(header,iotk_ncontrol+1)
>                              1
> Error: 'p' argument of 'modulo' intrinsic at (1) must be the same type
> and kind as 'a'

Giovanni Bussi says that this is a known and already fixed bug of iotk, 
but the fix has not yet percolated to the QE distribution. Workaround: 
in iotk/src/iotk_scan.spp , replace

<       control = modulo(header,iotk_ncontrol+1)
---
>       control = modulo(header,int(iotk_ncontrol+1,kind=kind(header)))

and

<         taglen  = modulo(header/(iotk_ncontrol+1),iotk_taglenx+1)
---
>         taglen  = 
modulo(header/(iotk_ncontrol+1),int(iotk_taglenx+1,kind=kind(header/(iotk_ncontrol+1))))

NB: it doesn't work with option '-i8' of g95

Paolo
-- 
Paolo Giannozzi             Phone:   +39/050-509876
DEMOCRITOS and SNS          Fax:     +39/050-563513 
Piazza dei Cavalieri 7      I-56126 Pisa, Italy