Nói rằng tôi có hồ sơ này:mẫu phù hợp với trên hai hồ sơ với các lĩnh vực cùng
type alias Rec = { a : Int }
Và, ví dụ, một chức năng mà phải mất hai trong số những điều này và tổng số nguyên của họ.
f: Rec -> Rec -> Int
này có thể được thực hiện sử dụng accessors kỷ lục (ví dụ: f x y = x.a + y.a
), nhưng là có một cách để sử dụng mô hình phù hợp để trích xuất tất cả các số nguyên?
Rõ ràng, hai người không làm việc vì họ sẽ được ràng buộc hai con số khác nhau để biến giống nhau:
f {a} {a} = a + a
f x y = case (x, y) of ({a}, {a}) -> a + a