diff options
Diffstat (limited to 'typenunit.pas')
| -rw-r--r-- | typenunit.pas | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/typenunit.pas b/typenunit.pas index 7c7ac05..d73f9a8 100644 --- a/typenunit.pas +++ b/typenunit.pas @@ -2554,7 +2554,7 @@ var begin for c:='x' to 'y' do begin outAchsen[c,'x']:=inAchsen[c,'x']; // TODO: vllt. zentrieren? - outAchsen[c,'y']:=outAchsen[c,'x'] + (inAchsen[c,'y'] - inAchsen[c,'x']) * outXSTS['x']/inXSTS['x']; + outAchsen[c,'y']:=outAchsen[c,'x'] + (inAchsen[c,'y'] - inAchsen[c,'x']) * outXSTS[c]/inXSTS[c]; end; end; |