From 961b6fc01f9c2f0220070849d22b2a30ca031324 Mon Sep 17 00:00:00 2001
From: Tom Smeding <tom@tomsmeding.com>
Date: Sat, 9 Oct 2021 10:19:46 +0200
Subject: Static C functions; clean up

---
 test.c | 60 +++++++++++++++++-------------------------------------------
 1 file changed, 17 insertions(+), 43 deletions(-)

(limited to 'test.c')

diff --git a/test.c b/test.c
index 24b7b3d..afd0685 100644
--- a/test.c
+++ b/test.c
@@ -16,47 +16,21 @@
 #include <stdint.h>
 #include <inttypes.h>
 
-void expfun_13(int64_t* x14, int64_t* x15) {
-  int64_t x16;
-  int64_t x17;
-  x16 = (2LL);
-  x17 = (3LL);
-  x14[(0)] = x16;
-  x15[(0)] = x17;
+static void expfun_13(int64_t* x14, int64_t* x15) {
+  x14[(0)] = (2LL);
+  x15[(0)] = (3LL);
 }
 
-void expfun_18(int64_t n1, int64_t n2, int64_t* a3, int64_t n4, int64_t* a5, int64_t* a6, int64_t x19, int64_t x20, int64_t* x21) {
-  int64_t x35;
-  int64_t x36;
-  int64_t x27;
-  int64_t x28;
+static void expfun_16(int64_t n1, int64_t n2, int64_t* a3, int64_t n4, int64_t* a5, int64_t* a6, int64_t x17, int64_t x18, int64_t* x19) {
+  int64_t i20;
+  i20 = ((x17) * (n2)) + (x18);
+  int64_t x21;
   int64_t x22;
-  int64_t x23;
-  x22 = x19;
-  x23 = x20;
-  x27 = (x22) * (x23);
-  int64_t i24;
-  int64_t x25;
-  int64_t x26;
-  x25 = x19;
-  x26 = x20;
-  i24 = ((x25) * (n2)) + (x26);
-  x28 = a3[i24];
-  x35 = (x27) + (x28);
-  int64_t x29;
-  int64_t x30;
-  int64_t i31;
-  int64_t x32;
-  x32 = x19;
-  i31 = x32;
-  x29 = a5[i31];
-  x30 = a6[i31];
-  int64_t x33;
-  int64_t x34;
-  x33 = x29;
-  x34 = x30;
-  x36 = (x33) * (x34);
-  x21[(0)] = (x35) + (x36);
+  int64_t i23;
+  i23 = x17;
+  x21 = a5[i23];
+  x22 = a6[i23];
+  x19[(0)] = (((x17) * (x18)) + (a3[i20])) + ((x21) * (x22));
 }
 
 void kaas(int64_t n1, int64_t n2, int64_t* a3, int64_t n4, int64_t* a5, int64_t* a6, int64_t* n10, int64_t* n11, int64_t** a12) {
@@ -64,11 +38,11 @@ void kaas(int64_t n1, int64_t n2, int64_t* a3, int64_t n4, int64_t* a5, int64_t*
   int64_t n8;
   expfun_13(&(n7), &(n8));
   int64_t* a9 = malloc(((n7) * (n8)) * ((sizeof (int64_t))));
-  for (int64_t n38 = (0); n38 < (n7); n38++) {
-    for (int64_t n39 = (0); n39 < (n8); n39++) {
-      int64_t x37;
-      expfun_18(n1, n2, a3, n4, a5, a6, n38, n39, &(x37));
-      a9[((n38) * (n8)) + (n39)] = x37;
+  for (int64_t n25 = (0); n25 < (n7); n25++) {
+    for (int64_t n26 = (0); n26 < (n8); n26++) {
+      int64_t x24;
+      expfun_16(n1, n2, a3, n4, a5, a6, n25, n26, &(x24));
+      a9[((n25) * (n8)) + (n26)] = x24;
     }
   }
   n10[(0)] = n7;
-- 
cgit v1.2.3-70-g09d2