Стандартные процедурные функции языка CLIPS

Август 9, 2022

Главная
Информатика
Стандартные процедурные функции языка CLIPS

Содержание

2. Процедурные функции
3. Процедурные функции. Пример функции bind, while и if-then-else (deffunction f13(?n) (if (integerp ?n) then (bind ?s
4. Выполнение функции f13
5. Пример функции if-then -else Пусть требуется вычислить функцию f1 в зависимости от условия.
6. Определение функции f1 (deffunction f1(?a ?b) (if (or (not (numberp ?a)) (not (numberp ?b))) then (printout
8. Скачать презентацию

Слайд 2

Процедурные функции

Слайд 3

Процедурные функции. Пример функции bind, while и if-then-else
(deffunction f13(?n)
(if (integerp ?n)

then
(bind ?s ?n)
(while (> ?n 0)
(bind ?n (- ?n 1))
(bind ?s (+ ?s ?n))
)
(printout t "s =" ?s crlf)
else (printout t " n is not integer" crlf)
)
)

Слайд 4

Выполнение функции f13

Слайд 5

Пример функции if-then -else
Пусть требуется вычислить функцию f1 в зависимости от

условия.

Слайд 6

Определение функции f1
(deffunction f1(?a ?b)
(if (or (not (numberp ?a)) (not (numberp

?b))) then
(printout t "Error a or b" clrf)
else
( if (> ?a ?b)
then (- (* ?a ?a) (* ?b ?b))
else (+ (* ?a ?a) (* ?b ?b))
)
)
)