Курсовая работа: ЛИСП-реализация основных способов вычисления гамма-функции

Условные обозначения:

- X – параметр функции;

- RS – инкремент;

- GN – список коэффициентов;

- Y – вспомогательная переменная;

- RES – результат вычисления гамма-функции;

- GAM – временная переменная, содержащая вычисление гамма-функции.

Рисунок 3 – Функциональная модель решения задачи для функции GAMMA

Рисунок 4 – Функциональная модель решения задачи для функции GAMMA_WHOLE


Рисунок 5 – Блок-схема решения задачи для поиска логарифма гамма-функции GAMMA_LN


Рисунок 6 – Блок-схема решения задачи для поиска логарифма гамма-функции GAMMA_POINT


4. Программная реализация решения задачи

;СПИСОК КОЭФФИЦИЕНТОВ

(SETQ CN '(2.5066282746310005 1.0000000000190015 76.18009172947146 -86.50532032941677 24.01409824083091

-1.231739572450155 0.1208650973866179e-2 -0.5395239384953e-5))

;ЛОГАРИФМ ГАММА ФУНКЦИИ

(DEFUN GAMMA_LN (X)

(SETQ SER (CADR CN))

(SETQ L (CDDR CN))

(SETQ Y X)

(DO

((J 2))

((>= J 8))

(SETQ Y (+ Y 1))

(SETQ CO (CAR L))

К-во Просмотров: 384
Бесплатно скачать Курсовая работа: ЛИСП-реализация основных способов вычисления гамма-функции