diff options
| author | Erich Eckner <git@eckner.net> | 2017-12-20 16:08:56 +0100 |
|---|---|---|
| committer | Erich Eckner <git@eckner.net> | 2017-12-20 16:08:56 +0100 |
| commit | 347b2d8b5d2ec70f1d2e58b3faaba000394d9e9c (patch) | |
| tree | a0df585b776bed05f3477fa85042c4bc24098cb4 /werteunit.inc | |
| parent | d59d4aeb7542623f2b18bc54c4b94d479dee0f43 (diff) | |
| download | epost-347b2d8b5d2ec70f1d2e58b3faaba000394d9e9c.tar.xz | |
werteunit.inc: lambda-zu-omega-Transformation verändert (verbessert?)
Diffstat (limited to 'werteunit.inc')
| -rw-r--r-- | werteunit.inc | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/werteunit.inc b/werteunit.inc index 30efbc0..c7182a9 100644 --- a/werteunit.inc +++ b/werteunit.inc @@ -111,14 +111,14 @@ begin vV:= max( 0, - (params.tSiz-1-(i+1))/ - (1 + (i+1)/verhVe/(params.tSiz-1)) + (params.tSiz-1-(i+0.5))/ + (1 + (i+0.5)/verhVe/(params.tSiz-1))+0.5 ); vB:= min( params.tSiz, - (params.tSiz-1-i)/ - (1 + i/verhVe/(params.tSiz-1)) + (params.tSiz-1-(i-0.5))/ + (1 + (i-0.5)/verhVe/(params.tSiz-1))+0.5 ); end else begin @@ -130,14 +130,14 @@ begin hV:= max( 0, - (params.xSteps-1-(j+1))/ - (1 + (j+1)/verhHo/(params.xSteps-1)) + (params.xSteps-1-(j+0.5))/ + (1 + (j+0.5)/verhHo/(params.xSteps-1))+0.5 ); hB:= min( params.xSteps, - (params.xSteps-1-j)/ - (1 + j/verhHo/(params.xSteps-1)) + (params.xSteps-1-(j-0.5))/ + (1 + (j-0.5)/verhHo/(params.xSteps-1))+0.5 ); end else begin @@ -145,17 +145,17 @@ begin hB:=j+1; end; werte[j+i*params.xSteps]:=0; - for h:=max(0,floor(hV)) to min(params.xSteps-1,ceil(hB)) do begin + for h:=max(0,floor(hV)) to min(params.xSteps,ceil(hB))-1 do begin xAnteil:=1; if h=floor(hV) then // linker Rand xAnteil:=xAnteil-(hV-h); // hV-h fehlt am ganzen Pixel - if h=ceil(hB) then // rechter Rand + if h=ceil(hB)-1 then // rechter Rand xAnteil:=xAnteil-(1+h-hB); // 1+h-hB fehlt am ganzen Pixel (1+h ist der rechte Rand des Pixels!) - for v:=max(0,floor(vV)) to min(params.tSiz-1,ceil(vB)) do begin + for v:=max(0,floor(vV)) to min(params.tSiz,ceil(vB))-1 do begin yAnteil:=1; // s.o. if v=floor(vV) then yAnteil:=yAnteil-(vV-v); - if v=ceil(vB) then + if v=ceil(vB)-1 then yAnteil:=yAnteil-(1+v-vB); werte[j+i*params.xSteps]:= werte[j+i*params.xSteps]+ |