From 339aae5be48169152fdff5dbe2f64b6be4f5763c Mon Sep 17 00:00:00 2001 From: Peter Breitenlohner Date: Mon, 25 Oct 2010 08:15:50 +0000 Subject: small test case for musixflx git-svn-id: svn://tug.org/texlive/trunk@20193 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/musixflx/ChangeLog | 7 + Build/source/texk/musixflx/Makefile.am | 9 ++ Build/source/texk/musixflx/Makefile.in | 111 ++++++++++++++- Build/source/texk/musixflx/tests/musixflx.test | 11 ++ Build/source/texk/musixflx/tests/quod.mx1 | 84 +++++++++++ Build/source/texk/musixflx/tests/quod.mx2 | 4 + Build/source/texk/musixflx/tests/quod.tex | 187 +++++++++++++++++++++++++ 7 files changed, 407 insertions(+), 6 deletions(-) create mode 100755 Build/source/texk/musixflx/tests/musixflx.test create mode 100644 Build/source/texk/musixflx/tests/quod.mx1 create mode 100644 Build/source/texk/musixflx/tests/quod.mx2 create mode 100644 Build/source/texk/musixflx/tests/quod.tex (limited to 'Build/source') diff --git a/Build/source/texk/musixflx/ChangeLog b/Build/source/texk/musixflx/ChangeLog index d21547e7ccc..628dadcd5ee 100644 --- a/Build/source/texk/musixflx/ChangeLog +++ b/Build/source/texk/musixflx/ChangeLog @@ -1,3 +1,10 @@ +2009-10-23 Peter Breitenlohner + + * tests/musixflx.test (new): Shell script for a test case. + * tests/quod.{mx1,mx2,tex} (new): Test data supplied by + Bob Tennent , mail from 2009-10-23. + * Makefile.am: Adapted. + 2009-10-19 Peter Breitenlohner Import musixflx-0.83.2 from CTAN. diff --git a/Build/source/texk/musixflx/Makefile.am b/Build/source/texk/musixflx/Makefile.am index 7b7e10cd7dd..43dea5d38e7 100644 --- a/Build/source/texk/musixflx/Makefile.am +++ b/Build/source/texk/musixflx/Makefile.am @@ -27,3 +27,12 @@ nodist_musixflx_SOURCES = \ nodist_man1_MANS = \ $(MUSIXFLX_TREE)/musixflx.1 +## Tests. +## +TESTS = tests/musixflx.test +EXTRA_DIST += $(TESTS) +DISTCLEANFILES = +## tests/musixflx.test +EXTRA_DIST += tests/quod.mx1 tests/quod.mx2 tests/quod.tex +DISTCLEANFILES += quod.mx1 quod.mx2 + diff --git a/Build/source/texk/musixflx/Makefile.in b/Build/source/texk/musixflx/Makefile.in index 0bcc8258f4f..ca8286b4832 100644 --- a/Build/source/texk/musixflx/Makefile.in +++ b/Build/source/texk/musixflx/Makefile.in @@ -95,6 +95,8 @@ NROFF = nroff MANS = $(nodist_man1_MANS) ETAGS = etags CTAGS = ctags +am__tty_colors = \ +red=; grn=; lgn=; blu=; std= DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST) distdir = $(PACKAGE)-$(VERSION) top_distdir = $(distdir) @@ -193,7 +195,8 @@ top_build_prefix = @top_build_prefix@ top_builddir = @top_builddir@ top_srcdir = @top_srcdir@ ACLOCAL_AMFLAGS = -I ../../m4 -EXTRA_DIST = $(MUSIXFLX_TREE) $(MUSIXFLX_TREE)-PATCHES +EXTRA_DIST = $(MUSIXFLX_TREE) $(MUSIXFLX_TREE)-PATCHES $(TESTS) \ + tests/quod.mx1 tests/quod.mx2 tests/quod.tex AM_CFLAGS = $(WARNING_CFLAGS) nodist_musixflx_SOURCES = \ $(MUSIXFLX_TREE)/musixflx.c @@ -201,6 +204,8 @@ nodist_musixflx_SOURCES = \ nodist_man1_MANS = \ $(MUSIXFLX_TREE)/musixflx.1 +TESTS = tests/musixflx.test +DISTCLEANFILES = quod.mx1 quod.mx2 all: config.h $(MAKE) $(AM_MAKEFLAGS) all-am @@ -420,6 +425,98 @@ GTAGS: distclean-tags: -rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags +check-TESTS: $(TESTS) + @failed=0; all=0; xfail=0; xpass=0; skip=0; \ + srcdir=$(srcdir); export srcdir; \ + list=' $(TESTS) '; \ + $(am__tty_colors); \ + if test -n "$$list"; then \ + for tst in $$list; do \ + if test -f ./$$tst; then dir=./; \ + elif test -f $$tst; then dir=; \ + else dir="$(srcdir)/"; fi; \ + if $(TESTS_ENVIRONMENT) $${dir}$$tst; then \ + all=`expr $$all + 1`; \ + case " $(XFAIL_TESTS) " in \ + *[\ \ ]$$tst[\ \ ]*) \ + xpass=`expr $$xpass + 1`; \ + failed=`expr $$failed + 1`; \ + col=$$red; res=XPASS; \ + ;; \ + *) \ + col=$$grn; res=PASS; \ + ;; \ + esac; \ + elif test $$? -ne 77; then \ + all=`expr $$all + 1`; \ + case " $(XFAIL_TESTS) " in \ + *[\ \ ]$$tst[\ \ ]*) \ + xfail=`expr $$xfail + 1`; \ + col=$$lgn; res=XFAIL; \ + ;; \ + *) \ + failed=`expr $$failed + 1`; \ + col=$$red; res=FAIL; \ + ;; \ + esac; \ + else \ + skip=`expr $$skip + 1`; \ + col=$$blu; res=SKIP; \ + fi; \ + echo "$${col}$$res$${std}: $$tst"; \ + done; \ + if test "$$all" -eq 1; then \ + tests="test"; \ + All=""; \ + else \ + tests="tests"; \ + All="All "; \ + fi; \ + if test "$$failed" -eq 0; then \ + if test "$$xfail" -eq 0; then \ + banner="$$All$$all $$tests passed"; \ + else \ + if test "$$xfail" -eq 1; then failures=failure; else failures=failures; fi; \ + banner="$$All$$all $$tests behaved as expected ($$xfail expected $$failures)"; \ + fi; \ + else \ + if test "$$xpass" -eq 0; then \ + banner="$$failed of $$all $$tests failed"; \ + else \ + if test "$$xpass" -eq 1; then passes=pass; else passes=passes; fi; \ + banner="$$failed of $$all $$tests did not behave as expected ($$xpass unexpected $$passes)"; \ + fi; \ + fi; \ + dashes="$$banner"; \ + skipped=""; \ + if test "$$skip" -ne 0; then \ + if test "$$skip" -eq 1; then \ + skipped="($$skip test was not run)"; \ + else \ + skipped="($$skip tests were not run)"; \ + fi; \ + test `echo "$$skipped" | wc -c` -le `echo "$$banner" | wc -c` || \ + dashes="$$skipped"; \ + fi; \ + report=""; \ + if test "$$failed" -ne 0 && test -n "$(PACKAGE_BUGREPORT)"; then \ + report="Please report to $(PACKAGE_BUGREPORT)"; \ + test `echo "$$report" | wc -c` -le `echo "$$banner" | wc -c` || \ + dashes="$$report"; \ + fi; \ + dashes=`echo "$$dashes" | sed s/./=/g`; \ + if test "$$failed" -eq 0; then \ + echo "$$grn$$dashes"; \ + else \ + echo "$$red$$dashes"; \ + fi; \ + echo "$$banner"; \ + test -z "$$skipped" || echo "$$skipped"; \ + test -z "$$report" || echo "$$report"; \ + echo "$$dashes$$std"; \ + test "$$failed" -eq 0; \ + else :; fi + distdir: $(DISTFILES) @list='$(MANS)'; if test -n "$$list"; then \ list=`for p in $$list; do \ @@ -584,6 +681,7 @@ distcleancheck: distclean $(distcleancheck_listfiles) ; \ exit 1; } >&2 check-am: all-am + $(MAKE) $(AM_MAKEFLAGS) check-TESTS check: check-am all-am: Makefile $(PROGRAMS) $(MANS) config.h installdirs: @@ -611,6 +709,7 @@ clean-generic: distclean-generic: -test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES) -test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES) + -test -z "$(DISTCLEANFILES)" || rm -f $(DISTCLEANFILES) maintainer-clean-generic: @echo "This command is intended for maintainers to use" @@ -689,12 +788,12 @@ uninstall-am: uninstall-binPROGRAMS uninstall-man uninstall-man: uninstall-man1 -.MAKE: all install-am install-strip +.MAKE: all check-am install-am install-strip -.PHONY: CTAGS GTAGS all all-am am--refresh check check-am clean \ - clean-binPROGRAMS clean-generic ctags dist dist-all dist-bzip2 \ - dist-gzip dist-hook dist-lzma dist-shar dist-tarZ dist-xz \ - dist-zip distcheck distclean distclean-compile \ +.PHONY: CTAGS GTAGS all all-am am--refresh check check-TESTS check-am \ + clean clean-binPROGRAMS clean-generic ctags dist dist-all \ + dist-bzip2 dist-gzip dist-hook dist-lzma dist-shar dist-tarZ \ + dist-xz dist-zip distcheck distclean distclean-compile \ distclean-generic distclean-hdr distclean-tags distcleancheck \ distdir distuninstallcheck dvi dvi-am html html-am info \ info-am install install-am install-binPROGRAMS install-data \ diff --git a/Build/source/texk/musixflx/tests/musixflx.test b/Build/source/texk/musixflx/tests/musixflx.test new file mode 100755 index 00000000000..4027c99c2c2 --- /dev/null +++ b/Build/source/texk/musixflx/tests/musixflx.test @@ -0,0 +1,11 @@ +#! /bin/sh + +# Copyright (C) 2010 Peter Breitenlohner +# You may freely use, modify and/or distribute this file. + +rm -f quod.mx2 +cp -f $srcdir/tests/quod.mx1 . + +./musixflx quod || exit 1 +diff $srcdir/tests/quod.mx2 quod.mx2 || exit 1 + diff --git a/Build/source/texk/musixflx/tests/quod.mx1 b/Build/source/texk/musixflx/tests/quod.mx1 new file mode 100644 index 00000000000..929680ee19f --- /dev/null +++ b/Build/source/texk/musixflx/tests/quod.mx1 @@ -0,0 +1,84 @@ +0.83 +S +505.89pt +10.0pt +0.0pt +6.0pt +4.8pt +12.80003pt +5.59998pt +0 0 10.40005pt +0 1 19.58401pt +0 1 0.0pt +0 0 0.4pt +b 0 +1 1 125.90411pt +1 1 0.0pt +1 0 0.4pt +b 1 +2 1 125.90411pt +2 1 0.0pt +2 0 0.4pt +b 2 +3 1 114.67212pt +3 1 0.0pt +3 0 0.4pt +b 3 +4 1 125.90411pt +4 1 0.0pt +4 0 0.4pt +b 4 +5 1 131.52011pt +5 1 0.0pt +5 0 0.4pt +b 5 +6 1 141.93611pt +6 1 0.0pt +6 0 0.4pt +b 6 +7 1 114.67212pt +7 1 0.0pt +7 0 0.4pt +b 7 +8 1 120.33609pt +8 1 0.0pt +8 0 10.80011pt +b 7 +l 10.80011pt 6.40005pt +9 1 19.58401pt +9 1 0.0pt +9 0 0.4pt +b 8 +10 1 120.28812pt +10 1 0.0pt +10 0 0.4pt +b 9 +11 1 120.28812pt +11 1 0.0pt +11 0 0.4pt +b 10 +12 1 131.52011pt +12 1 0.0pt +12 0 0.4pt +b 11 +13 1 147.55211pt +13 1 0.0pt +13 0 0.4pt +b 12 +14 1 144.3841pt +14 1 0.0pt +14 0 0.4pt +b 13 +15 1 137.13611pt +15 1 0.0pt +15 0 0.4pt +b 14 +16 1 125.90411pt +16 1 0.0pt +16 0 0.4pt +b 15 +17 1 123.5521pt +17 1 0.0pt +17 0 6.40005pt +b 16 +* 0 0 diff --git a/Build/source/texk/musixflx/tests/quod.mx2 b/Build/source/texk/musixflx/tests/quod.mx2 new file mode 100644 index 00000000000..fb0c9b29226 --- /dev/null +++ b/Build/source/texk/musixflx/tests/quod.mx2 @@ -0,0 +1,4 @@ +\lineset{ 1}{ 5}{ 4.36049pt}{ 5.45061pt}{ 0.00000pt}% 0 - 4 +\lineset{ 2}{ 5}{ 4.31860pt}{ 5.39825pt}{ 0.00000pt}% 5 - 8 +\lineset{ 3}{ 4}{ 4.48817pt}{ 5.61022pt}{ 0.00000pt}% 9 - 12 +\lineset{ 4}{ 4}{ 4.33818pt}{ 5.42273pt}{ 0.00000pt}% 13 - 16 diff --git a/Build/source/texk/musixflx/tests/quod.tex b/Build/source/texk/musixflx/tests/quod.tex new file mode 100644 index 00000000000..a210b339b21 --- /dev/null +++ b/Build/source/texk/musixflx/tests/quod.tex @@ -0,0 +1,187 @@ +\input musixtex.tex +\input musixsty.tex + + +\def\tr#1{\zcharnote{#1}{\ppff tr}}% +\def\pince#1{\shake{#1}}% +\vsize9.75in +\voffset-0.5in +\hsize7.0in +\hoffset-0.25in +\smallmusicsize +\bigaccid +\advance\parindent by 10pt +\def\writebarno{\llap{\ninebf\the\barno\barnoadd}}% +\def\raisebarno{4\internote}% +\def\shiftbarno{1.5\Interligne}% +\nobarnumbers +\geometricskipscale + +\def\omit#1{}% + +\def\tql#1#2{\tbl{#1}\qb{#1}{#2}} +\def\tqu#1#2{\tbu{#1}\qb{#1}{#2}} +\def\nbbqu#1#2{\nbbu{#1}\qb{#1}{#2}} +\def\nbbql#1#2{\nbbl{#1}\qb{#1}{#2}} + +\def\nqql#1#2{\roffset{0.25}{\tbbl{#1}\tbbl{#1}\qb{#1}{#2}}} +\def\nqqu#1#2{\roffset{0.25}{\tbbu{#1}\tbbu{#1}\qb{#1}{#2}}} +\def\tqql#1#2{\roffset{0.25}{\tbbl{#1}\tbl{#1}\qb{#1}{#2}}} +\def\tqqu#1#2{\roffset{0.25}{\tbbu{#1}\tbu{#1}\qb{#1}{#2}}} +\def\tqqql#1#2{\roffset{0.25}{\tbbbl{#1}\tbl{#1}\qb{#1}{#2}}} +\def\tqqqu#1#2{\roffset{0.25}{\tbbbu{#1}\tbu{#1}\qb{#1}{#2}}} + +\instrumentnumber4 +\setclef1\bass\setbassclefsymbol1\bassoct +\setclef4\treble\settrebleclefsymbol4\trebleoct +\catcodesmusic +\generalsignature{+1} +\generalmeter\meterC +\setname1{B} +\setname2{T} +\setname3{A} +\setname4{S} +\songtop4 +\songbottom1 +\fulltitle{Quodlibet} +\subtitle{Variation 30 of the Goldberg Variations for Clavier} +\title{Quodlibet} +\author{J. S. Bach (1685-1750)} +\shortauthor{J. S. Bach} +\othermention{Arranged for Recorders by R. D. Tennent} +\maketitle +\startbarno=0 +\nobarnumbers +\stafftopmarg=4.0\Interligne% +\staffbotmarg=4.0\Interligne% +%\setinterinstrument3{2.5\internote}% +\startpiece\addspace\afterruleskip% +\systemnumbers% +\Notes\ds&\cu d&\ds&\ds\en +\bar%1 +\Notes\hl N&\ibu1g2\qb1{ghi}\tqu1j&&\hpause\en +\Notes\hl M&\ibl1k{-2}\qb1k\en +\notes&\nbbl1\qb1j\tql1i&&\qp\en +\Notes&\ibu1h0\qb1h&&\ds\en +\notes&\nbbu1\qb1g\tqu1h&&\cu d\en +\def\atnextbar{\znotes&&\centerpause&&\en}% +\bar%2 +\Notes\hl L&\ibu1i{-2}\qb1i\tqu1h&\ql n&\ibu3g2\qb3{gh}\en +\Notes&\itied1g\qu g&\ql n&\qb3i\tqu3j\en +\Notes\ql{.K}&\ttie1\qu g&\ql o&\ibl3k{-2}\qb3k\en +\notes&&&\nbbl3\qb3j\tql3i\en +\Notes&\ibu1f0\pince{n}\qb1f&\cl o&\cu h\en +\notes\cu J&\nbbu1\qb1e\tqu1f&\ds&\ds\en +\bar%3 +\Notes\hu I&\qu g&\ibl2n{-1}\qb2{no}&\ql k\en +\Notes&\ds\cl k&\qb2{n}\tql2{=m}&\ql k\en +\Notes\hu J&\ibu1j{-2}\qb1{ji}&\ibl2j{0}\qb2{lk}&\ql l\en +\Notes&\qb1h\tqu1g&\qb2j\tql2p&\ql l\en +\bar%4 +\Notes\hl K&\itied1f\pince{n}\qu f&\ibl2o{-1}\qb2{on}&\ibl3k{-1}\qb3{kl}\en +\notes&\ttie1\ibbu1e{-2}\qb1f\tbbu1\qb1e&\qb2o&\qb3k\en +%\vnotes1.5\elemskip&\nbbbu1\qb1e\tbbu1\qb1f&&\en +\Notes&\itied1d\tqu1d&\tql2m&\tql3j\en +\Notes\qu G&\ttie1\qu d&\ibl2n{-2}\qb2n\tql2m&\ibu3h{-1}\pince{p}\qb3i\tqu3h\en +\Notes\ds&\qp&\ibl2n{-5}\qb2n&\qu g\en +\notes\ibbl0b{-1}\qb0b\tql0a&&\tql2k&\en +\bar%5 +\Notes\ibl0M0\qb0N&\ql n&\ibl2n2\qb2n&\hpause\en +\notes\nbbl0\qb0M\tql0N&&\qb2o&\en +\Notes\ibl0K0\qb0L&\ql n&\qb2p&\en +\notes\nbbl0\qb0K\tql0L&&\tql2q&\en +\Notes\ql{.M}&\ql o&\ibl2r{-2}\qb2r&\qp\en +\notes&&\nbbl2\qb2q\tql2p&\en +\Notes\sk\cu I&\ql o&\ibl2o6\qb2o\itieu2r\tql2r&\ds\cl k\en +\bar%6 +\Notes\ql{.L}&\ibl1n{-1}\qb1{no}&\ttie2\ibl2r{-2}\qb2r\tql2q&\ibl3n{-2}\qb3{nm}\en +\Notes&\qb1n&\ql p&\qb3l\en +\notes\ibbl0M2\qb0M\tql0N&\tql1m&&\tql3k\en +\Notes\itieu0a\ql a&\ibl1l{-2}\qb1l&\ql{.o}&\pince{n}\ibl3i0\qb3{^j}\en +\notes&\tql1k&&\nbbl3\qb3i\tql3j\en +\notes\ttie0\ibbl0a{-2}\qb0{aN}&\cl{^j}&&\cu h\en +\notes\qb0M\tql0L&\ds&\ibbl2i2\qb2i\qsk\tql2{^j}&\ds\en +\bar%7 +\Notes\ql M&\ibu1g0\qb1{fg}&\ibl2k0\qb2{kl}&\qu h\en +\Notes\ql K&\qb1h\tqu1f&\qb2m\tql2k&\qu h\en +\Notes\ql N&\ibu1g{-2}\qb1{gf}&\ibl2i4\qb2{ik}&\ql i\en +\Notes\qu G&\qb1e\tqu1d&\qb2n\tql2m&\ql i\en +\bar%8 +\Notes\qu{.H}&\ibu1c4\qb1{^cd}&\ibl2l{-1}\qb2{.l}\tqql2k\isluru2j&\ibu3i{-1}\qb3{hi}\en +\notes&\qb1e&\tslur2j\ibbl2j0\qb2k\hqsk\tbbl2\qb2{^j}&\qb3h\en +\Notes\cu{^J}&\itied1h\tqu1h&\itieu2l\tql2l&\tqu3g\en +\notes\ql K&\ttie1\ibu1h{-1}\qb1h&\ttie2\ibbl2l{-1}\qb2{lk}&\ibu3f{-1}\qb3f\en +\notes&\tqu1g&\qb2l\tql2j&\tqu3e\en +\Notes\cl K&\cu f&\cl k&\cu d\en +%\nobarnumbers% +%\setrightrepeat% +%\alaligne% +\advance\barno by -1% +%\leftrepeat% +%\systemnumbers% +\leftrightrepeat +%\advance\barno by -1% +\Notes\ds&\cl m&\ds&\cl o\en +\bar%9 +%\notes&&&\lcharnote q{\ninebf \the\barno}\enotes +\Notes\ql d\sk\ql c&\ibl1k0\qb1{kmk}\tql1{m}&\ql o\sk\ql o&\ibl3m0\qb3{mom}\tql3o\en +\Notes\ql b&\ibl1k0\qb1n&\ql p&\ibl3k2\qb3k\en +\notes&\qb1k&&\nbbl3\qb3l\tql3m\en +\Notes\ql N&\qb1k\tql1n&\ql p&\ibl3n{-4}\qb3n\tql3l\en +\bar%10 +\Notes\ibl0b{-1}\qb0{cbc}\tql0a&\cl l\ds\qp&\ibl2o{-1}\qb2{opo}\tql2n&\ibl3o{-2}\qb3{onm}\tql3l\en +\Notes\ql{.b}&\ql m&\ibl2m{-2}\qb2m&\ibl3j0\qb3{^k}\en +\notes&&\tql2l&\nbbl3\qb3{^j}\tql3k\en +\Notes\sk\cl a&\ql m&\cl{^k}\ds&\ibl3i8\qb3i\tql3p\en +\bar%11 +\Notes\ql{N}\sk\ql{N}&\ibl1l0\qb1{nln}\tql1l&\ql p\sk\ql p&\ibl3m0\qb3{lpl}\tql3p\en +\notes\ql{.a}&\ibl1m{-1}\qb1{m*n}&\ql q&\ibbl3k2\qb3{^klm}\tql3n\en +\Notes&\qb1m&\ql q&\ibl3o{-2}\qb3o\en +\notes\cl{^a}&\tql1l&&\nbbl3\qb3n\tql3m\en +\bar%12 +\Notes\ql b&\ibl1k2\qb1{^k}&\ibl2o{-1}\qb2p&\ibl3n{-2}\qb3n\en +\notes&\nbbl1\qb1l\tql1m&\qb2q&\nbbl3\qb3m\tql3l\qsk\en +\notes\qu I&\itied1i\qu i&\qb2p&\ibbl3k0\qb3{^kl}\en +\notes&&\tql2o&\qb3m\tql3k\en +\Notes\ql{.L}&\ttie1\ibu1i0\qb1i&\ibl2n0\qb2n&\itieu3l\hl l\en +\notes&\nbbu1\qb1h\tqu1i&\nbbl2\qb2m\tql2n&\en +\Notes&\ibu1g2\qb1g&\cl l&\en +\notes\cl{=K}&\nbbu1\qb1h\tqu1i&\ds&\en +\bar%13 +\notes\qu J&\ibl1j2\qb1j\sk\qb1k&\hpause&\ttie3\ibbl3k1\isluru3l\qb3l\tslur3k\qb3k\isluru3m\qb3m\tslur3l\tql3l\en +\notes\ql c&\qb1l\sk\tql1m&&\ibbl3m1\isluru3n\qb3n\tbbl3\tslur3m\qb3m\tql3o\en +\notes\ql{.b}&\ibl1n{-1}\qb1n\sk\nbbl1\qb1m\tql1l&\ql n&\ql{.k}\en +\Notes&\cl k&\ibl2k{-4}\qb2n&\en +\notes\ibbu0J{-2}\qb0J\tqu0I&\ds&\tql2g&\ibbl3j2\qb3j\tql3k\en +\bar%14 +\Notes\qu{.H}&\ds&\ibl2j1\qb2{.j}&\ibl3l2\qb3l\en +\notes&\cu h&\qsk\tqql2k&\nbbl3\qb3m\tql3n\en +\Notes&\ibu1e0\qb1e&\ibl2j{-2}\qb2j&\ibl3o{-2}\qb3o\en +\notes\ibbu0I2\qb0I\tqu0J&\nbbu1\qb1d\tqu1e&\tql2i&\tql3n\en +\notes\ql{.K}&\ibu1g1\qb1f&\ibu2h1\qb2h&\ibbl3l{-2}\pince{o}\qb3m\tbbl3\qb3l\en +%\vnotes1.4\elemskip&&&\nbbbl3\qb3l\tbbl3\qb3m\en +\Notes&\itied1g\tqu1g&\tqu2i&\tql3k\en +\Notes&\ttie1\ibu1g{-1}\qb1g&\ibl2j2\qb2j&\ibu3i{-6}\qb3j\en +\notes\ibbu0J2\qb0J\tqu0K&\tqu1f&\tql2k&\tqu3d\en +\bar%15 +\Notes\ibu0I0\qb0G&\qu d&\ibu2i0\qb2i&\ibl3i0\qb3i\en +\notes\qb0H&&\nbbu2\qb2h\tqu2i&\qb3j\en +\Notes\qb0I&\qu d&\cu g&\qb3k\en +\Notes\tqu0G&&\ds&\tql3i\en +\Notes\qu{.J}&\qu e&\ds&\ibu3j{-2}\qb3j\en +\notes&&\ibbl2l{-2}\qb2l\tql2k&\qb3i\en +\Notes&\qu e&\ibl2j4\qb2j&\qb3h\en +\Notes\cu{^J}&&\tql2l&\tqu3g\en +\bar%16 +\notes\ql K&\ibu1g{1}\qb1d&\ibbl2h1\qb2{hk}&\ibu3f2\qb3f\en +\notes&\qb1e&\qb2j\tql2i&\tqu3g\en +\notes\ql K&\qb1d&\ibbl2j0\qb2j\tbbl2\qb2h&\ibu3h{-4}\qb3h\en +\Notes&\tqu1j&\itieu2k\tql2k&\tqu3f\en +\Notes\ql N&\ibu1i{-2}\qb1i&\ttie2\ibl2j0\qb2k&\qu g\en +\notes&\tqu1h&\nbbl2\qb2j\tql2k&\en +\Notes\cu G&\cu g&\cl i&\cu g\en +\setrightrepeat +%\mulooseness=+1% +\endpiece% +\eject +\end -- cgit v1.2.3