Using Prolog please

Question 3 (4 marks) Write a predicate called doubles (L1,L2). doubles (L1,L2) is true if L1 and L2 are both lists of numbers, and every element in L2 is double the value of the corresponding element in L1. doubles ([1,2,3],[2,4,6]) is true doubles ([1,2],[1,2,2,4]) is false