Draftsight LISP, problems building a list of x coordinates with the (cons ) function

Question

I am trying to loop through some rectangles and put the x and y coordinates separately in a list. However the list I am trying to fill looks terrible, the code: