Multiplizieren mit sqrt(2)/2 in Schieben und Addieren

Gast #390385
Lesenswert?

(die Hälfte von Wurzel von zwei ) ist identisch mit (eins durch Wurzel
von zwei)  und beträgt etwa 0,707.
Ich habe mal auf dem AVR ein Näherung von (Wurzel zwei minus 1)mittels
Schieben und addieren berechnet:

;* 106/256 is an approximation of Sqrt(2)-1 = 0.4142
  clr  TempH    ; (1) multiply by 106
  lsl  TempL    ; (1) 106 = 2+8+32+64
  rol  TempM    ; (1) = "*2"
  mov  VectL,TempL  ; (1)
  mov  VectM,TempM  ; (1) add to vector
  clr  VectH    ; (1)
  lsl  TempL    ; (1)
  rol  TempM    ; (1)
  lsl  TempL    ; (1)
  rol  TempM    ; (1) = "*8"
  add  VectL,TempL  ; (1)
  adc  VectM,TempM  ; (1) add to vector
  lsl  TempL    ; (1)
  rol  TempM    ; (1)
  lsl  TempL    ; (1)
  rol  TempM    ; (1) = "*32", high byte = 0
  add  VectL,TempL  ; (1)
  adc  VectM,TempM  ; (1) add to vector
  lsl  TempL    ; (1)
  rol  TempM    ; (1) = "*64"
  rol  TempH    ; (1) now we need a 3rd byte
  add  VectL,TempL  ; (1)
  adc  VectM,TempM  ; (1) add to vector
  adc  VectH,TempH  ; (1)
Gast #390386
Lesenswert?

Es ging um einen AD-gewandelten 12 Bit breiten Messwert in TempL/TempH,
das Ergebnis wird noch durch 256 geteilt, indem das niederwertigste
Ergebnis-Byte VectL weggelassen wird.
Gast #390388
Lesenswert?

Hallo,  Christoph,

Danke fuer den Ansatz. Ich hatte vor sqrt(2)/2 =0.707106781
als 181/256=0.70703125 zu berechnen. Das waere dann
1-2^(-2)-2^(-5)-2^(-7)-2^(-8).

Sagen wir mal, wir wollen x*sqrt(2)/2=x/sqrt(2)=x*0.707106781
berechnen.

ldr r1,=x
mov r2,r1
sub r2,r1,LSR #2
sub r2,r1,LSR #5
sub r2,r1,LSR #5
sub r2,r1,LSR #8

Direkt wurde ich es so machen (x ist 16 bit lang):

ldr r1,=x
ldr r2,=46341 @; Round( sqrt(2)*2^15 )
mul r2,r1,r2
mov r3,r3,LSR #16

das macht r3=x*0.707108

Ich frage mich jetzt, ob das nicht schneller ist, besonders wenn man
bedenkt, dass man ldr r2,=23170 "reusen"  kann.
Gast #390389
Lesenswert?

Hallo

Wie wärs so:
1. Mit 181 Multiplizieren (kann mann ja auch durch verschieben und
addieren machen)
2. Ergebnis durch 256 teilen (= das niederwertigste Byte weglassen)
(eventuell vorher 128 addieren, um Rundungsfehler zu vermeiden)

Der Fehler ist nach meiner Rechnung 0,01 Prozent.
Gast #390390
Lesenswert?

Hallo,Kai,

Danke fuer den Vorschlag.

Ich frage mich, ob es an sqrt(2)/2 etwas besonderes gibt, da  die
Autoren des Papers diesen Fall angeblich mit einer separaten Routine
behandeln.


So, wie wir oben vorgeschlagen haben, kann man eigentlich jede
irrationale Zahl annaehern.

Ich wuerde  erwarten, dass die sqrt(2)/2 auf eine Weise berechnen, auf
die man andere Faelle nicht berechnen kann.  Ich konnte aber nichts im
Netz finden.

Antwort schreiben

Bitte melde dich an, um einen Beitrag zu schreiben.

oder

Mit Google-Account einloggen

Die Registrierung ist kostenlos und dauert nur eine Minute.

Jetzt registrieren