ref: http://tryapl.org/

тряплорг?

Пффффф. ТС неосилятор, тацитное программирование есть не только в J.

http://stackoverflow.com/questions/11073250/tacit-programming-in-lisp

В этих ваших лиспах это может выглядеть, например, так. Сотни тысяч примеров. ТС, узри вывод: если ты не в состоянии что-то сделать, то это не повод утверждать на весь лор о собственной бесполезности.

Завершающие фразы в песне варьируются, так что в принципе вариант с 0 bottles имеет место на жизнь. Но обычно либо твой вариант приводят, либо «if last bottle fall, what's the waste of alcohol» или как-то так, точнее не припомню.

Языки, в которых такое возможно, скорее всего, густо посыпаны сахаром.

Это не сахар, это комбинаторы. По сути, практическое использование полноты SK-базиса.

Кстати о птичках - на комету села аппаратная Форт-машина. Сожрите это, скобканутые!

Таки да, forth: 16 Bit Mikrocontroller HS-RTX2010RH @ 8MHz, 2 × 27 MBit FLASH RAM.

ref: http://www.bernd-leitenberger.de/philae.shtml

Не сахар, а функции высшего порядка.

https://www.haskell.org/haskellwiki/Pointfree

Если через две тысячи лет меня вернут к жизни и спросят, чем сейчас занимаются люди, я отвечу «меряются факториалами на ЛОРе».

Лол, почему я, вчерашний школьник, знакомый с хаскеллем около года (при этом, использую его не часто), написал за 5 минут?

Haskell уже не тот...

называется huì, от китайского 䂕 (короткий)

У негров я бы коротким не назвал, хотя китайцам виднее.

ты так сказал, как будто это минус. Слава богу что так нельзя на лиспе.

В самом деле, зачем лиспу выразительность. А то ещё, не дай бог, лисперы займутся чем-то полезным вместо срачей на ЛОРе.

