’------------------------------------------------------
’ MATHEMATICAL FUNCTIONS
’
’ This module contains the program’s mathematical functions
’------------------------------------------------------
Function Max (Arg1! Arg2!)
’find the arithemetic maximum of Arg1 and Arg2
if (Arg1! > Arg2!) then
Max! = Arg1!
else
Max! = Arg2!
end if
end Function
Function Min(Arg1!, Arg2!)
’ find the arithemetic minimum of Arg1 and Arg2
if (Arg1! < Arg2!) then
Max! = Arg1!
else
Max! = Arg2!
end if
end Function
18 75
18-75 Basic
'**********************************************************
'**********************************************************
’ MATHEMATICAL FUNCTIONS
’ This module contains the program’s mathematical functions
'**********************************************************
'**********************************************************
'**********************************************************
Function Max (Arg1! Arg2!)