blob: 08685c6fb3c7739e5d7959cec08f0545fcfc9e96 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
imm f"-1.0" $ls0v
imm f"inf" $lr0v
# (40 / 8).times do |i|
# j = i * 8
# puts "fvadd $lm#{j}v $ls0v $omr1"
# puts "lpassa $lr0v $ln#{j}v/$imr1"
# puts
# end
fvadd $lm0v $ls0v $omr1
lpassa $lr0v $ln0v/$imr1; fvadd $lm8v $ls0v $omr1
lpassa $lr0v $ln8v/$imr1; fvadd $lm16v $ls0v $omr1
lpassa $lr0v $ln16v/$imr1; fvadd $lm24v $ls0v $omr1
lpassa $lr0v $ln24v/$imr1; fvadd $lm32v $ls0v $omr1
lpassa $lr0v $ln32v/$imr1
|