qb64-include/min.bm

3 lines
99 B
Text
Raw Normal View History

2022-03-18 18:33:58 +01:00
FUNCTION Min (num1, num2)
Min = ((num1 < num2) * -num1) + ((num2 <= num1) * -num2)
END FUNCTION