:- use_module(library(pce)). :- consult(ieditor). :- consult(ieditor_gesture). :- ieditor_gesture_override. :- initialization(init). init :- new(V, iview), send(V, font, font('Times New Roman', roman, 14, '')), send(V, open).