some minor optimizations
This commit is contained in:
parent
af28de8e5f
commit
15a2fb2558
@ -452,7 +452,8 @@ var
|
||||
dx, dy: double;
|
||||
sinr, cosr: extended;
|
||||
begin
|
||||
dx := exp(FTx)/ 2.718281828459045;
|
||||
dx := exp(FTx - 1); // exp(FTx)/ 2.718281828459045;
|
||||
// --Z-- (e^x)/e = e^(x-1), isn't it?!
|
||||
dy := PI * FTy;
|
||||
SinCos(dy, sinr, cosr);
|
||||
FPx := FPx + vars[18] * cosr * dx;
|
||||
|
@ -88,8 +88,8 @@ begin
|
||||
FHigh := Value;
|
||||
Result := True;
|
||||
end else if Name = 'blob_waves' then begin
|
||||
Value := Round(Value);
|
||||
FWaves := Value;
|
||||
//???????????? what for?: // Value := Round(Value);
|
||||
FWaves := Round(Value);
|
||||
Result := True;
|
||||
end
|
||||
end;
|
||||
|
Loading…
Reference in New Issue
Block a user