La fonction de racine carrée dans Forth utilisant x86 Assemblée?

Question

Je ne sais pas grand-chose sur l'assemblage, mais je suis assez sûr qu'il existe des instructions de racine carrée sur le x86? J'essaie d'obtenir une fonction de racine carrée qui fonctionne bien dans la mousse et celle que j'ai trouvée s'enlise d'une façon ou d'une autre quand je la fais fonctionner plusieurs fois.

: sqrt-closer (square guess -- square guess adjustment) 
2dup/over - 2/
; 

: sqrt (square -- root) 
1 begin 
sqrt-closer dup 
while + repeat 
drop nip ; 

Answer 1

Il existe une instruction de racine carrée à virgule flottante (FSQRT). C'est assez rapide, même si vous avez seulement besoin d'une racine carrée entière.

Answer 2

Regardez ici:

http://www.azillionmonkeys.com/qed/sqroot.html

Tout ce que vous avez toujours voulu savoir sur les racines carrées, mais avaient peur de demander. Contient une implémentation dans le langage d'assemblage x86.