1
0
forked from GitHub/gf-rgl

fix in etaexpand optimization

This commit is contained in:
aarne
2007-01-11 11:42:39 +00:00
parent d021b080ec
commit 654b013934

View File

@@ -35,7 +35,7 @@ concrete ExtraFin of ExtraFinAbs = CatFin ** open ResFin, MorphoFin, Coordinatio
i_implicPron = mkPronoun [] "minun" "minua" "minuna" "minuun" Sg P1 ; i_implicPron = mkPronoun [] "minun" "minua" "minuna" "minuun" Sg P1 ;
whatPart_IP = { whatPart_IP = {
s = table { s = table {
NPCase Nom | NPAcc => "mitä" ; NPCase Nom | NPAcc => "mitä" ;
c => whatSg_IP.s ! c c => whatSg_IP.s ! c
} ; } ;
n = Sg n = Sg