slides
:-object object_oo_7 : [slides]. var url = '@talk-oo-7.wrl'. var slideset = 'oo-7'. var interface = 'oo-7-interface'. main :- load(url), delay(5000), initialize, watch(slideset), connect(interface), delay(2000), !. :- end_object object_oo_7.