aboutsummaryrefslogtreecommitdiffhomepage
path: root/problems/08-Lesseq/02.vsm
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