get every element from the list of list prolog : is anyone can help me? 
I have a list of list [[1,2,4],[5,6,7,8],[7,8,9]]
I want to get every first element of the list
as the example I want [1,5,7]

thanks very much