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