c aitch > pl
Welcome to SWI-Prolog (Version 2.7.16)
Copyright (c) 1993-1996 University of Amsterdam.  All rights reserved.

For help, use ?- help(Topic). or ?- apropos(Word).

1 ?- ['b.p'].
io.p compiled, 0.00 sec, 8,376 bytes.
process.p compiled, 0.01 sec, 11,368 bytes.
b.p compiled, 0.02 sec, 17,096 bytes.

Yes
2 ?- cvt(data).
DEBUG place a red square at 1 1 with side 5 .
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG place a blue square at 2 1 with side 6 .
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG place a blue rectangle at 2 2 of height 3 and width 5 .
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG place a green circle at 3 5 of radius 7 .
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG what squares are there ?
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG what shapes are there ?
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG what color squares are present ?
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG what color circles are present ?
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG are there any red squares present ?
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG are there any red circles present ?
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG how big is the square at 1 1 ?
DEBUG continuing translation ...
DEBUG  leaves remainder X = []
recognized that

DEBUG a bunch of junk .
DEBUG continuing translation ...
DEBUG  leaves remainder X = [a, bunch, of, junk, .]
Can't interpret that

DEBUG just gibberish .
DEBUG continuing translation ...
DEBUG  leaves remainder X = [just, gibberish, .]
Can't interpret that

DEBUG stop .

Yes
3 ?- halt.

c aitch >exit
c aitch >