OpenCores
URL https://opencores.org/ocsvn/eco32/eco32/trunk

Subversion Repositories eco32

[/] [eco32/] [trunk/] [fp/] [implementation/] [mmix/] [phi.mms] - Blame information for rev 273

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 15 hellwig
t IS $255
2
n IS $0
3
new GREG
4
old GREG
5
phi GREG
6
rt5 GREG
7
acc GREG
8
f   GREG
9
     LOC  #100
10
Main FLOT t,5
11
     FSQRT rt5,t
12
     FLOT t,1
13
     FADD phi,t,rt5
14
     INCH phi,#fff0
15
     FDIV acc,phi,rt5
16
     SET n,1
17
     SET new,1
18
1H   ADDU new,new,old
19
     INCL n,1
20
     CMPU t,new,old
21
     BN   t,9F
22
     SUBU old,new,old
23
     FMUL acc,acc,phi
24
     FIXU f,acc
25
     CMP  t,f,new
26
     PBZ  t,1B
27
     SET  t,1
28
9H   TRAP 0,Halt,0

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.