From d1d6718f4fcdf3ac36403295d0cccde086fba0a3 Mon Sep 17 00:00:00 2001
From: nsfisis <nsfisis@gmail.com>
Date: Tue, 10 Sep 2024 19:24:31 +0900
Subject: 19-Inversion

---
 problems/13-Mod-3/08.vsm | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100644 problems/13-Mod-3/08.vsm

(limited to 'problems/13-Mod-3/08.vsm')

diff --git a/problems/13-Mod-3/08.vsm b/problems/13-Mod-3/08.vsm
new file mode 100644
index 0000000..04838b2
--- /dev/null
+++ b/problems/13-Mod-3/08.vsm
@@ -0,0 +1,30 @@
+imm f"8388608" $r0v
+imm f"0.3333333333333333333333" $r4v
+
+ior $lm0v $lr0 $nowrite
+ior $lm8v $lr0 $nowrite; fvadd $aluf -$lr0 $ls0v
+ior $lm16v $lr0 $nowrite; fvadd $aluf -$lr0 $ls8v
+ior $lm24v $lr0 $nowrite; fvadd $aluf -$lr0 $ls16v
+fvadd $aluf -$lr0 $ls24v
+
+fvmul $ls0v $lr4 $nowrite
+fvmul $ls8v $lr4 $nowrite; fftoi $mauf $ls32v
+fvmul $ls16v $lr4 $nowrite; fftoi $mauf $ls40v
+fvmul $ls24v $lr4 $nowrite; fftoi $mauf $ls48v
+fftoi $mauf $ls56v
+
+ipackbit $ls32v $lr8 $nowrite
+iadd $ls32v $aluf $nowrite
+isub $lm0v $aluf $ln0v
+
+ipackbit $ls40v $lr8 $nowrite
+iadd $ls40v $aluf $nowrite
+isub $lm8v $aluf $ln8v
+
+ipackbit $ls48v $lr8 $nowrite
+iadd $ls48v $aluf $nowrite
+isub $lm16v $aluf $ln16v
+
+ipackbit $ls56v $lr8 $nowrite
+iadd $ls56v $aluf $nowrite
+isub $lm24v $aluf $ln24v
-- 
cgit v1.2.3-70-g09d2