8 lines
120 B
Text
8 lines
120 B
Text
|
fruit(apple,1).
|
||
|
|
fruit(banana,2).
|
||
|
|
fruit(cherry,4).
|
||
|
|
|
||
|
|
print_fruit_name(N) :-
|
||
|
|
fruit(Name,N),
|
||
|
|
printf("It is %w\nn", Name).
|