代码大全

(singke) #1
’------------------------------------------------------

’ 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!)
Free download pdf