diff options
| author | Krasimir Angelov <kr.angelov@gmail.com> | 2018-07-04 13:09:39 +0200 |
|---|---|---|
| committer | Krasimir Angelov <kr.angelov@gmail.com> | 2018-07-04 13:09:39 +0200 |
| commit | f64b17eef7cef49debb9f42e943e02da48089f06 (patch) | |
| tree | bb49b8bac2e3cafd3c1f997115bf5bb841554eab /examples/foods/ResCze.gf | |
| parent | 7bfd6199d600f00233fb29806eed8e894644f439 (diff) | |
| parent | c6f4edaea5f1074ba682fac5d711016f0136998f (diff) | |
Merge branch 'master' of https://github.com/GrammaticalFramework/GF
Conflicts:
examples/phrasebook/SentencesBul.gf
examples/phrasebook/WordsBul.gf
Diffstat (limited to 'examples/foods/ResCze.gf')
| -rw-r--r-- | examples/foods/ResCze.gf | 46 |
1 files changed, 0 insertions, 46 deletions
diff --git a/examples/foods/ResCze.gf b/examples/foods/ResCze.gf deleted file mode 100644 index 56b4aa6ee..000000000 --- a/examples/foods/ResCze.gf +++ /dev/null @@ -1,46 +0,0 @@ --- (c) 2011 Katerina Bohmova under LGPL - -resource ResCze = open Prelude in { - flags - coding = utf8 ; - param - Number = Sg | Pl ; - Gender = Masc | Fem | Neutr; - oper - NounPhrase : Type = - {s : Str ; g : Gender ; n : Number} ; - Noun : Type = {s : Number => Str ; g : Gender} ; - Adjective : Type = {s : Gender => Number => Str} ; - - det : Number -> Str -> Str -> Str -> Noun -> NounPhrase = - \n,m,f,ne,cn -> { - s = table {Masc => m ; Fem => f; Neutr => ne} ! cn.g ++ - cn.s ! n ; - g = cn.g ; - n = n - } ; - noun : Str -> Str -> Gender -> Noun = - \muz,muzi,g -> { - s = table {Sg => muz ; Pl => muzi} ; - g = g - } ; - adjective : (msg,fsg,nsg,mpl,fpl,npl : Str) -> Adjective = - \msg,fsg,nsg,mpl,fpl,npl -> { - s = table { - Masc => table {Sg => msg ; Pl => mpl} ; - Fem => table {Sg => fsg ; Pl => fpl} ; - Neutr => table {Sg => nsg ; Pl => npl} - } - } ; - regAdj : Str -> Adjective = - \mlad -> - adjective (mlad+"ý") (mlad+"á") (mlad+"é") - (mlad+"é") (mlad+"é") (mlad+"á") ; - regnfAdj : Str -> Adjective = - \vynikajici -> - adjective vynikajici vynikajici vynikajici - vynikajici vynikajici vynikajici; - copula : Number => Str = - table {Sg => "je" ; Pl => "jsou"} ; -} - |
