bsort nil nil bsort . x y last . bubble . x y bsort butlast bubble . x y bubble nil nil bubble . x nil . x nil bubble . x . y z if <= x y . y bubble . x z . x bubble . y z last nil 0 last . x nil x last . x . y z last . y z butlast nil nil butlast . x nil nil butlast . x . y z . x butlast . y z bsort 1 nil 0 . 2 last 1 bubble 1 butlast 1 if 3 <= 2 0 0 FULL ./TRS/SK90/4.61.trs