Simba SRL6 - minE功能

时间:2013-12-18 14:06:29

标签: simba

我已经看到了基于Delphi的SRL6 Simba脚本语言的代码

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

    if (getSystemTime() > t) then
      break;

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

真的,我们专注于最后一个片段的底线 - minE(..)。这个功能意味着什么?我知道这是数学的,是的,我用Google搜索了一个小时但没有用!谢谢你的帮助

1 个答案:

答案 0 :(得分:2)

MinE只是扩展值的包装器。如本例所示:

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