From dc143cc3ae5b24ba6ed5609141cddc5f9af0c343 Mon Sep 17 00:00:00 2001
From: Krasimir Angelov <kr.angelov@gmail.com>
Date: Thu, 5 Dec 2024 16:31:52 +0100
Subject: [PATCH] nicer inflection table for adjectives

---
 src/albanian/DocumentationSqi.gf | 25 +++++++++----------------
 1 file changed, 9 insertions(+), 16 deletions(-)

diff --git a/src/albanian/DocumentationSqi.gf b/src/albanian/DocumentationSqi.gf
index 4b0eb4c00..60607c1f5 100644
--- a/src/albanian/DocumentationSqi.gf
+++ b/src/albanian/DocumentationSqi.gf
@@ -26,22 +26,15 @@ lin InflectionA = \x -> {
       t="adj" ;
       s1="" ;
       s2=frameTable (
-           tr (intagAttr "th" "rowspan=\"16\"" "s" ++ intagAttr "th" "rowspan=\"4\"" "Nom" ++ intagAttr "th" "rowspan=\"2\"" "Masc" ++ th "Sg" ++ td (x.s ! Nom ! Masc ! Sg)) ++
-           tr (th "Pl" ++ td (x.s ! Nom ! Masc ! Pl)) ++
-           tr (intagAttr "th" "rowspan=\"2\"" "Fem" ++ th "Sg" ++ td (x.s ! Nom ! Fem ! Sg)) ++
-           tr (th "Pl" ++ td (x.s ! Nom ! Fem ! Pl)) ++
-           tr (intagAttr "th" "rowspan=\"4\"" "Acc" ++ intagAttr "th" "rowspan=\"2\"" "Masc" ++ th "Sg" ++ td (x.s ! Acc ! Masc ! Sg)) ++
-           tr (th "Pl" ++ td (x.s ! Acc ! Masc ! Pl)) ++
-           tr (intagAttr "th" "rowspan=\"2\"" "Fem" ++ th "Sg" ++ td (x.s ! Acc ! Fem ! Sg)) ++
-           tr (th "Pl" ++ td (x.s ! Acc ! Fem ! Pl)) ++
-           tr (intagAttr "th" "rowspan=\"4\"" "Dat" ++ intagAttr "th" "rowspan=\"2\"" "Masc" ++ th "Sg" ++ td (x.s ! Dat ! Masc ! Sg)) ++
-           tr (th "Pl" ++ td (x.s ! Dat ! Masc ! Pl)) ++
-           tr (intagAttr "th" "rowspan=\"2\"" "Fem" ++ th "Sg" ++ td (x.s ! Dat ! Fem ! Sg)) ++
-           tr (th "Pl" ++ td (x.s ! Dat ! Fem ! Pl)) ++
-           tr (intagAttr "th" "rowspan=\"4\"" "Ablat" ++ intagAttr "th" "rowspan=\"2\"" "Masc" ++ th "Sg" ++ td (x.s ! Ablat ! Masc ! Sg)) ++
-           tr (th "Pl" ++ td (x.s ! Ablat ! Masc ! Pl)) ++
-           tr (intagAttr "th" "rowspan=\"2\"" "Fem" ++ th "Sg" ++ td (x.s ! Ablat ! Fem ! Sg)) ++
-           tr (th "Pl" ++ td (x.s ! Ablat ! Fem ! Pl))) ;
+           tr (intagAttr "th" "colspan=\"2\"" "" ++ th "Sg" ++ th "Pl") ++
+           tr (intagAttr "th" "rowspan=\"2\"" "Nom" ++ th "Masc" ++ td (x.s ! Nom ! Masc ! Sg) ++ td (x.s ! Nom ! Masc ! Pl)) ++
+           tr (th "Fem" ++ td (x.s ! Nom ! Fem ! Sg) ++ td (x.s ! Nom ! Fem ! Pl)) ++
+           tr (intagAttr "th" "rowspan=\"2\"" "Acc" ++ th "Masc" ++ td (x.s ! Acc ! Masc ! Sg) ++ td (x.s ! Acc ! Masc ! Pl)) ++
+           tr (th "Fem" ++ td (x.s ! Acc ! Fem ! Sg) ++ td (x.s ! Acc ! Fem ! Pl)) ++
+           tr (intagAttr "th" "rowspan=\"2\"" "Dat" ++ th "Masc" ++ td (x.s ! Dat ! Masc ! Sg) ++ td (x.s ! Dat ! Masc ! Pl)) ++
+           tr (th "Fem" ++ td (x.s ! Dat ! Fem ! Sg) ++ td (x.s ! Dat ! Fem ! Pl)) ++
+           tr (intagAttr "th" "rowspan=\"2\"" "Ablat" ++ th "Masc" ++ td (x.s ! Ablat ! Masc ! Sg) ++ td (x.s ! Ablat ! Masc ! Pl)) ++
+           tr (th "Fem" ++ td (x.s ! Ablat ! Fem ! Sg) ++ td (x.s ! Ablat ! Fem ! Pl))) ;
       s3=[]
     } ;
 lin InflectionV = \x -> {