如何在scheme中的位置列表中找到最小posn-x

嗨，我在一个方案中使用带有列表缩写的初学者时遇到困难，我不知道如何在给定make posn列表的情况下找到最小posn-x。任何帮助都将不胜感激

评论中的讨论汇编：

(define (min-x lst)
   (apply min (map posn-x lst)))

---

你知道如何写一个函数，在一个数字列表中找到最小值吗？我知道如何写一个函数，找到最小值，但我不知道如何将posn xs从一个位置列表转换成一个数字列表（map posn-x lop），其中lop是一个posn列表。