4 lines
123 B
Racket
4 lines
123 B
Racket
#lang datalog
|
|
friend(arnold,arnold).
|
|
student(arnold,arnold,arnold) :- friend(arnold,arnold).
|
|
student(arnold,arnold,arnold)? |