-- Test.cm

Imager
Run -a Mockingbird
Interp

&context ← Imager.Create[$LFDisplay]
&context.state.T ← Imager.Scale[1]
Imager.TranslateT[&context, 30, 720]
[] ← &score ← FilerImpl.FileIn["Mockingbird/Credo.music"]
&score.sheet.context ← &context
ScoreImplB.DrawInterval[&score, 0, 2000]