forked from GitHub/gf-core
20 lines
273 B
Plaintext
20 lines
273 B
Plaintext
abstract MP3 = {
|
|
cat
|
|
Move ;
|
|
Song ;
|
|
|
|
fun
|
|
Play : Song -> Move ;
|
|
CanPlay : Song -> Move ;
|
|
WantPlay : Song -> Move ;
|
|
WhichPlay : Move ;
|
|
|
|
ThisSong : Song ;
|
|
This : Song ;
|
|
|
|
Yesterday : Song ;
|
|
|
|
---- MkSong : String -> Song ;
|
|
|
|
}
|