MulDivは、既知の値を保存して他のコードで数学を行うよりも効率が悪くなる可能性があります

Question

私はDelphi 2007を使用していて、いくつかのプレゼンテーションソフトウェアで作業しています。私が取り組んでいる現在のモジュールは、ビデオのトランジションフィルタです。私が使用しているトランジションコード（TPicShowのPSEffectsユニット）には、フレームのサイズとトランジションの進行状況に基づいてX値とY値が必要です。ここでは、コード

Type 
TPercent = 0..100; 
var 
ATo : TBitmap; // 
Prog : Integer; //Progress of the transition 

     if ATo.Width >= ATo.Height then 
    begin 
     X := MulDiv(ATo.Width, Prog, High(TPercent)); 
     Y := MulDiv(X, ATo.Height, ATo.Width); 
    end 
    else 
    begin 
     Y := MulDiv(ATo.Height, Prog, High(TPercent)); 
     X := MulDiv(Y, ATo.Width, ATo.Height); 
    end; 

は、私はこれを最適化しようとしていると私は（ATO変化の大きさになるまで）一定になる計算を保存し、2つの分割の計算に各フレームを削除することができることを見ました。

だから、

{All of these are calculated when the dimensions of ATo Change} 
WDP : real; // width divided by High(TPercent) 
HDW : real; // Height divided by width 
HDP : real; // Height divided by High(TPercent) 
WDH : real; // Width divided by Height 

    if ATo.Width >= ATo.Height then 
    begin 
     X := Trunc(WDP * Prog); 
     Y := Trunc(HDW * X); 
    end 
    else 
    begin 
     Y := Trunc(HDP * Prog); 
     X := Trunc(WDH * Y); 
    end; 

ようなものになるだろうそれは良い音が、私は必ずカントMulDivの実際のコードを持っていません。それは単に（非常に単純化された）

MulDiv(a,b,c : Integer) 
begin 
    Round((A*B)/C); 
end 

を行う場合、私はその後、私はありません（私はそれがかもしれないものをいただきたいもの）MulDiv機能を最適化すると非常にクールなものを行うがあれば、私の変更は、より効率的になります知っています私の変更が私に何かをネットするかどうか確かめてください。

私の変更はより効率的でしょうか？

編集：私はまだこれを実装していない、私はただの観念を楽しんでいる。

Answer 1

整数演算を使用して実装されたMulDivの呼び出しが非効率的で、パフォーマンスの問題の原因となった場合、私は非常に驚くでしょう。あなたはあなたのプログラムをタイムリーにしましたか？プロファイラを使用してアプリのホットスポットを特定しましたか？

個人的には、整数から倍精度浮動小数点演算への切り替えがパフォーマンスを向上させる可能性は低いと思います。

いずれにしても、私が推測するのは、表示されたコードの後に​​、XとYを使用し、この小さなスニペットよりも多くのCPUを消費する他のコードがあると思います。あなたはおそらくXとYを計算しないで、それらを捨てるでしょう：それらで何をしますか？

EDIT：MulDivのワインの実装は、おそらくWindowsの1に非常に近く、かつその根性がそうである：他の人が述べてきたように

if (((nMultiplicand < 0) && (nMultiplier < 0)) || 
    ((nMultiplicand >= 0) && (nMultiplier >= 0))) 
    ret = (((LONGLONG)nMultiplicand * nMultiplier) + (nDivisor/2))/nDivisor; 
else 
    ret = (((LONGLONG)nMultiplicand * nMultiplier) - (nDivisor/2))/nDivisor; 

Answer 2

MulDivの実際のコードはWinAPI関数なので、このコードは見つかりません。私はWinAPI自体に多用されているので、たぶんいくつかの関数呼び出しではなく、おそらくかなり最適化されたアセンブラコードだと思われます。

変更がより効率的であるかどうかを判断するには、両方の方法でコードをプロファイルし、どちらが速いかを確認するしかありません。 Delphi XEを使用している場合は、付属のAQTimeを使用できます。

ところで、最適化などのことについて話しているとき、コンパイラの変更によって答えが変わる可能性があるため、実際に使用しているDelphiのバージョンを示すことは非常に便利です。

Answer 3

、あなたはプロファイラを探している必要がありホットスポットを特定する。

あなたがそれらを特定したら、あなたの現在のコードよりも速いものをマルチメディアアプリケーションで見つけたら、SIMD機械語の命令について学ぶ必要があり、手で最適化されたアセンブラコードより速い結果を得ることができます。

浮動小数点型を使用して自分自身でPascalに書き込むことは、パフォーマンスが向上する可能性はほとんどありません。中間結果をキャッシュすると、メモリ使用量が指数関数的に増加し、速度の中程度の向上のみで、VMのページング（スラッシング）が発生する可能性のあるシステムでは実際に速度が低下する可能性があります。