mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-12 22:39:31 -06:00
13 lines
261 B
Plaintext
13 lines
261 B
Plaintext
interface AuxDialogue = open Multi in {
|
|
oper
|
|
defN : N -> NP = \n ->
|
|
DetCN (DetSg (SgQuant DefArt) NoOrd) (UseN n) ;
|
|
|
|
mkMove : Str -> Phr = \s -> {s = variants {
|
|
s ;
|
|
s ++ please_Voc.s
|
|
} ;
|
|
lock_Phr = <>
|
|
} ;
|
|
|
|
} |