> 1 <

Автор Сообщение

glrain

Members


Статус

2 сообщений

Где: Russia
Род занятий:
Возраст:

#7509   2015-02-27 16:06 GMT+3 часа(ов)      
Для решения одной задачи мне нужно создать список из подсписков. Дело вроде простое, возмьем функцию list и всё. Но при тестировании возникла ошибка, она такая:
(setf x '(or (neg p) (a (:b) b)))
=> (OR (NEG P) (A (:B) B))
(setf y '(impl (p) (a (:b :s :oi) b)))
=> (IMPL (P) (A (:B :S :OI) B))
(setf x (list 'plus x))
=> (PLUS (OR (NEG P) (A (:B) B)))
(setf y (list 'minus y))
=> (MINUS (IMPL (P) (A (:B :S :OI) B)))
(setf result (list x y))
=> ((PLUS (OR (NEG P) (A # B))) (MINUS (IMPL (P) (A # B))))

Как заметили, последний вызов не даёт желаемый ответ. Объясните пожалуйста, люди добрые, откуда взялись символы #, и как можно избегать эту проблему.
Заранее благодарю!!!

Valko

Members


Статус

29 сообщений

Где: ---
Род занятий:
Возраст:

#7512   2015-02-28 02:44 GMT+3 часа(ов)      
кажется это просто сокращения

> (cadr result)
(MINUS (IMPL (P) (A (:B :S :OI) B)))

glrain

Members


Статус

2 сообщений

Где: Russia
Род занятий:
Возраст:

#7534   2015-03-02 14:41 GMT+3 часа(ов)      
Спасибо, Valko. Я разобралась
> 1 <


Онлайн :

0 пользователь(ей), 11 гость(ей) :




Реклама на сайте: