mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-10 13:29:32 -06:00
12 lines
263 B
Plaintext
12 lines
263 B
Plaintext
--# -path=.:present:api:prelude
|
|
|
|
concrete MusicEng of Music =
|
|
MusicI - [PropKind]
|
|
with
|
|
(Syntax = SyntaxEng),
|
|
(MusicLex = MusicLexEng) **
|
|
open SyntaxEng in {
|
|
lin
|
|
PropKind k p = mkCN k (mkRS (mkRCl which_RP (mkVP p))) ;
|
|
}
|