Size: a a a

2020 February 24

SA

Sokolov Andrew in Lisp Forever
чет я не вникну как скачать это чудо
источник

SA

Sokolov Andrew in Lisp Forever
и где нормально посмотреть че оно делает
источник

YK

Yaroslav Khnygin in Lisp Forever
Sokolov Andrew
чет я не вникну как скачать это чудо
вот тут есть реализации https://planning.wiki/ref/planners
источник

YK

Yaroslav Khnygin in Lisp Forever
источник

YK

Yaroslav Khnygin in Lisp Forever
в общем это язык для описания такой разновидности ИИ, что использовалась в FEAR и других играх http://alumni.media.mit.edu/~jorkin/goap.html
источник

YK

Yaroslav Khnygin in Lisp Forever
но это наверное самый известный пример, естественно это всё не только в играх использовалось
источник

SA

Sokolov Andrew in Lisp Forever
Да я уж думал не поиспользовать ли мне это
источник

SA

Sokolov Andrew in Lisp Forever
самому
источник

AE

Alexey Egorov in Lisp Forever
Pïg Grëënëst
0) читаешь туториал, осваиваешь базовые бинды, начинаешь пользоваться
1) читаешь Mastering Emacs
Плюсую.
источник

AE

Alexey Egorov in Lisp Forever
Также начать использовать проджектайл, магит, паредит и слай для лисп-разработки очень помогает.
источник

AE

Alexey Egorov in Lisp Forever
Ну то есть если ты пишешь на коммоне, то выбора вообще особо нет.
источник

AE

Alexey Egorov in Lisp Forever
О, спасибо.
источник

AE

Alexey Egorov in Lisp Forever
Aragaer
это еще без питона, емакса и клавочатика
А что за клавочатик кстати.
источник

MK

Mikhail Kirillov in Lisp Forever
Alexey Egorov
А что за клавочатик кстати.
источник

AE

Alexey Egorov in Lisp Forever
О спасибо.
источник
2020 February 25

O

O in Lisp Forever
Как получить
((1 2 3)
(2 3 4)
(3 4 5)
(4 5 6))


Из

(1 2 3 4 5 6)
источник

SA

Sokolov Andrew in Lisp Forever
union
источник

SA

Sokolov Andrew in Lisp Forever
источник

YK

Yaroslav Khnygin in Lisp Forever
мне кажется, вопрос был в обратную сторону
источник

PG

Pïg Grëënëst in Lisp Forever
ad-hoc решение на схеме
(define (goal xs)
 (match xs
   ((x1 x2 x3 . xs)
    (let go ((x1 x1)
             (x2 x2)
             (x3 x3)
             (xs xs)
             (acc '()))
      (let ((new-acc (cons (list x1 x2 x3) acc)))
        (if (null? xs)
            new-acc
            (go x2 x3 (car xs) (cdr xs) new-acc)))))
   (xs
    xs)))
источник