Введение в программирование на Лиспе

         

defun decart


( defun decart (x y)
(map-el #'(lambda (i)
(map-el #'(lambda (j) (list i j))
y)
) x) )

Содержание раздела