LOGICAL Expression 1

[Panavia]

Hi,

I'm still working on the translation of some Fortran code peaces into Visual Basic 2010 and tripped over an expression which doesn't make sense to me:

PARAMETER(IWINDO=4)
LOGICAL LODD
LODD=(IWINDO/2)*2.NE.IWINDO

If(LODD) THEN
...
ENDIF

For my understaning "LODD" is a boolean which will be true if "IWINDO" is not equal to "(IWINDO/2)*2. That doesn't make sense to divide by 2 an then multiply by 2 again, or does it?
Or is there some Fortran typical consideration I'm missing?
The code is from an official agancy and a simple mathematical mistake like that shouldn't be there.

Thanks, Tobias

 

[ArkM]

Integer division in Fortran (examples):
5/2 = 2
4/2 = 2
3/2 = 1
2/2 = 1
ans so on...
So (5/2)*2 = 4 and it's not a trivial code

 

[Panavia]

Ah, I totally missed the integer considerations.
Thanks!