punctuation added to NDTrans

This commit is contained in:
aarne
2014-03-11 20:57:17 +00:00
parent 69b113324e
commit 4ca5ffc892
6 changed files with 49 additions and 2 deletions

View File

@@ -65312,4 +65312,7 @@ perfect_Chunk 5.751177721092363e-4
perfect_neg_Chunk 5.751177721092363e-4
past_perfect_Chunk 5.751177721092363e-4
past_perfect_neg_Chunk 5.751177721092363e-4
SFullstop 0.9
SQuestmark 0.06
SExclmark 0.01
SUnmarked 0.03

View File

@@ -8,9 +8,18 @@ abstract NDTrans =
,Chunk
** {
flags
startcat=Phr;
startcat = TransUnit ;
-- heuristic_search_factor=0.60;
-- meta_prob=1.0e-5;
-- meta_token_prob=1.1965149246222233e-9;
cat
TransUnit ;
fun
SFullstop : Phr -> TransUnit ;
SQuestmark : Phr -> TransUnit ;
SExclmark : Phr -> TransUnit ;
SUnmarked : Phr -> TransUnit ;
}

View File

@@ -11,5 +11,13 @@ concrete NDTransChi of NDTrans =
flags
literal=Symb ;
lincat
TransUnit = {s : Str} ;
lin
SFullstop p = {s = p.s ++ fullstop_s} ;
SQuestmark p = {s = p.s ++ questmark_s} ;
SExclmark p = {s = p.s ++ exclmark_s} ;
SUnmarked p = {s = p.s} ;
}

View File

@@ -11,4 +11,13 @@ concrete NDTransEng of NDTrans =
flags
literal=Symb ;
lincat
TransUnit = {s : Str} ;
lin
SFullstop p = {s = p.s ++ "."} ;
SQuestmark p = {s = p.s ++ "?"} ;
SExclmark p = {s = p.s ++ "!"} ;
SUnmarked p = {s = p.s} ;
}

View File

@@ -12,5 +12,14 @@ concrete NDTransFin of NDTrans =
flags
literal=Symb ;
lincat
TransUnit = {s : Str} ;
lin
SFullstop p = {s = p.s ++ "."} ;
SQuestmark p = {s = p.s ++ "?"} ;
SExclmark p = {s = p.s ++ "!"} ;
SUnmarked p = {s = p.s} ;
}

View File

@@ -11,5 +11,14 @@ concrete NDTransSwe of NDTrans =
flags
literal=Symb ;
lincat
TransUnit = {s : Str} ;
lin
SFullstop p = {s = p.s ++ "."} ;
SQuestmark p = {s = p.s ++ "?"} ;
SExclmark p = {s = p.s ++ "!"} ;
SUnmarked p = {s = p.s} ;
}