Visual Prolog on ohjelmistokehitin, jossa yhdistyy logiikkaohjelmointi ja olio-ohjelmointi. Se on laajennus Prologiin joka tukee tyyppijärjestelmää.

Hanoi Example

class hanoi predicates hanoi : (unsigned N). end class hanoi

implement hanoi domains pole = string.

clauses hanoi(N) :- move(N, "left", "centre", "right").

class predicates move : (unsigned N, pole A, pole B, pole C). clauses move(0, _, _, _) :- !. move(N, A, B, C) :- move(N-1, A, C, B), stdio::writef("move a disc from % pole to the % pole\n", A, C), move(N-1, B, A, C). end implement hanoi

goal console::init(), hanoi::hanoi(4).

Aiheesta muualla Visual Prologin kotisivu Visual Prolog

Luokka:Ohjelmointikielet