From: Ian Jackson <ijackson@chiark.greenend.org.uk>
Date: Sun, 19 Nov 2017 11:56:48 +0000 (+0000)
Subject: symbolic.py: more C output
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~ian/git?a=commitdiff_plain;h=27e8b78875b248375e3b5d846a18ff5e929d01e7;p=moebius3.git

symbolic.py: more C output

Signed-off-by: Ian Jackson <ijackson@chiark.greenend.org.uk>
---

diff --git a/symbolic.py b/symbolic.py
index f219788..a7dc79e 100755
--- a/symbolic.py
+++ b/symbolic.py
@@ -220,11 +220,22 @@ def gen_diff(current, smalls):
     )
     cprint('} /* %s small */' % small)
 
-cprintraw('#define J_POPULATE \\')
-gen_diff(result_dirnscaled, (sh*sh*la, th*th*la))
-cprintraw('')
-
-#bad = q_orgcoords[0]
-#badd = diff(bad, la)
-
-#dbg('bad','badd')
+def gen_x_extract():
+  cprint('#define X_EXTRACT \\')
+  for ix in range(0, len(params)):
+    cprint('double %s = X(%d)' % (params[ix], ix))
+  cprintraw()
+
+def gen_f_populate():
+  cprint('#define F_POPULATE')
+  cassign(result_dirnscaled,'F','ftmp')
+  cprintraw('')
+
+def gen_j_populate():
+  cprint('#define J_POPULATE')
+  gen_diff(result_dirnscaled, (sh*sh*la, th*th*la))
+  cprintraw('')
+
+gen_x_extract()
+gen_f_populate()
+gen_j_populate()