summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Ccurve.m4
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Ccurve.m4')
-rw-r--r--Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Ccurve.m414
1 files changed, 14 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Ccurve.m4 b/Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Ccurve.m4
new file mode 100644
index 00000000000..6f3b537aac5
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Ccurve.m4
@@ -0,0 +1,14 @@
+.PS
+# Ccurve.m4
+gen_init
+scale = 1.5
+# Gosper C curve
+
+`define' c_curve {if $3==0 then { continue by ($1,$2) } else {
+ c_curve( ($1-$2)/2, ($1+$2)/2, $3-1)
+ c_curve( ($1+$2)/2, ($2-$1)/2, $3-1)}}
+
+line from 0,4 to 0,4
+c_curve(0,4,10)
+
+.PE