GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 17:08:54 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Ara) WIP Restructuring Morpho and Res + fixed some forms in class 1d3

Browse Source
This commit is contained in:
Inari Listenmaa
2019-01-18 17:34:13 +01:00
parent 92126763c7
commit c3590f0334
3 changed files with 1125 additions and 1103 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1104
src/arabic/MorphoAra.gf
View File

File diff suppressed because it is too large Load Diff

9
src/arabic/ParadigmsAra.gf
View File

@@ -3,6 +3,7 @@
--1 Arabic Lexical Paradigms --1 Arabic Lexical Paradigms
-- --
-- Ali El Dada 2005--2006 -- Ali El Dada 2005--2006
-- Inari Listenmaa 2018-
-- --
-- This is an API to the user of the resource grammar -- This is an API to the user of the resource grammar
-- for adding lexical items. It gives functions for forming -- for adding lexical items. It gives functions for forming
@@ -26,9 +27,8 @@
resource ParadigmsAra = open resource ParadigmsAra = open
Predef, Predef,
Prelude, Prelude,
MorphoAra, ResAra,
OrthoAra, OrthoAra,
(ResAra=ResAra),
(A=AdjectiveAra), (A=AdjectiveAra),
CatAra CatAra
in { in {
@@ -723,8 +723,9 @@ resource ParadigmsAra = open
nisbaA Haal = nisbaA Haal =
let Haaliyy : Str = case Haal of { let Haaliyy : Str = case Haal of {
x + "ِيّ" => Haal ; -- if the ending is already given, don't add it x + "يّ" => Haal ; -- if the ending is already given, don't add it
_ => Haal + "ِيّ" -- intended usage: give only stem x + ("ا"|"ة") => x + "ِيّ" ; -- drop final alif or ta marbuta
_ => Haal + "ِيّ"
} in lin A { } in lin A {
s = table { s = table {
APosit g n d c => positAdj Haaliyy ! g ! n ! d ! c ; APosit g n d c => positAdj Haaliyy ! g ! n ! d ! c ;

1115
src/arabic/ResAra.gf
View File

File diff suppressed because it is too large Load Diff