a brute force SORT algorithm in APPLE ][ BASIC