mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-10 05:29:30 -06:00
8 lines
222 B
Plaintext
8 lines
222 B
Plaintext
--# -path=.:present:prelude
|
|
|
|
concrete MusicEng of Music = MusicEng0 - [PropKind] ** open GrammarEng in {
|
|
lin
|
|
PropKind k p =
|
|
RelCN k (UseRCl TPres ASimul PPos (RelVP IdRP (UseComp (CompAP p)))) ;
|
|
}
|