mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-05 09:12:51 -06:00
54 lines
1.6 KiB
Plaintext
54 lines
1.6 KiB
Plaintext
concrete ChunkTha of Chunk = CatTha, ExtensionsTha [VPS,VPI] **
|
|
ChunkFunctor -- - [Numeral_Nom_Chunk, Conj_Chunk, CN_Pl_Chunk, Subj_Chunk, emptyNP, Prep_Chunk, Predet_Chunk]
|
|
with (Syntax = SyntaxTha), (Extensions = ExtensionsTha) **
|
|
open
|
|
SyntaxTha, (E = ExtensionsTha), Prelude,
|
|
ResTha, (P = ParadigmsTha), StringsTha in {
|
|
|
|
oper
|
|
emptyNP : NP = mkNP [] ;
|
|
|
|
{-
|
|
-- exceptions to functor ONLY IF NEEDED
|
|
|
|
lin
|
|
Conj_Chunk conj = ss (conj.s ! CSent).s2 ;
|
|
Numeral_Nom_Chunk num = ss (num.s ++ ge_s) ;
|
|
CN_Pl_Chunk cn = cn ;
|
|
Subj_Chunk subj = ss (subj.prePart ++ subj.sufPart) ;
|
|
Prep_Chunk prep = ss (prep.prepPre ++ prep.prepPost) ;
|
|
Predet_Chunk predet = predet ;
|
|
-}
|
|
|
|
-- THESE ARE NEEDED
|
|
lin
|
|
NP_Acc_Chunk np = np ;
|
|
NP_Gen_Chunk np = ss (khoog_s ++ np.s) ;
|
|
|
|
VPI_Chunk vpi = vpi ;
|
|
|
|
copula_inf_Chunk = ss pen_s ;
|
|
|
|
refl_SgP1_Chunk = ss reflPron ;
|
|
refl_SgP2_Chunk = ss reflPron ;
|
|
refl_SgP3_Chunk = ss reflPron ;
|
|
refl_PlP1_Chunk = ss reflPron ;
|
|
refl_PlP2_Chunk = ss reflPron ;
|
|
refl_PlP3_Chunk = ss reflPron ;
|
|
neg_Chunk = ss may_s ;
|
|
copula_Chunk = ss pen_s ;
|
|
copula_neg_Chunk = ss (thbind may_s chay_s) ;
|
|
{- ---- TODO
|
|
past_copula_Chunk = ss "了" ;
|
|
past_copula_neg_Chunk = ss (neg_s ++ copula_s ++ "了") ;
|
|
future_Chunk = ss copula_s ; ----
|
|
future_neg_Chunk = ss (neg_s ++ copula_s) ;
|
|
cond_Chunk = ss copula_s ; ----
|
|
cond_neg_Chunk = ss (neg_s ++ copula_s) ;
|
|
perfect_Chunk = ss "了" ;
|
|
perfect_neg_Chunk = ss (neg_s ++ copula_s ++ "了") ;
|
|
past_perfect_Chunk = ss "了" ;
|
|
past_perfect_neg_Chunk = ss (neg_s ++ copula_s ++ "了") ;
|
|
-}
|
|
|
|
} |