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

worst case of Fin mkA; default case endings for Fin symbol as PN

Browse Source
This commit is contained in:
aarne
2013-03-12 20:01:07 +00:00
parent 9853f280b7
commit 5e2d66a9ee
3 changed files with 36 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/finnish/SymbolFin.gf
+4 -4
View File
@@ -1,11 +1,11 @@
--# -path=.:../abstract:../common
concrete SymbolFin of Symbol = CatFin ** open Prelude, NounFin, ResFin in {
concrete SymbolFin of Symbol = CatFin ** open Prelude, NounFin, ResFin, MorphoFin in {
lin
SymbPN i = {s = \\c => i.s} ; --- c
IntPN i = {s = \\c => i.s} ; --- c
FloatPN i = {s = \\c => i.s} ; --- c
SymbPN i = {s = \\c => i.s ++ BIND ++ defaultCaseEnding c} ; --- c
IntPN i = {s = \\c => i.s ++ BIND ++ ":" ++ BIND ++ defaultCaseEnding c} ; --- c
FloatPN i = {s = \\c => i.s ++ BIND ++ ":" ++ BIND ++ defaultCaseEnding c} ; --- c
NumPN i = {s = \\c => i.s!Sg!Nom } ; --- c
CNIntNP cn i = {