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

Subversion Repositories eco32

[/] [eco32/] [tags/] [eco32-0.26/] [fp/] [implementation/] [mmix/] [phi.mms] - Diff between revs 15 and 270

Only display areas with differences | Details | Blame | View Log

Rev 15 Rev 270
t IS $255
t IS $255
n IS $0
n IS $0
new GREG
new GREG
old GREG
old GREG
phi GREG
phi GREG
rt5 GREG
rt5 GREG
acc GREG
acc GREG
f   GREG
f   GREG
     LOC  #100
     LOC  #100
Main FLOT t,5
Main FLOT t,5
     FSQRT rt5,t
     FSQRT rt5,t
     FLOT t,1
     FLOT t,1
     FADD phi,t,rt5
     FADD phi,t,rt5
     INCH phi,#fff0
     INCH phi,#fff0
     FDIV acc,phi,rt5
     FDIV acc,phi,rt5
     SET n,1
     SET n,1
     SET new,1
     SET new,1
1H   ADDU new,new,old
1H   ADDU new,new,old
     INCL n,1
     INCL n,1
     CMPU t,new,old
     CMPU t,new,old
     BN   t,9F
     BN   t,9F
     SUBU old,new,old
     SUBU old,new,old
     FMUL acc,acc,phi
     FMUL acc,acc,phi
     FIXU f,acc
     FIXU f,acc
     CMP  t,f,new
     CMP  t,f,new
     PBZ  t,1B
     PBZ  t,1B
     SET  t,1
     SET  t,1
9H   TRAP 0,Halt,0
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.