PLEASE CREATE FUNCTION IN PROLOG!

Define a predicate segregate/3 that takes a list of integers as an argument and generates two lists, the first containing containing the even numbers from the original list and the second sublist containing the odd numbers from the original list.

Your predicate should have the signature segregate(List, Even, Odd).

Example Output:

?- segregate([8,7,6,5,4,3], Even, Odd). Even = [8,6,4] Odd = [7,5,3]

?- segregate([7,2,3,5,8], Even, Odd). Even = [2,8] Odd = [7,3,5]

?- segregate([-4,11,-7,9,0], Even, Odd). Even = [-4,0] Odd = [11,-7,9]

?- segregate([5,13,29], Even, Odd). Even = [] Odd = [5,13,29]

?- segregate([], Even, Odd). Even = [] Odd = []