#!/bin/sh

sed -f melodies/translate.sed $2 | \
gosh -u gauche.process -I. -l genesis.ss -l score.ss \
 -E "play 2000 (triangle (score-reader $1 (read-lines (current-input-port))))" \
 -E exit