169 похожих чатов

Привет, есть следующий инфиксный код: pure (.) <*> [(+1)] <*> [(*2)]

<*> [1, 2, 3]
output: [3, 5, 7]
Я его переписал в префиксный стиль (простите за замозоленные глаза):
fmap (.) $ (<*>) [(+1)] ((<*>) [(*2)] [1,2,3])
ИЛИ
(<*>) [(.)] ((<*>) [(+1)] ((<*>) [(*2)] [1,2,3]))
Оно сломалось, ругается в частности на [(+1)], выкидывая ошибку:
• No instance for (Num (b0 -> c0)) arising from a use of ‘+’
(maybe you haven't applied a function to enough arguments?)

Если же убрать fmap (.) $, то все хорошо работает (output: [3, 5, 7]), что значит, что я правильно транслировал инфикс в префикс, до момента с аппликацией (.).

Подскажите, как же правильно транслировать запись:
pure (.) <*> [(+1)] <*> [(*2)] <*> [1, 2, 3]
в полный префикс?
Код из контекста про закон аппликативного функтора о композиции:
pure (.) <*> u <*> v <*> w = u <*> (v <*> w)

3 ответов

7 просмотров

(<*>) левоассоциативна, а вы переписали так, будто она правоассоциативна

Yerbol-Altynbek 🇺🇦 Автор вопроса
Cheese Syrowiecki
(<*>) левоассоциативна, а вы переписали так, будто...

Юрий, спасибо... Когда поэтапно описывал ассоциативность, оказывается, я спутал правое с левым: ( pure (.) <*> ( [(+1)] <*> ( [(*2)] <*> [1, 2, 3] ) ) )

pure (.) <*> [(+1)] <*> [(*2)] <*> [1, 2, 3] == (<*>) (pure (.)) ((<*>) [(+1)] ((<*>) [(*2)] [1, 2, 3]))

Похожие вопросы

Обсуждают сегодня

Сообщение* в закодированном виде. То есть, просто сделать sendMessage?text=Привет бла-бла! не получится, надо в HEX переводить, и добавлять процент, типа такого: sendMessage?t...
КТ315
21
А случайно нет ли в паскале штатной возможности передать указатель и количество туда где array of в качестве аргумента?
zamtmn
25
Anyone here suffers from unexplained aural migraines, who would be up for talking for a bit? Doesn't *have* to be aural, but I am not asking about headaches, I mean actual mi...
Martin Rys
58
Хм. А телеграм апи работают через HTTP?
The Bird of Hermes
14
Почему Telegram пишет, что объект media не найден, хотя на самом деле я его передаю? Делаю на urllib, без зависимостей, так надо. Вызываю метод sendMediaGroup с таким JSON: ...
Alexey S
1
Ну раз я пока тут, задам пару глупых вопросов. Зачем писать на ассемблере если компилятор довольно умный, а ассемблер много времени занимает? В каких прикладных задачах сейчас...
Максим Рябцев
20
Я тут за тем, чтобы задать вопрос, так как не знаю ассемблер, учу с/с++. Короче, насколько дорога операция перехода в функцию при ее вызове? Дело в том, что в с++ есть макросы...
Максим Рябцев
12
Привет, нужен совет старших товарищей. Есть глобальная переменная var DefaultDataFolder:string; инициализируем DefaultDataFolder:='a:\_OUT\'; есть примитивная процедур...
Max Otto
14
hello friends. Do you know how can I learn getx? I have a software project that I should deliver it up to 5 weeks later and I need to learn firebase too. I will be thankfull
AmirHossein Razavi
15
А какие чаты вообще в ходу? Auto aim? И что еше
do you think you're better off alone? А
13
Карта сайта