comparison error

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

impersonalis

Hi!
I would like to knew the reason of the uncorrect working of the statement of comparison in the following test:

Open in online IDE

Graphics 800,600
SetBuffer BackBuffer()
SetFont LoadFont("MS Sans Serif",20)

Local intervalx#[20]
Local temp0#,temp1#,temp2#,tempc%,b#
x#=14.143

xmax#=15.051

h#=0.242
temp0=13.417
tempc=1
While (temp0<=xmax)
	temp2=temp0+h	
	intervalx[tempc]=temp2
	temp0=temp2
	tempc=tempc+1
Wend

b=intervalx[3]


If  x=b
	Print ""+x+"="+b 
Else
	Print ""+x+"<>"+b 
EndIf



WaitKey()
End

if to insert the next corrections

Open in online IDE

Graphics 800,600
SetBuffer BackBuffer()
SetFont LoadFont("MS Sans Serif",20)

Local intervalx#[20]
Local temp0#,temp1#,temp2#,tempc%,b#
x#=14.143

xmax#=15.051

h#=0.242
temp0=13.417
tempc=1
While (temp0<=xmax)
	temp2=temp0+h	
	intervalx[tempc]=temp2
	temp0=temp2
	tempc=tempc+1
Wend

b=intervalx[3]
b=Float(Str(b))


If  x=b
	Print ""+x+"="+b 
Else
	Print ""+x+"<>"+b 
EndIf



WaitKey()
End

then everything is working fine.
Ver. 1.98|1.98|1.98