Currying çıkarma

Question

, biz

map (\x -> x + 1) [1..5] 

yazabilirim ama çoğu insan sadece yerine

map (+1) [1..5] 

için giderdim sanırım. Fakat bu açıkça (-1) ile çalışmaz, çünkü bu olumsuz bir şey.

Yani akla gelen ilk şey çıkarma Prelude (x - y = x + negate y) içinde nasıl tanımlandığını dikkate mantıklıdır hangi

map (+(-1)) [1..5] 

, ama bana biraz tuhaf görünüyor. Sonra ben

map (flip (-) 1) [1..5] 

Bu şekilde bana daha iyi görünüyor, ama belki biraz çok karmaşık geldi.

Şimdi bunun büyük bir şey olmadığını biliyorum, ama bunu yazmanın daha bariz bir yolunu özlüyorum diye merak ediyorum. Eğer değilse, 2 yoldan hangisini tercih edersiniz? Ben sadece soruyorum çünkü sık sık kodunuzu daha idiomatik yapan ve bu yüzden okuması gereken diğer geliştiriciler için hoş olan küçük detaylar.

Çözüm İlk kurşunun gerçekten açık çünkü çoğunlukla cevapları bir çift, benim kişisel favorim

map pred [1..5] 

ardından

map (subtract 1) [1..5] 

olduğunu düşünüyorum aldık Şimdi

ve hiç kimse, pred'un (önceki model) ne anlama geldiğini tahmin etmeye/aramaya ihtiyaç duymaz.

map (subtract 1) [1..5] 

Answer 1

yerine - ait subtract işlevini kullanabilirsiniz. Ben de okumak için ilk çözüm, map (+(-1)) [1..5], kolay bulabilirsiniz. - yana

Answer 2

ben hangisinin çıkarılır değerler hakkında hiç şüphe yok çünkü map (\x -> x - 1) [1..5], daha iyi programcı niyetini iletir düşünüyorum: Eğer sağ bölümünde çıkarma istiyorsanız

Answer 3

infix çıkarma ve önek negate hem sen (*x) (* olan bir infix operatörü ve bir değer x) kullanan - için sözdizimi olamaz. Neyse ki Prelude, sırasıyla \x -> -x ve \x y -> y-x olan negate ve subtract ile gelir, böylece ikisi arasında ayrım yapmak istediğiniz yerleri kullanabilirsiniz.

Answer 4

subtract'u beğenmedim, çünkü geriye doğru karışık. Ben

minus :: Num n => n -> n -> n 
minus = (-) 
infixl 6 `minus` 

Sonra

map (`minus` 1) [1..5]