Re: Function to find the greatest or smallest value

Rory Hewitt wrote:

David,

Untested code (but I can't see why it wouldn't work:

P @max B Export
D PI 30P 9
D p1 30P 9 Const
D p2 30P 9 Const
D p3 30P 9 Const Options(*Nopass)
D p4 30P 9 Const Options(*Nopass)
D p5 30P 9 Const Options(*Nopass)

[...]

This allows up to 5 parameters, so you can use it like this:

myvar = @max( var1 : var2 : var3 );

This could be used for any number of values.

myvar - @max( @max(var1 : var2 : var3) : @max(var4 : var5 : var6) );

By extension, you can use @max(x : y) to determine the maximum value of an array with a number of elements that is not known at development time.

max = array(1);
for i = 2 TO elementCount;
max = @max(max : array(i));
endfor;

Personally I prefer Asher's solution, which is both more elegant and more efficient. To each their own.