Toggle navigation
?
users online
Logout
Open hangout
Open chat for current file
my_delete(X, L, R):- [] = L, [] = R. my_delete(X, L, R):- , (Y \= X), [Y|K] = L, [Y|M] = R, my_delete(X, K, M). my_delete(X, L, R):- , (Y \= X)[X|K] = L, [Y|M] = R, my_delete(X, K, R). my_delete_2(_, [], []). my_delete_2(X, [Y|K], [Y|M]):- dif(X, Y), my_delete_2(X, K, M). my_delete_2(X, [X|K], R) :- my_delete_2(X, K, R).