SWI-Prolog
stassa.p