iterate を検索しましら、「iterateでバブルソート 」があったので自分でもバブルソートをしてみようと思いましたら、ちょっと躓きました。まず、自分でやってみます。 toRightEdge [x] = [x] toRightEdge (x:y:ls) | x > y = y:toRightEdge (x:ls) | otherw…