qb64-include/min.bm
2022-09-19 01:27:48 +02:00

6 lines
No EOL
151 B
Text

$if Min = undefined then
$let Min = defined
FUNCTION Min (num1, num2)
Min = ((num1 < num2) * -num1) + ((num2 <= num1) * -num2)
END FUNCTION
$end if