E
DLP
Prolog
Query
?- p(X,Y). // results in (X = 1,Y = 2) // and (X = 0, Y = 2) slide: DLP -- control (1)
?- O = new travel(), O!reachable(X), write(X). slide: DLP -- objects (3)
object agency : travel { agency agency() :- accept( any ), agency(). book(X,Y) :- reachable(X), price(X,Y). price(amsterdam,5). ... } slide: DLP -- inheritance