Simba SRL6 - minE function

274 views Asked by At

I have seen this code for the SRL6 Simba scripting language based on Delphi

    dist:= hypot(xs - xe, ys - ye);
    wind:= minE(wind, dist);
    if (dist < 1) then
      dist := 1;
    PDist := (dist/TDist);

And

    if (getSystemTime() > t) then
      break;

    dist:= hypot(xs - xe, ys - ye);
    wind:= minE(wind, dist);

Really, we are focusing on the bottom line of the last snippet - minE(..). What could this function mean? I know it's mathematical, and yes I've Googled for an hour with no avail! Thanks for the help

1

There are 1 answers

0
Frement On BEST ANSWER

MinE is only a wrapper for extended values. As seen in this example:

function ps_MinE(a, b : extended) : extended; extdecl;
begin
  result := min(a,b);
end;