l
knet> ERR:: Incorrect input
Size: a a a
2020 March 24
SA
Лол все что хочешь пишешь в скобках
SA
И он долбится
AE
Да.
SA
Нуу норм
ХЛ
(defun sm (y x z) (if (equal x y) z y))
(defun cng (bnds atm) (if bnds (cons (apply sm atm (car bnds)) (cng (cdr bnds) atm)) atm))
(defun cng (bnds atm) (if bnds (cons (apply sm atm (car bnds)) (cng (cdr bnds) atm)) atm))
l
knet> sm
ХЛ
(sm 'a 'a 'b)
l
knet> b
ХЛ
(sm 'a 'b 'c)
l
knet> a
ХЛ
(cng '((a b) (b c)) 'a)
l
knet> ERR:: Incorrect input
ХЛ
(defun cng (bnds atm) (if bnds (cng (cdr bnds) (apply cng atm (car bnds))) atm)
l
knet> ERR:: Reader input
ХЛ
(defun cng (bnds atm) (if bnds (cng (cdr bnds) (apply sm atm (car bnds))) atm))
l
knet> cng
ХЛ
(cng '((a b) (b c)) 'a)
l
knet> ERR:: Incorrect input
ХЛ
Почему incorrect? :(