Их очень много, пол интернета. Можно второй курс по Хаскелю Дениса Москвина на Степике пройти

ну хотя бы поисковое выражение дай хорошее
list monad мне не очень помогало

ну да, другой сам, не помню наизусть, лезу в кложадокс всегда (аналог хугла)

человек на халяву хаскель в кложу транспилирует, а вы придираетесь 😊

ну да, seq 😊

))

попробуй тогда Липовачу со слоном почитать, она есть в свободном доступе в инете, может на английском только правда. Там совсем для начинающих, но некоторые простые монадки на пальцах объяснены на примерах

что-то нашёл https://www.schoolofhaskell.com/school/starting-with-haskell/basics-of-haskell/13-the-list-monad

Кстати, по прочтении этой ссылки может осенить, что for и лист компрехеншен это тоже оно самое 😊

ну, это я из скалы знаю

слазил в кложадокс, откопал то что надо ))

(or (not-empty (filter ...)) (recur ...))

(or (not-empty (filter ...)) (recur ...))

нет предела совершенству 😊

Воистину. Но последний вариант меня в этом плане устраивает, так как не создает лишних биндингов имен )

тогда и go надо без непонятного имени 😊

#(or
   (not-empty (filter (fn [[_ r1 r2]] (or (= n r1) (= n r2))) %))
   (recur (mapcat step %)))

и let-fn вместо let ). Но go - это чисто хаскелевский конвеншен, переехал как есть )

https://hackage.haskell.org/package/base-4.12.0.0/docs/src/GHC.List.html#iterate%27FB  и далее везде )

прикольно
но тогда с анонимной функцией уже не прокатит

(defn t [k n r1 r2]
  (letfn [(step [[cs r1 r2]] [[(conj cs :c1) (- (* k r2) r1) r2]
                              [(conj cs :c2) r1 (+ (* k r1) r2)]])
          (go [l] (or
                    (not-empty (filter (fn [[_ r1 r2]] (or (= n r1) (= n r2))) l))
                    (recur (mapcat step l))))]
    (go [[[] r1 r2]])))

Нормас, анонимные функции больше одной строки меня все равно тимлид отправляет переписывать на именованные. У него на это триггер ))

просто l бы переименовать...

шрифт нормальный надо ставить, если с 1 путается ) а так этож имхо стандартная аббревиатура от list