>>39
% Prolog

二つのリストの最初のN要素だけ入れ替える(L1_1,L2_1,N,L1_2,L2_2) :-
　　　　length(L1_0,N),
　　　　length(L2_0,N),
　　　　append(L1_0,R1,L1),
　　　　append(L2_0,R2,L2),
　　　　append(L2_0,R1,L3),
　　　　append(L1_0,R2,L4),!.