:- load_files(library(swi),[silent(true),if(not_loaded)]). :- include('chr.pl').