From 1a6b529c9f88bd92579714a43bfa2c9fa32e6a12 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Andreas=20M=C3=BCller?= <andreas.mueller@othello.ch>
Date: Tue, 9 Aug 2022 08:27:08 +0200
Subject: add zetaplot

---
 buch/papers/zeta/images/zetaplot.m | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 buch/papers/zeta/images/zetaplot.m

(limited to 'buch/papers/zeta/images/zetaplot.m')

diff --git a/buch/papers/zeta/images/zetaplot.m b/buch/papers/zeta/images/zetaplot.m
new file mode 100644
index 0000000..984b645
--- /dev/null
+++ b/buch/papers/zeta/images/zetaplot.m
@@ -0,0 +1,23 @@
+%
+% zetaplot.m
+%
+% (c) 2022 Prof Dr Andreas Müller
+%
+s = 1;
+h = 0.02;
+m = 40;
+
+fn = fopen("zetapath.tex", "w");
+fprintf(fn, "\\def\\zetapath{\n");
+counter = 0;
+for y = (0:h:m)
+	if (counter > 0)
+		fprintf(fn, "\n\t--");
+	end
+	z = zeta(0.5 + i*y);
+	fprintf(fn, " ({%.4f*\\dx},{%.4f*\\dy})", real(z), imag(z));
+	counter = counter + 1;
+end
+fprintf(fn, "\n}\n");
+fclose(fn);
+
-- 
cgit v1.2.1