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

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

Define UNIMPLEMENTED [ "" ] ;
Define AnyChar [Alpha|Num|Punct|Whitespace|"­"] ;
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 [AnyChar - [Whitespace|"<"|">"]] ;
Define NS [ NST ] ;
Define NSTagComma [AnyChar - [Whitespace|"<"|">"|","]] ;
Define NSHash [AnyChar - [Whitespace|"#"|"<"|">"]] ;
Define NSDash [AnyChar - [Whitespace|"-"|"<"|">"]] ;
Define NSColon [AnyChar - [Whitespace|":"|"<"|">"]] ;
Define NSDashColon [AnyChar - [Whitespace|":"|"-"|"<"|">"]] ;
Define NoTag [AnyChar - ["\n"|"<"|">"]] ;
Define NoTags [ NoTag+ ] ;
Define NoQuote [AnyChar - ["\n"|"\""|"'"|"´"|"«"|"»"|"<"|">"]] ;
Define NoDQuote [AnyChar - ["\""|"\n"|"<"|">"]] ;
Define NoQuoteVbar [AnyChar - ["\n"|"\""|"'"|"|"|"´"|"«"|"»"|"<"|">"]] ;
Define NoQuoteHash [AnyChar - ["\n"|"\""|"'"|"´"|"#"|"«"|"»"|"<"|">"]] ;
Define NoQuoteHashVbar
     [AnyChar - ["\n"|"\""|"'"|"´"|"#"|"|"|"«"|"»"|"<"|">"]] ;
