Wikipediaに参考コードがありますが。 http://ja.wikipedia.org/wiki/%E5%A5%87%E5%81%B6%E8%BB%A2%E7%BD%AE%E3%82%BD%E3%83%BC%E3%83%88 (defn- oe-swap [v] (loop [src v dest [] swapped? false] (if (< (count src) 2) [(concat dest src) swapped?] (if…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。