play([]). play([''|L]) :- !, sleep(500), play(L). play([X|L]) :- note(X), sleep(500), play(L). :- play(['E','D','C','D','E','E','E','','D','D','D','','E', 'G','G','','E','D','C','D','E','E','E','','D','D', 'E','D','C']).
⏵
Home Page
Site Map
Login/out
Message Board
Download