From 0736297ab4e80f1fa9cb144274a5c4ebd42ec10f Mon Sep 17 00:00:00 2001
From: fred <fred>
Date: Wed, 8 Oct 1997 17:37:41 +0000
Subject: [PATCH] lilypond-0.1.32

---
 mf/feta-watzieik.mf | 29 +++++++++++++++++++++++++++++
 1 file changed, 29 insertions(+)
 create mode 100644 mf/feta-watzieik.mf

diff --git a/mf/feta-watzieik.mf b/mf/feta-watzieik.mf
new file mode 100644
index 0000000000..8bcdf19bc8
--- /dev/null
+++ b/mf/feta-watzieik.mf
@@ -0,0 +1,29 @@
+% wat-zie-ik.mf
+% part of LilyPond's pretty-but-neat music font
+% beams: plat en steil
+
+input feta-params;
+
+beamheight#:=0.48interline#;
+
+define_pixels(beamheight);
+
+pen beam_pen;
+beam_pen:=penrazor scaled beamheight rotated 90;
+
+ELEM_TAN:=0.05;
+SLOPES:=20;
+LENGTHS:=6;
+ELEM_FACTOR := 2;
+ELEM_INITIAL_LEN:=2;
+
+for i := -SLOPES upto SLOPES:
+	width:= ELEM_INITIAL_LEN;
+	for j:=1 upto LENGTHS:
+		beginchar(128 + i * LENGTHS + j -1 ,width,0,0);
+			pickup beam_pen;
+			draw origin--(lft w,w*i*ELEM_TAN);
+			endchar;
+		width:=ELEM_FACTOR *width;
+		endfor;
+	endfor;
-- 
2.39.5