(defun avg (list) (/ (reduce #'+ list) (length list)))

я лучше так напишу, это хотя бы не ломает глаза.

Самое забавное для меня в твоей попытке вынести вердикт усем лисперам в том, что я пишу программы и они работают и в том числе на лиспе.

Один комбинатор написать не могу, помогайте.

#lang racket

(define (list-f fl x) (map (λ (f) (f x)) fl))

(define sum (curry foldl + 0))

(define avg (compose (curry apply /) (curry list-f (list sum length))))

(avg '(1 2 3))

Это Common Lisp. Некоторый DSL для работы с массивами.

mean

А это Haskell, некоторый DSL для обработки статистики. Ты уже совсем мозги пропил.

Кстати, называется statistics, от английского «статистика».

_.sum / _.size

Т.е. сумма и размер списка вычисляются раздельно, в 2 прохода? Эталонный быдлокод.

Размер скорее всего кэшируется.

Размер скорее всего кэшируется

А может ещё и сумма кэшируется? Да чё там, может ещё и avg для списка вычисляется при каждом его изменении и тоже кэшируется?

при каждом его изменении
изменении

ловите быдлокодера

В C++ же std::vector и std::array хранят кол-во элементов во время выполнения / компиляции, так что зависит от коллекции. std::accumulate(xs.begin(), xs.end(), 0) / xs.size(), иначе можно uncurry div . foldl (\(s, l) e -> (s + e, l + 1)) (0, 0), если (\(s, l) e -> (s + e, l + 1)) обфускации подвергнуть, то flip ((*** (+1)) . (+)).

А это не термин хаскелистов? Википедии больше нравится tacit programming

Да знаю я такие поделия. Таких huiев там огромное количество, только кроме пары лиспофанбоев их никто не поддерживает.

Я так и представляю, как ты в каждой программе будешь писать в таком стиле на лиспе, лол. А в J это естественно

Это не список, а Array, чтобы ты знал

Factor

: avg ( seq -- m ) [ sum ] [ length ] bi /

Это не список, а Array, чтобы ты знал

А давайте посчитаем факториал^W среднее арифметическое списка на этих языках

Ну так список или массив? И какой всё таки будет запись для списка в этом твоём Жо?

Для коллекции, ты доволен?

Для коллекции, ты доволен?

Нет. Где решение для коллекции на Жо?

Ну шлангуй дальше

Не понял в чем проблема написать это на чеи угодно, хоть вот на яве.

float avg(int... a) {
    return Arrays.stream(a).reduce(0, (p, v) -> p + v) / a.length;
}

Чистые функции, никаких явных присваиваний

Ты, походу, не читал, а сразу отвечал

Скажем так - почти не читал. Кроме первого абзаца.

a
p, v
Не допускается использование ни одной переменной (т.е. идентификаторы можно связывать только с функциями).

Не допускается использование ни одной переменной

Так нет ни одной переменной. Я же не делаю нигде явного присвоения значения.

(т.е. идентификаторы можно связывать только с функциями).

Ну так p, v - это параметры функции. Т.е. я никакого связывания не делаю. А про то, что они не могут быть именованными - в условии вроде слов нет.

Твоя квалификация недостаточно высока для этого треда.

http://en.wikipedia.org/wiki/Lambda_calculus#Lambda_terms , кусок про lambda abstraction.

И это какбы намекает на нужность подобной писанины.

Это даже на тикле можно сделать

proc list_avg {l} {return [expr ([join $l +]) / [llength $l].0]}

l
Причём будем использовать function-level программирование. Не допускается использование ни одной переменной (т.е. идентификаторы можно связывать только с функциями).

Кто-нибудь вообще читает тред?

Речь не о том, что и как я пишу на лиспе. И даже не о твоих фантазиях на эту тему, которые ты выставляешь на всеобщее оборзение. Хотя само наличие фантазий и интереса моим лиспокодом говорит о том, что бомбануло. Нежелание признать собственную никчёмность повлекло за собой всю эту ветку диалога.

Вот этот пример с avg описан в каждой статье про J, какая мне только попадалась. Покажи, как (например) на J тацитным программированием реализуется выбор всех слов, чья длина превосходит 16 символов, по URL страницы. Да, на Хаскелле point-free вариант реализуется на раз-два. И аргументы там не будут нужны, ибо монады и каррирование. Не говоря уже о лиспе.

выбор всех слов, чья длина превосходит 16 символов

(16 < #@>"_1) # ]. Как получить список слов разберёшься?

Ты бы научился сначале на лиспе писать, лалка:

(defun avg (list)
  (labels ((avg-impl (list sum len)
    (if list
      (avg-impl (cdr list) (+ sum (car list)) (1+ len))
      (/ sum len))))
  (avg-impl list 0 0)))

А толку-то? Как не мог в неявное программирование, так и не может дальше.

Причём будем использовать function-level программирование. Не допускается использование ни одной переменной (т.е. идентификаторы можно связывать только с функциями).

Кто-нибудь вообще читает тред?

Синтаксиса тикля не знаешь или просто дурачок? Там столько-же переменных сколько и в твоем примере на лиспе.

Лол, ну вот сам и пиши свои фактореалы на своем нечитаемом J. Лисп и хаскель хороши тем, что помимо академических задач на них действительно можно что-то писать. Примеры проектов на них приводить не буду, поскольку в каждом подобном треде спрашивают что на этих языках написано кроме фактореалов, и в каждом треде приводят уйму вещей на них написанных. Найдешь сам.

Не представляет интереса вырванный из контекста самый примитивный кусок задачи, с котором, я знаю, J справится.

Представляет интерес код программы, которая по заданному URL посчитает число слов по странице, соответствующей заданному URL.

Да, на Хаскелле point-free вариант реализуется на раз-два. И аргументы там не будут нужны, ибо монады и каррирование.

монады

аргументы там не будут нужны

Лол

Про лисп - очевидно. Давай на J, жги глаголом сердц людей!