summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Koch.m4
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2024-05-30 19:57:12 +0000
committerKarl Berry <karl@freefriends.org>2024-05-30 19:57:12 +0000
commit331c40fd5e3111d98316166d251fc1629235c6bc (patch)
tree959465117fea26ec7e231696481f4a134e303ad9 /Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Koch.m4
parent63e60afe56af880c4a7793f19b7de582f889d25c (diff)
circuit_macros (30may24)
git-svn-id: svn://tug.org/texlive/trunk@71389 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Koch.m4')
-rw-r--r--Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Koch.m433
1 files changed, 0 insertions, 33 deletions
diff --git a/Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Koch.m4 b/Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Koch.m4
deleted file mode 100644
index cb122c10b64..00000000000
--- a/Master/texmf-dist/doc/latex/circuit-macros/examples/extras/Koch.m4
+++ /dev/null
@@ -1,33 +0,0 @@
-.PS
-# Koch snowflake
-gen_init
-
- leng = 4
- X: 3,5
- nsides = 3; rot[1] = 0; rot[2] = -120; rot[3] = -120
- depth=4
-
- for i=1 to depth do {
- for j=1 to nsides do { tmp[j] = rot[j] }
- leng = leng/3
- k = 0
- for j=1 to nsides do {
- rot[k+1] = tmp[j]
- rot[k+2] = 60
- rot[k+3] = -120
- rot[k+4] = 60
- k += 4
- }
- nsides = k
- }
-
- a = 0
- line from X to X
- for i=1 to nsides do {
- a += rot[i]
-# X: X+(Rect_(leng,a))
-# continue to X
- continue by (Rect_(leng,a))
- }
-
-.PE