mypermutation([],[]). mypermutation(Liste,[El|Rest]):-append(L1,[El|L2],Liste),append(L1,L2,L3),permutation(L3,Rest).