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

remove dead code

Browse Source
This commit is contained in:
Krasimir Angelov
2022-02-21 16:15:32 +08:00
committed by Meowyam
parent be36e65343
commit c81edf3fbb
1 changed files with 2 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/bulgarian/MorphoFunsBul.gf
+2 -14
View File
@@ -5,8 +5,8 @@ resource MorphoFunsBul = open
Prelude, Prelude,
CatBul, CatBul,
MorphoBul MorphoBul
in { in {
flags coding=utf8 ; flags coding=utf8 ;
oper oper
@@ -57,12 +57,6 @@ oper
dualV : VTable -> VTable -> V ; dualV : VTable -> VTable -> V ;
dualV imperf perf = { dualV imperf perf = {
s = table {Imperf=>imperf; Perf=>perf}; s = table {Imperf=>imperf; Perf=>perf};
n = let v0 = init (imperf ! (VImperfect Sg P1)) + "н"
in (mkNoun (v0+"е")
(v0+"ия")
(v0+"ия")
(v0+"е")
ANeut).s;
vtype = VNormal; vtype = VNormal;
lock_V=<> lock_V=<>
} ; } ;
@@ -72,12 +66,6 @@ oper
singleV : VTable -> V ; singleV : VTable -> V ;
singleV vtable = { singleV vtable = {
s = \\_=>vtable; s = \\_=>vtable;
n = let v0 = init (vtable ! (VImperfect Sg P1)) + "н"
in (mkNoun (v0+"е")
(v0+"ия")
(v0+"ия")
(v0+"е")
ANeut).s;
vtype = VNormal; vtype = VNormal;
lock_V=<> lock_V=<>
} ; } ;