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)