Splitting a list of integers into a list of Positive integers that are divisible by 2 and negative integer divisible by 3

Question

I\'ve been trying to create a predicate in Prolog which splits a list of integers into a list of positive integers and into a list of negative integers. And list of positive