:-module(history,[hap/2,history_is_empty/1]).


%%%% /Users/muffo/Dropbox/Develop/NetBeansProjects/TestJPL/gameProj/trace.txt %%%%
hap(start,0.0).
hap(sono(A,B,C,D),0.0).
hap(sono(A,B,C,D),1.0).
hap(sono(A,B,C,D),2.0).
history_is_empty(no).