->       4  Enter     H  *page* S Bonjour, Sherlock. I am HercuLOG. We have to solve the mystery together! 
->       8  Enter     S  *page* H ~fact(start_comm_hercule) 
->      20  Enter     H  *page* S ~fact(start_comm_sherlock) 
->      40  4         H  *page* S ~fact(visit_room(hercule,r1994))~fact(object(hercule,ask,last_night))~fact(object(hercule,ask,mona)) 
->    1:06  4         H  *page* S ~fact(object(hercule,ask,ski_jacket))~fact(object(hercule,ask,gun))~fact(object(hercule,look,mona,r1994))~fact(object(hercule,look,ski_jacket,r1994))~fact(object(hercule,look,gun,r1994)) 
->    1:54  3         H  *page* S ~fact(visit_room(hercule,r1991)) 
->    2:55  2         H  *page* S ~fact(visit_room(hercule,r1988)) 
->    3:19  Enter     S  *page* H ~fact(give_facts_nr(monitor))~fact(give_goals_nr(monitor)) 
->    3:31  1         H  *page* S ~fact(visit_room(hercule,r1985)) 
->    5:01  Bar       H  *page* S ~fact(visit_room(hercule,r1978))~fact(kill_reason(hercule,work,0.5))~fact(find_has(hercule,rolf,motives,work,1)) 
->    5:12  Bar       H  *page* S ~facts_nr(hercule,151)~goals_nr(hercule,9) 
->    6:30  Bar       H  *page* S ~fact(object(hercule,ask,painting))~fact(object(hercule,look,painting,r1978)) 
->    7:19  Priv      H  *page* S ~fact(visit_room(hercule,r1981)) 
->    7:22  Enter     S  *page* H ~fact(what_about(sherlock,look,painting,r1978)) 
->    7:47  Priv      H  *page* S ~fact(answ_ag(hercule,look,painting,r1978,'&fact(descr(painting,author,magritte))&fact(descr(painting,title,the_fool_on_the_hill))&fact(descr(painting,age,early))'))~fact(object(hercule,read,insurance_contract,r1981)) 
->    8:28  Lobby     H  *page* S ~fact(visit_room(hercule,r1960)) 
->    9:30  Lobby     H  *page* S ~fact(object(hercule,read,registry,r1960))~fact(object(hercule,read,phone_log,r1960))~fact(kill_reason(hercule,money,0.5)) 
->   10:18  K         H  *page* S ~fact(visit_room(hercule,r1970)) 
->   11:29  Resto     H  *page* S ~fact(visit_room(hercule,r1973))~fact(find_has(hercule,oscar,opportunity,1800,1)) 
->   11:57  Resto     H  *page* S ~fact(object(hercule,read,sign,r1973)) 
->   12:03  Enter     S  *page* H ~fact(what_about(sherlock,read,sign,r1973)) 
->   12:35  5         H  *page* S ~fact(answ_ag(hercule,read,sign,r1973,'&fact(opened(resturant,600,2200))'))~fact(visit_room(hercule,r1997)) 
->   13:47  6         H  *page* S ~fact(visit_room(hercule,r2001))~fact(find_has(hercule,kolonel,opportunity,2100,1))~fact(find_has(hercule,oscar,weapon,access,1))~fact(find_has(hercule,rolf,weapon,access,1)) 
->   14:58  7         H  *page* S ~fact(visit_room(hercule,r2004)) 
->   16:10  8         H  *page* S ~fact(visit_room(hercule,r2007)) 
->   16:32  Enter     S  *page* H ~fact(give_facts_nr(monitor))~fact(give_goals_nr(monitor)) 
->   17:35  UC        H  *page* S ~fact(did_you(hercule,ask,last_night))~fact(kill_reason(hercule,love,0.5))~fact(find_has(hercule,heidi,motives,love,1))~fact(find_has(hercule,giuzeppe,motives,love,1))~fact(find_has(hercule,hans,opportunity,2100,1)) 
->   17:45  UC        H  *page* S ~facts_nr(hercule,388)~goals_nr(hercule,9) 
->   18:23  3         H  *page* S ~fact(visit_room(hercule,r1991))~fact(did_you(hercule,ask,mona)) 
->   19:07  1         H  *page* S ~fact(visit_room(hercule,r1985))~fact(did_you(hercule,ask,ski_jacket))~fact(find_has(hercule,oscar,motives,money,1)) 
->   19:29  Enter     S  *page* H ~fact(give_facts_nr(monitor))~fact(give_goals_nr(monitor)) 
->   19:36  1         H  *page* S We have solved the mystery. I hope Pierre will agree with our solution! 
->   19:36  1         H  *page* S The criminal is oscar 
->   19:39  1         H  *page* S I am disconnecting now. Ciao..