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


773123a3

defun decart


( defun decart (x y)



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

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