Negative False

[Peter]

Deleted

[JRS]

Code: [Select]

Function Negative( sys a ) As sys
        Return a - 1
End Function  

print negative(1)  '  must -1 but is 0

I just pulled out my old trusty calculator and I'm happy to report that 1 - 1 still equals zero.

I was worried about your math before but now I'm devastated.

[JRS]

I was just putting the bow on my old calculator I wrapped up for you. Oh well, back in the drawer it goes.