import Music
import Ex 
tune5 = e4 & d4 & c4 & b4 & a4 & g3 & f3 & e3 & d3 & c3 &
        b3 & a3 & g2 & f2 & e2 & d2 & c2 & b2 & a2 & a2 &
        b2 & c2 & d2 & e2 & f2 & g2 & a3 & b3 & c3 & c3 &
        d3 & e3 & f3 & g3 & a4 & b4 & c4 & d4 & e4 & f4 &
        g4 & a5 & b5 & c5 & e4 & d4 & c4 & b4 & a4
tune2 = guitar $ e $ ff $ tune5
tune3 = pp (rep 5 (panFlute (repTf 19 (up maj3) (s a1))))
tune = ( tune2 !< tune3) !> violin (p(fJ))