1:-module(history,[hap/2,history_is_empty/1]). 2 3 4%%%% /Users/muffo/Dropbox/Develop/NetBeansProjects/TestJPL/gameProj/trace.txt %%%% 5hap(start,0.0). 6hap(sono(A,B,C,D),0.0). 7hap(sono(A,B,C,D),1.0). 8hap(sono(A,B,C,D),2.0). 9history_is_empty(no)