!= ===============================================================
!= HFST Pmatch rule file converted from Flex source file WrkTvr.ll
!= by flex2pmatch.py
!= ===============================================================

!= ===============================================
!= Pmatch shorthand regular expression definitions
!= ===============================================

Define UNIMPLEMENTED [ "" ] ;
Define AnyChar [ ? ] ;
Define Upper [UppercaseAlpha|"&"] ;
Define AZ
     ["A"|"B"|"C"|"D"|"E"|"F"|"G"|"H"|"I"|"J"|"K"|"L"|"M"|"N"|"O"|"P"|"Q"|"R"|"S"|"T"|"U"|"V"|"W"|"X"|"Y"|"Z"] ;
Define Az
     ["a"|"b"|"c"|"d"|"e"|"f"|"g"|"h"|"i"|"j"|"k"|"l"|"m"|"n"|"o"|"p"|"q"|"r"|"s"|"t"|"u"|"v"|"w"|"x"|"y"|"z"] ;
Define NST [? - [Whitespace|"<"|">"]] ;
Define NS [ NST ] ;
Define NSTagComma [? - [Whitespace|"<"|">"|","]] ;
Define NSHash [? - [Whitespace|"#"|"<"|">"]] ;
Define NSDash [? - [Whitespace|"-"|"<"|">"]] ;
Define NSColon [? - [Whitespace|":"|"<"|">"]] ;
Define NSDashColon [? - [Whitespace|":"|"-"|"<"|">"]] ;
Define NoTag [? - ["\n"|"<"|">"]] ;
Define NoTags [ NoTag+ ] ;
Define NoQuote [? - ["\n"|"\""|"'"|"´"|"«"|"»"|"<"|">"]] ;
Define NoDQuote [? - ["\""|"\n"|"<"|">"]] ;
Define NoQuoteVbar [? - ["\n"|"\""|"'"|"|"|"´"|"«"|"»"|"<"|">"]] ;
Define NoQuoteHash [? - ["\n"|"\""|"'"|"´"|"#"|"«"|"»"|"<"|">"]] ;
Define NoQuoteHashVbar [? - ["\n"|"\""|"'"|"´"|"#"|"|"|"«"|"»"|"<"|">"]] ;
Define NoComma [? - ["\n"|","|"<"|">"]] ;
Define NoCommaPeriod [? - ["\n"|","|"."|"<"|">"]] ;
Define NoLPar [? - ["\n"|"("|"<"|">"]] ;
Define UpperDigit [UppercaseAlpha|Num] ;
Define UpperDigitDash [UppercaseAlpha|Num|"-"] ;
Define Lower [ LowercaseAlpha ] ;
Define LowerDigit [LowercaseAlpha|Num] ;
Define LowerDigitDash [LowercaseAlpha|Num|"-"] ;
Define DigitDash [Num|"-"] ;
Define DigitDashes [ DigitDash+ ] ;
Define DigitComma [Num|","] ;
Define DigitCommas [ DigitComma+ ] ;
Define DigitUscore [Num|"_"] ;
Define DigitUscores [ DigitUscore+ ] ;
Define AsciiAlpha [ AZ | Az ] ;
Define AlphaDigit [Alpha|Num] ;
Define AlphaDigitDash [Alpha|Num|"-"] ;
Define AlphaDigitDashUnder [Alpha|Num|"-"|"_"] ;
Define Num02 ["0"|"1"|"2"] ;
Define Num03 ["0"|"1"|"2"|"3"] ;
Define Num06 ["0"|"1"|"2"|"3"|"4"|"5"|"6"] ;
Define Num12 ["1"|"2"] ;
Define Num19 ["1"|"2"|"3"|"4"|"5"|"6"|"7"|"8"|"9"] ;
Define Num13 ["1"|"2"|"3"] ;
Define YearNum [ Num12 Num^3 ] ;
Define Nums6 [ Num^6 ] ;
Define Nums4 [ Num^4 ] ;
Define Nums2 [ Num^2 ] ;
Define Nums [ Num+ ] ;
Define Nums12 [ Num (Num) ] ;
Define Num12DigitDashes [ Num12 DigitDashes ] ;
Define Num01X [ ["0"|"1"] Num ] ;
Define Num02X [ Num02 Num ] ;
Define Num12X [ Num12 Num ] ;
Define Num13X [ Num13 Num ] ;
Define Num19x [ Num19 (Num) ] ;
Define Num19X [ Num19 Num ] ;
Define Num12Nums [ Num12 Nums ] ;
Define NumsDotNums [ Nums {.} Nums ] ;
Define Nums2DotNums2 [ Nums2 {.} Nums2 ] ;
Define NumsColonNums [ Nums {:} Nums ] ;
Define NumDotNums2 [ Num {.} Nums2 ] ;
Define Nums12DotNums2 [ Nums12 {.} Nums2 ] ;
Define NumsSlashNums [ Nums {/} Nums ] ;
Define NumsCommaNums [ Nums {,} Nums ] ;
Define NumsSpNums [ Nums { } Nums ] ;
Define NumRange [ Nums {-} Nums ] ;
Define Nums2Range [ Nums2 {-} Nums2 ] ;
Define NumsSpRange [ Nums { - } Nums ] ;
Define HhMm [ Num02X {.} Nums2 ] ;
Define CapWord [ Upper NS* ] ;
Define CapWord2 [ Upper NS+ ] ;
Define CapWord3 [ Upper NS^>1 ] ;
Define CapWord4 [ Upper NS^>2 ] ;
Define Word [ NS+ ] ;
Define UpperWord [ Upper+ ] ;
Define LowerWord [ Lower+ ] ;
Define CapWord2iska [ CapWord2 {iska} ] ;
Define CapWord2ska [ CapWord2 {ska} ] ;
Define CapWord2sk [ CapWord2 {sk} ] ;
Define CapWord2s [ CapWord2 {s} ] ;
Define CapWord2Dash [ CapWord2 {-} ] ;
Define WordDash [ Word {-} ] ;
Define Word%_iska [ Word {iska} ] ;
Define Word%_isk [ Word {isk} ] ;
Define Word%_ska [ Word {ska} ] ;
Define Word%_sk [ Word {sk} ] ;
Define Word%_s [ Word {s} ] ;
Define UpperWord%_s [ UpperWord {:s} ] ;
Define LowerWord%_a [ LowerWord {a} ] ;
Define LowerWord%_e [ LowerWord {e} ] ;
Define LowerWord%_s [ LowerWord {s} ] ;
Define EndTagEnamex [ {</ENAMEX>} ] ;
Define StartTagEnamex
     [ {<ENAMEX TYPE=} "\"" UpperWord "\"" { SBT=} "\"" UpperWord "\"" {>} ] ;
