From fd6541846fc9e7f5eef7f44d89c42a8bece8c6c8 Mon Sep 17 00:00:00 2001 From: Inari Listenmaa Date: Mon, 27 Apr 2020 17:18:48 +0200 Subject: [PATCH] (Hun) Remove some stem changing paradigms from 1-argument regNoun --- src/hungarian/NounMorphoHun.gf | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/hungarian/NounMorphoHun.gf b/src/hungarian/NounMorphoHun.gf index f6726703f..72354b61f 100644 --- a/src/hungarian/NounMorphoHun.gf +++ b/src/hungarian/NounMorphoHun.gf @@ -254,8 +254,8 @@ regNounNomAcc : (nom : Str) -> (acc : Str) -> Noun = \n,a -> -- Words like nyár, név need to use 2-arg smart paradigm (#c|"")+("á"|"é")+ #c => mkNoun sgnom ; _ + ("á"|"é") + #c => dToll sgnom (név2nevet sgnom) ; - _ + ("ó"|"é"|"ő"|"ű") => dLó sgnom (ló2lovat sgnom) ; - _ + #v + #c + #v + #c => dMajom sgnom (majom2majmo sgnom); +-- _ + ("ó"|"é"|"ő"|"ű") => dLó sgnom (ló2lovat sgnom) ; +-- _ + #v + #c + #v + #c => dMajom sgnom (majom2majmo sgnom); _ => mkNoun sgnom -- Fall back to the regular paradigm } where { név2nevet : Str -> Str = \név ->