, , . , , , D , N :
F (N, D),
F (D, 0) :- D< 17.
F (D, 10) :- 17=<D, D< 186.
F (D, 20) :- 186=<D.
, , F (), , . , ( ) , , , , . . , .
F (D, 0) :- D< 17,!.
F (D, 10) :- D< 186,!.
F (D, 20).
, , .
:
1. cut .
2. cut, , : P, Q, R.
. , . cut , ( ).
, . .
. , , , .
goal: not (dog ( )), , , . , , , . . ³ , , . , ( ), , .
: , dog (), , : .
|
|
/* 2.6 */
predicates
r (symbol)
g (symbol)
p (symbol)
clauses
r (a).
g (b).
p (X) :-not (r (X)).
g (X), p (X)c =b, p (X), g (X) no (). , (X) , .
1. , .
2. 2.3 fail .
2. do_answer () ( ).
3. . ( , ..).