Define WordBoundary [ [Whitespace|Punct] - ["<"|">"] | # ] ;
Define Aa ["A"|"a"] ;
Define Bb ["B"|"b"] ;
Define Cc ["C"|"c"] ;
Define Dd ["D"|"d"] ;
Define Ee ["E"|"e"] ;
Define Ff ["F"|"f"] ;
Define Gg ["G"|"g"] ;
Define Hh ["H"|"h"] ;
Define Ii ["I"|"i"] ;
Define Jj ["J"|"j"] ;
Define Kk ["K"|"k"] ;
Define Ll ["L"|"l"] ;
Define Mm ["M"|"m"] ;
Define Nn ["N"|"n"] ;
Define Oo ["O"|"o"] ;
Define Pp ["P"|"p"] ;
Define Qq ["Q"|"q"] ;
Define Rr ["R"|"r"] ;
Define Ss ["S"|"s"] ;
Define Tt ["T"|"t"] ;
Define Uu ["U"|"u"] ;
Define Vv ["V"|"v"] ;
Define Ww ["W"|"w"] ;
Define Xx ["X"|"x"] ;
Define Yy ["Y"|"y"] ;
Define Zz ["Z"|"z"] ;

!= ============================
!= Additional recognition rules
!= ============================

!C Ignore already tagged names and exceptions.
!C Note that this might not always work correctly since Pmatch rules
!C are in principle order-independent.
Define IgnoreTagged
     [ {<Except>} [? - "<"]* {</Except>}
       | {<} [{Ena} | {Nu} | {Ti}] {mex} Alpha+ {>} [? - "<"]+ {</}
         [{Ena} | {Nu} | {Ti}] {mex} Alpha* {>} ] ;

!= ==================================================
!= Pmatch definitions for converted Flex source begin
!= ==================================================

!= ==========================================================
!= Pmatch definitions for Flex regular expression definitions
!= ==========================================================

!# 
!#         File: WrkTvr.ll
!#         Author: Dimitrios Kokkinakis
!#         version: 070106
!# 

!R CITAT	\"|\´|\'|\'\'|"\' \'"|»|«

Define CITAT [ "\"" | {´} | {'} | {''} | {' '} | {»} | {«} ] ;

!= =================================
!= Pmatch definitions for Flex rules
!= =================================

!#  EXCEPTIONS 

!R "\<ENAMEX TYPE\="\"(EVN|LOC|MSR|OBJ|ORG|PRS|WRK|TME|TRM)"\" SBT\=\""(ANM|ARL|AST|ATH|ATL|CLC|CLT|CLU|CMP|CRP|DAT|DEN|EDU|FIN|FNC|FWP|GPL|HPL|HUM|MDI|MDS|MDC|MDD|MDA|MDO|MDP|MTH|PER|PLT|PPL|PRD|PRJ|PRZ|RLG|RTV|STR|TVR|TRM|VHA|VHG|VHW|WAA|WAO|WMD|WMO|WTH)\"\>[^\n\<]+\<\/ENAMEX\>
!A {ECHO;}
!I Ignored exception rule

!R "\<NUMEX TYPE\="\"MSR"\" SBT\=\""(DGR|VLM|TMP|INX|DST|CUR|DEN|PRC|CMU|WMU|XXX|TEL|LST|AGE|WEB|CVU|CRD|ELU)\"\>[^\n\<]+\<\/NUMEX\>
!A {ECHO;}
!I Ignored exception rule

!R "\<TIMEX TYPE\=\"TME\" SBT\=\"DAT\"\>"[^\n\<]+\<\/TIMEX\>
!A {ECHO;}
!I Ignored exception rule

!#  VIDEO, LPs, CDs, FILMS, TV/RADIO PROGRAMS, DOCUMENTARIES, ? 
!#  <ENAMEX TYPE="WRK" SBT="RTV"></ENAMEX><MTH="PTR"/> 

!R Film" "(FestivalS|Festival|Awards)
!A {ECHO;}

Define Except001 [ {Film } [{FestivalS} | {Festival} | {Awards}] ] ; 1

!R (utbildnings|[Vv]årdp)program(met)?" \" "[A-Z][^\n ]+
!A {ECHO;}

Define Except002
     [ [{utbildnings} | Vv {årdp}] {program} ({met}) { } "\"" { } AZ Word ] ; 2

!R "National Film School"
!A {ECHO;}

Define Except003 [ {National Film School} ] ; 3

!R "Dokument "([Ii]n|[Uu]t)ifrån
!A {printTVR(yytext,0);}

Define EnamexWrkTvr001a [ {Dokument } [Ii {n} | Uu {t}] {ifrån} ] ;
Define EnamexWrkTvr001 [ EnamexWrkTvr001a   EndTag(EnamexWrkTvr) ] ; 4

!R ("Uppdrag "[Gg]ranskning|"På spaning i New York"|"Lilla "[Ss]portspegeln)
!A {printTVR(yytext,0);}

Define EnamexWrkTvr002a
     [ {Uppdrag } Gg {ranskning} | {På spaning i New York}
       | {Lilla } Ss {portspegeln} ] ;
Define EnamexWrkTvr002 [ EnamexWrkTvr002a   EndTag(EnamexWrkTvr) ] ; 5

!R ("Dagens "[Ee]ko|"Norra Magazinet"|"Packat ock klart"|"Big Brother"|"Vänner och "[Ff]iender)
!A {printTVR(yytext,0);}

Define EnamexWrkTvr003a
     [ {Dagens } Ee {ko} | {Norra Magazinet} | {Packat ock klart}
       | {Big Brother} | {Vänner och } Ff {iender} ] ;
Define EnamexWrkTvr003 [ EnamexWrkTvr003a   EndTag(EnamexWrkTvr) ] ; 6

!R [^\n ]*([Ss]kiva|[Pp]latta|[Dd]okumentär|[Ff]ilm)(en|n)?" "{U}[^\n ]+" "(to|"in the"|"is the"|"it like"|don\'t|That|lilla|is|it|a|for|in|the|and|one|für|"for the"|"of the")" "[^\n\,\. ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr004a
     [ CapWord2 { }
       [{to} | {in the} | {is the} | {it like} | {don't} | {That} | {lilla}
          | {is} | {it} | {a} | {for} | {in} | {the} | {and} | {one} | {für}
          | {for the} | {of the}]
       { } [NS - [","|"."]]+ [{ } CapWord2]* ] ;
Define EnamexWrkTvr004
     [ LC([Ss {kiva} | Pp {latta} | Dd {okumentär} | Ff {ilm}] ({en} | {n})
          { })
       EnamexWrkTvr004a
       EndTag(EnamexWrkTvr) ] ; 7

!R [^\n ]*([Dd]okumentär|[Ff]ilm)(en)?" "{U}[^\n ]+(\'s|rds|nds|ies|nas|isk|ys|os|öns|ems|ans|els|res|nes|[^\nt ]as|rs|ps|us|ens|nde|ska|aste)" "[^\n\, ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr005a
     [ CapWord2
       [{'s} | {rds} | {nds} | {ies} | {nas} | {isk} | {ys} | {os} | {öns}
          | {ems} | {ans} | {els} | {res} | {nes} | [NS - {t}] {as} | {rs}
          | {ps} | {us} | {ens} | {nde} | {ska} | {aste}]
       { } [NS - {,}]+ [{ } CapWord2]* ] ;
Define EnamexWrkTvr005
     [ LC([Dd {okumentär} | Ff {ilm}] ({en}) { })
       EnamexWrkTvr005a
       EndTag(EnamexWrkTvr) ] ; 8

!R [^\n ]*[Ff]ilmer" som "(Das|Det|Den|A|The|Det" "[^\n ]+nde)" "[^\n ]+
!A {printTVR(yytext,2);}

Define EnamexWrkTvr006a
     [ [{Das} | {Det} | {Den} | {A} | {The} | {Det } Word {nde}] { } Word ] ;
Define EnamexWrkTvr006
     [ LC(Ff {ilmer som })
       EnamexWrkTvr006a
       EndTag(EnamexWrkTvr) ] ; 9

!R [^\n ]*"rollen i "(Innan|Det|Den)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,2);}

Define EnamexWrkTvr007a
     [ [{Innan} | {Det} | {Den}] { } Word [{ } CapWord2]* ] ;
Define EnamexWrkTvr007
     [ LC({rollen i })
       EnamexWrkTvr007a
       EndTag(EnamexWrkTvr) ] ; 10

!R "frågor till Privata Pengar"
!A {printTVR(yytext,2);}

Define EnamexWrkTvr008a [ {Privata Pengar} ] ;
Define EnamexWrkTvr008
     [ LC({frågor till })
       EnamexWrkTvr008a
       EndTag(EnamexWrkTvr) ] ; 11

!R [^\n ]*[Mm]usikal(en)?" "({U}[^\n ]+" ")+(for|and|of|"of the"|"for the"|a)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr009a
     [ [CapWord2 { }]+ [{for} | {and} | {of} | {of the} | {for the} | {a}] { }
       Word [{ } CapWord2]* ] ;
Define EnamexWrkTvr009
     [ LC(Mm {usikal} ({en}) { })
       EnamexWrkTvr009a
       EndTag(EnamexWrkTvr) ] ; 12

!R "Cannes med "{CITAT}(" "[^\n\"\'\´]+)+" "{CITAT}
!A {printTVR(yytext,2);}

Define EnamexWrkTvr010a [ CITAT [{ } NoQuote+]+ { } CITAT ] ;
Define EnamexWrkTvr010
     [ LC({Cannes med })
       EnamexWrkTvr010a
       EndTag(EnamexWrkTvr) ] ; 13

!R [Uu]ppföljaren" "{CITAT}(" "[^\n\"\'\´]+)+" "{CITAT}
!A {printTVR(yytext,1);}

Define EnamexWrkTvr011a [ CITAT [{ } NoQuote+]+ { } CITAT ] ;
Define EnamexWrkTvr011
     [ LC(Uu {ppföljaren })
       EnamexWrkTvr011a
       EndTag(EnamexWrkTvr) ] ; 14

!R [^\n ]*[Aa]lbum(et|en)?" "(See|I|A|The|Born)" "[^\n ]+(" "{U}[^\n ]*)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr012a
     [ [{See} | {I} | {A} | {The} | {Born}] { } Word [{ } CapWord]* ] ;
Define EnamexWrkTvr012
     [ LC(Aa {lbum} ({et} | {en}) { })
       EnamexWrkTvr012a
       EndTag(EnamexWrkTvr) ] ; 15

!R [^\n ]*(C[Dd]|LP|[Ee]p)(\-n|\:n)" "(I|A|The)" "(" "{U}[^\n ]*)+
!A {printTVR(yytext,0);}

Define EnamexWrkTvr013a
     [ NS* [{C} Dd | {LP} | Ee {p}] [{-n} | {:n}] { } [{I} | {A} | {The}] { }
       [{ } CapWord]+ ] ;
Define EnamexWrkTvr013 [ EnamexWrkTvr013a   EndTag(EnamexWrkTvr) ] ; 16

!R {U}[^\n ]+" "{U}[^\n ]+\-(låt|video|sång)
!A {printTVR(yytext,0);}

Define EnamexWrkTvr014a
     [ CapWord2 { } CapWord2 {-} [{låt} | {video} | {sång}] ] ;
Define EnamexWrkTvr014 [ EnamexWrkTvr014a   EndTag(EnamexWrkTvr) ] ; 17

!R [0-9]+\.[0-9]+" "(Oprah" "Winfrey|Ricky" "Lake|Skilda" "världar)
!A {printTVR(yytext,1);}

Define EnamexWrkTvr015a
     [ {Oprah Winfrey} | {Ricky Lake} | {Skilda världar} ] ;
Define EnamexWrkTvr015
     [ LC(NumsDotNums { })
       EnamexWrkTvr015a
       EndTag(EnamexWrkTvr) ] ; 18

!R [^\n ]*(okumentären|[Aa]lbumet)" "(Varför|Någon|Living)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr016a
     [ [{Varför} | {Någon} | {Living}] { } Word [{ } CapWord2]* ] ;
Define EnamexWrkTvr016
     [ LC([{okumentären} | Aa {lbumet}] { })
       EnamexWrkTvr016a
       EndTag(EnamexWrkTvr) ] ; 19

!R [^\n ]*[Ss](ingel|ånge|chlager)n" "{U}[^\n ]+" "(by|as|it|a|for|the|and|one|für|"of the")" "[^\n ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr017a
     [ CapWord2 { }
       [{by} | {as} | {it} | {a} | {for} | {the} | {and} | {one} | {für}
          | {of the}]
       { } Word [{ } CapWord2]* ] ;
Define EnamexWrkTvr017
     [ LC(Ss [{ingel} | {ånge} | {chlager}] {n })
       EnamexWrkTvr017a
       EndTag(EnamexWrkTvr) ] ; 20

!R Film" "(Festival|Awards)
!A {ECHO;}

Define Except004 [ {Film } [{Festival} | {Awards}] ] ; 21

!R [0-9]+\.[0-9]+" "[^\n \(]+" \( R \)"
!A {printTVR(yytext,1);}

Define EnamexWrkTvr018a [ [NS - {(}]+ { ( R )} ] ;
Define EnamexWrkTvr018
     [ LC(NumsDotNums { })
       EnamexWrkTvr018a
       EndTag(EnamexWrkTvr) ] ; 22

!R (Beatles|Disneys|regisserat)" "{CITAT}(" "[^\n\"\'|\´]+)+" "{CITAT}" och "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,1);}

Define EnamexWrkTvr019a
     [ CITAT [{ } NoQuoteVbar+]+ { } CITAT { och } CITAT { } CapWord
       [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr019
     [ LC([{Beatles} | {Disneys} | {regisserat}] { })
       EnamexWrkTvr019a
       EndTag(EnamexWrkTvr) ] ; 23

!R [^\n ]*(adios|lmdebut|[Ff]ilm|ilmerna|lmatisering|[Vv]\-uppsättning|okumentär|såpa|[Vv]ideo|[Pp]latta|ysläppta|egisserat|TV\-sända|[Ss]ingel|risbelönta|visas|dansade|[Dd]rama|portage|[Aa]lbum|[Pp]rogram|inglarna|satir|[Ss]kiva|LP\-|[Ee]p\-|LP\:|[Ee]p\:|programm)(et|t|n|en)?" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,1);}

Define EnamexWrkTvr020a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr020
     [ LC([{adios} | {lmdebut} | Ff {ilm} | {ilmerna} | {lmatisering}
             | Vv {-uppsättning} | {okumentär} | {såpa} | Vv {ideo}
             | Pp {latta} | {ysläppta} | {egisserat} | {TV-sända} | Ss {ingel}
             | {risbelönta} | {visas} | {dansade} | Dd {rama} | {portage}
             | Aa {lbum} | Pp {rogram} | {inglarna} | {satir} | Ss {kiva}
             | {LP-} | Ee {p-} | {LP:} | Ee {p:} | {programm}]
          ({et} | {t} | {n} | {en}) { })
       EnamexWrkTvr020a
       EndTag(EnamexWrkTvr) ] ; 24

!R [^\n ]*(inspelning[arne]*" av"|producent[erna]*" för"|[Ll]"åten är")" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,2);}

Define EnamexWrkTvr021a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr021
     [ LC([{inspelning} ["a"|"r"|"n"|"e"]* { av}
             | {producent} ["e"|"r"|"n"|"a"]* { för} | Ll {åten är}]
          { })
       EnamexWrkTvr021a
       EndTag(EnamexWrkTvr) ] ; 25

!R (gaml|klassisk|först)a" hit "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,2);}

Define EnamexWrkTvr022a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr022
     [ LC([{gaml} | {klassisk} | {först}] {a hit })
       EnamexWrkTvr022a
       EndTag(EnamexWrkTvr) ] ; 26

!R ([Vv]ideo|[Ff]ilm)(en)?" "(med|hade)" namnet "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,3);}

Define EnamexWrkTvr023a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr023
     [ LC([Vv {ideo} | Ff {ilm}] ({en}) { } [{med} | {hade}] { namnet })
       EnamexWrkTvr023a
       EndTag(EnamexWrkTvr) ] ; 27

!R ([Hh]it|[Ff]ilm|hits|skiva|platta)(en|n)?" "(\,|som|heter|hette)" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,2);}

Define EnamexWrkTvr024a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr024
     [ LC([Hh {it} | Ff {ilm} | {hits} | {skiva} | {platta}] ({en} | {n})
          { } [{,} | {som} | {heter} | {hette}] { })
       EnamexWrkTvr024a
       EndTag(EnamexWrkTvr) ] ; 28

!#  MOD (Jyrki Niemi): Rule was split into two based on right
!# 	   context length. They could be recombined in Pmatch rules.
!# 	   [^\n ]*("filmer"|"nspelning av")" "{U}[^\n ]+" "{U}[^\n ]+s" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}	{printTVR(yytext,4);}
!# 	 

!R [^\n ]*filmer" "{U}[^\n ]+" "{U}[^\n ]+s" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,3);}

Define EnamexWrkTvr025a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr025
     [ LC({filmer } CapWord2 { } CapWord2s { })
       EnamexWrkTvr025a
       EndTag(EnamexWrkTvr) ] ; 29

!R [^\n ]*"nspelning av "{U}[^\n ]+" "{U}[^\n ]+s" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,4);}

Define EnamexWrkTvr026a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr026
     [ LC({nspelning av } CapWord2 { } CapWord2s { })
       EnamexWrkTvr026a
       EndTag(EnamexWrkTvr) ] ; 30

!#  MOD (Jyrki Niemi): Rule was split into two based on right
!# 	   context length. They could be recombined in Pmatch rules.
!# 	   [^\n ]*("filmer"|"nspelning av")" "{U}[^\n ]+" "{U}[^\n ]+s(" "{U}[^\n ]*)+	{printTVR(yytext,4);}
!# 	 

!R [^\n ]*filmer" "{U}[^\n ]+" "{U}[^\n ]+s(" "{U}[^\n ]*)+
!A {printTVR(yytext,3);}

Define EnamexWrkTvr027a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr027
     [ LC({filmer } CapWord2 { } CapWord2 {s })
       EnamexWrkTvr027a
       EndTag(EnamexWrkTvr) ] ; 31

!R [^\n ]*"nspelning av "{U}[^\n ]+" "{U}[^\n ]+s(" "{U}[^\n ]*)+
!A {printTVR(yytext,4);}

Define EnamexWrkTvr028a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr028
     [ LC({nspelning av } CapWord2 { } CapWord2 {s })
       EnamexWrkTvr028a
       EndTag(EnamexWrkTvr) ] ; 32

!R {CITAT}(" "[^\"\'|\´\n]+)+" "{CITAT}" \, "[^\n ]*(olisserie|film|regissera)
!A {printTVR(yytext,102);}

Define EnamexWrkTvr029a [ CITAT [{ } NoQuoteVbar+]+ { } CITAT ] ;
Define EnamexWrkTvr029
     [ EnamexWrkTvr029a
       EndTag(EnamexWrkTvr)
       RC({ , } NS* [{olisserie} | {film} | {regissera}]) ] ; 33

!R {CITAT}(" "[^\"\'|\´\n]+)+" "{CITAT}" "("i TV"|"är regissera"|[^\n ]+" "film|"spelades in")
!A {printTVR(yytext,102);}

Define EnamexWrkTvr030a [ CITAT [{ } NoQuoteVbar+]+ { } CITAT ] ;
Define EnamexWrkTvr030
     [ EnamexWrkTvr030a
       EndTag(EnamexWrkTvr)
       RC({ } [{i TV} | {är regissera} | Word { film} | {spelades in}]) ] ; 34

!R {CITAT}(" "[^\"\'|\´\n]+)+" "{CITAT}" är en "(film|thriller|komedi)
!A {printTVR(yytext,103);}

Define EnamexWrkTvr031a [ CITAT [{ } NoQuoteVbar+]+ { } CITAT ] ;
Define EnamexWrkTvr031
     [ EnamexWrkTvr031a
       EndTag(EnamexWrkTvr)
       RC({ är en } [{film} | {thriller} | {komedi}]) ] ; 35

!R {CITAT}(" "[^\"\'|\´\n]+)+" "{CITAT}" \, "[^\n ]+"sk "[^\n ]*(film|komedi)
!A {printTVR(yytext,103);}

Define EnamexWrkTvr032a [ CITAT [{ } NoQuoteVbar+]+ { } CITAT ] ;
Define EnamexWrkTvr032
     [ EnamexWrkTvr032a
       EndTag(EnamexWrkTvr)
       RC({ , } Word%_sk { } NS* [{film} | {komedi}]) ] ; 36

!R ^({U}[^\n\( ]+" ")+\(" "({U}[^\n\) ]+" ")"\) \, "[^\n ]+" "[^\n ]*(thriller|drama|komedi|film)
!A {printTVR(yytext,103);}

Define EnamexWrkTvr033a
     [ # [Upper [NS - {(}]+ { }]+ {( } Upper [NS - {)}]+ { )} ] ;
Define EnamexWrkTvr033
     [ EnamexWrkTvr033a
       EndTag(EnamexWrkTvr)
       RC({ , } Word { } NS* [{thriller} | {drama} | {komedi} | {film}]) ] ; 37

!R "\( "[^\n\(]+" \) "([Ee]ngelsk|Brittisk|Am|[Aa]merikansk)(t)?" "[^\n ]*(thriller|drama|komedi|film)
!A {printTVR(yytext,102);}

Define EnamexWrkTvr034a [ {( } NoLPar+ { )} ] ;
Define EnamexWrkTvr034
     [ EnamexWrkTvr034a
       EndTag(EnamexWrkTvr)
       RC({ } [Ee {ngelsk} | {Brittisk} | {Am} | Aa {merikansk}] ({t}) { }
          NS* [{thriller} | {drama} | {komedi} | {film}]) ] ; 38

!R ({U}[^\n\( ]+" ")+([Ee]ngelsk|Brittisk|Am|[Aa]merikansk)(t)?" "[^\n ]*(thriller|drama|komedi|film)
!A {printTVR(yytext,102);}

Define EnamexWrkTvr035a [ [Upper [NS - {(}]+ { }]* Upper [NS - {(}]+ ] ;
Define EnamexWrkTvr035
     [ EnamexWrkTvr035a
       EndTag(EnamexWrkTvr)
       RC({ } [Ee {ngelsk} | {Brittisk} | {Am} | Aa {merikansk}] ({t}) { }
          NS* [{thriller} | {drama} | {komedi} | {film}]) ] ; 39

!R ^({U}[^\n\( ][^\n\( ][^\n\( ]+" ")+"är en "[^\n ]+(iös|tor|lig|tisk|fylld|ande|ff|tal)" "[^\n ]*film
!A {printTVR(yytext,104);}

Define EnamexWrkTvr036a
     [ # [Upper [NS - {(}] [NS - {(}] [NS - {(}]+ { }]* Upper [NS - {(}]
       [NS - {(}] [NS - {(}]+ ] ;
Define EnamexWrkTvr036
     [ EnamexWrkTvr036a
       EndTag(EnamexWrkTvr)
       RC({ är en } Word
          [{iös} | {tor} | {lig} | {tisk} | {fylld} | {ande} | {ff}
             | {tal}]
          { } NS* {film}) ] ; 40

!R [^\n ]*(C[Dd]\-n|LP\-n|[Ee]p\-n|C[Dd]:n|LP:n|[Ee]p:n|[Aa]lbum|[Aa]lbumet|ysläppta)" \,"(" "{U}[^\n\,\- ]+)+" "(\-|\,|\.|\;|\!)
!A {printTVR(yytext,201);}

Define EnamexWrkTvr037a
     [ Upper [NS - [","|"-"]]+ [{ } Upper [NS - [","|"-"]]+]* ] ;
Define EnamexWrkTvr037
     [ LC([{C} Dd {-n} | {LP-n} | Ee {p-n} | {C} Dd {:n} | {LP:n}
             | Ee {p:n} | Aa {lbum} | Aa {lbumet} | {ysläppta}]
          { , })
       EnamexWrkTvr037a
       EndTag(EnamexWrkTvr)
       RC({ } [{-} | {,} | {.} | {;} | {!}]) ] ; 41

!R [^\n ]*([Ff]ilm|[Pp]latta|[Ss]ingel|[Ss]kiva|hriller)(en|n)?" \,"(" "{U}[^\n\,\- ]+)+" "(\-|\,|\.|\;|\!)
!A {printTVR(yytext,201);}

Define EnamexWrkTvr038a
     [ Upper [NS - [","|"-"]]+ [{ } Upper [NS - [","|"-"]]+]* ] ;
Define EnamexWrkTvr038
     [ LC([Ff {ilm} | Pp {latta} | Ss {ingel} | Ss {kiva} | {hriller}]
          ({en} | {n}) { , })
       EnamexWrkTvr038a
       EndTag(EnamexWrkTvr)
       RC({ } [{-} | {,} | {.} | {;} | {!}]) ] ; 42

!R [^\n ]*(C[Dd]|LP|[Ee]p)[\-\:]n(" "{U}[^\n ]*)+
!A {printTVR(yytext,0);}

Define EnamexWrkTvr039a
     [ NS* [{C} Dd | {LP} | Ee {p}] [Whitespace|"-"|":"] {n} CapWord+ ] ;
Define EnamexWrkTvr039 [ EnamexWrkTvr039a   EndTag(EnamexWrkTvr) ] ; 43

!R [^\n ]*(lbumet|[Ss]kiva|[Pp]latta|[Ss]åpan|hriller|okumentär|[Ff]ilm)(n|en)?" "{U}[a-zåäö]?[a-zåäö]?[a-zåäö]?[a-zåäö]?" "[^\n ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr040a
     [ Upper (Lower) (Lower) (Lower) (Lower) { } Word [{ } CapWord2]* ] ;
Define EnamexWrkTvr040
     [ LC([{lbumet} | Ss {kiva} | Pp {latta} | Ss {åpan} | {hriller}
             | {okumentär} | Ff {ilm}]
          ({n} | {en}) { })
       EnamexWrkTvr040a
       EndTag(EnamexWrkTvr) ] ; 44

!R [^\n ]*(lbumet|[Ss]åpan|hriller|okumentär|[Ff]ilm|[Ss]kiva|[Pp]latta)(en|n)?" "{U}[^\n ]+(" "[^\n ]+)?" "[^\n ]+" "(\?|\,|\.|\-|\;)
!A {printTVR(yytext,101);}

Define EnamexWrkTvr041a
     [ NS*
       [{lbumet} | Ss {åpan} | {hriller} | {okumentär} | Ff {ilm}
          | Ss {kiva} | Pp {latta}]
       ({en} | {n}) { } CapWord2 ({ } Word) { } Word ] ;
Define EnamexWrkTvr041
     [ EnamexWrkTvr041a
       EndTag(EnamexWrkTvr)
       RC({ } [{?} | {,} | {.} | {-} | {;}]) ] ; 45

!R [^\n ]*[Ff]ilme(n|r)" "{U}[^\n ]+" och "{U}[^\n ]+
!A {printTVR(yytext,0);}

Define EnamexWrkTvr042a
     [ NS* Ff {ilme} [{n} | {r}] { } CapWord2 { och } CapWord2 ] ;
Define EnamexWrkTvr042 [ EnamexWrkTvr042a   EndTag(EnamexWrkTvr) ] ; 46

!R [^\n ]*([Ss]kiv|[Pp]latt)a(n)?" "{U}[^\n ]+\'s" "[^\n ]+
!A {printTVR(yytext,0);}

Define EnamexWrkTvr043a
     [ NS* [Ss {kiv} | Pp {latt}] {a} ({n}) { } CapWord2 {'s } Word ] ;
Define EnamexWrkTvr043 [ EnamexWrkTvr043a   EndTag(EnamexWrkTvr) ] ; 47

!R [^\n ]*[Ss]"kivan "[0-9]+" "{U}[^\n ]+
!A {/*start with a num*/printTVR(yytext,0);}

!# start with a num

Define EnamexWrkTvr044a [ NS* Ss {kivan } Nums { } CapWord2 ] ;
Define EnamexWrkTvr044 [ EnamexWrkTvr044a   EndTag(EnamexWrkTvr) ] ; 48

!R [^\n ]*(poperasuccéer|regisserat|rullen|[Pp]låttat|[Vv]ideo|[Ff]ilm|okumentär|ulkalender|[Aa]lbum|[Ss]åpan|hriller|[Ss]kiva|[Pp]latta|\-rulle)[aent]*(" "{U}[^\n ]*)+
!A {printTVR(yytext,1);}

Define EnamexWrkTvr045a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr045
     [ LC([{poperasuccéer} | {regisserat} | {rullen} | Pp {låttat}
             | Vv {ideo} | Ff {ilm} | {okumentär} | {ulkalender} | Aa {lbum}
             | Ss {åpan} | {hriller} | Ss {kiva} | Pp {latta} | {-rulle}]
          ["a"|"e"|"n"|"t"]* { })
       EnamexWrkTvr045a
       EndTag(EnamexWrkTvr) ] ; 49

!R [^\n ]*(ilm|barn|[Vv]\-|ywood|tals)klassikern(" "{U}[^\n ]*)+
!A {printTVR(yytext,1);}

Define EnamexWrkTvr046a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr046
     [ LC([{ilm} | {barn} | Vv {-} | {ywood} | {tals}] {klassikern })
       EnamexWrkTvr046a
       EndTag(EnamexWrkTvr) ] ; 50

!R [^\n ]*(lbum|[Ff]ilm|[Vv]ideo|[Ss]kiva|[Pp]latta)(en|et|n)?" "het(te|er)(" "{U}[^\n ]*)+
!A {printTVR(yytext,2);}

Define EnamexWrkTvr047a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr047
     [ LC([{lbum} | Ff {ilm} | Vv {ideo} | Ss {kiva} | Pp {latta}]
          ({en} | {et} | {n}) { het} [{te} | {er}] { })
       EnamexWrkTvr047a
       EndTag(EnamexWrkTvr) ] ; 51

!R [^\n ]*(skiva|låt|lbum|film|video|platta)(en|n)?" som heter"(" "{U}[^\n ]*)+
!A {printTVR(yytext,3);}

Define EnamexWrkTvr048a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr048
     [ LC([{skiva} | {låt} | {lbum} | {film} | {video} | {platta}]
          ({en} | {n}) { som heter })
       EnamexWrkTvr048a
       EndTag(EnamexWrkTvr) ] ; 52

!R [^\n ]*(lbu|[Ff]il)m(en|et)?" heter "[0-9]+(" "{U}[^\n ]*)*
!A {printTVR(yytext,2);}

Define EnamexWrkTvr049a [ Nums [{ } CapWord]* ] ;
Define EnamexWrkTvr049
     [ LC([{lbu} | Ff {il}] {m} ({en} | {et}) { heter })
       EnamexWrkTvr049a
       EndTag(EnamexWrkTvr) ] ; 53

!R [^\n ]*(llnings|usik|hälls|ebatt|bildnings|ultur|ngdoms|sångs|atur|ävlings|orgon|prat|öjes|lovs|[Tt][Vv]|nske|jul|[Vv]\-|UR\-|arn|adio|4\-|yhets|råge|eknik|port|ese|entyrs|ussions|timmes|teve|otor|atir|afé|umentär|litets|agasin|BC\-|3\-)program(met)?" "{U}[^\n ]*(" "[^\n ]+)?" "[^\n ]+" "(\?|\,|\.|\-|\;)
!A {printTVR(yytext,101);}

Define EnamexWrkTvr050a
     [ NS*
       [{llnings} | {usik} | {hälls} | {ebatt} | {bildnings} | {ultur}
          | {ngdoms} | {sångs} | {atur} | {ävlings} | {orgon} | {prat} | {öjes}
          | {lovs} | Tt Vv | {nske} | {jul} | Vv {-} | {UR-} | {arn} | {adio}
          | {4-} | {yhets} | {råge} | {eknik} | {port} | {ese} | {entyrs}
          | {ussions} | {timmes} | {teve} | {otor} | {atir} | {afé} | {umentär}
          | {litets} | {agasin} | {BC-} | {3-}]
       {program} ({met}) { } CapWord ({ } Word) { } Word ] ;
Define EnamexWrkTvr050
     [ EnamexWrkTvr050a
       EndTag(EnamexWrkTvr)
       RC({ } [{?} | {,} | {.} | {-} | {;}]) ] ; 54

!R [^\n ]*(llnings|usik|hälls|ebatt|bildnings|ultur|ngdoms|atur|sångs|ävlings|orgon|nske|jul|[Vv]\-|UR\-|arn|adio|4\-|yhets|prat|öjes|lovs|råge|eknik|port|ese|ventyrs|ussions|timmes|teve|otor|atir|afé|umentär|litets|agasin|3\-|BC\-)program(met)?" "{U}[a-zåäö]?[a-zåäö]?[a-zåäö]?[a-zåäö]?" "[^\n ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr051a
     [ Upper (Lower) (Lower) (Lower) (Lower) { } Word [{ } CapWord2]* ] ;
Define EnamexWrkTvr051
     [ LC([{llnings} | {usik} | {hälls} | {ebatt} | {bildnings} | {ultur}
             | {ngdoms} | {atur} | {sångs} | {ävlings} | {orgon} | {nske}
             | {jul} | Vv {-} | {UR-} | {arn} | {adio} | {4-} | {yhets}
             | {prat} | {öjes} | {lovs} | {råge} | {eknik} | {port} | {ese}
             | {ventyrs} | {ussions} | {timmes} | {teve} | {otor} | {atir}
             | {afé} | {umentär} | {litets} | {agasin} | {3-} | {BC-}]
          {program} ({met}) { })
       EnamexWrkTvr051a
       EndTag(EnamexWrkTvr) ] ; 55

!R [^\n ]*(llnings|usik|hälls|ebatt|bildnings|ultur|nske|jul|ese|ventyrs|ussions|timmes|[Tt][Vv]\-|UR\-|arn|adio|BC\-|3\-|4\-|yhets|ngdoms|atur|sångs|ävlings|orgon|prat|öjes|lovs|råge|eknik|port|teve|otor|atir|afé|okumentär|litets|agasin|SVT\-|CBS\-|P1\-|tlagnings|häst)program(met)?(" "{U}[^\n ]*)+
!A {printTVR(yytext,1);}

Define EnamexWrkTvr052a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr052
     [ LC([{llnings} | {usik} | {hälls} | {ebatt} | {bildnings} | {ultur}
             | {nske} | {jul} | {ese} | {ventyrs} | {ussions} | {timmes}
             | Tt Vv {-} | {UR-} | {arn} | {adio} | {BC-} | {3-} | {4-}
             | {yhets} | {ngdoms} | {atur} | {sångs} | {ävlings} | {orgon}
             | {prat} | {öjes} | {lovs} | {råge} | {eknik} | {port} | {teve}
             | {otor} | {atir} | {afé} | {okumentär} | {litets} | {agasin}
             | {SVT-} | {CBS-} | {P1-} | {tlagnings} | {häst}]
          {program} ({met}) { })
       EnamexWrkTvr052a
       EndTag(EnamexWrkTvr) ] ; 56

!R föreläsningsserien" "{U}[^\n ]*
!A {ECHO;}

Define Except005 [ {föreläsningsserien } CapWord ] ; 57

!R [^\n ]*[Ss]erien" "{U}[^\n ]*(" "[^\n ]+)?" "[^\n ]+" "[\?\,\.\-\;]
!A {printTVR(yytext,101);}

Define EnamexWrkTvr053a [ NS* Ss {erien } CapWord ({ } Word) { } Word ] ;
Define EnamexWrkTvr053
     [ EnamexWrkTvr053a
       EndTag(EnamexWrkTvr)
       RC({ } ["?"|","|"."|"-"|";"]) ] ; 58

!R [^\n ]*(ffia|films|adio|khus|ccé|gdoms|BBC\-|arn|amilje|atir|atur|rama|omedi|eckar|ction|okumentär|olis|[Tt][Vv]\-|mini|riller|ventyrs|riminal|ästern|iction\-)serie(n)?" "{U}[a-zåäö]?[a-zåäö]?[a-zåäö]?[a-zåäö]?" "[^\n ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr054a
     [ Upper (Lower) (Lower) (Lower) (Lower) { } Word [{ } CapWord2]* ] ;
Define EnamexWrkTvr054
     [ LC([{ffia} | {films} | {adio} | {khus} | {ccé} | {gdoms} | {BBC-}
             | {arn} | {amilje} | {atir} | {atur} | {rama} | {omedi} | {eckar}
             | {ction} | {okumentär} | {olis} | Tt Vv {-} | {mini} | {riller}
             | {ventyrs} | {riminal} | {ästern} | {iction-}]
          {serie} ({n}) { })
       EnamexWrkTvr054a
       EndTag(EnamexWrkTvr) ] ; 59

!R [^\n ]*(ffia|films|adio|khus|ccé|gdoms|BBC\-|arn|amilje|atir|atur|rama|omedi|eckar|ction|okumentär|olis|[Tt][Vv]\-|mini|riller|ventyrs|riminal|ästern|iction\-)serie(n)?(" "{U}[^\n ]*)+
!A {printTVR(yytext,1);}

Define EnamexWrkTvr055a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr055
     [ LC([{ffia} | {films} | {adio} | {khus} | {ccé} | {gdoms} | {BBC-}
             | {arn} | {amilje} | {atir} | {atur} | {rama} | {omedi} | {eckar}
             | {ction} | {okumentär} | {olis} | Tt Vv {-} | {mini} | {riller}
             | {ventyrs} | {riminal} | {ästern} | {iction-}]
          {serie} ({n}) { })
       EnamexWrkTvr055a
       EndTag(EnamexWrkTvr) ] ; 60

!R [^\n ]*(agens|ista|nya|fler|[0-9]|ett|två|tre)" avsnitt "(ur|av)(" "{U}[^\:\n ]*)+
!A {printTVR(yytext,3);}

Define EnamexWrkTvr056a [ Upper NSColon* [{ } Upper NSColon*]* ] ;
Define EnamexWrkTvr056
     [ LC([{agens} | {ista} | {nya} | {fler} | Num | {ett} | {två} | {tre}]
          { avsnitt } [{ur} | {av}] { })
       EnamexWrkTvr056a
       EndTag(EnamexWrkTvr) ] ; 61

!R ({U}[^\n ]+" ")?{U}[^\n ][^\n ]+\-(platta|skiva|låt|film|komedi)(n|en|er|erna)?" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,0);}

Define EnamexWrkTvr057a
     [ (CapWord2 { }) CapWord3 {-}
       [{platta} | {skiva} | {låt} | {film} | {komedi}]
       ({n} | {en} | {er} | {erna}) { } CITAT { } CapWord [{ } NoQuote+]* { }
       CITAT ] ;
Define EnamexWrkTvr057 [ EnamexWrkTvr057a   EndTag(EnamexWrkTvr) ] ; 62

!R ({U}[^\n ]+" ")?{U}[^\n ][^\n ]+\-(platta|skiva|film|komedi)(n|en|er|erna)?(" "{U}[^\n ]+)*
!A {printTVR(yytext,0);}

Define EnamexWrkTvr058a
     [ (CapWord2 { }) CapWord3 {-} [{platta} | {skiva} | {film} | {komedi}]
       ({n} | {en} | {er} | {erna}) [{ } CapWord2]* ] ;
Define EnamexWrkTvr058 [ EnamexWrkTvr058a   EndTag(EnamexWrkTvr) ] ; 63

!R [^\n ]*[Ll]åten" "(Alla|All|On|When|En|Det|Den|Här|The|My)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printTVR(yytext,1);}

Define EnamexWrkTvr059a
     [ [{Alla} | {All} | {On} | {When} | {En} | {Det} | {Den} | {Här}
          | {The} | {My}]
       { } Word [{ } CapWord2]* ] ;
Define EnamexWrkTvr059
     [ LC(Ll {åten })
       EnamexWrkTvr059a
       EndTag(EnamexWrkTvr) ] ; 64

!R [^\n ]*[Ll]åten(" "{U}[^\n ]+)+
!A {printTVR(yytext,1);}

Define EnamexWrkTvr060a [ CapWord2 [{ } CapWord2]* ] ;
Define EnamexWrkTvr060
     [ LC(Ll {åten })
       EnamexWrkTvr060a
       EndTag(EnamexWrkTvr) ] ; 65

!R [^\n ]*[Ll]åt(ar" "som|" med")" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,2);}

Define EnamexWrkTvr061a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr061
     [ LC(Ll {åt} [{ar som} | { med}] { })
       EnamexWrkTvr061a
       EndTag(EnamexWrkTvr) ] ; 66

!R [^\n ]*"ilmen anknyter till "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,3);}

Define EnamexWrkTvr062a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr062
     [ LC({ilmen anknyter till })
       EnamexWrkTvr062a
       EndTag(EnamexWrkTvr) ] ; 67

!R (vars" "låt|[Bb]akom" "låten|[Bb]iopremiär" "på)(" "{U}[^\n ]+)+
!A {printTVR(yytext,2);}

Define EnamexWrkTvr063a [ CapWord2 [{ } CapWord2]* ] ;
Define EnamexWrkTvr063
     [ LC([{vars låt} | Bb {akom låten} | Bb {iopremiär på}] { })
       EnamexWrkTvr063a
       EndTag(EnamexWrkTvr) ] ; 68

!R [^\n ]*[Ff]ilmer" som "({U}[^\n\,]+" \, ")+[^\n\,]+" och "[^\n\,\.]+" \."
!A {printTVR(yytext,2);}

Define EnamexWrkTvr064a
     [ [Upper NoComma+ { , }]+ NoComma+ { och } NoCommaPeriod+ { .} ] ;
Define EnamexWrkTvr064
     [ LC(Ff {ilmer som })
       EnamexWrkTvr064a
       EndTag(EnamexWrkTvr) ] ; 69

!R [^\n ]*[Ff]ilmerna" "{U}[^ \n]+" och "{U}[^ \n]+
!A {printTVR(yytext,1);}

Define EnamexWrkTvr065a [ CapWord2 { och } CapWord2 ] ;
Define EnamexWrkTvr065
     [ LC(Ff {ilmerna })
       EnamexWrkTvr065a
       EndTag(EnamexWrkTvr) ] ; 70

!R [^\n ]*[Ff]ilmer" som"(" "{U}[^\n ]*)+" och"(" "{U}[^\n ]*)+
!A {printTVR(yytext,2);}

Define EnamexWrkTvr066a
     [ CapWord [{ } CapWord]* { och } CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr066
     [ LC(Ff {ilmer som })
       EnamexWrkTvr066a
       EndTag(EnamexWrkTvr) ] ; 71

!R [^\n ]*([Ff]ilmer|[Vv]\-serier)" som"(" "{U}[^\n ]*)+" och"(" "{U}[^\n ]*)+
!A {printTVR(yytext,2);}

Define EnamexWrkTvr067a
     [ CapWord [{ } CapWord]* { och } CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr067
     [ LC([Ff {ilmer} | Vv {-serier}] { som })
       EnamexWrkTvr067a
       EndTag(EnamexWrkTvr) ] ; 72

!R [^\n ]*([Ff]ilmer|[Vv]\-serier)" som"(" "{U}[^\n ]*)+
!A {printTVR(yytext,2);}

Define EnamexWrkTvr068a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr068
     [ LC([Ff {ilmer} | Vv {-serier}] { som })
       EnamexWrkTvr068a
       EndTag(EnamexWrkTvr) ] ; 73

!R (3|4|P[1-4]|TV[1-9]+)\:s" "{U}[^\n ]*" "[a-zåäö\.]+
!A {printTVR(yytext,101);}

Define EnamexWrkTvr069a
     [ [{3} | {4} | {P} ["1"|"2"|"3"|"4"] | {TV} Num19+] {:s } CapWord ] ;
Define EnamexWrkTvr069
     [ EnamexWrkTvr069a
       EndTag(EnamexWrkTvr)
       RC({ } [LowercaseAlpha|"."]) ] ; 74

!R (3|4|P[1-4]|TV[1-9]+|SVT)\:s" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,1);}

Define EnamexWrkTvr070a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr070
     [ LC([{3} | {4} | {P} ["1"|"2"|"3"|"4"] | {TV} Num19+ | {SVT}] {:s })
       EnamexWrkTvr070a
       EndTag(EnamexWrkTvr) ] ; 75

!R (3|4|P[1-4]|TV[1-9]+)\:s(" "{U}[^\n ]*)+
!A {printTVR(yytext,1);}

Define EnamexWrkTvr071a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr071
     [ LC([{3} | {4} | {P} ["1"|"2"|"3"|"4"] | {TV} Num19+] {:s })
       EnamexWrkTvr071a
       EndTag(EnamexWrkTvr) ] ; 76

!R (3|4|P[1-4]|TV[1-9]+)\:s" "[^\n ]*(serie|ogram|satsning|succé|dande)(" "{U}[^\n ]*)+
!A {printTVR(yytext,2);}

Define EnamexWrkTvr072a [ CapWord [{ } CapWord]* ] ;
Define EnamexWrkTvr072
     [ LC([{3} | {4} | {P} ["1"|"2"|"3"|"4"] | {TV} Num19+] {:s } NS*
          [{serie} | {ogram} | {satsning} | {succé} | {dande}] { })
       EnamexWrkTvr072a
       EndTag(EnamexWrkTvr) ] ; 77

!R (3|4|P[1-4]|TV[1-9]+|SVT)\:s" "[^\n ]*(serie|ogram|atsning|uccé|dande)" "{CITAT}" "{U}[^\n ]*(" "[^\n\"\'\´]+)*" "{CITAT}
!A {printTVR(yytext,2);}

Define EnamexWrkTvr073a [ CITAT { } CapWord [{ } NoQuote+]* { } CITAT ] ;
Define EnamexWrkTvr073
     [ LC([{3} | {4} | {P} ["1"|"2"|"3"|"4"] | {TV} Num19+ | {SVT}] {:s }
          NS* [{serie} | {ogram} | {atsning} | {uccé} | {dande}] { })
       EnamexWrkTvr073a
       EndTag(EnamexWrkTvr) ] ; 78

!R \n
!A {ECHO;}
!I Ignored exception rule

!R .
!A {ECHO;}
!I Ignored exception rule

!= ======================
!= Pmatch top definitions
!= ======================

Define TOP
     [ LC(WordBoundary)
       [ IgnoreTagged | Except001 | Except002 | Except003 | EnamexWrkTvr001
       | EnamexWrkTvr002 | EnamexWrkTvr003 | EnamexWrkTvr004 | EnamexWrkTvr005
       | EnamexWrkTvr006 | EnamexWrkTvr007 | EnamexWrkTvr008 | EnamexWrkTvr009
       | EnamexWrkTvr010 | EnamexWrkTvr011 | EnamexWrkTvr012 | EnamexWrkTvr013
       | EnamexWrkTvr014 | EnamexWrkTvr015 | EnamexWrkTvr016 | EnamexWrkTvr017
       | Except004 | EnamexWrkTvr018 | EnamexWrkTvr019 | EnamexWrkTvr020
       | EnamexWrkTvr021 | EnamexWrkTvr022 | EnamexWrkTvr023 | EnamexWrkTvr024
       | EnamexWrkTvr025 | EnamexWrkTvr026 | EnamexWrkTvr027 | EnamexWrkTvr028
       | EnamexWrkTvr029 | EnamexWrkTvr030 | EnamexWrkTvr031 | EnamexWrkTvr032
       | EnamexWrkTvr033 | EnamexWrkTvr034 | EnamexWrkTvr035 | EnamexWrkTvr036
       | EnamexWrkTvr037 | EnamexWrkTvr038 | EnamexWrkTvr039 | EnamexWrkTvr040
       | EnamexWrkTvr041 | EnamexWrkTvr042 | EnamexWrkTvr043 | EnamexWrkTvr044
       | EnamexWrkTvr045 | EnamexWrkTvr046 | EnamexWrkTvr047 | EnamexWrkTvr048
       | EnamexWrkTvr049 | EnamexWrkTvr050 | EnamexWrkTvr051 | EnamexWrkTvr052
       | Except005 | EnamexWrkTvr053 | EnamexWrkTvr054 | EnamexWrkTvr055
       | EnamexWrkTvr056 | EnamexWrkTvr057 | EnamexWrkTvr058 | EnamexWrkTvr059
       | EnamexWrkTvr060 | EnamexWrkTvr061 | EnamexWrkTvr062 | EnamexWrkTvr063
       | EnamexWrkTvr064 | EnamexWrkTvr065 | EnamexWrkTvr066 | EnamexWrkTvr067
       | EnamexWrkTvr068 | EnamexWrkTvr069 | EnamexWrkTvr070 | EnamexWrkTvr071
       | EnamexWrkTvr072 | EnamexWrkTvr073 ] ] ;
