Chức năng trong Haskell

Question

Hãy nói rằng tôi có một danh sách các hàm

functions = [f, g, h] 

mỗi một với loại a -> a

Tôi cũng có một danh sách các giá trị, nói số nhưng bất cứ điều gì nên làm việc ở đây

vals = [1,2,3] 

Tôi muốn áp dụng từng chức năng trong functions cho giá trị tương ứng trong vals

bản năng đầu tiên của tôi là sử dụng một lambda và zipWith như:

zipWith (\f v -> f v) functions vals 

Nhưng thẳng thắn này trông xấu xí và không phải cái gì tôi mong đợi trong một ngôn ngữ đẹp như vậy như Haskell. Hàm ứng dụng chức năng giống như giải pháp. Có một điều như vậy? Tôi có thiếu một cái gì đó và có một giải pháp đẹp hơn cho vấn đề của tôi? Tôi thực sự đã kết thúc viết cấu trúc này cho một giải pháp Project Euler. Nó hoạt động, nhưng tôi không thích nó.

Answer 1

zipWith ($) f v 

$ là ứng dụng chức năng. Thực tế là nó có ưu tiên đặc biệt thấp ném người cho một vòng lặp đôi khi.

Answer 2

Lạ lùng thay,

zipWith id functions vals 

sẽ làm việc quá!

Nhưng, thực sự, zipWith ($) là cách phù hợp để viết điều này.

Answer 3

Đây là một tùy chọn khác có thể khiến bạn suy nghĩ một chút.

>>> import Control.Applicative 
>>> let functions = ZipList [(+1), (*2), (*10)] 
>>> let values = ZipList [1, 2, 3] 
>>> getZipList (functions <*> values) 
[2, 4, 30] 

A ZipList chỉ là một trình bao bọc xung quanh danh sách. Định nghĩa của <*> cho một số ZipList nói "zip danh sách các hàm (ở bên trái) với danh sách các đối số (ở bên phải) bằng cách áp dụng từng hàm cho một đối số lần lượt".

Điều này trái ngược với định nghĩa <*> cho danh sách thông thường, cho biết "lấy mọi cặp có thể có (hàm, đối số) từ hai danh sách này và áp dụng hàm cho đối số".