5
Làm thế nào để tôi làm cho thuật toán này lười hơn mà không lặp lại chính mình?
(Lấy cảm hứng từ câu trả lời của tôi cho câu hỏi này .) Xem xét mã này (phải tìm phần tử lớn nhất nhỏ hơn hoặc bằng một đầu vào đã cho): data TreeMap v = Leaf | Node Integer v (TreeMap v) (TreeMap v) deriving (Show, Read, Eq, …