Define NoComma [AnyChar - ["\n"|","|"<"|">"]] ;
Define NoCommaPeriod [AnyChar - ["\n"|","|"."|"<"|">"]] ;
Define NoLPar [AnyChar - ["\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 NumsSlashNums [ Nums {/} Nums ] ;
Define NumsCommaNums [ 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>} [AnyChar - "<"]* {</Except>}
       | {<} [{Ena} | {Nu} | {Ti}] {mex} Alpha+ {>} [AnyChar - "<"]+ {</}
         [{Ena} | {Nu} | {Ti}] {mex} Alpha* {>} ] ;

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

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

!# 
!#         File: WrkSpa.ll
!#         Author: Dimitrios Kokkinakis
!#         version: 070228
!#         Finds titles of ARTWORK
!# 

!R CITAT	\"|\´|\'|\'\'|"\' \'"|»|«|\&\#x201[39D]\;

Define CITAT
     [ "\"" | {´} | {'} | {''} | {' '} | {»} | {«}
       | {&#x201} ["3"|"9"|"D"] {;} ] ;

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

!#  EXCEPTIONS 
!#  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|MDC|MDA|MDD|MDI|MDO|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

!R [Mm]ediekoncernen" "({U}[^\n ]+" ")+Tribune
!A {ECHO;}

Define Except001 [ Mm {ediekoncernen } [CapWord2 { }]+ {Tribune} ] ; 1

!#  Projects 

!R [^\n ]*[Pp]rojekt(et)?" "({U}[^\n ]+igt|Art|Framtida|Kvinnor|A|Bakom|Närmare|Det|Operation|Röda|Den|Första|In|The|Unga|Rädda)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj001a
     [ NS* Pp {rojekt} ({et}) { }
       [CapWord2 {igt} | {Art} | {Framtida} | {Kvinnor} | {A} | {Bakom}
          | {Närmare} | {Det} | {Operation} | {Röda} | {Den} | {Första} | {In}
          | {The} | {Unga} | {Rädda}]
       { } Word [{ } CapWord2]* ] ;
Define EnamexWrkPrj001 [ EnamexWrkPrj001a   EndTag(EnamexWrkPrj) ] ; 2

!R [^\n ]*[Aa]ffärsområde(t)?" "{U}[^\n ]+\-" och "[^\n ]+
!A {printWRKP(yytext,1);}

Define EnamexWrkPrj002a [ CapWord2 {- och } Word ] ;
Define EnamexWrkPrj002
     [ EnamexWrkPrj002a
       LC(Aa {ffärsområde} ({t}) { })
       EndTag(EnamexWrkPrj) ] ; 3

!R [^\n ]*[Aa]ffärsområde(t)?" "{U}[^\n ]+(" "{U}[^\n ]+)+
!A {printWRKP(yytext,1);}

Define EnamexWrkPrj003a [ CapWord2 [{ } CapWord2]+ ] ;
Define EnamexWrkPrj003
     [ EnamexWrkPrj003a
       LC(Aa {ffärsområde} ({t}) { })
       EndTag(EnamexWrkPrj) ] ; 4

!R "Agenda 21"
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj004a [ {Agenda 21} ] ;
Define EnamexWrkPrj004 [ EnamexWrkPrj004a   EndTag(EnamexWrkPrj) ] ; 5

!R [^\n ]*([Aa]vtal|[Pp]rojekt)(et)?" "{CITAT}" "{U}[^\n ]+(" "[^\n\"\'\´]+)+" "{CITAT}
!A {printWRKP(yytext,1);}

Define EnamexWrkPrj005a [ CITAT { } CapWord2 [{ } NoQuote+]+ { } CITAT ] ;
Define EnamexWrkPrj005
     [ EnamexWrkPrj005a
       LC([Aa {vtal} | Pp {rojekt}] ({et}) { })
       EndTag(EnamexWrkPrj) ] ; 6

!R ("Human Proteome"|"Röda "|"Big "|"Stora "|"Local "|"Pelle "|"Norra ")?{U}[^\n ]+projektet
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj006a
     [ ({Human Proteome} | {Röda } | {Big } | {Stora } | {Local } | {Pelle }
         | {Norra })
       CapWord2 {projektet} ] ;
Define EnamexWrkPrj006 [ EnamexWrkPrj006a   EndTag(EnamexWrkPrj) ] ; 7

!R "Operation Läkemedelsdörrknackning"
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj007a [ {Operation Läkemedelsdörrknackning} ] ;
Define EnamexWrkPrj007 [ EnamexWrkPrj007a   EndTag(EnamexWrkPrj) ] ; 8

!R EU\:s" utvidgning"
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj008a [ {EU:s utvidgning} ] ;
Define EnamexWrkPrj008 [ EnamexWrkPrj008a   EndTag(EnamexWrkPrj) ] ; 9

!R FN\:s" "millenniedeklaration
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj009a [ {FN:s millenniedeklaration} ] ;
Define EnamexWrkPrj009 [ EnamexWrkPrj009a   EndTag(EnamexWrkPrj) ] ; 10

!R "ledare för "{U}[^\n ]+" project"
!A {printWRKP(yytext,2);}

Define EnamexWrkPrj010a [ Ins(CapWord2) { project} ] ;
Define EnamexWrkPrj010
     [ EnamexWrkPrj010a
       LC({ledare för })
       EndTag(EnamexWrkPrj) ] ; 11

!R ("Respiratory Health"|National|"Hospital Attitude"|Examination)" Health Survey"(" and "[A-Z][^\n ]+|" of "[A-Z][^\n ]+)?
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj011a
     [ [{Respiratory Health} | {National} | {Hospital Attitude}
          | {Examination}]
       { Health Survey} ({ and } AZ Word | { of } AZ Word) ] ;
Define EnamexWrkPrj011 [ EnamexWrkPrj011a   EndTag(EnamexWrkPrj) ] ; 12

!R ("Project Gutenberg"|"Web Survey of Users"|"Form 36 Health Survey")
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj012a
     [ {Project Gutenberg} | {Web Survey of Users} | {Form 36 Health Survey} ] ;
Define EnamexWrkPrj012 [ EnamexWrkPrj012a   EndTag(EnamexWrkPrj) ] ; 13

!R ({U}[^\n ]*" ")+(Disease|Prevention)" Project"
!A {/*Hepatit C Prevention Project*/printWRKP(yytext,0);}

!# Hepatit C Prevention Project

Define EnamexWrkPrj013a
     [ [Ins(CapWord) { }]+ [{Disease} | {Prevention}] { Project} ] ;
Define EnamexWrkPrj013 [ EnamexWrkPrj013a   EndTag(EnamexWrkPrj) ] ; 14

!R National" "({U}[^\n ]*" ")+Education" "Program
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj014a
     [ {National } [Ins(CapWord) { }]+ {Education Program} ] ;
Define EnamexWrkPrj014 [ EnamexWrkPrj014a   EndTag(EnamexWrkPrj) ] ; 15

!#  MULTI WORKs - WRITTEN
!#  1 Keyword " TITLE " 
!#  2 Keyword , TITLE ,|. 
!#  3 Keyword[BESTÄMD] TITLE 
!#  4 Media, newspapers 
!#  5 Compounds 

!R ({U}[^\n ]+" "[IXV]+|{U}+|"Salt II"|"Sharm el\-Sheikh")\-avtal(et)?
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj015a
     [ [Ins(CapWord2) { } ["I"|"X"|"V"]+ | UpperWord | {Salt II}
          | {Sharm el-Sheikh}]
       {-avtal} ({et}) ] ;
Define EnamexWrkPrj015 [ EnamexWrkPrj015a   EndTag(EnamexWrkPrj) ] ; 16

!R "Camp David"(\-)?avtalet
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj016a [ {Camp David} ({-}) {avtalet} ] ;
Define EnamexWrkPrj016 [ EnamexWrkPrj016a   EndTag(EnamexWrkPrj) ] ; 17

!R [^\n ]*(handels|spridnings)avtalet(" "{U}[^\n ]+)+
!A {printWRKP(yytext,1);}

Define EnamexWrkPrj017a [ CapWord2 [{ } CapWord2]* ] ;
Define EnamexWrkPrj017
     [ EnamexWrkPrj017a
       LC([{handels} | {spridnings}] {avtalet })
       EndTag(EnamexWrkPrj) ] ; 18

!R "Mat för Livet"
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj018a [ {Mat för Livet} ] ;
Define EnamexWrkPrj018 [ EnamexWrkPrj018a   EndTag(EnamexWrkPrj) ] ; 19

!R ({U}[^\n ]" ")+(International|Initiative|Intervention)" Program"
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj019a
     [ [Upper NS { }]+ [{International} | {Initiative} | {Intervention}]
       { Program} ] ;
Define EnamexWrkPrj019 [ EnamexWrkPrj019a   EndTag(EnamexWrkPrj) ] ; 20

!R {U}+\:s" "[^\n ]*(strategi|plan|medelsprogram)(en)?
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj020a
     [ UpperWord {:s } NS* [{strategi} | {plan} | {medelsprogram}] ({en}) ] ;
Define EnamexWrkPrj020 [ EnamexWrkPrj020a   EndTag(EnamexWrkPrj) ] ; 21

!R ({U}[^\n ]" ")+(Framework|Environment)" Programme"
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj021a
     [ [Upper NS { }]+ [{Framework} | {Environment}] { Programme} ] ;
Define EnamexWrkPrj021 [ EnamexWrkPrj021a   EndTag(EnamexWrkPrj) ] ; 22

!R ({U}[^\n ]+fördragets|{U}+\:s" så kallade"|{U}+\:s|[^\n ]+\-" och")" "[^\n ]*pakt
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj022a
     [ [CapWord2 {fördragets} | UpperWord {:s så kallade} | UpperWord {:s}
          | Word {- och}]
       { } NS* {pakt} ] ;
Define EnamexWrkPrj022 [ EnamexWrkPrj022a   EndTag(EnamexWrkPrj) ] ; 23

!R {U}[^\n ]+s" "Marsprogram(met)?
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj023a [ Ins(CapWord2s) { Marsprogram} ({met}) ] ;
Define EnamexWrkPrj023 [ EnamexWrkPrj023a   EndTag(EnamexWrkPrj) ] ; 24

!R [^\n ]*projektet" Lugna gatan"
!A {printWRKP(yytext,1);}

Define EnamexWrkPrj024a [ {Lugna gatan} ] ;
Define EnamexWrkPrj024
     [ EnamexWrkPrj024a
       LC({projektet })
       EndTag(EnamexWrkPrj) ] ; 25

!R [^\n ]*obotprogram(met)?" "al\-[^\n ]+
!A {printWRKP(yytext,1);}

Define EnamexWrkPrj025a [ {al-} Word ] ;
Define EnamexWrkPrj025
     [ EnamexWrkPrj025a
       LC({obotprogram} ({met}) { })
       EndTag(EnamexWrkPrj) ] ; 26

!R {U}[^\n ]+(ak|dad|rea|\:|ien)s" "[^\n ]+vapenprogram
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj026a
     [ CapWord2 [{ak} | {dad} | {rea} | {:} | {ien}] {s } Word {vapenprogram} ] ;
Define EnamexWrkPrj026 [ EnamexWrkPrj026a   EndTag(EnamexWrkPrj) ] ; 27

!R {U}+:s" utvecklingsprogram"(" "{U}[^\n ]+|" \( "{U}+" \)")?
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj027a
     [ UpperWord {:s utvecklingsprogram} ({ } CapWord2 | { ( } Ins(UpperWord) { )}) ] ;
Define EnamexWrkPrj027 [ EnamexWrkPrj027a   EndTag(EnamexWrkPrj) ] ; 28

!R "FN:s "{CITAT}" "[a-z]+\-[a-zåäö]+\-[a-z]+" "{CITAT}
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj028a
     [ {FN:s } CITAT { } LowerWord {-} LowerWord {-} Ins(LowerWord) { } CITAT ] ;
Define EnamexWrkPrj028 [ EnamexWrkPrj028a   EndTag(EnamexWrkPrj) ] ; 29

!R "FN:s "{CITAT}" Operation"(" "[^\n\"\'\´]+)+" "{CITAT}
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj029a
     [ {FN:s } CITAT { Operation} [{ } NoQuote+]+ { } CITAT ] ;
Define EnamexWrkPrj029 [ EnamexWrkPrj029a   EndTag(EnamexWrkPrj) ] ; 30

!R {U}+:s" olja mot "[^\n ]+program
!A {printWRKP(yytext,0);}

Define EnamexWrkPrj030a [ UpperWord {:s olja mot } Word {program} ] ;
Define EnamexWrkPrj030 [ EnamexWrkPrj030a   EndTag(EnamexWrkPrj) ] ; 31

!R (i|sin)" Vision år "[12][0-9][0-9][0-9]
!A {printWRKP(yytext,1);}

Define EnamexWrkPrj031a [ {Vision år } Ins(YearNum) ] ;
Define EnamexWrkPrj031
     [ EnamexWrkPrj031a
       LC([{i} | {sin}] { })
       EndTag(EnamexWrkPrj) ] ; 32

!#  NEWSPAPERS & MAGAZINES that should NOT be ORGS cause of near context 
!#  <ENAMEX TYPE="WRK" SBT="WMD"></ENAMEX><MTH="PTR"/> 

!R "norska Elle"
!A {printWMD(yytext,1);}

Define EnamexWrkWmd001a [ {Elle} ] ;
Define EnamexWrkWmd001
     [ EnamexWrkWmd001a
       LC({norska })
       EndTag(EnamexWrkWmd) ] ; 33

!R (Aftonbladet|SvD|Arbetet|GP|DN|Sydsvenskan|Expressen|Dagens" "{U}[^\n ]+)" "(Näringsliv|Vetenskap|Debatt)
!A {printWMD(yytext,0);}

Define EnamexWrkWmd002a
     [{Aftonbladet} | {SvD} | {Arbetet} | {GP} | {DN} | {Sydsvenskan}
        | {Expressen} | {Dagens } Ins(CapWord2)]
     { } [{Näringsliv} | {Vetenskap} | {Debatt}] ;
Define EnamexWrkWmd002 [ EnamexWrkWmd002a   EndTag(EnamexWrkWmd) ] ; 34

!R (Winter\-Bladet|Islands" "läkartidning|Läkartidningen" "[0-9]+\/[0-9]+|LT" nr "[0-9]+\/[0-9]+|Läkartidningen" nr "[0-9]+\/[0-9]+|Läkartidningen" volym "[0-9]+|[^\n ]+"Fass läkemedelsbeskrivning"[a-z]*|F[Aa][Ss][Ss]" "[12][09][09][0-9]|"SvD Brännpunkt"|"Rose el\-Youssef"|"Paris Match"|"Business Week"|"Sköna Hem"|"Allt i Hemmet"|"Tidskrift för nysvensk "[a-zåäö]+forskning|"Tidskrift för vetenskap och konst"|[Dd]"en Svenska Almanackan"|"Hem & Villa"|"Europaguide 200"[0-9]|"Rough Guide"|"Hennes "[Jj]ournal|"Blue Guide"|"Hemmets Journal"|"New Scientist"|"Medicinsk Vetenskap"|"Vecko Revyn"|"VG Nett"|"Metal Bulletin"|"Dagens Medicin"|"Dagens Naeringsliv"|"Gula Sidorna"|"Observer Magazine"|"Land Lantbruk"|{U}[^\n ]+isk" "tidskrift|Södra" "[^\n ]+" Tidning"|"Life "[Mm]agazine|"Guide Gourmand de la "[^\n ]+)
!A {printWMD(yytext,0);}

Define EnamexWrkWmd003a
     [ {Winter-Bladet} | {Islands läkartidning}
       | {Läkartidningen } Ins(NumsSlashNums) | {LT nr } Ins(NumsSlashNums)
       | {Läkartidningen nr } Ins(NumsSlashNums) | {Läkartidningen volym } Ins(Nums)
       | Word {Fass läkemedelsbeskrivning} Az*
       | {F} Aa Ss Ss { } Num12 ["0"|"9"] ["0"|"9"] Num | {SvD Brännpunkt}
       | {Rose el-Youssef} | {Paris Match} | {Business Week} | {Sköna Hem}
       | {Allt i Hemmet} | {Tidskrift för nysvensk } LowerWord {forskning}
       | {Tidskrift för vetenskap och konst} | Dd {en Svenska Almanackan}
       | {Hem & Villa} | {Europaguide 200} Num | {Rough Guide}
       | {Hennes } Jj {ournal} | {Blue Guide} | {Hemmets Journal}
       | {New Scientist} | {Medicinsk Vetenskap} | {Vecko Revyn} | {VG Nett}
       | {Metal Bulletin} | {Dagens Medicin} | {Dagens Naeringsliv}
       | {Gula Sidorna} | {Observer Magazine} | {Land Lantbruk}
       | CapWord2 {isk tidskrift} | {Södra } Ins(Word) { Tidning}
       | {Life } Mm {agazine} | {Guide Gourmand de la } Word ] ;
Define EnamexWrkWmd003 [ EnamexWrkWmd003a   EndTag(EnamexWrkWmd) ] ; 35

!R (Finsk|Svensk|Norsk)" "Tidss?krift
!A {printWMD(yytext,0);}

Define EnamexWrkWmd004a
     [ [{Finsk} | {Svensk} | {Norsk}] { Tids} ({s}) {krift} ] ;
Define EnamexWrkWmd004 [ EnamexWrkWmd004a   EndTag(EnamexWrkWmd) ] ; 36

!R [Tt]he(" "{U}[^\n ]+)+" "(Book|Yearbook)
!A {printWMD(yytext,0);}

Define EnamexWrkWmd005a
     [ Tt {he} [{ } CapWord2]+ { } [{Book} | {Yearbook}] ] ;
Define EnamexWrkWmd005 [ EnamexWrkWmd005a   EndTag(EnamexWrkWmd) ] ; 37

!R [^\n ]+krift(en)?" "(Nutida|Svensk|Någon|In|Från|I|De|Allt|Mitt|Att|A|The|En|Ett|Till|När|Det|Den|Du|[^\n ]+är|[^\n ]+ska|[^\n ]+skt)" "[^\n ]+(" "{U}[^\n ]*)*
!A {printWMD(yytext,1);}

Define EnamexWrkWmd006a
     [ [{Nutida} | {Svensk} | {Någon} | {In} | {Från} | {I} | {De} | {Allt}
          | {Mitt} | {Att} | {A} | {The} | {En} | {Ett} | {Till} | {När} | {Det}
          | {Den} | {Du} | Word {är} | Word {ska} | Word {skt}]
       { } Word [{ } CapWord]* ] ;
Define EnamexWrkWmd006
     [ EnamexWrkWmd006a
       LC(Word {krift} ({en}) { })
       EndTag(EnamexWrkWmd) ] ; 38

!R [^\n ]+krift(en)?" "(Nutida|Svensk|Någon|In|Från|I|De|Allt|Mitt|Att|A|The|En|Ett|Till|När|Det|Den|Du)" "[^\n ]+
!A {printWMD(yytext,1);}

Define EnamexWrkWmd007a
     [ [{Nutida} | {Svensk} | {Någon} | {In} | {Från} | {I} | {De} | {Allt}
          | {Mitt} | {Att} | {A} | {The} | {En} | {Ett} | {Till} | {När} | {Det}
          | {Den} | {Du}]
       { } Word ] ;
Define EnamexWrkWmd007
     [ EnamexWrkWmd007a
       LC(Word {krift} ({en}) { })
       EndTag(EnamexWrkWmd) ] ; 39

!R Journal" of the "{U}[^\n ]+" "[^\n ]+ical" "[^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa001a
     [ {Journal of the } Ins(CapWord2) { } Word {ical } Word ] ;
Define EnamexWrkWaa001 [ EnamexWrkWaa001a   EndTag(EnamexWrkWaa) ] ; 40

!R Journal" of the "[^\n ]+" of "[^\n ]+" "[^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa002a [ {Journal of the } Ins(Word) { of } Ins(Word) { } Word ] ;
Define EnamexWrkWaa002 [ EnamexWrkWaa002a   EndTag(EnamexWrkWaa) ] ; 41

!R [^\n ]*[Tt]id(ning|skrift)(en)?(" the"|" L \'")(" "{U}[^\n ]*)+(" nätupplaga"|" of "{U}[^\n ]+)?
!A {printWMD(yytext,1);}

Define EnamexWrkWmd008a
     [ [{the} | {L '}] { } CapWord [{ } CapWord]*
       ({ } [{nätupplaga} | {of } CapWord2]) ] ;
Define EnamexWrkWmd008
     [ EnamexWrkWmd008a
       LC(Tt {id} [{ning} | {skrift}] ({en}) { })
       EndTag(EnamexWrkWmd) ] ; 42

!R [^\n ]+krift(en)?(" "{U}[^\n ]*)+" "and(" "{U}[^\n ]*)+" in"{U}[^\n ]+
!A {printWMD(yytext,1);}

Define EnamexWrkWmd009a
     [ CapWord [{ } CapWord]* { and } CapWord [{ } CapWord]* { in} CapWord2 ] ;
Define EnamexWrkWmd009
     [ EnamexWrkWmd009a
       LC(Word {krift} ({en}) { })
       EndTag(EnamexWrkWmd) ] ; 43

!R [^\n ]+krift(en)?(" "{U}[^\n ]*)+" "(in|a|for|the|of|and|one|"of the"|"on the"|"for the")(" "{U}[^\n ]*)+
!A {printWMD(yytext,1);}

Define EnamexWrkWmd010a
     [ CapWord [{ } CapWord]* { }
       [{in} | {a} | {for} | {the} | {of} | {and} | {one} | {of the}
          | {on the} | {for the}]
       { } CapWord [{ } CapWord]* ] ;
Define EnamexWrkWmd010
     [ EnamexWrkWmd010a
       LC(Word {krift} ({en}) { })
       EndTag(EnamexWrkWmd) ] ; 44

!R (senaste|första|sista|andra|års)" "(upplaga|upplagan|numret)" av"(" "{U}[^\n\: ]+)+" of"(" "{U}[^\n ]+)+
!A {printWMD(yytext,3);}

Define EnamexWrkWmd011a
     [ Upper NSColon+ [{ } Upper NSColon+]* { of } CapWord2 [{ } CapWord2]* ] ;
Define EnamexWrkWmd011
     [ EnamexWrkWmd011a
       LC([{senaste} | {första} | {sista} | {andra} | {års}] { }
          [{upplaga} | {upplagan} | {numret}] { av })
       EndTag(EnamexWrkWmd) ] ; 45

!R "DN \- Nyheter"
!A {printWMD(yytext,0);}

Define EnamexWrkWmd012a [ {DN - Nyheter} ] ;
Define EnamexWrkWmd012 [ EnamexWrkWmd012a   EndTag(EnamexWrkWmd) ] ; 46

!R [^\n ]*"numret av "("Ekonomisk Debatt"|"Moderna "[Tt]ider|"Vår Bostad"|"Två Dagar"|"Svensk Golf"|"Svensk "[Jj]akt)
!A {printWMD(yytext,2);}

Define EnamexWrkWmd013a
     [ {Ekonomisk Debatt} | {Moderna } Tt {ider} | {Vår Bostad} | {Två Dagar}
       | {Svensk Golf} | {Svensk } Jj {akt} ] ;
Define EnamexWrkWmd013
     [ EnamexWrkWmd013a
       LC({numret av })
       EndTag(EnamexWrkWmd) ] ; 47

!R [^\n ]*"numret av "{U}[^\n ]+" "{U}[^\n ]+
!A {printWMD(yytext,2);}

Define EnamexWrkWmd014a [ Ins(CapWord2) { } CapWord2 ] ;
Define EnamexWrkWmd014
     [ EnamexWrkWmd014a
       LC({numret av })
       EndTag(EnamexWrkWmd) ] ; 48

!R ({U}[^\n ]+världen|Expressen|Sydsvenskan|Östgöta[^\n ]+|Dagens" "Nyheter|Aftonbladet)s" "nätupplaga
!A {printWMD(yytext,0);}

Define EnamexWrkWmd015a
     [ [CapWord2 {världen} | {Expressen} | {Sydsvenskan} | {Östgöta} Word
          | {Dagens Nyheter} | {Aftonbladet}]
       {s nätupplaga} ] ;
Define EnamexWrkWmd015 [ EnamexWrkWmd015a   EndTag(EnamexWrkWmd) ] ; 49

!R Källa" \: "({U}[^\n ]+" ")+[12][0-9][0-9][0-9]
!A {printWMD(yytext,2);}

Define EnamexWrkWmd016a [ [Ins(CapWord2) { }]+ Ins(YearNum) ] ;
Define EnamexWrkWmd016
     [ EnamexWrkWmd016a
       LC({Källa : })
       EndTag(EnamexWrkWmd) ] ; 50

!#  MOD (Jyrki Niemi): The following two rules modifying existing
!# 	   tags have been moved to filterBadTags-pm.
!# 	   CHECK: Does it affect the result?
!# 	   "Journal of the \<ENAMEX TYPE=\"ORG\" SBT=\"CRP\"\>"[^\n\<]+"\<\/ENAMEX\>"	{int i=15;	printf("<ENAMEX TYPE=\"WRK\" SBT=\"WMD\">Journal of the ");	for(;yytext[i]!='>';i++); i++; for(;i<yyleng; putchar(yytext[i++]));}
!# 	   "Journal of \<ENAMEX TYPE=\"ORG\" SBT=\"CRP\"\>"[^\n\<]+"\<\/ENAMEX\>"	{int i=11;	printf("<ENAMEX TYPE=\"WRK\" SBT=\"WMD\">Journal of the ");	for(;yytext[i]!='>';i++); i++; for(;i<yyleng; putchar(yytext[i++]));}
!# 	 
!#  NEWSPAPERS & MAGAZINES that should be some kind of ORG 
!#  <ENAMEX TYPE="WRK" SBT="WMO"></ENAMEX><MTH="PTR"/> 

!R "Modern Times"
!A {ECHO;}

Define Except002 [ {Modern Times} ] ; 51

!R [Tt]"he European Agency"
!A {ECHO;}

Define Except003 [ Tt {he European Agency} ] ; 52

!R [Tt]he" "(Starr|Mirror|Guardian|European|Economist|Observer|Sun|Lancet|Independent)
!A {printWMD(yytext,0);}

Define EnamexWrkWmd017a
     [ Tt {he }
       [{Starr} | {Mirror} | {Guardian} | {European} | {Economist}
          | {Observer} | {Sun} | {Lancet} | {Independent}] ] ;
Define EnamexWrkWmd017 [ EnamexWrkWmd017a   EndTag(EnamexWrkWmd) ] ; 53

!R {U}[^\n ]+" Daily News"
!A {printWMD(yytext,0);}

Define EnamexWrkWmd018a [ Ins(CapWord2) { Daily News} ] ;
Define EnamexWrkWmd018 [ EnamexWrkWmd018a   EndTag(EnamexWrkWmd) ] ; 54

!R "Din Del AB"
!A {ECHO;}

Define Except004 [ {Din Del AB} ] ; 55

!R (S|Syd)venska" Dagbladets "[^\n ]+(medalj|pris)
!A {ECHO;}

Define Except005
     [{S} | {Syd}] {venska Dagbladets } Word [{medalj} | {pris}] ; 56

!R ([Tt]he" ")?("Hollywood Reporter"|"China Daily"|"South China Morning Post"|"New Yorker"|"Sunday Independent"|"Sunday Telegraph"|"Weekly Mail"|"Sunday Business"|"Wall Street Journal"|"Evening News"|"London Evening Standard"|"Boston Globe"|"Washington Post"|"Vanity Fair"|"Sunday Mirror"|"NY Times Magazine"|"Time Magazine"|"New York Times"|"New York Post"|"Los Angeles Times"|"Los Angeles Post"|"Evening Standard")(\-kopian)?
!A {printWMD(yytext,0);}

Define EnamexWrkWmd019a
     [ (Tt {he })
       [{Hollywood Reporter} | {China Daily} | {South China Morning Post}
          | {New Yorker} | {Sunday Independent} | {Sunday Telegraph}
          | {Weekly Mail} | {Sunday Business} | {Wall Street Journal}
          | {Evening News} | {London Evening Standard} | {Boston Globe}
          | {Washington Post} | {Vanity Fair} | {Sunday Mirror}
          | {NY Times Magazine} | {Time Magazine} | {New York Times}
          | {New York Post} | {Los Angeles Times} | {Los Angeles Post}
          | {Evening Standard}]
       ({-kopian}) ] ;
Define EnamexWrkWmd019 [ EnamexWrkWmd019a   EndTag(EnamexWrkWmd) ] ; 57

!R "Gazet vam"(" "{U}[^\n ]*)+
!A {printWMD(yytext,0);}

Define EnamexWrkWmd020a [ {Gazet vam} [{ } CapWord]+ ] ;
Define EnamexWrkWmd020 [ EnamexWrkWmd020a   EndTag(EnamexWrkWmd) ] ; 58

!R ([Ll]" "[^\n ]*Equipe|"Malayala Manorama"|"Die Zeit"|"Frankfurter Allgemeine"|"al\-Sharq al\-Awsat"|"al\-Quds al\-Arabi"|"Göteborgs Morgonpost"|"Res Publica"|"La Repubblica"|"Damernas Värld"|"USA Today"|"El Pais"|"Der Spiegel"|"La Stampa"|"Le Figaro"|F[Ii][Bb]\-Aktuellt|"Ekstra Bladet"|"Ny Teknik"|"Nya Dagen"|"DN Debatt"|"DN Stockholm"|"Al Ahram"|Novaja" "[Gg]azeta|"Svenska Biet"|"Hänt Extra"|"Se \& Hör"|"Teknikens Värld"|"Din Del"|"Video Magazine"|"Tutto Sport"|"Danska Politiken"|"Sports "[Ii]llustrated|"Sport Illustrated"|"Le Soir"|"El Pa"[ií]s|"Computer Sweden"|"National Geographic")
!A {printWMD(yytext,0);}

Define EnamexWrkWmd021a
     [ Ll { } NS* {Equipe} | {Malayala Manorama} | {Die Zeit}
       | {Frankfurter Allgemeine} | {al-Sharq al-Awsat} | {al-Quds al-Arabi}
       | {Göteborgs Morgonpost} | {Res Publica} | {La Repubblica}
       | {Damernas Värld} | {USA Today} | {El Pais} | {Der Spiegel}
       | {La Stampa} | {Le Figaro} | {F} Ii Bb {-Aktuellt} | {Ekstra Bladet}
       | {Ny Teknik} | {Nya Dagen} | {DN Debatt} | {DN Stockholm} | {Al Ahram}
       | {Novaja } Gg {azeta} | {Svenska Biet} | {Hänt Extra} | {Se & Hör}
       | {Teknikens Värld} | {Din Del} | {Video Magazine} | {Tutto Sport}
       | {Danska Politiken} | {Sports } Ii {llustrated} | {Sport Illustrated}
       | {Le Soir} | {El Pa} ["i"|"í"] {s} | {Computer Sweden}
       | {National Geographic} ] ;
Define EnamexWrkWmd021 [ EnamexWrkWmd021a   EndTag(EnamexWrkWmd) ] ; 59

!R {U}[^\n ]+[es]" "[Ll]äns" "(Allehanda|[Tt]idning)
!A {printWMD(yytext,0);}

Define EnamexWrkWmd022a
     [ CapWord2 ["e"|"s"] { } Ll {äns } [{Allehanda} | Tt {idning}] ] ;
Define EnamexWrkWmd022 [ EnamexWrkWmd022a   EndTag(EnamexWrkWmd) ] ; 60

!R "Dagens "(Nyheter|[Ii]ndustri|N[äæ]ringsliv)
!A {printWMD(yytext,0);}

Define EnamexWrkWmd023a
     [ {Dagens } [{Nyheter} | Ii {ndustri} | {N} ["ä"|"æ"] {ringsliv}] ] ;
Define EnamexWrkWmd023 [ EnamexWrkWmd023a   EndTag(EnamexWrkWmd) ] ; 61

!R ("Göteborgs ")?Handel(s)?(\-)?" "(och|\&)" "[Ss]jöfarts(\-)?tidning(en)?
!A {printWMD(yytext,0);}

Define EnamexWrkWmd024a
     [ ({Göteborgs }) {Handel} ({s}) ({-}) { } [{och} | {&}] { } Ss {jöfarts}
       ({-}) {tidning} ({en}) ] ;
Define EnamexWrkWmd024 [ EnamexWrkWmd024a   EndTag(EnamexWrkWmd) ] ; 62

!R (Arboga|Avesta|{U}[^\n ]+" Nya")" Tidning"
!A {printWMD(yytext,0);}

Define EnamexWrkWmd025a
     [ [{Arboga} | {Avesta} | Ins(CapWord2) { Nya}] { Tidning} ] ;
Define EnamexWrkWmd025 [ EnamexWrkWmd025a   EndTag(EnamexWrkWmd) ] ; 63

!R ("Veckans Affärer"|"Swedish Press"|"Sverige Nytt")
!A {printWMD(yytext,0);}

Define EnamexWrkWmd026a
     [ {Veckans Affärer} | {Swedish Press} | {Sverige Nytt} ] ;
Define EnamexWrkWmd026 [ EnamexWrkWmd026a   EndTag(EnamexWrkWmd) ] ; 64

!R ([Tt]"he ")?"Daily "{U}[^\n ]+
!A {printWMD(yytext,0);}

Define EnamexWrkWmd027a [ (Tt {he }) {Daily } CapWord2 ] ;
Define EnamexWrkWmd027 [ EnamexWrkWmd027a   EndTag(EnamexWrkWmd) ] ; 65

!R Ber(linske|lingske|gens)" "Tiden(e|de)
!A {printWMD(yytext,0);}

Define EnamexWrkWmd028a
     [ {Ber} [{linske} | {lingske} | {gens}] { Tiden} [{e} | {de}] ] ;
Define EnamexWrkWmd028 [ EnamexWrkWmd028a   EndTag(EnamexWrkWmd) ] ; 66

!R (Sydsven|Sven|Skån|[Nn]or)ska" "[Dd]agbladet
!A {printWMD(yytext,0);}

Define EnamexWrkWmd029a
     [ [{Sydsven} | {Sven} | {Skån} | Nn {or}] {ska } Dd {agbladet} ] ;
Define EnamexWrkWmd029 [ EnamexWrkWmd029a   EndTag(EnamexWrkWmd) ] ; 67

!R ({U}[^\n ]*" ")+("Morning Herald"|"Times Herald"|"Herald Tribune"|Chronicle|Cronicle|Zeitung|Shimbun|Times|Allehanda|Dagblad|Dagbladet|Pravda|Tribune)
!A {printWMD(yytext,0);}

Define EnamexWrkWmd030a
     [Ins(CapWord) { }]+
     [{Morning Herald} | {Times Herald} | {Herald Tribune} | {Chronicle}
        | {Cronicle} | {Zeitung} | {Shimbun} | {Times} | {Allehanda}
        | {Dagblad} | {Dagbladet} | {Pravda} | {Tribune}] ;
Define EnamexWrkWmd030 [ EnamexWrkWmd030a   EndTag(EnamexWrkWmd) ] ; 68

!R [^\n ]*(idningen|språkiga|systerbladet)" "({U}[^\n ]*" ")+(Tribune|Times|Daily|Herald|[Nn]ews|gazeta)
!A {printWMD(yytext,1);}

Define EnamexWrkWmd031a
     [Ins(CapWord) { }]+
     [{Tribune} | {Times} | {Daily} | {Herald} | Nn {ews} | {gazeta}] ;
Define EnamexWrkWmd031
     [ EnamexWrkWmd031a
       LC([{idningen} | {språkiga} | {systerbladet}] { })
       EndTag(EnamexWrkWmd) ] ; 69

!R [^\n ]*idningen" "{U}[^\n ]+" "al\-[^\n ]+
!A {printWMD(yytext,1);}

Define EnamexWrkWmd032a [ Ins(CapWord2) { al-} Word ] ;
Define EnamexWrkWmd032
     [ EnamexWrkWmd032a
       LC({idningen })
       EndTag(EnamexWrkWmd) ] ; 70

!R (noterar|skriver)" Norra Västerbotten"
!A {printWMD(yytext,1);}

Define EnamexWrkWmd033a [ {Norra Västerbotten} ] ;
Define EnamexWrkWmd033
     [ EnamexWrkWmd033a
       LC([{noterar} | {skriver}] { })
       EndTag(EnamexWrkWmd) ] ; 71

!R [^\n ]*"intervju i Veckans "[Aa]ffärer
!A {printWMD(yytext,2);}

Define EnamexWrkWmd034a [ {Veckans } Aa {ffärer} ] ;
Define EnamexWrkWmd034
     [ EnamexWrkWmd034a
       LC({intervju i })
       EndTag(EnamexWrkWmd) ] ; 72

!R [^\n ]*"idningen "(Veckans|Ny|Dagens|Svensk|Le)" "[^\n ]+(" "{U}[^\n ]*)*
!A {printWMD(yytext,1);}

Define EnamexWrkWmd035a
     [ [{Veckans} | {Ny} | {Dagens} | {Svensk} | {Le}] { } Word [{ } CapWord]* ] ;
Define EnamexWrkWmd035
     [ EnamexWrkWmd035a
       LC({idningen })
       EndTag(EnamexWrkWmd) ] ; 73

!#  <ENAMEX TYPE="WRK" SBT="WAO"></ENAMEX><MTH="PTR"/> 

!R (bilden|Picassos|Vincis)" "{CITAT}(" "[^\n\"\'\´]+)+" "{CITAT}
!A {printWAO(yytext,1);}

Define EnamexWrkWao001a [ CITAT [{ } NoQuote+]+ { } CITAT ] ;
Define EnamexWrkWao001
     [ EnamexWrkWao001a
       LC([{bilden} | {Picassos} | {Vincis}] { })
       EndTag(EnamexWrkWao) ] ; 74

!R "Monumentet för Tredje "{U}[^\n ]+
!A {printWAO(yytext,0);}

Define EnamexWrkWao002a [ {Monumentet för Tredje } CapWord2 ] ;
Define EnamexWrkWao002 [ EnamexWrkWao002a   EndTag(EnamexWrkWao) ] ; 75

!R "Monumentet över "[^\n ]+ens" "[^\n ]+
!A {printWAO(yytext,0);}

Define EnamexWrkWao003a [ {Monumentet över } Word {ens } Word ] ;
Define EnamexWrkWao003 [ EnamexWrkWao003a   EndTag(EnamexWrkWao) ] ; 76

!R "Monumentet över"(" "{U}[^\n ]+)+
!A {printWAO(yytext,0);}

Define EnamexWrkWao004a [ {Monumentet över} [{ } CapWord2]+ ] ;
Define EnamexWrkWao004 [ EnamexWrkWao004a   EndTag(EnamexWrkWao) ] ; 77

!R [^\n ]*onumentet(" "{U}[^\n ]+)+" of "[^\n ]+
!A {printWAO(yytext,1);}

Define EnamexWrkWao005a [ CapWord2 [{ } CapWord2]* { of } Word ] ;
Define EnamexWrkWao005
     [ EnamexWrkWao005a
       LC({onumentet })
       EndTag(EnamexWrkWao) ] ; 78

!R "en "{U}[^\n ]+" "{U}[^\n ]+\-(teckning|målning)
!A {printWAO(yytext,1);}

Define EnamexWrkWao006a
     [ Ins(CapWord2) { } CapWord2 {-} [{teckning} | {målning}] ] ;
Define EnamexWrkWao006
     [ EnamexWrkWao006a
       LC({en })
       EndTag(EnamexWrkWao) ] ; 79

!R "\" Mona Lisa \""
!A {printWAO(yytext,0);}

Define EnamexWrkWao007a [ "\"" { Mona Lisa } "\"" ] ;
Define EnamexWrkWao007 [ EnamexWrkWao007a   EndTag(EnamexWrkWao) ] ; 80

!R (Cranach|Rembrandt|Borsdone|Zorn)s(" "{U}[^\n ]+)+
!A {printWAO(yytext,1);}

Define EnamexWrkWao008a [ CapWord2 [{ } CapWord2]* ] ;
Define EnamexWrkWao008
     [ EnamexWrkWao008a
       LC([{Cranach} | {Rembrandt} | {Borsdone} | {Zorn}] {s })
       EndTag(EnamexWrkWao) ] ; 81

!R {U}[^\n ]+(tavla|monumentet)
!A {printWAO(yytext,0);}

Define EnamexWrkWao009a [ CapWord2 [{tavla} | {monumentet}] ] ;
Define EnamexWrkWao009 [ EnamexWrkWao009a   EndTag(EnamexWrkWao) ] ; 82

!R (bredvid|framför|höga)" "Poseidon
!A {printWAO(yytext,1);}

Define EnamexWrkWao010a [ {Poseidon} ] ;
Define EnamexWrkWao010
     [ EnamexWrkWao010a
       LC([{bredvid} | {framför} | {höga}] { })
       EndTag(EnamexWrkWao) ] ; 83

!# ***************************
!#  *** KEYWORD " TITLE " *** 
!# ***************************
!#  <ENAMEX TYPE="WRK" SBT="???"></ENAMEX><MTH="PTR"/> 

!R "trollkarlen Harry Potter"
!A {ECHO;}

Define Except006 [ {trollkarlen Harry Potter} ] ; 84

!R ("Törnrosens "[Bb]ok|"Sunes jul"|"Sunes sommar"|"Thelma och Louise"|"Les Mis"[eé]rables|[Kk]ejsar[a-z]+" av "Portugallien|"Karius och Baktus"|"Lotta på Bråkmakargatan"|"The Matrix"|[Rr]övare" i Kamomilla stad"|"Klas Klättermus"|Tribadernas" "[Nn]att|"A Chorus Line"|"Solveigs sång"|"Jeppe på Berget"|"Den "[Ll]illa" "[Ss]jöjungfrun|"Little "[Mm]an" "[Tt]ate|"Mio min Mio"|"Little Shop of Horrors"|"Bröderna Lejonhjärta"|"Ave Verum Corpus"|"The road to El Dorado"|"Vägen till El Dorado"|"Vem är rädd för Virginia Wolf"|"Den store Gatsby"|"Big Lebowski"|"Nils Holgerssons underbara resa"|"Jesus Christ "[Ss]uperstar|"Kristus stannade i Eboli"|"Trollkarlen från Oz"|"Alice i "[Uu]nderlandet|"Brott och "[Ss]traff|"Fanny och Alexander"|"Döden i Venedig"|"Harry Potter and the "[^\n ]+|"Pettson \& Findus"|"Mamma Mia"|"Almqvists Skrifter"|"Rönja Rövardotter"|"Karl-Bertil Jonssons julafton"|"West "[Ss]ide" "[Ss]tory|"Carmina Burana"|"Tusen och en natt"|"Jorden runt på 80 dagar"|"La Traviata"|[Tt]"he House of E"[l]+iott|"Ringaren i N"[oô]"tre Dame"|"Araminta May"|"Harry Potter och fången från Azkaban"|"Harry Potter"|"Kristina från Duvemåla"|Vargens" "Dotter|"Barberaren i Sevilla"|"Fantomen på Operan"|"Phantom "[Oo]f" "[Tt]he" Opera"|"God "[Ss]ave" "[Tt]he" Queen"|"En "[Mm]idsommarnattsdröm|"Sound of Music"|"Figaros "[Bb]röllop|"Madam Butterfly"|"Tristan och Isolde"|"My "[Ff]air" "[Ll]ady)(\-boken)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa003a
     [ [{Törnrosens } Bb {ok} | {Sunes jul} | {Sunes sommar}
          | {Thelma och Louise} | {Les Mis} ["e"|"é"] {rables}
          | Kk {ejsar} Ins(LowerWord) { av Portugallien} | {Karius och Baktus}
          | {Lotta på Bråkmakargatan} | {The Matrix}
          | Rr {övare i Kamomilla stad} | {Klas Klättermus}
          | {Tribadernas } Nn {att} | {A Chorus Line} | {Solveigs sång}
          | {Jeppe på Berget} | {Den } Ll {illa } Ss {jöjungfrun}
          | {Little } Mm {an } Tt {ate} | {Mio min Mio}
          | {Little Shop of Horrors} | {Bröderna Lejonhjärta}
          | {Ave Verum Corpus} | {The road to El Dorado}
          | {Vägen till El Dorado} | {Vem är rädd för Virginia Wolf}
          | {Den store Gatsby} | {Big Lebowski}
          | {Nils Holgerssons underbara resa} | {Jesus Christ } Ss {uperstar}
          | {Kristus stannade i Eboli} | {Trollkarlen från Oz}
          | {Alice i } Uu {nderlandet} | {Brott och } Ss {traff}
          | {Fanny och Alexander} | {Döden i Venedig}
          | {Harry Potter and the } Word | {Pettson & Findus} | {Mamma Mia}
          | {Almqvists Skrifter} | {Rönja Rövardotter}
          | {Karl-Bertil Jonssons julafton} | {West } Ss {ide } Ss {tory}
          | {Carmina Burana} | {Tusen och en natt} | {Jorden runt på 80 dagar}
          | {La Traviata} | Tt {he House of E} {l}+ {iott}
          | {Ringaren i N} ["o"|"ô"] {tre Dame} | {Araminta May}
          | {Harry Potter och fången från Azkaban} | {Harry Potter}
          | {Kristina från Duvemåla} | {Vargens Dotter} | {Barberaren i Sevilla}
          | {Fantomen på Operan} | {Phantom } Oo {f } Tt {he Opera}
          | {God } Ss {ave } Tt {he Queen} | {En } Mm {idsommarnattsdröm}
          | {Sound of Music} | {Figaros } Bb {röllop} | {Madam Butterfly}
          | {Tristan och Isolde} | {My } Ff {air } Ll {ady}]
       ({-boken}) ] ;
Define EnamexWrkWaa003 [ EnamexWrkWaa003a   EndTag(EnamexWrkWaa) ] ; 85

!R "Sagan om "([Kk]onungens" "[Åå]terkomst|[Rr]ingen|"de två "[Tt]ornen)(\-film[a-z]*)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa004a
     [ {Sagan om }
       [Kk {onungens } ["Å"|"å"] {terkomst} | Rr {ingen}
          | {de två } Tt {ornen}]
       ({-film} Az*) ] ;
Define EnamexWrkWaa004 [ EnamexWrkWaa004a   EndTag(EnamexWrkWaa) ] ; 86

!R "Johannes uppenbarelse "[0-9]+" kapit"(el|let)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa005a
     [ {Johannes uppenbarelse } Ins(Nums) { kapit} [{el} | {let}] ] ;
Define EnamexWrkWaa005 [ EnamexWrkWaa005a   EndTag(EnamexWrkWaa) ] ; 87

!R {U}[^\n ]+s" "[Ss]amlade" "([Ss]krifter|[Vv]erk)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa006a
     [ Ins(CapWord2s) { } Ss {amlade } [Ss {krifter} | Vv {erk}] ] ;
Define EnamexWrkWaa006 [ EnamexWrkWaa006a   EndTag(EnamexWrkWaa) ] ; 88

!R SAMLADE" "VERK" "[1-9][0-9]?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa007a [ {SAMLADE VERK } Num19x ] ;
Define EnamexWrkWaa007 [ EnamexWrkWaa007a   EndTag(EnamexWrkWaa) ] ; 89

!R [^\n ]*utgåvan" av "{CITAT}(" "[^\n\"\'\´]+)+" "{CITAT}
!A {printWRK(yytext,2);}

Define EnamexWrkWaa008a [ CITAT [{ } NoQuote+]+ { } CITAT ] ;
Define EnamexWrkWaa008
     [ EnamexWrkWaa008a
       LC({utgåvan av })
       EndTag(EnamexWrkWaa) ] ; 90

!R [^\n ]*tgåvan" av"(" "{U}[^\n ]+)+" Outlook"
!A {printWRK(yytext,2);}

Define EnamexWrkWaa009a [ CapWord2 [{ } CapWord2]* { Outlook} ] ;
Define EnamexWrkWaa009
     [ EnamexWrkWaa009a
       LC({tgåvan av })
       EndTag(EnamexWrkWaa) ] ; 91

!R (Höga|Havets|Narrens|Idas)" "visa(n)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa010a
     [ [{Höga} | {Havets} | {Narrens} | {Idas}] { visa} ({n}) ] ;
Define EnamexWrkWaa010 [ EnamexWrkWaa010a   EndTag(EnamexWrkWaa) ] ; 92

!R [^\n ]*(författaren|författare|regissör|texten)" till "(Det|En|Det|Bortom|Mitt|På|The|Ungt)" "[^\n ]+(" "{U}[^\n ]*)*
!A {printWRK(yytext,2);}

Define EnamexWrkWaa011a
     [ [{Det} | {En} | {Bortom} | {Mitt} | {På} | {The} | {Ungt}] { } Word
       [{ } CapWord]* ] ;
Define EnamexWrkWaa011
     [ EnamexWrkWaa011a
       LC([{författaren} | {författare} | {regissör} | {texten}] { till })
       EndTag(EnamexWrkWaa) ] ; 93

!R [^\n ]*(författaren|regissör|manus|omslaget|förordet|vertyren|texten)" till "{U}[^\n ]*(sk|ig|ska|rys)" "[a-zåäö]+
!A {printWRK(yytext,2);}

Define EnamexWrkWaa012a
     [ CapWord [{sk} | {ig} | {ska} | {rys}] { } LowerWord ] ;
Define EnamexWrkWaa012
     [ EnamexWrkWaa012a
       LC([{författaren} | {regissör} | {manus} | {omslaget} | {förordet}
             | {vertyren} | {texten}]
          { till })
       EndTag(EnamexWrkWaa) ] ; 94

!#  Famous Authors (mostly) with citat following 

!R [A-Z](oppola|arantino|röding|wijk|essén|augh|ellini|ntonioni|ubrick|ngvar|izet|onchielli|onnevi|oretti|orngold|ullberg|ilburn|eierstad|hemiri|cDonell|ennon|ammerth|ohnson|incher|agerman|dorno|linge|öderberg|ihlgård|öblin|osephson|tephenson|ikkola|ondheim|ervante|ollin|iskylo|lmqvist|ach\´|eethoven|ergman|rahm|recht|lake|ellman|hristie|haplin|lackwell|ante|icken|ahlbergh|kman|ckehart|uillou|uripide|oethe|ändel|kelöf|emingway|aydn|itchcock|jertén|onesco|bsen|afka|arlfeldt|agerlöf|indgren|olière|oliere|idholm|ergiliu|inné|undell|vidiu|aufman|ozart|orén|artinson|aupassant|ietzsche|rwell|uccini|laton|lato|ornby|ossini|ussel|ankell|chubert|hakespeare|artre|aube|egnér|oberg|olstoj|horvall|roust|llman|isconti|ender|agner|illiam|onteverdi|onizetti|arner|ilder|arhol|ebber|indström|kelund|alvatore|oodwin|ushdie|afaelson|aylor|rokofjev|almkvist|rokofiev|üller|agerkvist|undmark|oddwin|llmann|ridell|eckett|yrdal|hristensen|chiller|offmann|ådström|andström|ihlgård|reenaway|öthe|o\-Johansson|ästner|corsese|yllensten|orneli|orneille|ardell|arrison|tolpe|uma)"s "{CITAT}(" "[^\n\#\"\'\´«]+)+" "{CITAT}
!A {printWRK(yytext,1);}

Define EnamexWrkWaa013a [ CITAT [{ } NoQuoteHash+]+ { } CITAT ] ;
Define EnamexWrkWaa013
     [ EnamexWrkWaa013a
       LC(AZ
          [{oppola} | {arantino} | {röding} | {wijk} | {essén} | {augh}
             | {ellini} | {ntonioni} | {ubrick} | {ngvar} | {izet}
             | {onchielli} | {onnevi} | {oretti} | {orngold} | {ullberg}
             | {ilburn} | {eierstad} | {hemiri} | {cDonell} | {ennon}
             | {ammerth} | {ohnson} | {incher} | {agerman} | {dorno} | {linge}
             | {öderberg} | {ihlgård} | {öblin} | {osephson} | {tephenson}
             | {ikkola} | {ondheim} | {ervante} | {ollin} | {iskylo}
             | {lmqvist} | {ach´} | {eethoven} | {ergman} | {rahm} | {recht}
             | {lake} | {ellman} | {hristie} | {haplin} | {lackwell} | {ante}
             | {icken} | {ahlbergh} | {kman} | {ckehart} | {uillou}
             | {uripide} | {oethe} | {ändel} | {kelöf} | {emingway} | {aydn}
             | {itchcock} | {jertén} | {onesco} | {bsen} | {afka} | {arlfeldt}
             | {agerlöf} | {indgren} | {olière} | {oliere} | {idholm}
             | {ergiliu} | {inné} | {undell} | {vidiu} | {aufman} | {ozart}
             | {orén} | {artinson} | {aupassant} | {ietzsche} | {rwell}
             | {uccini} | {laton} | {lato} | {ornby} | {ossini} | {ussel}
             | {ankell} | {chubert} | {hakespeare} | {artre} | {aube}
             | {egnér} | {oberg} | {olstoj} | {horvall} | {roust} | {llman}
             | {isconti} | {ender} | {agner} | {illiam} | {onteverdi}
             | {onizetti} | {arner} | {ilder} | {arhol} | {ebber} | {indström}
             | {kelund} | {alvatore} | {oodwin} | {ushdie} | {afaelson}
             | {aylor} | {rokofjev} | {almkvist} | {rokofiev} | {üller}
             | {agerkvist} | {undmark} | {oddwin} | {llmann} | {ridell}
             | {eckett} | {yrdal} | {hristensen} | {chiller} | {offmann}
             | {ådström} | {andström} | {reenaway} | {öthe} | {o-Johansson}
             | {ästner} | {corsese} | {yllensten} | {orneli} | {orneille}
             | {ardell} | {arrison} | {tolpe} | {uma}]
          {s })
       EndTag(EnamexWrkWaa) ] ; 95

!R (A[Bb][Bb][Aa]|Lyon|Levi|Ryan|Elliot|Dove|Lang|Auster|Berg|Lorca|Joyce|Holm|Handke|Ek|Gogh|Munch|Grime|Hugo|Krau|Landi|Gay|Lee|Eliot|Ramel|Mann|Pope|Ravel|Leone|Trier|Sontag|Verdi|Troell|Popper|Conrad|Verne|Gras|Woolf|Welsh|Wajda|Zorn|Norén|Davi|Joyce|Tjäder|Bach\')"s "{CITAT}(" "[^\n\"\'\´]+)+" "{CITAT}
!A {printWRK(yytext,1);}

Define EnamexWrkWaa014a [ CITAT [{ } NoQuote+]+ { } CITAT ] ;
Define EnamexWrkWaa014
     [ EnamexWrkWaa014a
       LC([{A} Bb Bb Aa | {Lyon} | {Levi} | {Ryan} | {Elliot} | {Dove}
             | {Lang} | {Auster} | {Berg} | {Lorca} | {Joyce} | {Holm}
             | {Handke} | {Ek} | {Gogh} | {Munch} | {Grime} | {Hugo} | {Krau}
             | {Landi} | {Gay} | {Lee} | {Eliot} | {Ramel} | {Mann} | {Pope}
             | {Ravel} | {Leone} | {Trier} | {Sontag} | {Verdi} | {Troell}
             | {Popper} | {Conrad} | {Verne} | {Gras} | {Woolf} | {Welsh}
             | {Wajda} | {Zorn} | {Norén} | {Davi} | {Tjäder} | {Bach'}]
          {s })
       EndTag(EnamexWrkWaa) ] ; 96

!R {U}[^\n ]+(anov|berg|wski|skij|skiöld|nski|wijk|lkov|vski|chov)"s "{CITAT}(" "[^\n\"\'\´«]+)+" "{CITAT}
!A {printWRK(yytext,1);}

Define EnamexWrkWaa015a [ CITAT [{ } NoQuote+]+ { } CITAT ] ;
Define EnamexWrkWaa015
     [ EnamexWrkWaa015a
       LC(CapWord2
          [{anov} | {berg} | {wski} | {skij} | {skiöld} | {nski} | {wijk}
             | {lkov} | {vski} | {chov}]
          {s })
       EndTag(EnamexWrkWaa) ] ; 97

!# ***********************************
!#  *** KEYWORD KEYWORD " TITLE " *** 
!# ***********************************
!#  <ENAMEX TYPE="WRK" SBT="???"></ENAMEX><MTH="PTR"/> 
!# ***************************
!#  *** " TITLE " KEYWORD *** 
!# ***************************
!#  <ENAMEX TYPE="WRK" SBT="???"></ENAMEX><MTH="PTR"/> 
!# *******************************
!#  *** KEYWORD , {T}ITLE ,|. *** 
!# *******************************
!# X+ the 
!#  almost sure mult-patterns moved moved the WrkPat.ll 

!R [^\n ]*(stor|mastodont|nombrotts|konst|rkester|amlings|pslags|[Dd]ikt|[Kk]onst|[Mm]äster|[Rr]oman|ngdoms|bands)verk(et)?" "(All|De|En|På|Den|Det|Ett|I|Till|{U}[^\n ]+ges|[^\n ]+ns|[^\n ]+ets|[^\n ]+ska)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa016a
     [ [{All} | {De} | {En} | {På} | {Den} | {Det} | {Ett} | {I} | {Till}
          | CapWord2 {ges} | Word {ns} | Word {ets} | Word {ska}]
       { } Word [{ } CapWord2]* ] ;
Define EnamexWrkWaa016
     [ EnamexWrkWaa016a
       LC([{stor} | {mastodont} | {nombrotts} | {konst} | {rkester}
             | {amlings} | {pslags} | Dd {ikt} | Kk {onst} | Mm {äster}
             | Rr {oman} | {ngdoms} | {bands}]
          {verk} ({et}) { })
       EndTag(EnamexWrkWaa) ] ; 98

!R [^\n ]*(stor|mastodont|nombrotts|konst|rkester|amlings|pslags|[Dd]ikt|[Kk]onst|[Mm]äster|[Rr]oman|ngdoms|bands)verk(et)?" "[^\n ]+" of "[^\n ]+
!A {printWRK(yytext,1);}

Define EnamexWrkWaa017a [ Ins(Word) { of } Word ] ;
Define EnamexWrkWaa017
     [ EnamexWrkWaa017a
       LC([{stor} | {mastodont} | {nombrotts} | {konst} | {rkester}
             | {amlings} | {pslags} | Dd {ikt} | Kk {onst} | Mm {äster}
             | Rr {oman} | {ngdoms} | {bands}]
          {verk} ({et}) { })
       EndTag(EnamexWrkWaa) ] ; 99

!R [^\n ]*([Dd]ebut|[Ll]yrik|ntologi|psats|forism|ovell|ssä|[Dd]ikt|erättelse|okument)samling(en)?" "(I|De|En|På|Den|Det|Ett|The|{U}[^\n ]+ges|[^\n ]+ens|[^\n ]+ets|[^\n ]+ska)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa018a
     [ [{I} | {De} | {En} | {På} | {Den} | {Det} | {Ett} | {The}
          | CapWord2 {ges} | Word {ens} | Word {ets} | Word {ska}]
       { } Word [{ } CapWord2]* ] ;
Define EnamexWrkWaa018
     [ EnamexWrkWaa018a
       LC([Dd {ebut} | Ll {yrik} | {ntologi} | {psats} | {forism}
             | {ovell} | {ssä} | Dd {ikt} | {erättelse} | {okument}]
          {samling} ({en}) { })
       EndTag(EnamexWrkWaa) ] ; 100

!R [^\n ]*([Dd]ebut|[Ll]yrik|ntologi|psats|forism|ovell|[Ee]ssä|[Dd]ikt|erättelse|okument)samling(en)?" "{U}[a-zåäö]?[a-zåäö]?[a-zåäö]?[a-zåäö]?" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa019a
     [ Upper (Lower) (Lower) (Lower) (Lower) { } Word [{ } CapWord2]* ] ;
Define EnamexWrkWaa019
     [ EnamexWrkWaa019a
       LC([Dd {ebut} | Ll {yrik} | {ntologi} | {psats} | {forism}
             | {ovell} | Ee {ssä} | Dd {ikt} | {erättelse} | {okument}]
          {samling} ({en}) { })
       EndTag(EnamexWrkWaa) ] ; 101

!R [^\n ]*[Dd]ramat" "({U}[^\n ]+" ")+(for|and|of|"of the"|"for the"|a)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa020a
     [ [Ins(CapWord2) { }]+ [{for} | {and} | {of} | {of the} | {for the} | {a}] { }
       Word [{ } CapWord2]* ] ;
Define EnamexWrkWaa020
     [ EnamexWrkWaa020a
       LC(Dd {ramat })
       EndTag(EnamexWrkWaa) ] ; 102

!R [^\n ]+(ri|rio|to|ra)login" "(Modern|Mellan|Att|The|Det|Den|Ett)" "[^\n ]+(" "{U}[^\n ]*)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa021a
     [ [{Modern} | {Mellan} | {Att} | {The} | {Det} | {Den} | {Ett}] { } Word
       [{ } CapWord]* ] ;
Define EnamexWrkWaa021
     [ EnamexWrkWaa021a
       LC(Word [{ri} | {rio} | {to} | {ra}] {login })
       EndTag(EnamexWrkWaa) ] ; 103

!R [^\n ]*([Kk]apitlet|klassikern)" "(Det|The|{U}[^\n ]+" "over|Min|{U}[^\n ]+ska|{U}[^\n ]+ets|{U}[^\n ]+" of "the|If|{U}[^\n ]+" "of|En|Ett|All)" "[^\n ]+(" "{U}[^\n ]*)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa022a
     [ [{Det} | {The} | Ins(CapWord2) { over} | {Min} | CapWord2 {ska}
          | CapWord2 {ets} | Ins(CapWord2) { of the} | {If} | Ins(CapWord2) { of} | {En}
          | {Ett} | {All}]
       { } Word [{ } CapWord]* ] ;
Define EnamexWrkWaa022
     [ EnamexWrkWaa022a
       LC([Kk {apitlet} | {klassikern}] { })
       EndTag(EnamexWrkWaa) ] ; 104

!R [^\n ]*([Rr]oman|[Nn]ovell|[Aa]vhandling)(en)?(" "{U}[^\n ]*)+(" of an"|" efter"|" of"|" of the")" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa023a
     [ CapWord [{ } CapWord]* [{ of an} | { efter} | { of} | { of the}] { }
       Word [{ } CapWord2]* ] ;
Define EnamexWrkWaa023
     [ EnamexWrkWaa023a
       LC([Rr {oman} | Nn {ovell} | Aa {vhandling}] ({en}) { })
       EndTag(EnamexWrkWaa) ] ; 105

!#  WRITTEN MATERIAL that should NOT be ORGS 

!R ({U}[^\n ]+" och ")?{U}[^\n ]+" epistlar"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa024a [ (Ins(CapWord2) { och }) Ins(CapWord2) { epistlar} ] ;
Define EnamexWrkWaa024 [ EnamexWrkWaa024a   EndTag(EnamexWrkWaa) ] ; 106

!R "Allt "[Oo]m" "(Jakt|Trädgård|Stockholm)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa025a
     [ {Allt } Oo {m } [{Jakt} | {Trädgård} | {Stockholm}] ] ;
Define EnamexWrkWaa025 [ EnamexWrkWaa025a   EndTag(EnamexWrkWaa) ] ; 107

!R (FoF|"Guinness Book of Records"|"Nouvelle Revue"|{U}[^\n ]+"s Desk Reference"|"Svensk Tidskrift"|"News \& World Report"|Star" "[Tt]rek\-[a-z]*boken)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa026a
     [ {FoF} | {Guinness Book of Records} | {Nouvelle Revue}
       | Ins(CapWord2s) { Desk Reference} | {Svensk Tidskrift}
       | {News & World Report} | {Star } Tt {rek-} Az* {boken} ] ;
Define EnamexWrkWaa026 [ EnamexWrkWaa026a   EndTag(EnamexWrkWaa) ] ; 108

!R ({U}[^\n ]+" ")+(Shopping|Development|Competitiveness|Investment|Policy|Disasters)" Report"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa027a
     [ [Ins(CapWord2) { }]+
       [{Shopping} | {Development} | {Competitiveness} | {Investment}
          | {Policy} | {Disasters}]
       { Report} ] ;
Define EnamexWrkWaa027 [ EnamexWrkWaa027a   EndTag(EnamexWrkWaa) ] ; 109

!R [Tt]he" "{U}+" "[0-9]+" Report"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa028a [ Tt {he } Ins(UpperWord) { } Ins(Nums) { Report} ] ;
Define EnamexWrkWaa028 [ EnamexWrkWaa028a   EndTag(EnamexWrkWaa) ] ; 110

!R ([Vv]ecko|[Nn]yhets|[Rr]ese|[Ss]port)magasinet(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa029a
     [ [Vv {ecko} | Nn {yhets} | Rr {ese} | Ss {port}] {magasinet}
       [{ } CapWord2]+ ] ;
Define EnamexWrkWaa029 [ EnamexWrkWaa029a   EndTag(EnamexWrkWaa) ] ; 111

!R {U}[^\n ]+(borg|land)sguiden
!A {printWRK(yytext,0);}

Define EnamexWrkWaa030a [ CapWord2 [{borg} | {land}] {sguiden} ] ;
Define EnamexWrkWaa030 [ EnamexWrkWaa030a   EndTag(EnamexWrkWaa) ] ; 112

!R [^\n ]*(bankens|Temos|Skops|Sifos|dustrins|Gallups|USA|mäteriets|förenings)" "[^\n ]*barometer
!A {printWRK(yytext,0);}

Define EnamexWrkWaa031a
     [ NS*
       [{bankens} | {Temos} | {Skops} | {Sifos} | {dustrins} | {Gallups}
          | {USA} | {mäteriets} | {förenings}]
       { } NS* {barometer} ] ;
Define EnamexWrkWaa031 [ EnamexWrkWaa031a   EndTag(EnamexWrkWaa) ] ; 113

!R "Nationella kvalitetsregistret för "[^\n ]+(vård|kirurgi)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa032a
     [ {Nationella kvalitetsregistret för } Word [{vård} | {kirurgi}] ] ;
Define EnamexWrkWaa032 [ EnamexWrkWaa032a   EndTag(EnamexWrkWaa) ] ; 114

!R (Säpos|Lloyds|Autodatas|SECC|WHOs|"Svenska Coronar Angiografi och Angioplastik")" "[Rr]egist(er|ret)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa033a
     [{Säpos} | {Lloyds} | {Autodatas} | {SECC} | {WHOs}
        | {Svenska Coronar Angiografi och Angioplastik}]
     { } Rr {egist} [{er} | {ret}] ;
Define EnamexWrkWaa033 [ EnamexWrkWaa033a   EndTag(EnamexWrkWaa) ] ; 115

!R (SWEDIS|Nordiskt|Svenskt|WHOs|[Nn]ationell|[Nn]ationella|Svenska|Danska|Vägverkets|[Ss]venska" "Medicinska)" "[^\n ]+regist(er|ret)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa034a
     [{SWEDIS} | {Nordiskt} | {Svenskt} | {WHOs} | Nn {ationell}
        | Nn {ationella} | {Svenska} | {Danska} | {Vägverkets}
        | Ss {venska Medicinska}]
     { } Word {regist} [{er} | {ret}] ;
Define EnamexWrkWaa034 [ EnamexWrkWaa034a   EndTag(EnamexWrkWaa) ] ; 116

!R (Socialstyrelsens|Nordiska|[Nn]ationella|[Ss]venska|Regionala|Reumatoid)" "[^\n ]+registret
!A {printWRK(yytext,0);}

Define EnamexWrkWaa035a
     [ [{Socialstyrelsens} | {Nordiska} | Nn {ationella} | Ss {venska}
          | {Regionala} | {Reumatoid}]
       { } Word {registret} ] ;
Define EnamexWrkWaa035 [ EnamexWrkWaa035a   EndTag(EnamexWrkWaa) ] ; 117

!R {U}+\:s" "[^\n ]+" "[^\n ]+databas
!A {printWRK(yytext,0);}

Define EnamexWrkWaa036a [ UpperWord {:s } Ins(Word) { } Word {databas} ] ;
Define EnamexWrkWaa036 [ EnamexWrkWaa036a   EndTag(EnamexWrkWaa) ] ; 118

!R [A-Z\:]+s" "[^\n ]*(register|databas)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa037a
     [Whitespace|"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"|":"]+
     {s} NS* [{register} | {databas}] ;
Define EnamexWrkWaa037 [ EnamexWrkWaa037a   EndTag(EnamexWrkWaa) ] ; 119

!R "National "[^\n ]+" "[^\n ]+" Registry of "[^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa038a
     [ {National } Ins(Word) { } Ins(Word) { Registry of } Word ] ;
Define EnamexWrkWaa038 [ EnamexWrkWaa038a   EndTag(EnamexWrkWaa) ] ; 120

!R (Läkemedelsverkets|Socialstyrelsens)" "[^\n ]*register
!A {printWRK(yytext,0);}

Define EnamexWrkWaa039a
     [ [{Läkemedelsverkets} | {Socialstyrelsens}] { } NS* {register} ] ;
Define EnamexWrkWaa039 [ EnamexWrkWaa039a   EndTag(EnamexWrkWaa) ] ; 121

!R (SAOL|Psalt)" "[XI0-9\:]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa040a [ [{SAOL} | {Psalt}] { } [Num|"X"|"I"|":"]+ ] ;
Define EnamexWrkWaa040 [ EnamexWrkWaa040a   EndTag(EnamexWrkWaa) ] ; 122

!R "Svenska "[Aa]kadem[a-z]+" "[Oo]rd(bok|lista)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa041a
     [ {Svenska } Aa {kadem} Ins(LowerWord) { } Oo {rd} [{bok} | {lista}] ] ;
Define EnamexWrkWaa041 [ EnamexWrkWaa041a   EndTag(EnamexWrkWaa) ] ; 123

!R [Ss]ocialstyrelsens" rapport om "[^\n ]+" i "[A-Z][^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa042a
     [ Ss {ocialstyrelsens rapport om } Ins(Word) { i } AZ Word ] ;
Define EnamexWrkWaa042 [ EnamexWrkWaa042a   EndTag(EnamexWrkWaa) ] ; 124

!R "Virchows Archiv für Patologische Anatomie und Physiologie"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa043a
     [ {Virchows Archiv für Patologische Anatomie und Physiologie} ] ;
Define EnamexWrkWaa043 [ EnamexWrkWaa043a   EndTag(EnamexWrkWaa) ] ; 125

!R "Unescos "[^\n ]+slista
!A {printWRK(yytext,0);}

Define EnamexWrkWaa044a [ {Unescos } Word {slista} ] ;
Define EnamexWrkWaa044 [ EnamexWrkWaa044a   EndTag(EnamexWrkWaa) ] ; 126

!R "Internationella "{U}+\:s" "[Cc]harta
!A {printWRK(yytext,0);}

Define EnamexWrkWaa045a [ {Internationella } UpperWord {:s } Cc {harta} ] ;
Define EnamexWrkWaa045 [ EnamexWrkWaa045a   EndTag(EnamexWrkWaa) ] ; 127

!R {U}[^\n ]+" Korint"h?iebrevet
!A {printWRK(yytext,0);}

Define EnamexWrkWaa046a [ Ins(CapWord2) { Korint} ({h}) {iebrevet} ] ;
Define EnamexWrkWaa046 [ EnamexWrkWaa046a   EndTag(EnamexWrkWaa) ] ; 128

!R ("Första "|"Andra ")?{U}[^\n ]+breve(t|n)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa047a
     [ ({Första } | {Andra }) CapWord2 {breve} [{t} | {n}] ] ;
Define EnamexWrkWaa047 [ EnamexWrkWaa047a   EndTag(EnamexWrkWaa) ] ; 129

!R [1-9]"\:e "{U}[^\n ]+bok
!A {/*2:a Mose*/printWRK(yytext,0);}

!# 2:a Mose

Define EnamexWrkWaa048a [ Num19 {:e } CapWord2 {bok} ] ;
Define EnamexWrkWaa048 [ EnamexWrkWaa048a   EndTag(EnamexWrkWaa) ] ; 130

!R ([Hh]and|[Oo]rd)bok" "(för|över)" "([^\n ]+|[Ss]venska" "[^\n ]+)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa049a
     [Hh {and} | Oo {rd}] {bok } [{för} | {över}] { }
     [Word | Ss {venska } Word] ;
Define EnamexWrkWaa049 [ EnamexWrkWaa049a   EndTag(EnamexWrkWaa) ] ; 131

!R (Nordisk|Lunds|Svensk)" "[^\n ]+is(ka|k)(" "[^\n ]+s)?" "årsbok
!A {printWRK(yytext,0);}

Define EnamexWrkWaa050a
     [ [{Nordisk} | {Lunds} | {Svensk}] { } Word {is} [{ka} | {k}]
       ({ } Word {s}) { årsbok} ] ;
Define EnamexWrkWaa050 [ EnamexWrkWaa050a   EndTag(EnamexWrkWaa) ] ; 132

!R [^\n ]*[Bb]oken" The "[^\n ]+" "(by|in|a|for|the|of|and|one|"of the"|"on the"|"for the")" "[^\n ]+(" "{U}[^\n ]+)*(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa051a
     [ {The } Ins(Word) { }
       [{by} | {in} | {a} | {for} | {the} | {of} | {and} | {one} | {of the}
          | {on the} | {for the}]
       { } Word [{ } CapWord2]* [{ } CapWord2]* ] ;
Define EnamexWrkWaa051
     [ EnamexWrkWaa051a
       LC(Bb {oken })
       EndTag(EnamexWrkWaa) ] ; 133

!R [^\n ]*[Bb]oken" "(Mellan|Därför|Varför|Bakom|Les)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa052a
     [ [{Mellan} | {Därför} | {Varför} | {Bakom} | {Les}] { } Word
       [{ } CapWord2]* ] ;
Define EnamexWrkWaa052
     [ EnamexWrkWaa052a
       LC(Bb {oken })
       EndTag(EnamexWrkWaa) ] ; 134

!R [^\n ]*[Bb]ok(en)?" "({U}[^\n ]+" ")+(dessa|mina|vackra|[^\n ]+erad|by|in|a|for|des|the|of|and|one|für|"de la"|"of the"|"on the"|"for the")" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa053a
     [ [Ins(CapWord2) { }]+
       [{dessa} | {mina} | {vackra} | Word {erad} | {by} | {in} | {a}
          | {for} | {des} | {the} | {of} | {and} | {one} | {für} | {de la}
          | {of the} | {on the} | {for the}]
       { } Word [{ } CapWord2]* ] ;
Define EnamexWrkWaa053
     [ EnamexWrkWaa053a
       LC(Bb {ok} ({en}) { })
       EndTag(EnamexWrkWaa) ] ; 135

!R [^\n ]*[Bb]oken" "{U}[^\n ]+" "(till|med|för|it)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa054a
     [ Ins(CapWord2) { } [{till} | {med} | {för} | {it}] { } Word [{ } CapWord2]* ] ;
Define EnamexWrkWaa054
     [ EnamexWrkWaa054a
       LC(Bb {oken })
       EndTag(EnamexWrkWaa) ] ; 136

!R [^\n ]*[Bb]ok(en)?" "{U}[^\n ]+(gs|nsk|ig|ing|nda|ins|nas|isk|rs|ens|ers|nde|ska|iga)" "[^\n ]+(" "{U}[^\n ]+)*
!A {printWRK(yytext,1);}

Define EnamexWrkWaa055a
     [ CapWord2
       [{gs} | {nsk} | {ig} | {ing} | {nda} | {ins} | {nas} | {isk} | {rs}
          | {ens} | {ers} | {nde} | {ska} | {iga}]
       { } Word [{ } CapWord2]* ] ;
Define EnamexWrkWaa055
     [ EnamexWrkWaa055a
       LC(Bb {ok} ({en}) { })
       EndTag(EnamexWrkWaa) ] ; 137

!R (Stråkkvartett|Pianokonsert)" "[Nn]r" "[1-9]+(\-[0-9]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa056a
     [ [{Stråkkvartett} | {Pianokonsert}] { } Nn {r } Num19+ ({-} Ins(Nums)) ] ;
Define EnamexWrkWaa056 [ EnamexWrkWaa056a   EndTag(EnamexWrkWaa) ] ; 138

!R [^\n ]*[Ss]ymfoni(" nr")?" "[1-9][0-9]?(" "[^\n ]+moll)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa057a
     [ NS* Ss {ymfoni} ({ nr}) { } Num19x ({ } Word {moll}) ] ;
Define EnamexWrkWaa057 [ EnamexWrkWaa057a   EndTag(EnamexWrkWaa) ] ; 139

!R [Ss]venska" "[^\n ]+iska" registret"(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa058a
     [ Ss {venska } Ins(Word%_iska) { registret} [{ } CapWord2]+ ] ;
Define EnamexWrkWaa058 [ EnamexWrkWaa058a   EndTag(EnamexWrkWaa) ] ; 140

!R [Ss]venska" "[^\n ]+\-" och "[^\n ]+registret
!A {printWRK(yytext,0);}

Define EnamexWrkWaa059a [ Ss {venska } Word {- och } Word {registret} ] ;
Define EnamexWrkWaa059 [ EnamexWrkWaa059a   EndTag(EnamexWrkWaa) ] ; 141

!R "Symphonie "[^\n ]+ique
!A {printWRK(yytext,0);}

Define EnamexWrkWaa060a [ {Symphonie } Word {ique} ] ;
Define EnamexWrkWaa060 [ EnamexWrkWaa060a   EndTag(EnamexWrkWaa) ] ; 142

!R "satsen ur "{U}[^\n ]+" nr "[^\n ]+
!A {printWRK(yytext,2);}

Define EnamexWrkWaa061a [ Ins(CapWord2) { nr } Word ] ;
Define EnamexWrkWaa061
     [ EnamexWrkWaa061a
       LC({satsen ur })
       EndTag(EnamexWrkWaa) ] ; 143

!R "satsen ur "{U}[^\n ]+" "[^\n ]*(konsert|sonat|sviten)
!A {printWRK(yytext,2);}

Define EnamexWrkWaa062a
     [ Ins(CapWord2) { } NS* [{konsert} | {sonat} | {sviten}] ] ;
Define EnamexWrkWaa062
     [ EnamexWrkWaa062a
       LC({satsen ur })
       EndTag(EnamexWrkWaa) ] ; 144

!R "Codex "({U}[^\n ]+ius|Marian)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa063a [ {Codex } [CapWord2 {ius} | {Marian}] ] ;
Define EnamexWrkWaa063 [ EnamexWrkWaa063a   EndTag(EnamexWrkWaa) ] ; 145

!R [^\n ]*[Ss]onatan" L"[ae]" "[^\n ]+
!A {printWRK(yytext,1);}

Define EnamexWrkWaa064a [ {L} ["a"|"e"] { } Word ] ;
Define EnamexWrkWaa064
     [ EnamexWrkWaa064a
       LC(Ss {onatan })
       EndTag(EnamexWrkWaa) ] ; 146

!R {U}[^\n ]+" da "[Rr]equiem
!A {printWRK(yytext,0);}

Define EnamexWrkWaa065a [ Ins(CapWord2) { da } Rr {equiem} ] ;
Define EnamexWrkWaa065 [ EnamexWrkWaa065a   EndTag(EnamexWrkWaa) ] ; 147

!R "skrev "\"{U}[^\n ]+" "[^\"]+" \""
!A {printWRK(yytext,0);}

Define EnamexWrkWaa066a [ {skrev } "\"" Ins(CapWord2) { } NoDQuote+ { } "\"" ] ;
Define EnamexWrkWaa066 [ EnamexWrkWaa066a   EndTag(EnamexWrkWaa) ] ; 148

!R [Ss]venska" "[^\n ]+" "[^\n ]+" och "[^\n ]+" "Registret
!A {printWRK(yytext,0);}

Define EnamexWrkWaa067a
     [ Ss {venska } Ins(Word) { } Ins(Word) { och } Ins(Word) { Registret} ] ;
Define EnamexWrkWaa067 [ EnamexWrkWaa067a   EndTag(EnamexWrkWaa) ] ; 149

!R ({U}[^\n ]+" ")*"Drug Registry"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa068a [ [Ins(CapWord2) { }]* {Drug Registry} ] ;
Define EnamexWrkWaa068 [ EnamexWrkWaa068a   EndTag(EnamexWrkWaa) ] ; 150

!R ({U}[^\n ]+" ")*(Chronicle|Dictionary|Manual|Registry|Register|Registret|Encyclopedia|J[Oo][Uu][Rr][Nn][Aa][Ll]|Proceedings)" "("of the"|of)(" "{U}[^\n ]+)+(" of "[^\n ]+|" to "[^\n ]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa069a
     [ [Ins(CapWord2) { }]*
       [{Chronicle} | {Dictionary} | {Manual} | {Registry} | {Register}
          | {Registret} | {Encyclopedia} | {J} Oo Uu Rr Nn Aa Ll | {Proceedings}]
       { } [{of the} | {of}] [{ } CapWord2]+ ({ of } Word | { to } Word) ] ;
Define EnamexWrkWaa069 [ EnamexWrkWaa069a   EndTag(EnamexWrkWaa) ] ; 151

!R ({U}[^\n ]+" ")+("Medical Journal"|Journal|Journalen|Review|Pergament|Dictionary|Manual|Registret|Encyclopedia)(" of "[^\n ]+|" of "[^\n ]+" and "[^\n ]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa070a
     [ [Ins(CapWord2) { }]+
       [{Medical Journal} | {Journal} | {Journalen} | {Review} | {Pergament}
          | {Dictionary} | {Manual} | {Registret} | {Encyclopedia}]
       ({ of } Word | { of } Ins(Word) { and } Word) ] ;
Define EnamexWrkWaa070 [ EnamexWrkWaa070a   EndTag(EnamexWrkWaa) ] ; 152

!R [Ss]venska" "[^\n ]*registret" för "[^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa071a [ Ss {venska } NS* {registret för } Word ] ;
Define EnamexWrkWaa071 [ EnamexWrkWaa071a   EndTag(EnamexWrkWaa) ] ; 153

!R [Ss]venska" "[^\n ]+registret
!A {printWRK(yytext,0);}

Define EnamexWrkWaa072a [ Ss {venska } Word {registret} ] ;
Define EnamexWrkWaa072 [ EnamexWrkWaa072a   EndTag(EnamexWrkWaa) ] ; 154

!R "New England "[Jj]ournal" of "[^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa073a [ {New England } Jj {ournal of } Word ] ;
Define EnamexWrkWaa073 [ EnamexWrkWaa073a   EndTag(EnamexWrkWaa) ] ; 155

!R (Le" ")?("La Revue de"|Encyclopedia|"Dictionnaire de la")(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa074a
     [ ({Le }) [{La Revue de} | {Encyclopedia} | {Dictionnaire de la}]
       [{ } CapWord2]+ ] ;
Define EnamexWrkWaa074 [ EnamexWrkWaa074a   EndTag(EnamexWrkWaa) ] ; 156

!R Journal" "("of the"|of)(" "{U}[^\n ]+)+(" of "{U}[^\n ]+|" and "{U}[^\n ]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa075a
     [ {Journal } [{of the} | {of}] [{ } CapWord2]+
       ({ of } CapWord2 | { and } CapWord2) ] ;
Define EnamexWrkWaa075 [ EnamexWrkWaa075a   EndTag(EnamexWrkWaa) ] ; 157

!R (Le" ")?Journal" "(de|des|"de la"|of)(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa076a
     [ ({Le }) {Journal } [{de} | {des} | {de la} | {of}] [{ } CapWord2]+ ] ;
Define EnamexWrkWaa076 [ EnamexWrkWaa076a   EndTag(EnamexWrkWaa) ] ; 158

!R ([Tt]he" ")?Guidelines" for the"(" "{U}[^\n ]+)+" and"(" "{U}[^\n ]+)+" of"(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa077a
     [ (Tt {he }) {Guidelines for the} [{ } CapWord2]+ { and} [{ } CapWord2]+
       { of} [{ } CapWord2]+ ] ;
Define EnamexWrkWaa077 [ EnamexWrkWaa077a   EndTag(EnamexWrkWaa) ] ; 159

!R ([Tt]he" ")?Guidelines(" "[^\n ]*)?(" "{U}[^\n ]+)+" of"(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa078a
     [ (Tt {he }) {Guidelines} ({ } NS*) [{ } CapWord2]+ { of} [{ } CapWord2]+ ] ;
Define EnamexWrkWaa078 [ EnamexWrkWaa078a   EndTag(EnamexWrkWaa) ] ; 160

!R ([Tt]he" ")?Guidelines(" "[^\n ]*)?(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa079a
     [ (Tt {he }) {Guidelines} ({ } NS*) [{ } CapWord2]+ ] ;
Define EnamexWrkWaa079 [ EnamexWrkWaa079a   EndTag(EnamexWrkWaa) ] ; 161

!R [Tt]he" "[A-TV-ZÅÄÖ][^\n ]+" of "{U}[^\n ]+" in"(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa080a
     [ Tt {he }
       ["A"|"B"|"C"|"D"|"E"|"F"|"G"|"H"|"I"|"J"|"K"|"L"|"M"|"N"|"O"|"P"|"Q"|"R"|"S"|"T"|"V"|"W"|"X"|"Y"|"Z"|"Å"|"Ä"|"Ö"]
       Ins(Word) { of } Ins(CapWord2) { in} [{ } CapWord2]+ ] ;
Define EnamexWrkWaa080 [ EnamexWrkWaa080a   EndTag(EnamexWrkWaa) ] ; 162

!R Annals" "(of|of" "the)(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa081a [ {Annals } [{of} | {of the}] [{ } CapWord2]+ ] ;
Define EnamexWrkWaa081 [ EnamexWrkWaa081a   EndTag(EnamexWrkWaa) ] ; 163

!R ({U}[^\n ]+" ")+"and "({U}[^\n ]+" ")+Manual" of "[^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa082a
     [ [Ins(CapWord2) { }]+ {and } [Ins(CapWord2) { }]+ {Manual of } Word ] ;
Define EnamexWrkWaa082 [ EnamexWrkWaa082a   EndTag(EnamexWrkWaa) ] ; 164

!R [Tt]"he "[^\n ]+" Atlas of"(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa083a [ Tt {he } Ins(Word) { Atlas of} [{ } CapWord2]+ ] ;
Define EnamexWrkWaa083 [ EnamexWrkWaa083a   EndTag(EnamexWrkWaa) ] ; 165

!R (Atlas|Encyclopedia)" of"(" "{U}[^\n ]+)+" in "{U}[^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa084a
     [ [{Atlas} | {Encyclopedia}] { of} [{ } CapWord2]+ { in } CapWord2 ] ;
Define EnamexWrkWaa084 [ EnamexWrkWaa084a   EndTag(EnamexWrkWaa) ] ; 166

!R (Encyclopedia|Slide" "Atlas)" of"(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa085a
     [ [{Encyclopedia} | {Slide Atlas}] { of} [{ } CapWord2]+ ] ;
Define EnamexWrkWaa085 [ EnamexWrkWaa085a   EndTag(EnamexWrkWaa) ] ; 167

!R [^\n ]+"anska "[^\n ]+föreningens" "[^\n ]*[Manual]
!A {printWRK(yytext,0);}

Define EnamexWrkWaa086a
     [ Word {anska } Word {föreningens } NS* ["M"|"a"|"n"|"u"|"a"|"l"] ] ;
Define EnamexWrkWaa086 [ EnamexWrkWaa086a   EndTag(EnamexWrkWaa) ] ; 168

!R International(" "{U}[^\n ]+)+" Guidelines"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa087a [ {International} [{ } CapWord2]+ { Guidelines} ] ;
Define EnamexWrkWaa087 [ EnamexWrkWaa087a   EndTag(EnamexWrkWaa) ] ; 169

!R Declaration(" "[^\n ]*)?(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa088a [ {Declaration} ({ } NS*) [{ } CapWord2]+ ] ;
Define EnamexWrkWaa088 [ EnamexWrkWaa088a   EndTag(EnamexWrkWaa) ] ; 170

!R Encyclopedia" "[^\n ]+ica
!A {printWRK(yytext,0);}

Define EnamexWrkWaa089a [ {Encyclopedia } Word {ica} ] ;
Define EnamexWrkWaa089 [ EnamexWrkWaa089a   EndTag(EnamexWrkWaa) ] ; 171

!R [Tt]he(" "{U}[^\n ]+)+" Guide"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa090a [ Tt {he} [{ } CapWord2]+ { Guide} ] ;
Define EnamexWrkWaa090 [ EnamexWrkWaa090a   EndTag(EnamexWrkWaa) ] ; 172

!R "Pharmacotherapy "[12][0-9][0-9][0-9]
!A {printWRK(yytext,0);}

Define EnamexWrkWaa091a [ {Pharmacotherapy } Ins(YearNum) ] ;
Define EnamexWrkWaa091 [ EnamexWrkWaa091a   EndTag(EnamexWrkWaa) ] ; 173

!R "\" General Theory \""
!A {printWRK(yytext,0);}

Define EnamexWrkWaa092a [ "\"" { General Theory } "\"" ] ;
Define EnamexWrkWaa092 [ EnamexWrkWaa092a   EndTag(EnamexWrkWaa) ] ; 174

!R "Science "[0-9]+\;[0-9]+\:[0-9\-]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa093a [ {Science } Ins(Nums) {;} Ins(Nums) {:} DigitDashes ] ;
Define EnamexWrkWaa093 [ EnamexWrkWaa093a   EndTag(EnamexWrkWaa) ] ; 175

!R {U}[^\n ]+" and "{U}[^\n ]+" Bulletin"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa094a [ Ins(CapWord2) { and } Ins(CapWord2) { Bulletin} ] ;
Define EnamexWrkWaa094 [ EnamexWrkWaa094a   EndTag(EnamexWrkWaa) ] ; 176

!R {U}[^\n ]+"ical "[^\n ]+" and Epidemiology"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa095a [ CapWord2 {ical } Ins(Word) { and Epidemiology} ] ;
Define EnamexWrkWaa095 [ EnamexWrkWaa095a   EndTag(EnamexWrkWaa) ] ; 177

!R ({U}[^\n ]+" and ")?({U}[^\n ]+" ")+("For the"|Polyp|Development|Hypertension|Immunogenicity|International|Evaluation|Imaging|Experimental|Survival|Heart|Health|Trial|Diabetes|Protection|Memory|Prevention|National" "[^\n ]+|Replacement|Longitudinal|Women|Co\-operative|Follow\-up|Elderly|Violence|Screening|Outcome|Eye|Therapy|Incidence|stent)" "[Ss]tudy(" in "{U}[^\n ]+|" "o[fn]" "{U}[^\n ]+|" "o[fn]" the "{U}[^\n ]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa096a
     [ (Ins(CapWord2) { and }) [Ins(CapWord2) { }]+
       [{For the} | {Polyp} | {Development} | {Hypertension}
          | {Immunogenicity} | {International} | {Evaluation} | {Imaging}
          | {Experimental} | {Survival} | {Heart} | {Health} | {Trial}
          | {Diabetes} | {Protection} | {Memory} | {Prevention}
          | {National } Ins(Word) | {Replacement} | {Longitudinal} | {Women}
          | {Co-operative} | {Follow-up} | {Elderly} | {Violence} | {Screening}
          | {Outcome} | {Eye} | {Therapy} | {Incidence} | {stent}]
       { } Ss {tudy}
       ({ in } CapWord2 | { o} ["f"|"n"] { } CapWord2
         | { o} ["f"|"n"] { the } CapWord2) ] ;
Define EnamexWrkWaa096 [ EnamexWrkWaa096a   EndTag(EnamexWrkWaa) ] ; 178

!R Health" "({U}[^\n ]+" ")+Study
!A {printWRK(yytext,0);}

Define EnamexWrkWaa097a [ {Health } [Ins(CapWord2) { }]+ {Study} ] ;
Define EnamexWrkWaa097 [ EnamexWrkWaa097a   EndTag(EnamexWrkWaa) ] ; 179

!R ({U}[^\n ]+" and ")?({U}[^\n ]+" ")+(Prevention|Stroke|Event|Failure|Attack|Randomized|Intervention|Lowering|Surgery|Infarction|Surgery|Controlled|Comparison|Outcomes|Amalgam)" Trial"(" in "{U}[^\n ]+|" "o[fn]" "{U}[^\n ]+|" "o[fn]" the "{U}[^\n ]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa098a
     [ (Ins(CapWord2) { and }) [Ins(CapWord2) { }]+
       [{Prevention} | {Stroke} | {Event} | {Failure} | {Attack}
          | {Randomized} | {Intervention} | {Lowering} | {Surgery}
          | {Infarction} | {Controlled} | {Comparison} | {Outcomes} | {Amalgam}]
       { Trial}
       ({ in } CapWord2 | { o} ["f"|"n"] { } CapWord2
         | { o} ["f"|"n"] { the } CapWord2) ] ;
Define EnamexWrkWaa098 [ EnamexWrkWaa098a   EndTag(EnamexWrkWaa) ] ; 180

!R [A-Z][^\n ]+" "[1-9IV]+\-studien
!A {printWRK(yytext,0);}

Define EnamexWrkWaa099a
     [ AZ Ins(Word) { } ["1"|"2"|"3"|"4"|"5"|"6"|"7"|"8"|"9"|"I"|"V"]+ {-studien} ] ;
Define EnamexWrkWaa099 [ EnamexWrkWaa099a   EndTag(EnamexWrkWaa) ] ; 181

!R ([Gg]"lobal ")?[Ff]as" "[IV]+"\-studie"(n|r|rna)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa100a
     [ (Gg {lobal }) Ff {as } ["I"|"V"]+ {-studie} ({n} | {r} | {rna}) ] ;
Define EnamexWrkWaa100 [ EnamexWrkWaa100a   EndTag(EnamexWrkWaa) ] ; 182

!R "studierna "{U}[^\n ]+" och "{U}[^\n ]+
!A {printWRK(yytext,1);}

Define EnamexWrkWaa101a [ Ins(CapWord2) { och } CapWord2 ] ;
Define EnamexWrkWaa101
     [ EnamexWrkWaa101a
       LC({studierna })
       EndTag(EnamexWrkWaa) ] ; 183

!R "tudien \, "{U}[^\n ]+" "{U}[^\n ]+" "(on|and|of|in)" "{U}[^\n ]+
!A {printWRK(yytext,2);}

Define EnamexWrkWaa102a
     [ Ins(CapWord2) { } Ins(CapWord2) { } [{on} | {and} | {of} | {in}] { } CapWord2 ] ;
Define EnamexWrkWaa102
     [ EnamexWrkWaa102a
       LC({tudien , })
       EndTag(EnamexWrkWaa) ] ; 184

!R [^\n ]*"förmuläret "{U}[^\n ]+" in "{U}[^\n ]+
!A {printWRK(yytext,1);}

Define EnamexWrkWaa103a [ Ins(CapWord2) { in } CapWord2 ] ;
Define EnamexWrkWaa103
     [ EnamexWrkWaa103a
       LC({förmuläret })
       EndTag(EnamexWrkWaa) ] ; 185

!R "Swedish "[^\n ]+" "[^\n ]+" "[^\n ]+" "[^\n ]+" "[Ss]tudy
!A {printWRK(yytext,0);}

Define EnamexWrkWaa104a
     [ {Swedish } Ins(Word) { } Ins(Word) { } Ins(Word) { } Ins(Word) { } Ss {tudy} ] ;
Define EnamexWrkWaa104 [ EnamexWrkWaa104a   EndTag(EnamexWrkWaa) ] ; 186

!R "Swedish Trial in"(" "[A-Z][^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa105a [ {Swedish Trial in} [{ } AZ Word]+ ] ;
Define EnamexWrkWaa105 [ EnamexWrkWaa105a   EndTag(EnamexWrkWaa) ] ; 187

!R "Intervention and Event Lowering in "{U}[^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa106a
     [ {Intervention and Event Lowering in } CapWord2 ] ;
Define EnamexWrkWaa106 [ EnamexWrkWaa106a   EndTag(EnamexWrkWaa) ] ; 188

!R "Acta "{U}[^\n ]+" Scandinavica"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa107a [ {Acta } Ins(CapWord2) { Scandinavica} ] ;
Define EnamexWrkWaa107 [ EnamexWrkWaa107a   EndTag(EnamexWrkWaa) ] ; 189

!R "Acta "{U}[^\n ]+" Regiae Stockholmiensis"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa108a [ {Acta } Ins(CapWord2) { Regiae Stockholmiensis} ] ;
Define EnamexWrkWaa108 [ EnamexWrkWaa108a   EndTag(EnamexWrkWaa) ] ; 190

!R Scand" J "(Prim" Health "Care|Caring" "Sci|Plast" Reconstr "Surg|Public" "Health|Soc" "Med)\.?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa109a
     [ {Scand J }
       [{Prim Health Care} | {Caring Sci} | {Plast Reconstr Surg}
          | {Public Health} | {Soc Med}]
       ({.}) ] ;
Define EnamexWrkWaa109 [ EnamexWrkWaa109a   EndTag(EnamexWrkWaa) ] ; 191

!R (DiabetologNytt|Nordisk" "Nutrition|Diabetesvård|Incitament)" "[Nn]r" "[1-9]+(\-[0-9]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa110a
     [ [{DiabetologNytt} | {Nordisk Nutrition} | {Diabetesvård}
          | {Incitament}]
       { } Nn {r } Num19+ ({-} Ins(Nums)) ] ;
Define EnamexWrkWaa110 [ EnamexWrkWaa110a   EndTag(EnamexWrkWaa) ] ; 192

!R (DiabetologNytt|Nordisk" "Nutrition|Diabetesvård|Incitament)" \, "[Nn]r" "[1-9]+[\/\-0-9]*
!A {printWRK(yytext,0);}

Define EnamexWrkWaa111a
     [ [{DiabetologNytt} | {Nordisk Nutrition} | {Diabetesvård}
          | {Incitament}]
       { , } Nn {r } Num19+ [Num|"/"|"-"]* ] ;
Define EnamexWrkWaa111 [ EnamexWrkWaa111a   EndTag(EnamexWrkWaa) ] ; 193

!R {U}[^\n ]+" Disease Assessment Scale"[^\n ]*
!A {printWRK(yytext,0);}

Define EnamexWrkWaa112a [ Ins(CapWord2) { Disease Assessment Scale} NS* ] ;
Define EnamexWrkWaa112 [ EnamexWrkWaa112a   EndTag(EnamexWrkWaa) ] ; 194

!R {U}[^\n ]+" Interview Based Impression of Change"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa113a
     [ Ins(CapWord2) { Interview Based Impression of Change} ] ;
Define EnamexWrkWaa113 [ EnamexWrkWaa113a   EndTag(EnamexWrkWaa) ] ; 195

!R "Dermatologist\'s Static Global Assessment of Target Lesion"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa114a
     [ {Dermatologist's Static Global Assessment of Target Lesion} ] ;
Define EnamexWrkWaa114 [ EnamexWrkWaa114a   EndTag(EnamexWrkWaa) ] ; 196

!R (Sjukhusläkaren|PROPPEN)" "[Nn]r" "[0-9]+(\/[0-9]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa115a
     [ [{Sjukhusläkaren} | {PROPPEN}] { } Nn {r } Ins(Nums) ({/} Ins(Nums)) ] ;
Define EnamexWrkWaa115 [ EnamexWrkWaa115a   EndTag(EnamexWrkWaa) ] ; 197

!R (LT|LMV)" "[0-9]+\-[0-9]+(\/[0-9]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa116a [ [{LT} | {LMV}] { } Ins(NumRange) ({/} Ins(Nums)) ] ;
Define EnamexWrkWaa116 [ EnamexWrkWaa116a   EndTag(EnamexWrkWaa) ] ; 198

!R (Prop|LT|LMV)" "[0-9]+(\/[0-9]+)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa117a [ [{Prop} | {LT} | {LMV}] { } Ins(Nums) ({/} Ins(Nums)) ] ;
Define EnamexWrkWaa117 [ EnamexWrkWaa117a   EndTag(EnamexWrkWaa) ] ; 199

!R Infektionsläkaren[0-9]+\/[0-9]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa118a [ {Infektionsläkaren} Ins(NumsSlashNums) ] ;
Define EnamexWrkWaa118 [ EnamexWrkWaa118a   EndTag(EnamexWrkWaa) ] ; 200

!R "Nature Reviews in"(" "[A-Z][^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa119a [ {Nature Reviews in} [{ } AZ Word]+ ] ;
Define EnamexWrkWaa119 [ EnamexWrkWaa119a   EndTag(EnamexWrkWaa) ] ; 201

!R "Diabetes Care"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa120a [ {Diabetes Care} ] ;
Define EnamexWrkWaa120 [ EnamexWrkWaa120a   EndTag(EnamexWrkWaa) ] ; 202

!R "Diabetic Medicine"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa121a [ {Diabetic Medicine} ] ;
Define EnamexWrkWaa121 [ EnamexWrkWaa121a   EndTag(EnamexWrkWaa) ] ; 203

!R [Cc]ancer" incidence in "[Ss]weden" "[12][0-9][0-9][0-9]
!A {printWRK(yytext,0);}

Define EnamexWrkWaa122a [ Cc {ancer incidence in } Ss {weden } Ins(YearNum) ] ;
Define EnamexWrkWaa122 [ EnamexWrkWaa122a   EndTag(EnamexWrkWaa) ] ; 204

!R "Am J Respir Crit Cor Med"\.?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa123a [ {Am J Respir Crit Cor Med} ({.}) ] ;
Define EnamexWrkWaa123 [ EnamexWrkWaa123a   EndTag(EnamexWrkWaa) ] ; 205

!R International" "[^\n ]+" Journal"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa124a [ {International } Ins(Word) { Journal} ] ;
Define EnamexWrkWaa124 [ EnamexWrkWaa124a   EndTag(EnamexWrkWaa) ] ; 206

!R "J\. of Occupational \& Environmental Medicine"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa125a [ {J. of Occupational & Environmental Medicine} ] ;
Define EnamexWrkWaa125 [ EnamexWrkWaa125a   EndTag(EnamexWrkWaa) ] ; 207

!R studie" ( "[A-Z]+" "[0-9]+" )"
!A {printWRK(yytext,1);}

Define EnamexWrkWaa126a [ {( } Ins(UpperWord) { } Ins(Nums) { )} ] ;
Define EnamexWrkWaa126
     [ EnamexWrkWaa126a
       LC({studie })
       EndTag(EnamexWrkWaa) ] ; 208

!R Trial" of "[^\n ]+" and "[^\n ]+" with "[^\n ]+" "[^\n ]+" Outcomes"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa127a
     [ {Trial of } Ins(Word) { and } Ins(Word) { with } Ins(Word) { } Ins(Word) { Outcomes} ] ;
Define EnamexWrkWaa127 [ EnamexWrkWaa127a   EndTag(EnamexWrkWaa) ] ; 209

!R [Tt]he" European cooperative study "trial
!A {printWRK(yytext,0);}

Define EnamexWrkWaa128a [ Tt {he European cooperative study trial} ] ;
Define EnamexWrkWaa128 [ EnamexWrkWaa128a   EndTag(EnamexWrkWaa) ] ; 210

!# Regulations, recommendations, archives, treaties? 

!R [Dd]irektiv(en)?" "[0-9][0-9\/A-Z]+
!A {printWRK(yytext,1);}

Define EnamexWrkWaa129a
     [ Num
       [Num|"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 EnamexWrkWaa129
     [ EnamexWrkWaa129a
       LC(Dd {irektiv} ({en}) { })
       EndTag(EnamexWrkWaa) ] ; 211

!R "Lagen om yrkesverksamhet på hälso\- och sjukvårdens "område(t)?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa130a
     [ {Lagen om yrkesverksamhet på hälso- och sjukvårdens område} ({t}) ] ;
Define EnamexWrkWaa130 [ EnamexWrkWaa130a   EndTag(EnamexWrkWaa) ] ; 212

!R "Lagen om "[^\n ]+isk" "[^\n ]+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa131a [ {Lagen om } Ins(Word%_isk) { } Word ] ;
Define EnamexWrkWaa131 [ EnamexWrkWaa131a   EndTag(EnamexWrkWaa) ] ; 213

!R "Lag med särskilda bestämmelser om vård av unga"
!A {printWRK(yytext,0);}

Define EnamexWrkWaa132a
     [ {Lag med särskilda bestämmelser om vård av unga} ] ;
Define EnamexWrkWaa132 [ EnamexWrkWaa132a   EndTag(EnamexWrkWaa) ] ; 214

!R ([Tt]"he ")?Archives" of "([^\n ]+" and "[^\n ]+ic" "[^\n ]+|[^\n ]+ics)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa133a
     [ (Tt {he }) {Archives of } [Ins(Word) { and } Word {ic } Word | Word {ics}] ] ;
Define EnamexWrkWaa133 [ EnamexWrkWaa133a   EndTag(EnamexWrkWaa) ] ; 215

!R ([Tt]"he ")?Archives" of"(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa134a [ (Tt {he }) {Archives of} [{ } CapWord2]+ ] ;
Define EnamexWrkWaa134 [ EnamexWrkWaa134a   EndTag(EnamexWrkWaa) ] ; 216

!R Arch(" "[A-Z][^\n ]+)+" "(Med|Surg)\.?
!A {printWRK(yytext,0);}

Define EnamexWrkWaa135a
     [ {Arch} [{ } AZ Word]+ { } [{Med} | {Surg}] ({.}) ] ;
Define EnamexWrkWaa135 [ EnamexWrkWaa135a   EndTag(EnamexWrkWaa) ] ; 217

!R FN:s" "[^\n ]+(resolution|konvention)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa136a [ {FN:s } Word [{resolution} | {konvention}] ] ;
Define EnamexWrkWaa136 [ EnamexWrkWaa136a   EndTag(EnamexWrkWaa) ] ; 218

!R (Fifa|{U}+\:)s" "("nya ")?[^\n ]*(fördraget|regler|onstitution|bestämmelser|grundlagar|grundlag|stadgar|fördrag|pressmeddelande|regelverk|rekommendationer)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa137a
     [{Fifa} | UpperWord {:}] {s } ({nya }) NS*
     [{fördraget} | {regler} | {onstitution} | {bestämmelser}
        | {grundlagar} | {grundlag} | {stadgar} | {fördrag}
        | {pressmeddelande} | {regelverk} | {rekommendationer}] ;
Define EnamexWrkWaa137 [ EnamexWrkWaa137a   EndTag(EnamexWrkWaa) ] ; 219

!R "Riks\- och "[^\n ]+arkive(n|t)
!A {printWRK(yytext,0);}

Define EnamexWrkWaa138a [ {Riks- och } Word {arkive} [{n} | {t}] ] ;
Define EnamexWrkWaa138 [ EnamexWrkWaa138a   EndTag(EnamexWrkWaa) ] ; 220

!R "Treaty of"(" "{U}[^\n ]+)+
!A {printWRK(yytext,0);}

Define EnamexWrkWaa139a [ {Treaty of} [{ } CapWord2]+ ] ;
Define EnamexWrkWaa139 [ EnamexWrkWaa139a   EndTag(EnamexWrkWaa) ] ; 221

!R {U}[^\n ]+"arkivets "[^\n ]+samlingar
!A {printWRK(yytext,0);}

Define EnamexWrkWaa140a [ CapWord2 {arkivets } Word {samlingar} ] ;
Define EnamexWrkWaa140 [ EnamexWrkWaa140a   EndTag(EnamexWrkWaa) ] ; 222

!R (I|igenom|från|ur|hela)" "{U}[^\n ]+" "[^\n ]*arkiv(en|et)?
!A {printWRK(yytext,1);}

Define EnamexWrkWaa141a [ Ins(CapWord2) { } NS* {arkiv} ({en} | {et}) ] ;
Define EnamexWrkWaa141
     [ EnamexWrkWaa141a
       LC([{I} | {igenom} | {från} | {ur} | {hela}] { })
       EndTag(EnamexWrkWaa) ] ; 223

!R {U}[^\n ]+s" "[^\n ]*(kvartal|delår|månader)s(\-)?rapport
!A {printWRK(yytext,0);}

Define EnamexWrkWaa142a
     [ Ins(CapWord2s) { } NS* [{kvartal} | {delår} | {månader}] {s} ({-}) {rapport} ] ;
Define EnamexWrkWaa142 [ EnamexWrkWaa142a   EndTag(EnamexWrkWaa) ] ; 224

!R (SvD\:|T\-kontoret|Stasi|{U}+\:|Säpo|{U}[^\n ]+polisen|"Sveriges Radio"|Svea" "hovrätt|{U}[^\n ]+museum|Arbetarrörelsen)s" "arkiv
!A {printWRK(yytext,0);}

Define EnamexWrkWaa143a
     [ [{SvD:} | {T-kontoret} | {Stasi} | UpperWord {:} | {Säpo}
          | CapWord2 {polisen} | {Sveriges Radio} | {Svea hovrätt}
          | CapWord2 {museum} | {Arbetarrörelsen}]
       {s arkiv} ] ;
Define EnamexWrkWaa143 [ EnamexWrkWaa143a   EndTag(EnamexWrkWaa) ] ; 225

!R {U}[^\n ]+(ens|ets|nsk)" "[Ff]örfattningsssamling
!A {printWRK(yytext,0);}

Define EnamexWrkWaa144a
     [ CapWord2 [{ens} | {ets} | {nsk}] { } Ff {örfattningsssamling} ] ;
Define EnamexWrkWaa144 [ EnamexWrkWaa144a   EndTag(EnamexWrkWaa) ] ; 226

!R ({U}[^\n ]+" ")+Treaty(" "{U}[^\n ]+)*
!A {printWRK(yytext,0);}

Define EnamexWrkWaa145a [ [Ins(CapWord2) { }]+ {Treaty} [{ } CapWord2]* ] ;
Define EnamexWrkWaa145 [ EnamexWrkWaa145a   EndTag(EnamexWrkWaa) ] ; 227

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

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

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

Define TOP
     [ IgnoreTagged | Except001 | EnamexWrkPrj001 | EnamexWrkPrj002
       | EnamexWrkPrj003 | EnamexWrkPrj004 | EnamexWrkPrj005 | EnamexWrkPrj006
       | EnamexWrkPrj007 | EnamexWrkPrj008 | EnamexWrkPrj009 | EnamexWrkPrj010
       | EnamexWrkPrj011 | EnamexWrkPrj012 | EnamexWrkPrj013 | EnamexWrkPrj014
       | EnamexWrkPrj015 | EnamexWrkPrj016 | EnamexWrkPrj017 | EnamexWrkPrj018
       | EnamexWrkPrj019 | EnamexWrkPrj020 | EnamexWrkPrj021 | EnamexWrkPrj022
       | EnamexWrkPrj023 | EnamexWrkPrj024 | EnamexWrkPrj025 | EnamexWrkPrj026
       | EnamexWrkPrj027 | EnamexWrkPrj028 | EnamexWrkPrj029 | EnamexWrkPrj030
       | EnamexWrkPrj031 | EnamexWrkWmd001 | EnamexWrkWmd002 | EnamexWrkWmd003
       | EnamexWrkWmd004 | EnamexWrkWmd005 | EnamexWrkWmd006 | EnamexWrkWmd007
       | EnamexWrkWaa001 | EnamexWrkWaa002 | EnamexWrkWmd008 | EnamexWrkWmd009
       | EnamexWrkWmd010 | EnamexWrkWmd011 | EnamexWrkWmd012 | EnamexWrkWmd013
       | EnamexWrkWmd014 | EnamexWrkWmd015 | EnamexWrkWmd016 | Except002
       | Except003 | EnamexWrkWmd017 | EnamexWrkWmd018 | Except004 | Except005
       | EnamexWrkWmd019 | EnamexWrkWmd020 | EnamexWrkWmd021 | EnamexWrkWmd022
       | EnamexWrkWmd023 | EnamexWrkWmd024 | EnamexWrkWmd025 | EnamexWrkWmd026
       | EnamexWrkWmd027 | EnamexWrkWmd028 | EnamexWrkWmd029 | EnamexWrkWmd030
       | EnamexWrkWmd031 | EnamexWrkWmd032 | EnamexWrkWmd033 | EnamexWrkWmd034
       | EnamexWrkWmd035 | EnamexWrkWao001 | EnamexWrkWao002 | EnamexWrkWao003
       | EnamexWrkWao004 | EnamexWrkWao005 | EnamexWrkWao006 | EnamexWrkWao007
       | EnamexWrkWao008 | EnamexWrkWao009 | EnamexWrkWao010 | Except006
       | EnamexWrkWaa003 | EnamexWrkWaa004 | EnamexWrkWaa005 | EnamexWrkWaa006
       | EnamexWrkWaa007 | EnamexWrkWaa008 | EnamexWrkWaa009 | EnamexWrkWaa010
       | EnamexWrkWaa011 | EnamexWrkWaa012 | EnamexWrkWaa013 | EnamexWrkWaa014
       | EnamexWrkWaa015 | EnamexWrkWaa016 | EnamexWrkWaa017 | EnamexWrkWaa018
       | EnamexWrkWaa019 | EnamexWrkWaa020 | EnamexWrkWaa021 | EnamexWrkWaa022
       | EnamexWrkWaa023 | EnamexWrkWaa024 | EnamexWrkWaa025 | EnamexWrkWaa026
       | EnamexWrkWaa027 | EnamexWrkWaa028 | EnamexWrkWaa029 | EnamexWrkWaa030
       | EnamexWrkWaa031 | EnamexWrkWaa032 | EnamexWrkWaa033 | EnamexWrkWaa034
       | EnamexWrkWaa035 | EnamexWrkWaa036 | EnamexWrkWaa037 | EnamexWrkWaa038
       | EnamexWrkWaa039 | EnamexWrkWaa040 | EnamexWrkWaa041 | EnamexWrkWaa042
       | EnamexWrkWaa043 | EnamexWrkWaa044 | EnamexWrkWaa045 | EnamexWrkWaa046
       | EnamexWrkWaa047 | EnamexWrkWaa048 | EnamexWrkWaa049 | EnamexWrkWaa050
       | EnamexWrkWaa051 | EnamexWrkWaa052 | EnamexWrkWaa053 | EnamexWrkWaa054
       | EnamexWrkWaa055 | EnamexWrkWaa056 | EnamexWrkWaa057 | EnamexWrkWaa058
       | EnamexWrkWaa059 | EnamexWrkWaa060 | EnamexWrkWaa061 | EnamexWrkWaa062
       | EnamexWrkWaa063 | EnamexWrkWaa064 | EnamexWrkWaa065 | EnamexWrkWaa066
       | EnamexWrkWaa067 | EnamexWrkWaa068 | EnamexWrkWaa069 | EnamexWrkWaa070
       | EnamexWrkWaa071 | EnamexWrkWaa072 | EnamexWrkWaa073 | EnamexWrkWaa074
       | EnamexWrkWaa075 | EnamexWrkWaa076 | EnamexWrkWaa077 | EnamexWrkWaa078
       | EnamexWrkWaa079 | EnamexWrkWaa080 | EnamexWrkWaa081 | EnamexWrkWaa082
       | EnamexWrkWaa083 | EnamexWrkWaa084 | EnamexWrkWaa085 | EnamexWrkWaa086
       | EnamexWrkWaa087 | EnamexWrkWaa088 | EnamexWrkWaa089 | EnamexWrkWaa090
       | EnamexWrkWaa091 | EnamexWrkWaa092 | EnamexWrkWaa093 | EnamexWrkWaa094
       | EnamexWrkWaa095 | EnamexWrkWaa096 | EnamexWrkWaa097 | EnamexWrkWaa098
       | EnamexWrkWaa099 | EnamexWrkWaa100 | EnamexWrkWaa101 | EnamexWrkWaa102
       | EnamexWrkWaa103 | EnamexWrkWaa104 | EnamexWrkWaa105 | EnamexWrkWaa106
       | EnamexWrkWaa107 | EnamexWrkWaa108 | EnamexWrkWaa109 | EnamexWrkWaa110
       | EnamexWrkWaa111 | EnamexWrkWaa112 | EnamexWrkWaa113 | EnamexWrkWaa114
       | EnamexWrkWaa115 | EnamexWrkWaa116 | EnamexWrkWaa117 | EnamexWrkWaa118
       | EnamexWrkWaa119 | EnamexWrkWaa120 | EnamexWrkWaa121 | EnamexWrkWaa122
       | EnamexWrkWaa123 | EnamexWrkWaa124 | EnamexWrkWaa125 | EnamexWrkWaa126
       | EnamexWrkWaa127 | EnamexWrkWaa128 | EnamexWrkWaa129 | EnamexWrkWaa130
       | EnamexWrkWaa131 | EnamexWrkWaa132 | EnamexWrkWaa133 | EnamexWrkWaa134
       | EnamexWrkWaa135 | EnamexWrkWaa136 | EnamexWrkWaa137 | EnamexWrkWaa138
       | EnamexWrkWaa139 | EnamexWrkWaa140 | EnamexWrkWaa141 | EnamexWrkWaa142
       | EnamexWrkWaa143 | EnamexWrkWaa144 | EnamexWrkWaa145
       LC(WordBoundary) ] ;
