GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-29 06:22:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

AttemptoUrd added

Browse Source
This commit is contained in:
aarne
2010-03-29 13:59:46 +00:00
parent c2f97ef506
commit f6f09b401e
4 changed files with 148 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
lib/src/urdu/MakeStructuralUrd.gf Normal file
View File

@@ -0,0 +1,14 @@
--# -path=.:../common:../abstract
resource MakeStructuralUrd = open CatUrd, ParadigmsUrd, ResUrd, MorphoUrd, NounUrd, Prelude in {
oper
mkSubj : Str -> CatUrd.Subj = \x ->
lin Subj {s = x} ;
mkNP : Str -> Number -> ResUrd.NP = \s,n ->
MassNP (UseN (ParadigmsUrd.mkN s));
-- lin NP (regNP s n) ;
mkIDet : Str -> Number -> IDet = \s,n ->
lin IDet {s = \\_ => s ; n = n} ;
}