:l ../QSort
:st qsort [1,2]
:step
seq left ()
:print left