なんか書けた。mergeSortはあやしい。 /* insertSort */ insert([],E,[E]). insert([X|XS],E,[X|RR]) :- E >= X, insert(XS,E,RR). insert(XS,E,[E|XS]). insertSort([],[]). insertSort([X],[X]). insertSort([X|XS],R) :- insertSort(XS,RR), insert(RR,X,…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。