1 % Feta (not the Font-En-Tja) music font -- small ties
2 % This file is part of LilyPond, the GNU music typesetter.
4 % Copyright (C) 2011 Bertrand Bordage <bordage.bertrand@gmail.com>
6 % LilyPond is free software: you can redistribute it and/or modify
7 % it under the terms of the GNU General Public License as published by
8 % the Free Software Foundation, either version 3 of the License, or
9 % (at your option) any later version.
11 % LilyPond is distributed in the hope that it will be useful,
12 % but WITHOUT ANY WARRANTY; without even the implied warranty of
13 % MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 % GNU General Public License for more details.
16 % You should have received a copy of the GNU General Public License
17 % along with LilyPond. If not, see <http://www.gnu.org/licenses/>.
19 fet_begingroup ("ties");
21 fet_beginchar ("lyric tie", "lyric");
24 padding := .4 staff_space;
29 z1 = (-staff_space, -padding);
31 z3 = (staff_space, -padding);
33 penpos1 (1.2 linethickness, 50);
34 penpos2 (2 linethickness, 90);
35 penpos3 (1.2 linethickness, 130);
38 .. simple_serif (z3l, z3r, 90)
40 .. simple_serif (z1r, z1l, 90)
46 fet_endgroup ("ties");