Добрый день! Пишу лабораторную работу по Лиспу, в которой должно производиться табулирование функции, т.е. вывод вида:
f(x1)=y1;
f(x2)=y2;
...
f(xn)=ynПрограмму пишу в Emacs Lisp. Подскажите,
как сделать вставку в строку действительных чисел? Emacs при выводе всё округляет до целой части
Вот мой код (последняя строка для запуска функции):
(defun tab(x0 xk h)
(cond
((> (+ x0 (/ h 2.0)) xk) "end")
((and (> x0 -1.0001) (< x0 -0.9999)) (message "f(%d) = nil;\n%s" x0 (tab (+ x0 h) xk h)))
(t (message "f(%d) = %d;\n%s" x0 (* (/ 1.0 (+ x0 1)) (tan (/ (* pi x0) 7.0))) (tab (+ x0 h) xk h)))
)
)
(tab -1.5 -0.5 0.1)