/* Gwyn, Lord of Cinder Theme
         * Composed by Motoi Sakuraba
         * Transcribed by Michal Wozniczka
         *      from sheet music found here: imgur.com/a/t2ObF
         * 11/14/2015
         */
        
        Cons gloc = (Cons)reader(
"(seq " +
"(repeat 1 (sync " +
"(seq (rest 8) (rest 4) (piano 0 A2 16) (rest 8) " +
     "(repeat 7 (seq (rest 8) (rest 8) (rest 8) (piano 0 A2 16) (rest 8))) " +
     "(repeat 3 (seq (rest 8) (rest 4))) " +
     "(repeat 1 (seq (rest 8) (rest 8) (rest 8) (piano 0 A2 16) (rest 8))) " +
     "(repeat 2 (seq (rest 8) (rest 4))) " + 
     "(piano 0 E3 8) (rest 4) " +
     "(repeat 3 (seq (rest 8) (rest 4))) " +
     "(repeat 4 (seq (piano 0 D3 8) (rest 4))) " +
     "(repeat 2 (seq (piano 0 E2 16) (rest 8))) " +
     "(repeat 4 (seq (piano 0 D3 8) (rest 4))) " +
     "(sync (piano 0 A2 16) (piano 0 A3 16)) (rest 8) " +
     "(repeat 15 (seq (rest 8) (rest 4))) " +
     "(sync (piano 0 G1 16) (piano 0 G2 16)) (rest 8) " +
     "(repeat 2 (seq (rest 8) (rest 4))) " +
     "(sync (piano 0 G1 16) (piano 0 G2 16)) (rest 8) " +
     "(rest 8) (rest 4) " +
     "(sync (piano 0 G1 8) (piano 0 G2 8)) (rest 4) " +
     "(sync (piano 0 G1 16) (piano 0 G2 16)) (rest 8) " +
     "(rest 8) (rest 4) " +
     "(repeat 2 (seq (piano 0 E3 8) (rest 4) (sync (piano 0 E2 8) (piano 0 E3 8)) (rest 4))) " +
     "(repeat 8 (seq (rest 8) (rest 4))) " +
     "(piano 0 E4 2) (piano 0 B4 2) (repeat 2 (seq (piano 0 C5 2) (piano 0 B4 2))) " +
     "(piano 0 G4 2) (piano 0 B4 2) (repeat 2 (seq (piano 0 C5 2) (piano 0 B4 2))) " +
     "(piano 0 F4 2) (piano 0 B4 2) (piano 0 C5 2) (piano 0 E5 2) (rest 4) " + 
     "(rest 8) (rest 4) " +
     "(piano 0 E4 2) (piano 0 B4 2) (repeat 2 (seq (piano 0 C5 2) (piano 0 B4 2))) " +
     "(piano 0 G4 2) (piano 0 B4 2) (repeat 2 (seq (piano 0 C5 2) (piano 0 B4 2))) " +
     "(piano 0 F4 2) (piano 0 B4 2) (repeat 2 (seq (piano 0 C5 2) (piano 0 B4 2))) " +
     "(piano 0 C5 8) (rest 4) " +
     ")" +
"(seq (rest 4) (sync (piano 1 E6 4) (piano 1 E7 4)) (sync (piano 1 D6 4) (piano 1 D7 4)) " +
     "(sync (piano 1 A5 8) (piano 1 A6 8)) (rest 4) " +
     "(rest 4) (sync (piano 1 E6 4) (piano 1 E7 4)) (sync (piano 1 D6 4) (piano 1 D7 4)) " +
     "(sync (piano 1 G6 8) (piano 1 G7 8)) (sync (piano 1 F6 4) (piano 1 F7 4)) " +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(rest 4) (sync (piano 1 E6 4) (piano 1 E7 4)) (sync (piano 1 D7 4) (piano 1 D6 4)) " +
     "(sync (piano 1 A5 8) (piano 1 A6 8)) (rest 4) " +
     "(rest 4) (sync (piano 1 E6 4) (piano 1 E7 4)) (sync (piano 1 D6 4) (piano 1 D7 4)) " +
     "(sync (piano 1 G6 8) (piano 1 G7 8)) (sync (piano 1 F6 4) (piano 1 F7 4)) " +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(rest 8) (sync (piano 1 A5 4) (piano 1 A6 4)) " +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(sync (piano 1 E6 4) (piano 1 E7 4))  (sync (piano 1 F6 4) (piano 1 F7 4)) (sync (piano 1 G6 4) (piano 1 G7 4))" +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(rest 4) (sync (piano 1 D6 4) (piano 1 D7 4)) (sync (piano 1 C6 4) (piano 1 C7 4)) " +
     "(sync (piano 1 B5 8) (piano 1 B6 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(rest 8) (sync (piano 1 A5 4) (piano 1 A6 4)) " +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(sync (piano 1 E6 4) (piano 1 E7 4))  (sync (piano 1 F6 4) (piano 1 F7 4)) (sync (piano 1 G6 4) (piano 1 G7 4))" +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(rest 4) (sync (piano 1 F6 4) (piano 1 F7 4)) (sync (piano 1 G6 4) (piano 1 G7 4)) " +
     "(sync (piano 1 A6 8) (piano 1 A7 8)) (rest 4) " +
     "(sync (piano 1 A6 4) (piano 1 A7 4))  (sync (piano 1 G6 4) (piano 1 G7 4)) (sync (piano 1 F6 4) (piano 1 F7 4))" +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(rest 4) (piano 1 E7 4) (piano 1 D7 4) " +
     "(piano 1 A6 8) (rest 4) " +
     "(rest 4) (piano 1 E7 4) (piano 1 D7 4) " +
     "(piano 1 G7 8) (piano 1 F7 4) " +
     "(piano 1 E7 8) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(piano 1 E7 8) (rest 4) " +
     "(rest 8) (rest 4) " + 
     "(piano 1 B5 8) (rest 4) " +
     "(sync (piano 1 B5 8) (piano 1 B6 8)) (rest 4) " +
     "(sync (piano 1 C6 8) (piano 1 C7 8)) (rest 4) " +
     "(sync (piano 1 D6 8) (piano 1 D7 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(sync (piano 1 B5 8) (piano 1 B6 8)) (rest 4) " +
     "(sync (piano 1 C6 8) (piano 1 C7 8)) (rest 4) " +
     "(sync (piano 1 D6 8) (piano 1 D7 8)) (sync (piano 1 E6 4) (piano 1 E7 4)) " +
     "(rest 8) (rest 4) " +
     "(sync (piano 1 B5 8) (piano 1 B6 8)) (rest 4) " +
     "(sync (piano 1 C6 8) (piano 1 C7 8)) (rest 4) " +
     "(sync (piano 1 D6 8) (piano 1 D7 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(sync (piano 1 B5 8) (piano 1 B6 8)) (rest 4) " +
     "(sync (piano 1 C6 8) (piano 1 C7 8)) (rest 4) " +
     "(sync (piano 1 D6 4) (piano 1 D7 4)) (sync (piano 1 E6 4) (piano 1 E7 4)) (sync (piano 1 D6 2) (piano 1 D7 2)) (sync (piano 1 C6 2) (piano 1 C7 2)) " +
     "(repeat 7 (repeat 3 (sync (piano 1 A5 4) (piano 1 B5 4)))) " +
     "(repeat 2 (sync (piano 1 A5 4) (piano 1 B5 4))) (sync (piano 1 A5 4) (piano 1 B5 4) (piano 1 A6 4)) " +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(sync (piano 1 E6 4) (piano 1 E7 4))  (sync (piano 1 F6 4) (piano 1 F7 4)) (sync (piano 1 G6 4) (piano 1 G7 4))" +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(rest 4) (sync (piano 1 D6 4) (piano 1 D7 4)) (sync (piano 1 C6 4) (piano 1 C7 4)) " +
     "(sync (piano 1 D6 4) (piano 1 D7 4)) (sync (piano 1 E6 4) (piano 1 E7 4)) (sync (piano 1 B5 4) (piano 1 B6 4)) " +
     "(sync (piano 1 B5 8) (piano 1 B6 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(rest 8) (sync (piano 1 A5 4) (piano 1 A6 4)) " +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(sync (piano 1 E6 4) (piano 1 E7 4))  (sync (piano 1 F6 4) (piano 1 F7 4)) (sync (piano 1 G6 4) (piano 1 G7 4))" +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(rest 4) (sync (piano 1 F6 4) (piano 1 F7 4)) (sync (piano 1 G6 4) (piano 1 G7 4)) " +
     "(sync (piano 1 A6 8) (piano 1 A7 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(sync (piano 1 A6 16) (piano 1 A7 16)) (rest 8) " +
     "(rest 4) (sync (piano 1 E6 4) (piano 1 E7 4)) (sync (piano 1 D6 4) (piano 1 D7 4)) " +
     "(sync (piano 1 A5 8) (piano 1 A6 8)) (rest 4) " +
     "(rest 4) (sync (piano 1 E6 4) (piano 1 E7 4)) (sync (piano 1 D6 4) (piano 1 D7 4)) " +
     "(sync (piano 1 G6 8) (piano 1 G7 8)) (sync (piano 1 F6 4) (piano 1 F7 4)) " +
     "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
     "(rest 4) (sync (piano 1 F6 4) (piano 1 F7 4)) (sync (piano 1 E6 4) (piano 1 E7 4)) " +
     "(sync (piano 1 B5 8) (piano 1 B6 8)) (rest 4) " +
     "(sync (piano 1 B5 4) (piano 1 B6 4))  (sync (piano 1 C6 4) (piano 1 C7 4)) (sync (piano 1 D6 4) (piano 1 D7 4))" +
     "(repeat 2 (seq " +
        "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
        "(sync (piano 1 E6 4) (piano 1 E7 4))  (sync (piano 1 F6 4) (piano 1 F7 4)) (sync (piano 1 G6 4) (piano 1 G7 4))" +
        "(sync (piano 1 E6 8) (piano 1 E7 8)) (rest 4) " +
        "(sync (piano 1 E6 4) (piano 1 E7 4)) (sync (piano 1 D6 4) (piano 1 D7 4)) (rest 4) " +
     "))" +
     "(piano 1 A5 2) (piano 1 E5 2) (piano 1 F5 2) (piano 1 A5 2) (piano 1 E5 2) (piano 1 F5 2) " +
     "(sync (piano 1 F5 2) (piano 1 B5 2)) (piano 1 E5 2) (sync (piano 1 F5 2) (piano 1 C6 2)) (piano 1 E5 2) (sync (piano 1 F5 2) (piano 1 B5 2)) (piano 1 E5 2) " +
     "(sync (piano 1 F5 8) (piano 1 A5 8)) (piano 1 F5 2) (piano 1 A5 2) " +
     "(piano 1 B5 8) (rest 4) " +
     "(piano 1 A5 2) (piano 1 E5 2) (piano 1 F5 2) (piano 1 A5 2) (piano 1 E5 2) (piano 1 F5 2) " +
     "(sync (piano 1 F5 2) (piano 1 B5 2)) (piano 1 E5 2) (sync (piano 1 F5 2) (piano 1 C6 2)) (piano 1 E5 2) (sync (piano 1 F5 2) (piano 1 D6 2)) (piano 1 E5 2) " +
     "(sync (piano 1 F5 2) (piano 1 C6 2)) (piano 1 E5 2) (sync (piano 1 E5 4) (piano 1 B5 4)) (sync (piano 1 E5 4) (piano 1 A5 4)) " +
     "(sync (piano 1 E5 8) (piano 1 G5 8)) (rest 4) " +
     ")" +
"(seq (repeat 40 (seq (piano 2 A3 2) (piano 2 E4 2) (piano 2 A4 8))) " +
     "(repeat 4 (seq (rest 8) (rest 4))) " +
     "(sync (piano 2 D5 8) (piano 2 F5 8) (piano 2 B5 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(sync (piano 2 D5 8) (piano 2 F5 8)) (rest 4) " +
     "(sync (piano 2 D5 8) (piano 2 A5 8)) (sync (piano 2 F5 4) (piano 2 A5 4)) " +
     "(sync (piano 2 E5 8) (piano 2 G5 8) (piano 2 B5 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(sync (piano 2 E5 8) (piano 2 G5 8) (piano 2 B5 8)) (rest 4) " +
     "(sync (piano 2 E5 8) (piano 2 G5 8)) (rest 4) " +
     "(sync (piano 2 D5 8) (piano 2 F5 8) (piano 2 B5 8)) (rest 4) " +
     "(rest 8) (rest 4) " +
     "(sync (piano 2 F5 8) (piano 2 A5 8) (piano 2 C6 8)) (rest 4) " +
     "(sync (piano 2 F5 4) (piano 2 A5 4)) (sync (piano 2 F5 4) (piano 2 A5 4)) (sync (piano 2 F5 2) (piano 2 A5 2)) (sync (piano 2 F5 2) (piano 2 A5 2)) " +
     "(repeat 8 (seq (rest 8) (rest 4))) " +
     "(repeat 4 (seq (piano 2 A3 2) (piano 2 E4 2) (piano 2 A4 2) (piano 2 B4 2) (piano 2 C5 16))) " +
     "(repeat 2 (seq (piano 2 G3 2) (piano 2 D4 2) (piano 2 G4 2) (piano 2 A4 2) (piano 2 B4 16))) " +
     "(repeat 2 (seq (piano 2 F3 2) (piano 2 C4 2) (piano 2 F4 2) (piano 2 G4 2) (piano 2 A4 16))) " +
     "(repeat 8 (seq (rest 8) (rest 4))) " +
     "(repeat 8 (seq (piano 2 D3 2) (piano 2 A3 2) (piano 2 D4 2) (piano 2 E4 2) (piano 2 F4 4))) " +
     "(repeat 8 (seq (rest 8) (rest 4))) " +
     ")" +
"(seq (repeat 4 (repeat 3 (seq (sync (piano 3 C5 2) (piano 3 F5 2)) (piano 3 B4 2)))) " +
     "(repeat 4 (repeat 3 (seq (sync (piano 3 D5 2) (piano 3 G5 2)) (piano 3 C5 2)))) " +
     "(repeat 4 (repeat 3 (seq (sync (piano 3 C5 2) (piano 3 F5 2)) (piano 3 B4 2)))) " +
     "(repeat 2 (repeat 3 (seq (sync (piano 3 D5 2) (piano 3 G5 2)) (piano 3 C5 2)))) " +
     "(repeat 2 (repeat 3 (seq (sync (piano 3 E5 2) (piano 3 A5 2)) (piano 3 D5 2)))) " +
     "(repeat 1 (repeat 3 (seq (sync (piano 3 F5 2) (piano 3 B5 2)) (piano 3 E5 2)))) " +
     "(repeat 1 (repeat 2 (seq (sync (piano 3 F5 2) (piano 3 B5 2)) (piano 3 E5 2)))) " +
                         "(seq (sync (piano 3 F5 2) (piano 3 C6 2)) (piano 3 E5 2)) " +
               "(repeat 3 (seq (sync (piano 3 F5 2) (piano 3 D6 2)) (piano 3 E5 2))) " +
               "(repeat 3 (seq (sync (piano 3 F5 2) (piano 3 C6 2)) (piano 3 E5 2))) " +
     "(repeat 1 (repeat 3 (seq (sync (piano 3 F5 2) (piano 3 B5 2)) (piano 3 E5 2)))) " +
     "(repeat 1 (repeat 2 (seq (sync (piano 3 F5 2) (piano 3 B5 2)) (piano 3 E5 2)))) " +
                         "(seq (sync (piano 3 F5 2) (piano 3 C6 2)) (piano 3 E5 2)) " +
               "(repeat 3 (seq (sync (piano 3 F5 2) (piano 3 D6 2)) (piano 3 E5 2))) " +
     "(repeat 3 (repeat 3 (seq (sync (piano 3 F5 2) (piano 3 E6 2)) (piano 3 E5 2)))) " +
               "(repeat 3 (seq (sync (piano 3 F5 2) (piano 3 D6 2)) (piano 3 E5 2))) " +
     "(repeat 1 (repeat 3 (seq (sync (piano 3 F5 2) (piano 3 B5 2)) (piano 3 E5 2)))) " +
     "(repeat 2 (repeat 3 (seq (sync (piano 3 F5 2) (piano 3 C6 2)) (piano 3 E5 2)))) " +
     "(repeat 2 (repeat 3 (seq (sync (piano 3 F5 2) (piano 3 B5 2)) (piano 3 E5 2)))) " +
     "(repeat 2 (repeat 3 (seq (sync (piano 3 C5 2) (piano 3 F5 2)) (piano 3 B4 2)))) " +
     "(repeat 2 (repeat 3 (seq (sync (piano 3 D5 2) (piano 3 G5 2)) (piano 3 C5 2)))) " +
     "(repeat 2 (repeat 3 (seq (sync (piano 3 C5 2) (piano 3 F5 2)) (piano 3 B4 2)))) " +
     "(repeat 2 (repeat 3 (seq (sync (piano 3 D5 2) (piano 3 G5 2)) (piano 3 C5 2)))) " + 
     "(repeat 4 (seq (piano 3 E4 2) (piano 3 G4 2) (piano 3 B4 2) (piano 3 C5 2) (piano 3 B4 2) (piano 3 G4 2))) " +
     "(repeat 4 (seq (piano 3 D4 2) (piano 3 F4 2) (piano 3 A4 2) (piano 3 B4 2) (piano 3 A4 2) (piano 3 F4 2))) " +
     "(repeat 4 (seq (piano 3 E4 2) (piano 3 G4 2) (piano 3 B4 2) (piano 3 C5 2) (piano 3 B4 2) (piano 3 G4 2))) " +
     "(repeat 4 (seq (piano 3 D4 2) (piano 3 F4 2) (piano 3 A4 2) (piano 3 B4 2) (piano 3 A4 2) (piano 3 F4 2))) " +
     "(repeat 2 (seq (rest 8) (rest 4))) " +
     "(repeat 2 (repeat 3 (piano 3 B4 4))) " +
     "(repeat 4 (repeat 3 (sync (piano 3 B4 4) (piano 3 C5 4)))) " +
     "(repeat 3 (seq (sync (piano 3 D5 8) (piano 3 E5 8) (piano 3 B5 8)) (rest 4))) " +
     "(sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 B5 4)) (sync (piano 3 D5 8) (piano 3 E5 8) (piano 3 A5 8)) " +
     "(repeat 3 (seq (sync (piano 3 D5 8) (piano 3 E5 8) (piano 3 B5 8)) (rest 4))) " +
     "(sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 B5 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 C6 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 D6 4)) " +
     "(sync (piano 3 D5 8) (piano 3 E5 8) (piano 3 C6 8)) (rest 4) " +
     "(sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 C6 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 B5 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 A5 4)) " +
     "(sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 B5 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 A5 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 B5 4)) " +
     "(sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 C6 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 B5 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 A5 4)) " +
     "(repeat 3 (seq (sync (piano 3 D5 8) (piano 3 E5 8) (piano 3 D6 8)) (rest 4))) " +
     "(sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 D6 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 C6 4)) (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 B5 4)) " +
     "(repeat 8 (repeat 3 (sync (piano 3 D5 4) (piano 3 E5 4) (piano 3 A5 4) (piano 3 E6 4)))) " +
     "(repeat 2 (seq " +
        "(repeat 2 (seq (sync (piano 3 F5 2) (piano 3 B5 2)) (piano 3 E5 2))) (sync (piano 3 F5 2) (piano 3 C6 2)) (piano 3 E5 2) " +
        "(sync (piano 3 F5 2) (piano 3 D6 2)) (piano 3 E5 2) (sync (piano 3 F5 2) (piano 3 E6 2)) (piano 3 E5 2) (sync (piano 3 F5 2) (piano 3 B5 2)) (piano 3 E5 2) " +
        "(repeat 3 (seq (sync (piano 3 F5 2) (piano 3 C6 2)) (piano 3 E5 2))) " +
        "(sync (piano 3 F5 2) (piano 3 B5 2)) (piano 3 E5 2) (rest 8) " +
     ")) " +
     "(repeat 8 (seq (rest 8) (rest 4))) " +
     ")" +
")) " +
"(sync " +
"(seq (repeat 4 (seq (rest 8) (rest 4))) " +
     "(repeat 3 (seq (piano 0 A1 16) (rest 8))) " +
     ") " +
"(seq (rest 4) (piano 1 E7 4) (piano 1 D7 4) " +
     "(piano 1 A6 8) (rest 4) " +
     "(rest 4) (piano 1 E7 4) (piano 1 D7 4) " +
     "(piano 1 G7 8) (piano 1 F7 4) " +
     "(repeat 2 (seq (piano 1 E7 8) (rest 4) (rest 8) (rest 4))) " +
     "(piano 1 E7 16) (rest 8) " +
     ") " +
"(seq (repeat 9 (seq (piano 2 A3 2) (piano 2 E4 2) (piano 2 A4 8)))) " +
"(seq (repeat 2 (seq (repeat 2 (repeat 3 (seq (sync (piano 3 C5 2) (piano 3 F5 2)) (piano 3 B4 2)))) (repeat 2 (repeat 3 (seq (sync (piano 3 D5 2) (piano 3 G5 2)) (piano 3 C5 2)))))) " +
     "(sync (piano 3 E5 16) (piano 3 A5 26)) (rest 8) " +
     ") " +
     "   )");
        System.out.println(gloc);
        PriorityQueue gloca = initpq(gloc);
        simulator(gloca);
        String strgloca = mstring(0);
        System.out.println(strgloca);
        player.play(new Pattern(strgloca));