convert logical to integer

Consider the following example,

integer:: b(2,2),c(2,2)
data b /1,2,3,4/
c = 1*(b==1)+3*(b==3)

For intel fortran, with “fpscomp:logicals” command, it worked.
However, this doesn’t work with pgi-fortran. Any suggestions?

Thanks

Hi Chamna,

PGI’s equivalent flag would be “-Munixlogical”.

  • Mat

Thanks a lot!