@natlibfi/marc-record-validators-melinda 11.6.7 → 12.0.0-alpha.12

package/dist/cyrillux-usemarcon-replacement.js.map

@@ -1 +1,7 @@
-{"version":3,"file":"cyrillux-usemarcon-replacement.js","names":["_clone","_interopRequireDefault","require","_marcRecord","_fix33X","_addMissingField","_addMissingField2","_addMissingField3","_addMissingField4","_fixCountryCodes","_fixLanguageCodes","_fixRelatorTerms","_indicatorFixes","_punctuation","_normalizeQualifyingInformation","_sortSubfields","_utils","e","__esModule","default","description","dropTags","_default","fix","validate","record","nvdebug","realFix","res","message","valid","realFixNonAleph","isAlephRecord","leader","substring","fields","filter","f","includes","tag","removeSubfield","subfields","some","sf","code","value","fieldSpecificStuff","field","rest","undefined","removeOwnershipSubfield5","removeFromOldCatalog","translateFieldToFinnish","fixField040","fieldSpecificStuff2","removeSubfieldH","field100eKirjoittaja","fieldHasSubfield","isBK","sortAdjacentSubfields","field260To264s","field410To490And810","field440To490And830","realFixAll1","fixLeader","fixCountryCodes","fixLanguageCodes","recordRemoveValuelessSubfields","f028","forEach","add041","realFixAll2","fixQualifyingInformation","fixRelatorTerms","fix33X","add336","add337","add338","fixIndicators","fixPunctuation","originalString","recordToString","clonedRecord","MarcRecord","subfieldValues","modifiedString","f040","get","subfieldsBE","length","data","ind1","ind2","insertField","fixField040Subfields","push","match","removeFromOldCatalogFromSubfield","subfield","replace","filteredFields","remainingSubfields","field810","clone","field830","createCopyright264Field","getCopyrightYear","string","field260To264Normalization","field260To264Normalization2","createCopyright264Value","c","copyrightYear","copType","returnValue","year","translateSubfieldToFinnish","finnishTranslationsAndMappings","expandFinnishAbbreviations","expandSwedishAbbreviations","expandEnglishAbbreviations"],"sources":["../src/cyrillux-usemarcon-replacement.js"],"sourcesContent":["/*\n*  cyrillux-usemarcon-replacement.js -- implement and improve https://github.com/NatLibFi/USEMARCON-Cyrillux/tree/master\n*\n* Author(s): Nicholas Volk <nicholas.volk@helsinki.fi>\n*\n*/\n\nimport clone from 'clone';\nimport {MarcRecord} from '@natlibfi/marc-record';\nimport {default as fix33X} from './fix-33X';\nimport {default as add041} from './addMissingField041';\nimport {default as add336} from './addMissingField336';\nimport {default as add337} from './addMissingField337';\nimport {default as add338} from './addMissingField338';\nimport {default as fixCountryCodes} from './fix-country-codes';\nimport {default as fixLanguageCodes} from './fix-language-codes';\nimport {default as fixRelatorTerms} from './fixRelatorTerms';\nimport {default as fixIndicators} from './indicator-fixes';\nimport {default as fixPunctuation} from './punctuation2';\nimport {default as fixQualifyingInformation} from './normalize-qualifying-information';\nimport {sortAdjacentSubfields} from './sortSubfields';\n\n// import createDebugLogger from 'debug';\nimport {fieldHasSubfield, nvdebug, recordRemoveValuelessSubfields, recordToString, removeSubfield} from './utils';\n\n// const debug = createDebugLogger('@natlibfi/marc-record-validators-melinda/punctuation2');\n\nconst description = 'Replacement for Cyrillux usemarcon rules';\n\n// Extended original list with 541, 561, 562, 583, 584\n// 017, 044... et al are LL additions from 2019 (via USEMARCON-RDA)\nconst dropTags = ['001', '003', '010', '012', '014', '015', '016', '017', '019', '025', '029', '032', '035', '036', '037', '038', '042', '044', '049', '051', '061', '068', '071', '074', '079', '090', '091', '092', '094', '095', '096', '097', '099', '249', '261', '262', '350', '400', '411', '541', '561', '562', '574', '575', '577', '578', '583', '584', '589', '590', '591', '592', '593', '594', '595', '596', '597', '598', '599', '653', '698', '741', '742', '744', '751', '761', '790', '841', '842', '843', '844', '845', '850', '852', '853', '854', '855', '858', '859', '863', '864', '865', '866', '867', '868', '876', '877', '878', '882', '886', '887', '888', '890', '899'];\n\n\nexport default function () {\n  return {\n    description, fix, validate\n  };\n\n  function fix(record) {\n    nvdebug(`${description}: fix`);\n    realFix(record);\n    const res = {message: [], fix: [], valid: true};\n    return res;\n  }\n\n  function realFixNonAleph(record) {\n    if (isAlephRecord(record)) {\n      return;\n    }\n\n    // Update LDR/17 to '4'\n    record.leader = `${record.leader.substring(0, 17)}4${record.leader.substring(18, 24)}`;\n\n    // Remove unwanted fields:\n    record.fields = record.fields.filter(f => !dropTags.includes(f.tag));\n\n    removeSubfield(record, '020', 'c');\n\n    // Remove 084 fields that don't have $2 ykl (based on USEMARCON-RDA/bw_rda_kyril.rul code by LL 2019)\n    record.fields = record.fields.filter(f => f.tag !== '084' || f.subfields.some(sf => sf.code === '2' && sf.value === 'ykl'));\n\n    fieldSpecificStuff(record.fields);\n\n    function fieldSpecificStuff(fields) {\n      const [field, ...rest] = fields;\n\n      if (field === undefined) {\n        return;\n      }\n\n      removeOwnershipSubfield5(field);\n      removeFromOldCatalog(field); // Remove LoC phrase \"[from old catalog]\" from srings\n      translateFieldToFinnish(field);\n\n      return fieldSpecificStuff(rest);\n    }\n\n    fixField040(record); // All $b values are changed to 'mul'. As a side effect 33X$b=>$a mappings are in Finnish! Ok in this domain!\n\n    fieldSpecificStuff2(record.fields);\n\n    function fieldSpecificStuff2(fields) {\n      const [field, ...rest] = fields;\n\n      if (field === undefined) {\n        return;\n      }\n\n      removeSubfieldH(field); // NB! Do this only after 33X creation, as 245$h might be useful there!\n\n      field100eKirjoittaja(field);\n\n      function field100eKirjoittaja(f) { // LL 2019 USEMARCON-RDA rule\n        if (f.tag === '100' && !fieldHasSubfield(f, 'e') && record.isBK()) {\n          f.subfields = [{code: 'e', value: 'kirjoittaja.'}, ...f.subfields];\n          sortAdjacentSubfields(f);\n          // Punctuation will be done later on...\n          return;\n        }\n      }\n\n      field260To264s(field, record);\n\n      // NB! 300 (before or after 33X creation?)\n      field410To490And810(field, record);\n      field440To490And830(field, record);\n      // handle505(field); // not applying them usemarcon-cyrillux rules for field 505 as I can't understand their motivation.\n      return fieldSpecificStuff2(rest);\n    }\n\n  }\n\n  function realFixAll1(record) {\n    fixLeader(record); // Fix defaults, esp. LDR/18=i\n\n    fixCountryCodes().fix(record); // 008/15-17\n    fixLanguageCodes().fix(record); // 008/35-37 AND 041 (note that all relevant subfield codes are fixed, not just $a)\n\n    recordRemoveValuelessSubfields(record);\n\n    // Field 028: use $b$a, not $a$b:\n    const f028 = record.fields.filter(f => f.tag === '028');\n    f028.forEach(f => sortAdjacentSubfields(f)); // eslint-disable-line array-callback-return\n\n    add041().fix(record);\n\n  }\n\n  function realFixAll2(record) {\n    fixQualifyingInformation().fix(record); // 015, 020, 024 and 028\n\n    // Cyrillux specific code might change 040$b and thus affect these rules:\n    fixRelatorTerms().fix(record);\n    fix33X().fix(record); // 33X$a => 33X$a$b$2\n    add336().fix(record);\n    add337().fix(record);\n    add338().fix(record);\n\n    // The fixer below implements Cyrillux rules such as 245I1 | 245I1  | If (Exists(@100) Or Exists(@110) Or Exists(@111) Or Exists(@130)) Then '1' Else '0' and plenty of other good stuff:\n    fixIndicators().fix(record);\n\n    fixPunctuation().fix(record);\n  }\n\n  function realFix(record) {\n    realFixAll1(record);\n\n    realFixNonAleph(record);\n\n    realFixAll2(record);\n\n    const res = {message: [], fix: [], valid: true};\n    return res;\n  }\n\n  // Validation is currently done in subparts\n  function validate(record) {\n    nvdebug(`${description}: validate`);\n    const originalString = recordToString(record);\n    const clonedRecord = new MarcRecord(record, {subfieldValues: false});\n    realFix(clonedRecord);\n    const modifiedString = recordToString(clonedRecord);\n\n    if (originalString === modifiedString) {\n      return {message: [], valid: true};\n    }\n\n    return {message: ['Record changed'], valid: false}; // Less than descriptive but will do...\n\n  }\n}\n\nfunction fixField040(record) {\n  const f040 = record.get('040');\n\n  const subfieldsBE = [\n    {code: 'b', value: 'mul'},\n    {code: 'e', value: 'rda'}\n  ];\n\n  // Add 040 if there isn't one:\n  if (f040.length === 0) {\n    const data = {tag: '040', ind1: ' ', ind2: ' ', subfields: subfieldsBE};\n\n    record.insertField(data);\n    return;\n  }\n\n  f040.forEach(f => fixField040Subfields(f)); // eslint-disable-line array-callback-return\n\n  function fixField040Subfields(field) {\n    field.subfields = field.subfields.filter(sf => !['b', 'e'].includes(sf.code));\n    field.subfields.push(subfieldsBE[0]);\n    field.subfields.push(subfieldsBE[1]);\n    sortAdjacentSubfields(field); // put $b and $e to their proper places\n  }\n\n}\n\nexport function removeFromOldCatalog(field) {\n  if (!field.tag.match(/^(?:240|65[0135]|[1678](?:00|10|11|30))$/u)) {\n    return;\n  }\n  // See https://catalog.loc.gov/vwebv/ui/en_US/htdocs/help/faqs.html for motivation\n  field.subfields?.forEach(sf => removeFromOldCatalogFromSubfield(sf)); // eslint-disable-line array-callback-return\n\n  function removeFromOldCatalogFromSubfield(subfield) {\n    if (!subfield.value.includes('[from old catalog]')) {\n      return;\n    }\n    subfield.value = subfield.value.replace(/ *\\[from old catalog\\]/gui, '');\n  }\n}\n\nfunction removeSubfieldH(field) {\n  if (!field.subfields || !['245', '246', '247', '740', '760', '762', '765', '767', '770', '772', '773', '774', '775', '776', '777', '780', '785', '786', '787', '788'].includes(field.tag)) {\n    return;\n  }\n\n  const filteredFields = field.subfields.filter(sf => sf.code !== 'h');\n  if (filteredFields.length > 0) {\n    field.subfields = filteredFields;\n    return;\n  }\n\n}\n\nexport function removeOwnershipSubfield5(field) {\n  if (!field.subfields || field.subfields.length === 0) {\n    return;\n  }\n  const remainingSubfields = field.subfields.filter(sf => sf.code !== '5');\n  if (remainingSubfields.length === 0) { // sanity check/robustness\n    return;\n  }\n  field.subfields = remainingSubfields;\n}\n\nexport function fixLeader(record) {\n  record.leader = `${record.leader.substring(0, 9)}a22${record.leader.substring(12, 18)}i${record.leader.substring(19, 20)}4500`;\n}\n\nfunction field410To490And810(field, record) { // might be generic... if so, move to utils...\n  if (field.tag !== '410') {\n    return;\n  }\n\n  const field810 = clone(field);\n\n  field.tag = '490';\n  field.ind1 = '1';\n  field.ind2 = ' ';\n  sortAdjacentSubfields(field);\n  // 490: Fix punctuation elsewhere. (Note that the current support is lagging...)\n\n\n  field810.tag = '810';\n  field810.ind2 = ' ';\n  // 810: Fix punctuation elsewhere. (Note that the current support is lagging...)\n  record.insertField(field810);\n}\n\nfunction field440To490And830(field, record) { // might be generic... if so, move to utils...\n  if (field.tag !== '440') {\n    return;\n  }\n\n  const field830 = clone(field);\n\n  field.tag = '490';\n  field.ind1 = '1';\n  field.ind2 = ' ';\n  // 490: Fix punctuation elsewhere. (Note that the current support is lagging...)\n  field830.tag = '830';\n  // 830: Fix punctuation elsewhere. (Note that the current support is lagging...)\n  record.insertField(field830);\n}\n\nfunction isAlephRecord(record) {\n  // Records that are already in Aleph are not processed as aggressively as genuinely new ones:\n  return record.fields.some(field => ['CAT', 'LKR', 'LOW', 'SID'].includes(field.tag));\n}\n\nfunction field260To264s(field, record) { // might be generic... if so, move to utils...\n  // As per my quick reading of usemarcon-cyrillux\n  if (field.tag !== '260') {\n    return;\n  }\n\n  createCopyright264Field(field);\n\n  field.tag = '264';\n  field.ind1 = ' ';\n  field.ind2 = '1';\n\n  // NB! Usemarcon does not handle 260$e$f$g => 264$a$b$c, so I'm not botherin with it either... (However, we could check our merge reducer code...)\n\n  function getCopyrightYear(string) {\n    if (string.match(/^(?:\\[?[Ccp]|[^0-9]*(?:cop|©|℗))[^0-9]*(?:1[789][0-9][0-9]|20[0-2][0-9])[^0-9]*$/u)) {\n      return string.replace(/[^0-9]/ug, '');\n    }\n    return false;\n  }\n\n  field.subfields?.forEach(sf => field260To264Normalization(sf)); // eslint-disable-line array-callback-return\n\n  function field260To264Normalization(subfield) {\n    subfield.value = field260To264Normalization2(subfield);\n  }\n\n  function createCopyright264Value(field) {\n    // Extract/split copyright year to a separate field:\n    const [c] = field.subfields.filter(sf => sf.code === 'c');\n    if (!c) {\n      return undefined;\n    }\n    const copyrightYear = getCopyrightYear(c.value);\n    if (!copyrightYear) {\n      return undefined;\n    }\n    const copType = c.value.match(/(?:^\\[?p|℗)/u) ? '℗' : '©';\n    const returnValue = c.value.includes('[') ? `[${copType}${copyrightYear}]` : `${copType}${copyrightYear}`;\n    // Moidy the original value:\n    c.value = `[${copyrightYear}]`;\n    return returnValue;\n  }\n\n  function createCopyright264Field(field) {\n    const c = createCopyright264Value(field);\n    if (!c) {\n      return undefined;\n    }\n    const data = {'tag': '264', 'ind1': ' ', 'ind2': '4', 'subfields': [{'code': 'c', 'value': c}]};\n    record.insertField(data);\n  }\n\n  function field260To264Normalization2(subfield) {\n    if (subfield.code === 'a') {\n      return subfield.value.replace(/\\b[Ss]\\. ?l\\./u, 'Kustannuspaikka tuntematon');\n    }\n    if (subfield.code === 'b') {\n      return subfield.value.replace(/\\b[Ss]\\. ?n\\./u, 'kustantaja tuntematon');\n    }\n    if (subfield.code === 'c') {\n      const year = getCopyrightYear(subfield.value);\n      if (year) {\n        const c = subfield.value.match(/(?:^p|℗)/u) ? 'p' : 'c';\n        if (subfield.value.includes('[')) {\n          return `${c}[${year}]`;\n        }\n        return `${c}${year}`;\n      }\n      return subfield.value.replace(/\\b[Ss]\\. ?a\\./u, 'julkaisuaika tuntematon');\n    }\n    return subfield.value;\n  }\n\n\n}\n\n/*\nfunction handle505(field) {\n  if (field.tag !== '505') {\n    return;\n  }\n  // Don't know how/why usemarcon-cyrillux is so sure about ind1...\n  field.ind1 = '0';\n  // usemarcon-cyrillux drops irrelevant subfields, so we do the same. However, we have included some control subfields in the kept side:\n  const keptSubfields = field.subfields.filter(sf => ['a', 'g', 'r', 't', 'u', '6', '8', '9'].includes(sf.code));\n\n  if (keptSubfields.some(sf => ['a', 'g', 'r', 't', 'u'].includes(sf.code))) {\n    field.subfields = keptSubfields;\n    return;\n  }\n}\n*/\n\nfunction translateFieldToFinnish(field) {\n  if (!['020', '300'].includes(field.tag)) {\n    return;\n  }\n  field.subfields?.forEach(sf => translateSubfieldToFinnish(sf));  // eslint-disable-line array-callback-return\n\n  function translateSubfieldToFinnish(subfield) {\n    if (field.tag === '020' && ['a', 'q', 'z'].includes(subfield.code)) {\n      subfield.value = finnishTranslationsAndMappings(expandFinnishAbbreviations(expandSwedishAbbreviations(expandEnglishAbbreviations(subfield.value))));\n      return;\n    }\n    if (field.tag === '300') {\n      subfield.value = finnishTranslationsAndMappings(expandFinnishAbbreviations(expandSwedishAbbreviations(expandEnglishAbbreviations(subfield.value))));\n      return;\n    }\n  }\n}\n\nfunction expandEnglishAbbreviations(value) {\n  return value.replace(/\\bbk\\.\\b/gui, 'book').\n    replace(/chiefly col\\./ui, 'chiefly color').\n    replace(/col\\. ill\\./ui, 'color illustrations').\n    replace(/diagrs\\./ui, 'diagrams').\n    replace(/\\bhbk\\.\\b/gui, 'hardcover').replace(/\\bhbk\\b/gui, 'hardcover'). // expand to MTS-compliant form\n    replace(/\\b1 hr\\./gui, '1 hour').\n    replace(/\\bhr\\./gui, 'hours').\n    replace(/\\bill\\./gui, 'illustrated'). // or illustrations (or Swedish \"illustrerad\" or...)\n    replace(/\\billus\\./gui, 'illustrated'). // or illustrations\n    replace(/incl\\./gui, 'includes').\n    replace(/fold\\.? maps/gui, 'folded maps').\n    // replace(/\\bmin\\./gu, 'minutes').\n    // replace(/\\bmin\\b/gu, 'minutes').\n    replace(/\\bp\\.\\b/gui, 'pages').replace(/\\bp\\b/gu, 'pages').\n    replace(/\\bpbk\\.\\b/gui, 'paperback').replace(/\\bpbk\\b/gui, 'paperback'). // expand to MTS-compliant form\n    replace(/\\bpdf\\b/gui, 'PDF').\n    replace(/\\bports\\./gui, 'portraits').\n    replace('sd., col.', 'sound, color').\n    replace(/ *\\((?:chiefly col\\.|chiefly color|some col[s.])\\)/gui, '').\n    replace(/\\b1 hr\\./gui, '1 hour');\n}\n\nfunction expandFinnishAbbreviations(value) {\n  return value.replace(/\\bcn\\. /gu, 'noin ').\n    // replace(/\\bmin\\./gu, 'minuuttia').\n    // replace(/\\bmin\\b/gu, 'minuuttia').\n    replace(/\\bnid\\./gu, 'nidottu').replace(/\\bnid\\b/gui, 'nidottu').\n    replace(/\\bsid\\./gu, 'sidottu').replace(/\\bsid\\b/gui, 'sidottu').\n    replace(/\\bverkkojulk\\.\\b/gu, 'verkkojulkaisu').replace(/\\bverkkojulk\\b/gu, 'verkkojulkaisu').\n    replace(/^\\(([^)]+)\\)$/u, '$1');\n  // <- removal of brackets above could use a better location\n}\n\nfunction expandSwedishAbbreviations(value) {\n  return value.replace(/\\bca\\. /gu, 'circa ').\n    replace(/\\bhft\\./gui, 'häftad').replace(/\\bhft\\b/gui, 'häftad');\n  // replace(/\\bmin\\./gu, 'minuter').\n  // replace(/\\bmin\\b/gu, 'minuter');\n}\n\nfunction finnishTranslationsAndMappings(value) {\n  return value.replace('analog', 'analoginen').\n    replace('approximately', 'noin').\n    replace('audio discs', 'äänilevyä').\n    replace('black and white', 'mustavalkoinen').\n    replace(/\\bbilaga\\b/gui, 'liite').\n    replace(/\\bbilagor\\b/gui, 'liitettä').\n    // https://github.com/NatLibFi/USEMARCON-BOOKWHERE-RDA/blob/master/bw_rda_kyril.rul#L365\n    replace(/(\\b1\\]?) с\\./gui, '$1 sivu').\n    replace(/(\\d\\]?) с\\./gui, '$1 sivua').\n    replace(/(\\d) см/gui, '$1 cm').\n\n    replace(/\\bcharts\\b/gui, 'kaavioita').\n    replace('chiefly color illustrations', 'pääosin värikuvitettu').\n    replace('chiefly', 'pääosin').\n    replace(/\\bcirca\\b/gui, 'noin').\n    replace(/coil[- ]?bound/gui, 'kierreselkä').\n    replace('color illustrations', 'värikuvitus').\n    replace(/comb[- ]?bound/gui, 'kierreselkä').\n    replace(/\\bdigital\\b/gui, 'digitaalinen').\n    replace(/\\belectronic book\\b/gui, 'verkkoaineisto').\n    replace('(flera nummersviter)', '(useita numerointijaksoja)').\n    replace(/\\bfolded sheet\\b/gui, 'taitelehti').\n    replace(/\\bfärgillustratione[nr]\\b/gui, 'värikuvitus').\n    replace(/\\bhard(?:back|cover)\\b/gui, 'kovakantinen').\n    replace(/\\bhours\\b/gui, 'tuntia').\n    replace(/\\bi flera nummersviter/gui, 'useina numerointijaksoina').\n    replace('illustrated', 'kuvitettu').\n    replace(/illustrations?\\b/gui, 'kuvitettu'). // Based on usemacron-bookwhere (NB! usemarcon-cyrillux had kuvitus/kuvitettu)\n    replace(/\\binbunden\\b/gui, 'kovakantinen'). // swe\n    replace(/\\binsert\\b/gui, 'liite').\n    replace(/\\binserts\\b/gui, 'liitteitä').\n    replace(/\\bin various pagings/gui, 'useina numerointijaksoina').\n    replace('leaves of plates', 'kuvalehteä').\n    replace(/\\bljudskiva\\b/gui, 'äänilevy').\n    replace(/\\bljudskivor\\b/gui, 'äänilevyä').\n    replace(/\\bmap\\b/gui, 'kartta').\n    replace(/\\bmaps\\b/gui, 'karttoja'). // or karttaa?\n    replace('minutes', 'minuuttia').\n    replace('mjuka pärmar', 'pehmeäkantinen').\n    replace('online resource', 'verkkoaineisto').\n    replace('onlineresurs', 'verkkoaineisto').\n    replace('onumrerade', 'numeroimatonta').\n    replace('pages of plates', 'kuvalehteä').\n    replace(/\\bpages\\b/gui, 'sivua').\n    replace(/\\bpaperback\\b/gui, 'pehmeäkantinen'). // MTS alt\n    replace(/\\bSeiten\\b/gu, 'sivua').\n    replace(/\\bsoftcover\\b/gui, 'pehmeäkantinen'). // MTS pref\n    replace('sound, color', 'äänellinen, värillinen').\n    replace('sound cassettes', 'äänikasettia').replace('sound cassette', 'äänikasetti').\n    replace('sound discs', 'äänilevyä').replace(/sound disc\\b/gui, 'äänilevy').\n    replace(/(?:spiral[- ]?bound|spiralrygg)/gui, 'kierreselkä').\n    replace('svartvit', 'mustavalkoinen').\n    replace('unnumbered', 'numeroimatonta').\n    replace('(various pagings)', '(useita numerointijaksoja)').\n    replace(/\\bverkkojulkaisu\\b/gui, 'verkkoaineisto').\n    replace('videodiscs', 'videolevyä').\n    replace('videodisc', 'videolevy').\n    replace(/\\b1 hour\\b/gui, '1 tunti');\n\n}\n"],"mappings":";;;;;;;;;AAOA,IAAAA,MAAA,GAAAC,sBAAA,CAAAC,OAAA;AACA,IAAAC,WAAA,GAAAD,OAAA;AACA,IAAAE,OAAA,GAAAH,sBAAA,CAAAC,OAAA;AACA,IAAAG,gBAAA,GAAAJ,sBAAA,CAAAC,OAAA;AACA,IAAAI,iBAAA,GAAAL,sBAAA,CAAAC,OAAA;AACA,IAAAK,iBAAA,GAAAN,sBAAA,CAAAC,OAAA;AACA,IAAAM,iBAAA,GAAAP,sBAAA,CAAAC,OAAA;AACA,IAAAO,gBAAA,GAAAR,sBAAA,CAAAC,OAAA;AACA,IAAAQ,iBAAA,GAAAT,sBAAA,CAAAC,OAAA;AACA,IAAAS,gBAAA,GAAAV,sBAAA,CAAAC,OAAA;AACA,IAAAU,eAAA,GAAAX,sBAAA,CAAAC,OAAA;AACA,IAAAW,YAAA,GAAAZ,sBAAA,CAAAC,OAAA;AACA,IAAAY,+BAAA,GAAAb,sBAAA,CAAAC,OAAA;AACA,IAAAa,cAAA,GAAAb,OAAA;AAGA,IAAAc,MAAA,GAAAd,OAAA;AAAkH,SAAAD,uBAAAgB,CAAA,WAAAA,CAAA,IAAAA,CAAA,CAAAC,UAAA,GAAAD,CAAA,KAAAE,OAAA,EAAAF,CAAA;AAvBlH;AACA;AACA;AACA;AACA;AACA;;AAiBA;;AAGA;;AAEA,MAAMG,WAAW,GAAG,0CAA0C;;AAE9D;AACA;AACA,MAAMC,QAAQ,GAAG,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC;AAGppB,SAAAC,SAAA,EAAY;EACzB,OAAO;IACLF,WAAW;IAAEG,GAAG;IAAEC;EACpB,CAAC;EAED,SAASD,GAAGA,CAACE,MAAM,EAAE;IACnB,IAAAC,cAAO,EAAC,GAAGN,WAAW,OAAO,CAAC;IAC9BO,OAAO,CAACF,MAAM,CAAC;IACf,MAAMG,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEN,GAAG,EAAE,EAAE;MAAEO,KAAK,EAAE;IAAI,CAAC;IAC/C,OAAOF,GAAG;EACZ;EAEA,SAASG,eAAeA,CAACN,MAAM,EAAE;IAC/B,IAAIO,aAAa,CAACP,MAAM,CAAC,EAAE;MACzB;IACF;;IAEA;IACAA,MAAM,CAACQ,MAAM,GAAG,GAAGR,MAAM,CAACQ,MAAM,CAACC,SAAS,CAAC,CAAC,EAAE,EAAE,CAAC,IAAIT,MAAM,CAACQ,MAAM,CAACC,SAAS,CAAC,EAAE,EAAE,EAAE,CAAC,EAAE;;IAEtF;IACAT,MAAM,CAACU,MAAM,GAAGV,MAAM,CAACU,MAAM,CAACC,MAAM,CAACC,CAAC,IAAI,CAAChB,QAAQ,CAACiB,QAAQ,CAACD,CAAC,CAACE,GAAG,CAAC,CAAC;IAEpE,IAAAC,qBAAc,EAACf,MAAM,EAAE,KAAK,EAAE,GAAG,CAAC;;IAElC;IACAA,MAAM,CAACU,MAAM,GAAGV,MAAM,CAACU,MAAM,CAACC,MAAM,CAACC,CAAC,IAAIA,CAAC,CAACE,GAAG,KAAK,KAAK,IAAIF,CAAC,CAACI,SAAS,CAACC,IAAI,CAACC,EAAE,IAAIA,EAAE,CAACC,IAAI,KAAK,GAAG,IAAID,EAAE,CAACE,KAAK,KAAK,KAAK,CAAC,CAAC;IAE3HC,kBAAkB,CAACrB,MAAM,CAACU,MAAM,CAAC;IAEjC,SAASW,kBAAkBA,CAACX,MAAM,EAAE;MAClC,MAAM,CAACY,KAAK,EAAE,GAAGC,IAAI,CAAC,GAAGb,MAAM;MAE/B,IAAIY,KAAK,KAAKE,SAAS,EAAE;QACvB;MACF;MAEAC,wBAAwB,CAACH,KAAK,CAAC;MAC/BI,oBAAoB,CAACJ,KAAK,CAAC,CAAC,CAAC;MAC7BK,uBAAuB,CAACL,KAAK,CAAC;MAE9B,OAAOD,kBAAkB,CAACE,IAAI,CAAC;IACjC;IAEAK,WAAW,CAAC5B,MAAM,CAAC,CAAC,CAAC;;IAErB6B,mBAAmB,CAAC7B,MAAM,CAACU,MAAM,CAAC;IAElC,SAASmB,mBAAmBA,CAACnB,MAAM,EAAE;MACnC,MAAM,CAACY,KAAK,EAAE,GAAGC,IAAI,CAAC,GAAGb,MAAM;MAE/B,IAAIY,KAAK,KAAKE,SAAS,EAAE;QACvB;MACF;MAEAM,eAAe,CAACR,KAAK,CAAC,CAAC,CAAC;;MAExBS,oBAAoB,CAACT,KAAK,CAAC;MAE3B,SAASS,oBAAoBA,CAACnB,CAAC,EAAE;QAAE;QACjC,IAAIA,CAAC,CAACE,GAAG,KAAK,KAAK,IAAI,CAAC,IAAAkB,uBAAgB,EAACpB,CAAC,EAAE,GAAG,CAAC,IAAIZ,MAAM,CAACiC,IAAI,CAAC,CAAC,EAAE;UACjErB,CAAC,CAACI,SAAS,GAAG,CAAC;YAACG,IAAI,EAAE,GAAG;YAAEC,KAAK,EAAE;UAAc,CAAC,EAAE,GAAGR,CAAC,CAACI,SAAS,CAAC;UAClE,IAAAkB,oCAAqB,EAACtB,CAAC,CAAC;UACxB;UACA;QACF;MACF;MAEAuB,cAAc,CAACb,KAAK,EAAEtB,MAAM,CAAC;;MAE7B;MACAoC,mBAAmB,CAACd,KAAK,EAAEtB,MAAM,CAAC;MAClCqC,mBAAmB,CAACf,KAAK,EAAEtB,MAAM,CAAC;MAClC;MACA,OAAO6B,mBAAmB,CAACN,IAAI,CAAC;IAClC;EAEF;EAEA,SAASe,WAAWA,CAACtC,MAAM,EAAE;IAC3BuC,SAAS,CAACvC,MAAM,CAAC,CAAC,CAAC;;IAEnB,IAAAwC,wBAAe,EAAC,CAAC,CAAC1C,GAAG,CAACE,MAAM,CAAC,CAAC,CAAC;IAC/B,IAAAyC,yBAAgB,EAAC,CAAC,CAAC3C,GAAG,CAACE,MAAM,CAAC,CAAC,CAAC;;IAEhC,IAAA0C,qCAA8B,EAAC1C,MAAM,CAAC;;IAEtC;IACA,MAAM2C,IAAI,GAAG3C,MAAM,CAACU,MAAM,CAACC,MAAM,CAACC,CAAC,IAAIA,CAAC,CAACE,GAAG,KAAK,KAAK,CAAC;IACvD6B,IAAI,CAACC,OAAO,CAAChC,CAAC,IAAI,IAAAsB,oCAAqB,EAACtB,CAAC,CAAC,CAAC,CAAC,CAAC;;IAE7C,IAAAiC,wBAAM,EAAC,CAAC,CAAC/C,GAAG,CAACE,MAAM,CAAC;EAEtB;EAEA,SAAS8C,WAAWA,CAAC9C,MAAM,EAAE;IAC3B,IAAA+C,uCAAwB,EAAC,CAAC,CAACjD,GAAG,CAACE,MAAM,CAAC,CAAC,CAAC;;IAExC;IACA,IAAAgD,wBAAe,EAAC,CAAC,CAAClD,GAAG,CAACE,MAAM,CAAC;IAC7B,IAAAiD,eAAM,EAAC,CAAC,CAACnD,GAAG,CAACE,MAAM,CAAC,CAAC,CAAC;IACtB,IAAAkD,yBAAM,EAAC,CAAC,CAACpD,GAAG,CAACE,MAAM,CAAC;IACpB,IAAAmD,yBAAM,EAAC,CAAC,CAACrD,GAAG,CAACE,MAAM,CAAC;IACpB,IAAAoD,yBAAM,EAAC,CAAC,CAACtD,GAAG,CAACE,MAAM,CAAC;;IAEpB;IACA,IAAAqD,uBAAa,EAAC,CAAC,CAACvD,GAAG,CAACE,MAAM,CAAC;IAE3B,IAAAsD,oBAAc,EAAC,CAAC,CAACxD,GAAG,CAACE,MAAM,CAAC;EAC9B;EAEA,SAASE,OAAOA,CAACF,MAAM,EAAE;IACvBsC,WAAW,CAACtC,MAAM,CAAC;IAEnBM,eAAe,CAACN,MAAM,CAAC;IAEvB8C,WAAW,CAAC9C,MAAM,CAAC;IAEnB,MAAMG,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEN,GAAG,EAAE,EAAE;MAAEO,KAAK,EAAE;IAAI,CAAC;IAC/C,OAAOF,GAAG;EACZ;;EAEA;EACA,SAASJ,QAAQA,CAACC,MAAM,EAAE;IACxB,IAAAC,cAAO,EAAC,GAAGN,WAAW,YAAY,CAAC;IACnC,MAAM4D,cAAc,GAAG,IAAAC,qBAAc,EAACxD,MAAM,CAAC;IAC7C,MAAMyD,YAAY,GAAG,IAAIC,sBAAU,CAAC1D,MAAM,EAAE;MAAC2D,cAAc,EAAE;IAAK,CAAC,CAAC;IACpEzD,OAAO,CAACuD,YAAY,CAAC;IACrB,MAAMG,cAAc,GAAG,IAAAJ,qBAAc,EAACC,YAAY,CAAC;IAEnD,IAAIF,cAAc,KAAKK,cAAc,EAAE;MACrC,OAAO;QAACxD,OAAO,EAAE,EAAE;QAAEC,KAAK,EAAE;MAAI,CAAC;IACnC;IAEA,OAAO;MAACD,OAAO,EAAE,CAAC,gBAAgB,CAAC;MAAEC,KAAK,EAAE;IAAK,CAAC,CAAC,CAAC;EAEtD;AACF;AAEA,SAASuB,WAAWA,CAAC5B,MAAM,EAAE;EAC3B,MAAM6D,IAAI,GAAG7D,MAAM,CAAC8D,GAAG,CAAC,KAAK,CAAC;EAE9B,MAAMC,WAAW,GAAG,CAClB;IAAC5C,IAAI,EAAE,GAAG;IAAEC,KAAK,EAAE;EAAK,CAAC,EACzB;IAACD,IAAI,EAAE,GAAG;IAAEC,KAAK,EAAE;EAAK,CAAC,CAC1B;;EAED;EACA,IAAIyC,IAAI,CAACG,MAAM,KAAK,CAAC,EAAE;IACrB,MAAMC,IAAI,GAAG;MAACnD,GAAG,EAAE,KAAK;MAAEoD,IAAI,EAAE,GAAG;MAAEC,IAAI,EAAE,GAAG;MAAEnD,SAAS,EAAE+C;IAAW,CAAC;IAEvE/D,MAAM,CAACoE,WAAW,CAACH,IAAI,CAAC;IACxB;EACF;EAEAJ,IAAI,CAACjB,OAAO,CAAChC,CAAC,IAAIyD,oBAAoB,CAACzD,CAAC,CAAC,CAAC,CAAC,CAAC;;EAE5C,SAASyD,oBAAoBA,CAAC/C,KAAK,EAAE;IACnCA,KAAK,CAACN,SAAS,GAAGM,KAAK,CAACN,SAAS,CAACL,MAAM,CAACO,EAAE,IAAI,CAAC,CAAC,GAAG,EAAE,GAAG,CAAC,CAACL,QAAQ,CAACK,EAAE,CAACC,IAAI,CAAC,CAAC;IAC7EG,KAAK,CAACN,SAAS,CAACsD,IAAI,CAACP,WAAW,CAAC,CAAC,CAAC,CAAC;IACpCzC,KAAK,CAACN,SAAS,CAACsD,IAAI,CAACP,WAAW,CAAC,CAAC,CAAC,CAAC;IACpC,IAAA7B,oCAAqB,EAACZ,KAAK,CAAC,CAAC,CAAC;EAChC;AAEF;AAEO,SAASI,oBAAoBA,CAACJ,KAAK,EAAE;EAC1C,IAAI,CAACA,KAAK,CAACR,GAAG,CAACyD,KAAK,CAAC,2CAA2C,CAAC,EAAE;IACjE;EACF;EACA;EACAjD,KAAK,CAACN,SAAS,EAAE4B,OAAO,CAAC1B,EAAE,IAAIsD,gCAAgC,CAACtD,EAAE,CAAC,CAAC,CAAC,CAAC;;EAEtE,SAASsD,gCAAgCA,CAACC,QAAQ,EAAE;IAClD,IAAI,CAACA,QAAQ,CAACrD,KAAK,CAACP,QAAQ,CAAC,oBAAoB,CAAC,EAAE;MAClD;IACF;IACA4D,QAAQ,CAACrD,KAAK,GAAGqD,QAAQ,CAACrD,KAAK,CAACsD,OAAO,CAAC,2BAA2B,EAAE,EAAE,CAAC;EAC1E;AACF;AAEA,SAAS5C,eAAeA,CAACR,KAAK,EAAE;EAC9B,IAAI,CAACA,KAAK,CAACN,SAAS,IAAI,CAAC,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC,CAACH,QAAQ,CAACS,KAAK,CAACR,GAAG,CAAC,EAAE;IACzL;EACF;EAEA,MAAM6D,cAAc,GAAGrD,KAAK,CAACN,SAAS,CAACL,MAAM,CAACO,EAAE,IAAIA,EAAE,CAACC,IAAI,KAAK,GAAG,CAAC;EACpE,IAAIwD,cAAc,CAACX,MAAM,GAAG,CAAC,EAAE;IAC7B1C,KAAK,CAACN,SAAS,GAAG2D,cAAc;IAChC;EACF;AAEF;AAEO,SAASlD,wBAAwBA,CAACH,KAAK,EAAE;EAC9C,IAAI,CAACA,KAAK,CAACN,SAAS,IAAIM,KAAK,CAACN,SAAS,CAACgD,MAAM,KAAK,CAAC,EAAE;IACpD;EACF;EACA,MAAMY,kBAAkB,GAAGtD,KAAK,CAACN,SAAS,CAACL,MAAM,CAACO,EAAE,IAAIA,EAAE,CAACC,IAAI,KAAK,GAAG,CAAC;EACxE,IAAIyD,kBAAkB,CAACZ,MAAM,KAAK,CAAC,EAAE;IAAE;IACrC;EACF;EACA1C,KAAK,CAACN,SAAS,GAAG4D,kBAAkB;AACtC;AAEO,SAASrC,SAASA,CAACvC,MAAM,EAAE;EAChCA,MAAM,CAACQ,MAAM,GAAG,GAAGR,MAAM,CAACQ,MAAM,CAACC,SAAS,CAAC,CAAC,EAAE,CAAC,CAAC,MAAMT,MAAM,CAACQ,MAAM,CAACC,SAAS,CAAC,EAAE,EAAE,EAAE,CAAC,IAAIT,MAAM,CAACQ,MAAM,CAACC,SAAS,CAAC,EAAE,EAAE,EAAE,CAAC,MAAM;AAChI;AAEA,SAAS2B,mBAAmBA,CAACd,KAAK,EAAEtB,MAAM,EAAE;EAAE;EAC5C,IAAIsB,KAAK,CAACR,GAAG,KAAK,KAAK,EAAE;IACvB;EACF;EAEA,MAAM+D,QAAQ,GAAG,IAAAC,cAAK,EAACxD,KAAK,CAAC;EAE7BA,KAAK,CAACR,GAAG,GAAG,KAAK;EACjBQ,KAAK,CAAC4C,IAAI,GAAG,GAAG;EAChB5C,KAAK,CAAC6C,IAAI,GAAG,GAAG;EAChB,IAAAjC,oCAAqB,EAACZ,KAAK,CAAC;EAC5B;;EAGAuD,QAAQ,CAAC/D,GAAG,GAAG,KAAK;EACpB+D,QAAQ,CAACV,IAAI,GAAG,GAAG;EACnB;EACAnE,MAAM,CAACoE,WAAW,CAACS,QAAQ,CAAC;AAC9B;AAEA,SAASxC,mBAAmBA,CAACf,KAAK,EAAEtB,MAAM,EAAE;EAAE;EAC5C,IAAIsB,KAAK,CAACR,GAAG,KAAK,KAAK,EAAE;IACvB;EACF;EAEA,MAAMiE,QAAQ,GAAG,IAAAD,cAAK,EAACxD,KAAK,CAAC;EAE7BA,KAAK,CAACR,GAAG,GAAG,KAAK;EACjBQ,KAAK,CAAC4C,IAAI,GAAG,GAAG;EAChB5C,KAAK,CAAC6C,IAAI,GAAG,GAAG;EAChB;EACAY,QAAQ,CAACjE,GAAG,GAAG,KAAK;EACpB;EACAd,MAAM,CAACoE,WAAW,CAACW,QAAQ,CAAC;AAC9B;AAEA,SAASxE,aAAaA,CAACP,MAAM,EAAE;EAC7B;EACA,OAAOA,MAAM,CAACU,MAAM,CAACO,IAAI,CAACK,KAAK,IAAI,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC,CAACT,QAAQ,CAACS,KAAK,CAACR,GAAG,CAAC,CAAC;AACtF;AAEA,SAASqB,cAAcA,CAACb,KAAK,EAAEtB,MAAM,EAAE;EAAE;EACvC;EACA,IAAIsB,KAAK,CAACR,GAAG,KAAK,KAAK,EAAE;IACvB;EACF;EAEAkE,uBAAuB,CAAC1D,KAAK,CAAC;EAE9BA,KAAK,CAACR,GAAG,GAAG,KAAK;EACjBQ,KAAK,CAAC4C,IAAI,GAAG,GAAG;EAChB5C,KAAK,CAAC6C,IAAI,GAAG,GAAG;;EAEhB;;EAEA,SAASc,gBAAgBA,CAACC,MAAM,EAAE;IAChC,IAAIA,MAAM,CAACX,KAAK,CAAC,mFAAmF,CAAC,EAAE;MACrG,OAAOW,MAAM,CAACR,OAAO,CAAC,UAAU,EAAE,EAAE,CAAC;IACvC;IACA,OAAO,KAAK;EACd;EAEApD,KAAK,CAACN,SAAS,EAAE4B,OAAO,CAAC1B,EAAE,IAAIiE,0BAA0B,CAACjE,EAAE,CAAC,CAAC,CAAC,CAAC;;EAEhE,SAASiE,0BAA0BA,CAACV,QAAQ,EAAE;IAC5CA,QAAQ,CAACrD,KAAK,GAAGgE,2BAA2B,CAACX,QAAQ,CAAC;EACxD;EAEA,SAASY,uBAAuBA,CAAC/D,KAAK,EAAE;IACtC;IACA,MAAM,CAACgE,CAAC,CAAC,GAAGhE,KAAK,CAACN,SAAS,CAACL,MAAM,CAACO,EAAE,IAAIA,EAAE,CAACC,IAAI,KAAK,GAAG,CAAC;IACzD,IAAI,CAACmE,CAAC,EAAE;MACN,OAAO9D,SAAS;IAClB;IACA,MAAM+D,aAAa,GAAGN,gBAAgB,CAACK,CAAC,CAAClE,KAAK,CAAC;IAC/C,IAAI,CAACmE,aAAa,EAAE;MAClB,OAAO/D,SAAS;IAClB;IACA,MAAMgE,OAAO,GAAGF,CAAC,CAAClE,KAAK,CAACmD,KAAK,CAAC,cAAc,CAAC,GAAG,GAAG,GAAG,GAAG;IACzD,MAAMkB,WAAW,GAAGH,CAAC,CAAClE,KAAK,CAACP,QAAQ,CAAC,GAAG,CAAC,GAAG,IAAI2E,OAAO,GAAGD,aAAa,GAAG,GAAG,GAAGC,OAAO,GAAGD,aAAa,EAAE;IACzG;IACAD,CAAC,CAAClE,KAAK,GAAG,IAAImE,aAAa,GAAG;IAC9B,OAAOE,WAAW;EACpB;EAEA,SAAST,uBAAuBA,CAAC1D,KAAK,EAAE;IACtC,MAAMgE,CAAC,GAAGD,uBAAuB,CAAC/D,KAAK,CAAC;IACxC,IAAI,CAACgE,CAAC,EAAE;MACN,OAAO9D,SAAS;IAClB;IACA,MAAMyC,IAAI,GAAG;MAAC,KAAK,EAAE,KAAK;MAAE,MAAM,EAAE,GAAG;MAAE,MAAM,EAAE,GAAG;MAAE,WAAW,EAAE,CAAC;QAAC,MAAM,EAAE,GAAG;QAAE,OAAO,EAAEqB;MAAC,CAAC;IAAC,CAAC;IAC/FtF,MAAM,CAACoE,WAAW,CAACH,IAAI,CAAC;EAC1B;EAEA,SAASmB,2BAA2BA,CAACX,QAAQ,EAAE;IAC7C,IAAIA,QAAQ,CAACtD,IAAI,KAAK,GAAG,EAAE;MACzB,OAAOsD,QAAQ,CAACrD,KAAK,CAACsD,OAAO,CAAC,gBAAgB,EAAE,4BAA4B,CAAC;IAC/E;IACA,IAAID,QAAQ,CAACtD,IAAI,KAAK,GAAG,EAAE;MACzB,OAAOsD,QAAQ,CAACrD,KAAK,CAACsD,OAAO,CAAC,gBAAgB,EAAE,uBAAuB,CAAC;IAC1E;IACA,IAAID,QAAQ,CAACtD,IAAI,KAAK,GAAG,EAAE;MACzB,MAAMuE,IAAI,GAAGT,gBAAgB,CAACR,QAAQ,CAACrD,KAAK,CAAC;MAC7C,IAAIsE,IAAI,EAAE;QACR,MAAMJ,CAAC,GAAGb,QAAQ,CAACrD,KAAK,CAACmD,KAAK,CAAC,WAAW,CAAC,GAAG,GAAG,GAAG,GAAG;QACvD,IAAIE,QAAQ,CAACrD,KAAK,CAACP,QAAQ,CAAC,GAAG,CAAC,EAAE;UAChC,OAAO,GAAGyE,CAAC,IAAII,IAAI,GAAG;QACxB;QACA,OAAO,GAAGJ,CAAC,GAAGI,IAAI,EAAE;MACtB;MACA,OAAOjB,QAAQ,CAACrD,KAAK,CAACsD,OAAO,CAAC,gBAAgB,EAAE,yBAAyB,CAAC;IAC5E;IACA,OAAOD,QAAQ,CAACrD,KAAK;EACvB;AAGF;;AAEA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;;AAEA,SAASO,uBAAuBA,CAACL,KAAK,EAAE;EACtC,IAAI,CAAC,CAAC,KAAK,EAAE,KAAK,CAAC,CAACT,QAAQ,CAACS,KAAK,CAACR,GAAG,CAAC,EAAE;IACvC;EACF;EACAQ,KAAK,CAACN,SAAS,EAAE4B,OAAO,CAAC1B,EAAE,IAAIyE,0BAA0B,CAACzE,EAAE,CAAC,CAAC,CAAC,CAAE;;EAEjE,SAASyE,0BAA0BA,CAAClB,QAAQ,EAAE;IAC5C,IAAInD,KAAK,CAACR,GAAG,KAAK,KAAK,IAAI,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAACD,QAAQ,CAAC4D,QAAQ,CAACtD,IAAI,CAAC,EAAE;MAClEsD,QAAQ,CAACrD,KAAK,GAAGwE,8BAA8B,CAACC,0BAA0B,CAACC,0BAA0B,CAACC,0BAA0B,CAACtB,QAAQ,CAACrD,KAAK,CAAC,CAAC,CAAC,CAAC;MACnJ;IACF;IACA,IAAIE,KAAK,CAACR,GAAG,KAAK,KAAK,EAAE;MACvB2D,QAAQ,CAACrD,KAAK,GAAGwE,8BAA8B,CAACC,0BAA0B,CAACC,0BAA0B,CAACC,0BAA0B,CAACtB,QAAQ,CAACrD,KAAK,CAAC,CAAC,CAAC,CAAC;MACnJ;IACF;EACF;AACF;AAEA,SAAS2E,0BAA0BA,CAAC3E,KAAK,EAAE;EACzC,OAAOA,KAAK,CAACsD,OAAO,CAAC,aAAa,EAAE,MAAM,CAAC,CACzCA,OAAO,CAAC,iBAAiB,EAAE,eAAe,CAAC,CAC3CA,OAAO,CAAC,eAAe,EAAE,qBAAqB,CAAC,CAC/CA,OAAO,CAAC,YAAY,EAAE,UAAU,CAAC,CACjCA,OAAO,CAAC,cAAc,EAAE,WAAW,CAAC,CAACA,OAAO,CAAC,YAAY,EAAE,WAAW,CAAC;EAAE;EACzEA,OAAO,CAAC,aAAa,EAAE,QAAQ,CAAC,CAChCA,OAAO,CAAC,WAAW,EAAE,OAAO,CAAC,CAC7BA,OAAO,CAAC,YAAY,EAAE,aAAa,CAAC;EAAE;EACtCA,OAAO,CAAC,cAAc,EAAE,aAAa,CAAC;EAAE;EACxCA,OAAO,CAAC,WAAW,EAAE,UAAU,CAAC,CAChCA,OAAO,CAAC,iBAAiB,EAAE,aAAa,CAAC;EACzC;EACA;EACAA,OAAO,CAAC,YAAY,EAAE,OAAO,CAAC,CAACA,OAAO,CAAC,SAAS,EAAE,OAAO,CAAC,CAC1DA,OAAO,CAAC,cAAc,EAAE,WAAW,CAAC,CAACA,OAAO,CAAC,YAAY,EAAE,WAAW,CAAC;EAAE;EACzEA,OAAO,CAAC,YAAY,EAAE,KAAK,CAAC,CAC5BA,OAAO,CAAC,cAAc,EAAE,WAAW,CAAC,CACpCA,OAAO,CAAC,WAAW,EAAE,cAAc,CAAC,CACpCA,OAAO,CAAC,uDAAuD,EAAE,EAAE,CAAC,CACpEA,OAAO,CAAC,aAAa,EAAE,QAAQ,CAAC;AACpC;AAEA,SAASmB,0BAA0BA,CAACzE,KAAK,EAAE;EACzC,OAAOA,KAAK,CAACsD,OAAO,CAAC,WAAW,EAAE,OAAO,CAAC;EACxC;EACA;EACAA,OAAO,CAAC,WAAW,EAAE,SAAS,CAAC,CAACA,OAAO,CAAC,YAAY,EAAE,SAAS,CAAC,CAChEA,OAAO,CAAC,WAAW,EAAE,SAAS,CAAC,CAACA,OAAO,CAAC,YAAY,EAAE,SAAS,CAAC,CAChEA,OAAO,CAAC,oBAAoB,EAAE,gBAAgB,CAAC,CAACA,OAAO,CAAC,kBAAkB,EAAE,gBAAgB,CAAC,CAC7FA,OAAO,CAAC,gBAAgB,EAAE,IAAI,CAAC;EACjC;AACF;AAEA,SAASoB,0BAA0BA,CAAC1E,KAAK,EAAE;EACzC,OAAOA,KAAK,CAACsD,OAAO,CAAC,WAAW,EAAE,QAAQ,CAAC,CACzCA,OAAO,CAAC,YAAY,EAAE,QAAQ,CAAC,CAACA,OAAO,CAAC,YAAY,EAAE,QAAQ,CAAC;EACjE;EACA;AACF;AAEA,SAASkB,8BAA8BA,CAACxE,KAAK,EAAE;EAC7C,OAAOA,KAAK,CAACsD,OAAO,CAAC,QAAQ,EAAE,YAAY,CAAC,CAC1CA,OAAO,CAAC,eAAe,EAAE,MAAM,CAAC,CAChCA,OAAO,CAAC,aAAa,EAAE,WAAW,CAAC,CACnCA,OAAO,CAAC,iBAAiB,EAAE,gBAAgB,CAAC,CAC5CA,OAAO,CAAC,eAAe,EAAE,OAAO,CAAC,CACjCA,OAAO,CAAC,gBAAgB,EAAE,UAAU,CAAC;EACrC;EACAA,OAAO,CAAC,iBAAiB,EAAE,SAAS,CAAC,CACrCA,OAAO,CAAC,gBAAgB,EAAE,UAAU,CAAC,CACrCA,OAAO,CAAC,YAAY,EAAE,OAAO,CAAC,CAE9BA,OAAO,CAAC,eAAe,EAAE,WAAW,CAAC,CACrCA,OAAO,CAAC,6BAA6B,EAAE,uBAAuB,CAAC,CAC/DA,OAAO,CAAC,SAAS,EAAE,SAAS,CAAC,CAC7BA,OAAO,CAAC,cAAc,EAAE,MAAM,CAAC,CAC/BA,OAAO,CAAC,mBAAmB,EAAE,aAAa,CAAC,CAC3CA,OAAO,CAAC,qBAAqB,EAAE,aAAa,CAAC,CAC7CA,OAAO,CAAC,mBAAmB,EAAE,aAAa,CAAC,CAC3CA,OAAO,CAAC,gBAAgB,EAAE,cAAc,CAAC,CACzCA,OAAO,CAAC,wBAAwB,EAAE,gBAAgB,CAAC,CACnDA,OAAO,CAAC,sBAAsB,EAAE,4BAA4B,CAAC,CAC7DA,OAAO,CAAC,qBAAqB,EAAE,YAAY,CAAC,CAC5CA,OAAO,CAAC,8BAA8B,EAAE,aAAa,CAAC,CACtDA,OAAO,CAAC,2BAA2B,EAAE,cAAc,CAAC,CACpDA,OAAO,CAAC,cAAc,EAAE,QAAQ,CAAC,CACjCA,OAAO,CAAC,2BAA2B,EAAE,2BAA2B,CAAC,CACjEA,OAAO,CAAC,aAAa,EAAE,WAAW,CAAC,CACnCA,OAAO,CAAC,qBAAqB,EAAE,WAAW,CAAC;EAAE;EAC7CA,OAAO,CAAC,iBAAiB,EAAE,cAAc,CAAC;EAAE;EAC5CA,OAAO,CAAC,eAAe,EAAE,OAAO,CAAC,CACjCA,OAAO,CAAC,gBAAgB,EAAE,WAAW,CAAC,CACtCA,OAAO,CAAC,yBAAyB,EAAE,2BAA2B,CAAC,CAC/DA,OAAO,CAAC,kBAAkB,EAAE,YAAY,CAAC,CACzCA,OAAO,CAAC,kBAAkB,EAAE,UAAU,CAAC,CACvCA,OAAO,CAAC,mBAAmB,EAAE,WAAW,CAAC,CACzCA,OAAO,CAAC,YAAY,EAAE,QAAQ,CAAC,CAC/BA,OAAO,CAAC,aAAa,EAAE,UAAU,CAAC;EAAE;EACpCA,OAAO,CAAC,SAAS,EAAE,WAAW,CAAC,CAC/BA,OAAO,CAAC,cAAc,EAAE,gBAAgB,CAAC,CACzCA,OAAO,CAAC,iBAAiB,EAAE,gBAAgB,CAAC,CAC5CA,OAAO,CAAC,cAAc,EAAE,gBAAgB,CAAC,CACzCA,OAAO,CAAC,YAAY,EAAE,gBAAgB,CAAC,CACvCA,OAAO,CAAC,iBAAiB,EAAE,YAAY,CAAC,CACxCA,OAAO,CAAC,cAAc,EAAE,OAAO,CAAC,CAChCA,OAAO,CAAC,kBAAkB,EAAE,gBAAgB,CAAC;EAAE;EAC/CA,OAAO,CAAC,cAAc,EAAE,OAAO,CAAC,CAChCA,OAAO,CAAC,kBAAkB,EAAE,gBAAgB,CAAC;EAAE;EAC/CA,OAAO,CAAC,cAAc,EAAE,wBAAwB,CAAC,CACjDA,OAAO,CAAC,iBAAiB,EAAE,cAAc,CAAC,CAACA,OAAO,CAAC,gBAAgB,EAAE,aAAa,CAAC,CACnFA,OAAO,CAAC,aAAa,EAAE,WAAW,CAAC,CAACA,OAAO,CAAC,iBAAiB,EAAE,UAAU,CAAC,CAC1EA,OAAO,CAAC,oCAAoC,EAAE,aAAa,CAAC,CAC5DA,OAAO,CAAC,UAAU,EAAE,gBAAgB,CAAC,CACrCA,OAAO,CAAC,YAAY,EAAE,gBAAgB,CAAC,CACvCA,OAAO,CAAC,mBAAmB,EAAE,4BAA4B,CAAC,CAC1DA,OAAO,CAAC,uBAAuB,EAAE,gBAAgB,CAAC,CAClDA,OAAO,CAAC,YAAY,EAAE,YAAY,CAAC,CACnCA,OAAO,CAAC,WAAW,EAAE,WAAW,CAAC,CACjCA,OAAO,CAAC,eAAe,EAAE,SAAS,CAAC;AAEvC","ignoreList":[]}
+{
+  "version": 3,
+  "sources": ["../src/cyrillux-usemarcon-replacement.js"],
+  "sourcesContent": ["/*\n*  cyrillux-usemarcon-replacement.js -- implement and improve https://github.com/NatLibFi/USEMARCON-Cyrillux/tree/master\n*\n* Author(s): Nicholas Volk <nicholas.volk@helsinki.fi>\n*\n*/\n\nimport clone from 'clone';\nimport {MarcRecord} from '@natlibfi/marc-record';\nimport {default as fix33X} from './fix-33X.js';\nimport {default as add041} from './addMissingField041.js';\nimport {default as add336} from './addMissingField336.js';\nimport {default as add337} from './addMissingField337.js';\nimport {default as add338} from './addMissingField338.js';\nimport {default as fixCountryCodes} from './fix-country-codes.js';\nimport {default as fixLanguageCodes} from './fix-language-codes.js';\nimport {default as fixRelatorTerms} from './fixRelatorTerms.js';\nimport {default as fixIndicators} from './indicator-fixes.js';\nimport {default as fixPunctuation} from './punctuation2.js';\nimport {default as fixQualifyingInformation} from './normalize-qualifying-information.js';\nimport {sortAdjacentSubfields} from './sortSubfields.js';\n\n// import createDebugLogger from 'debug';\nimport {fieldHasSubfield, nvdebug, recordRemoveValuelessSubfields, recordToString, removeSubfield} from './utils.js';\n\n// const debug = createDebugLogger('@natlibfi/marc-record-validators-melinda/punctuation2');\n\nconst description = 'Replacement for Cyrillux usemarcon rules';\n\n// Extended original list with 541, 561, 562, 583, 584\n// 017, 044... et al are LL additions from 2019 (via USEMARCON-RDA)\nconst dropTags = ['001', '003', '010', '012', '014', '015', '016', '017', '019', '025', '029', '032', '035', '036', '037', '038', '042', '044', '049', '051', '061', '068', '071', '074', '079', '090', '091', '092', '094', '095', '096', '097', '099', '249', '261', '262', '350', '400', '411', '541', '561', '562', '574', '575', '577', '578', '583', '584', '589', '590', '591', '592', '593', '594', '595', '596', '597', '598', '599', '653', '698', '741', '742', '744', '751', '761', '790', '841', '842', '843', '844', '845', '850', '852', '853', '854', '855', '858', '859', '863', '864', '865', '866', '867', '868', '876', '877', '878', '882', '886', '887', '888', '890', '899'];\n\n\nexport default function () {\n  return {\n    description, fix, validate\n  };\n\n  function fix(record) {\n    nvdebug(`${description}: fix`);\n    realFix(record);\n    const res = {message: [], fix: [], valid: true};\n    return res;\n  }\n\n  function realFixNonAleph(record) {\n    if (isAlephRecord(record)) {\n      return;\n    }\n\n    // Update LDR/17 to '4'\n    record.leader = `${record.leader.substring(0, 17)}4${record.leader.substring(18, 24)}`;\n\n    // Remove unwanted fields:\n    record.fields = record.fields.filter(f => !dropTags.includes(f.tag));\n\n    removeSubfield(record, '020', 'c');\n\n    // Remove 084 fields that don't have $2 ykl (based on USEMARCON-RDA/bw_rda_kyril.rul code by LL 2019)\n    record.fields = record.fields.filter(f => f.tag !== '084' || f.subfields.some(sf => sf.code === '2' && sf.value === 'ykl'));\n\n    fieldSpecificStuff(record.fields);\n\n    function fieldSpecificStuff(fields) {\n      const [field, ...rest] = fields;\n\n      if (field === undefined) {\n        return;\n      }\n\n      removeOwnershipSubfield5(field);\n      removeFromOldCatalog(field); // Remove LoC phrase \"[from old catalog]\" from srings\n      translateFieldToFinnish(field);\n\n      return fieldSpecificStuff(rest);\n    }\n\n    fixField040(record); // All $b values are changed to 'mul'. As a side effect 33X$b=>$a mappings are in Finnish! Ok in this domain!\n\n    fieldSpecificStuff2(record.fields);\n\n    function fieldSpecificStuff2(fields) {\n      const [field, ...rest] = fields;\n\n      if (field === undefined) {\n        return;\n      }\n\n      removeSubfieldH(field); // NB! Do this only after 33X creation, as 245$h might be useful there!\n\n      field100eKirjoittaja(field);\n\n      function field100eKirjoittaja(f) { // LL 2019 USEMARCON-RDA rule\n        if (f.tag === '100' && !fieldHasSubfield(f, 'e') && record.isBK()) {\n          f.subfields = [{code: 'e', value: 'kirjoittaja.'}, ...f.subfields];\n          sortAdjacentSubfields(f);\n          // Punctuation will be done later on...\n          return;\n        }\n      }\n\n      field260To264s(field, record);\n\n      // NB! 300 (before or after 33X creation?)\n      field410To490And810(field, record);\n      field440To490And830(field, record);\n      // handle505(field); // not applying them usemarcon-cyrillux rules for field 505 as I can't understand their motivation.\n      return fieldSpecificStuff2(rest);\n    }\n\n  }\n\n  function realFixAll1(record) {\n    fixLeader(record); // Fix defaults, esp. LDR/18=i\n\n    fixCountryCodes().fix(record); // 008/15-17\n    fixLanguageCodes().fix(record); // 008/35-37 AND 041 (note that all relevant subfield codes are fixed, not just $a)\n\n    recordRemoveValuelessSubfields(record);\n\n    // Field 028: use $b$a, not $a$b:\n    const f028 = record.fields.filter(f => f.tag === '028');\n    f028.forEach(f => sortAdjacentSubfields(f));\n\n    add041().fix(record);\n\n  }\n\n  function realFixAll2(record) {\n    fixQualifyingInformation().fix(record); // 015, 020, 024 and 028\n\n    // Cyrillux specific code might change 040$b and thus affect these rules:\n    fixRelatorTerms().fix(record);\n    fix33X().fix(record); // 33X$a => 33X$a$b$2\n    add336().fix(record);\n    add337().fix(record);\n    add338().fix(record);\n\n    // The fixer below implements Cyrillux rules such as 245I1 | 245I1  | If (Exists(@100) Or Exists(@110) Or Exists(@111) Or Exists(@130)) Then '1' Else '0' and plenty of other good stuff:\n    fixIndicators().fix(record);\n\n    fixPunctuation().fix(record);\n  }\n\n  function realFix(record) {\n    realFixAll1(record);\n\n    realFixNonAleph(record);\n\n    realFixAll2(record);\n\n    const res = {message: [], fix: [], valid: true};\n    return res;\n  }\n\n  // Validation is currently done in subparts\n  function validate(record) {\n    nvdebug(`${description}: validate`);\n    const originalString = recordToString(record);\n    const clonedRecord = new MarcRecord(record, {subfieldValues: false});\n    realFix(clonedRecord);\n    const modifiedString = recordToString(clonedRecord);\n\n    if (originalString === modifiedString) {\n      return {message: [], valid: true};\n    }\n\n    return {message: ['Record changed'], valid: false}; // Less than descriptive but will do...\n\n  }\n}\n\nfunction fixField040(record) {\n  const f040 = record.get('040');\n\n  const subfieldsBE = [\n    {code: 'b', value: 'mul'},\n    {code: 'e', value: 'rda'}\n  ];\n\n  // Add 040 if there isn't one:\n  if (f040.length === 0) {\n    const data = {tag: '040', ind1: ' ', ind2: ' ', subfields: subfieldsBE};\n\n    record.insertField(data);\n    return;\n  }\n\n  f040.forEach(f => fixField040Subfields(f));\n\n  function fixField040Subfields(field) {\n    field.subfields = field.subfields.filter(sf => !['b', 'e'].includes(sf.code));\n    field.subfields.push(subfieldsBE[0]);\n    field.subfields.push(subfieldsBE[1]);\n    sortAdjacentSubfields(field); // put $b and $e to their proper places\n  }\n\n}\n\nexport function removeFromOldCatalog(field) {\n  if (!field.tag.match(/^(?:240|65[0135]|[1678](?:00|10|11|30))$/u)) {\n    return;\n  }\n  // See https://catalog.loc.gov/vwebv/ui/en_US/htdocs/help/faqs.html for motivation\n  field.subfields?.forEach(sf => removeFromOldCatalogFromSubfield(sf));\n\n  function removeFromOldCatalogFromSubfield(subfield) {\n    if (!subfield.value.includes('[from old catalog]')) {\n      return;\n    }\n    subfield.value = subfield.value.replace(/ *\\[from old catalog\\]/gui, '');\n  }\n}\n\nfunction removeSubfieldH(field) {\n  if (!field.subfields || !['245', '246', '247', '740', '760', '762', '765', '767', '770', '772', '773', '774', '775', '776', '777', '780', '785', '786', '787', '788'].includes(field.tag)) {\n    return;\n  }\n\n  const filteredFields = field.subfields.filter(sf => sf.code !== 'h');\n  if (filteredFields.length > 0) {\n    field.subfields = filteredFields;\n    return;\n  }\n\n}\n\nexport function removeOwnershipSubfield5(field) {\n  if (!field.subfields || field.subfields.length === 0) {\n    return;\n  }\n  const remainingSubfields = field.subfields.filter(sf => sf.code !== '5');\n  if (remainingSubfields.length === 0) { // sanity check/robustness\n    return;\n  }\n  field.subfields = remainingSubfields;\n}\n\nexport function fixLeader(record) {\n  record.leader = `${record.leader.substring(0, 9)}a22${record.leader.substring(12, 18)}i${record.leader.substring(19, 20)}4500`;\n}\n\nfunction field410To490And810(field, record) { // might be generic... if so, move to utils...\n  if (field.tag !== '410') {\n    return;\n  }\n\n  const field810 = clone(field);\n\n  field.tag = '490';\n  field.ind1 = '1';\n  field.ind2 = ' ';\n  sortAdjacentSubfields(field);\n  // 490: Fix punctuation elsewhere. (Note that the current support is lagging...)\n\n\n  field810.tag = '810';\n  field810.ind2 = ' ';\n  // 810: Fix punctuation elsewhere. (Note that the current support is lagging...)\n  record.insertField(field810);\n}\n\nfunction field440To490And830(field, record) { // might be generic... if so, move to utils...\n  if (field.tag !== '440') {\n    return;\n  }\n\n  const field830 = clone(field);\n\n  field.tag = '490';\n  field.ind1 = '1';\n  field.ind2 = ' ';\n  // 490: Fix punctuation elsewhere. (Note that the current support is lagging...)\n  field830.tag = '830';\n  // 830: Fix punctuation elsewhere. (Note that the current support is lagging...)\n  record.insertField(field830);\n}\n\nfunction isAlephRecord(record) {\n  // Records that are already in Aleph are not processed as aggressively as genuinely new ones:\n  return record.fields.some(field => ['CAT', 'LKR', 'LOW', 'SID'].includes(field.tag));\n}\n\nfunction field260To264s(field, record) { // might be generic... if so, move to utils...\n  // As per my quick reading of usemarcon-cyrillux\n  if (field.tag !== '260') {\n    return;\n  }\n\n  createCopyright264Field(field);\n\n  field.tag = '264';\n  field.ind1 = ' ';\n  field.ind2 = '1';\n\n  // NB! Usemarcon does not handle 260$e$f$g => 264$a$b$c, so I'm not botherin with it either... (However, we could check our merge reducer code...)\n\n  function getCopyrightYear(string) {\n    if (string.match(/^(?:\\[?[Ccp]|[^0-9]*(?:cop|\u00A9|\u2117))[^0-9]*(?:1[789][0-9][0-9]|20[0-2][0-9])[^0-9]*$/u)) {\n      return string.replace(/[^0-9]/ug, '');\n    }\n    return false;\n  }\n\n  field.subfields?.forEach(sf => field260To264Normalization(sf));\n\n  function field260To264Normalization(subfield) {\n    subfield.value = field260To264Normalization2(subfield);\n  }\n\n  function createCopyright264Value(field) {\n    // Extract/split copyright year to a separate field:\n    const [c] = field.subfields.filter(sf => sf.code === 'c');\n    if (!c) {\n      return undefined;\n    }\n    const copyrightYear = getCopyrightYear(c.value);\n    if (!copyrightYear) {\n      return undefined;\n    }\n    const copType = c.value.match(/(?:^\\[?p|\u2117)/u) ? '\u2117' : '\u00A9';\n    const returnValue = c.value.includes('[') ? `[${copType}${copyrightYear}]` : `${copType}${copyrightYear}`;\n    // Moidy the original value:\n    c.value = `[${copyrightYear}]`;\n    return returnValue;\n  }\n\n  function createCopyright264Field(field) {\n    const c = createCopyright264Value(field);\n    if (!c) {\n      return undefined;\n    }\n    const data = {'tag': '264', 'ind1': ' ', 'ind2': '4', 'subfields': [{'code': 'c', 'value': c}]};\n    record.insertField(data);\n  }\n\n  function field260To264Normalization2(subfield) {\n    if (subfield.code === 'a') {\n      return subfield.value.replace(/\\b[Ss]\\. ?l\\./u, 'Kustannuspaikka tuntematon');\n    }\n    if (subfield.code === 'b') {\n      return subfield.value.replace(/\\b[Ss]\\. ?n\\./u, 'kustantaja tuntematon');\n    }\n    if (subfield.code === 'c') {\n      const year = getCopyrightYear(subfield.value);\n      if (year) {\n        const c = subfield.value.match(/(?:^p|\u2117)/u) ? 'p' : 'c';\n        if (subfield.value.includes('[')) {\n          return `${c}[${year}]`;\n        }\n        return `${c}${year}`;\n      }\n      return subfield.value.replace(/\\b[Ss]\\. ?a\\./u, 'julkaisuaika tuntematon');\n    }\n    return subfield.value;\n  }\n\n\n}\n\n/*\nfunction handle505(field) {\n  if (field.tag !== '505') {\n    return;\n  }\n  // Don't know how/why usemarcon-cyrillux is so sure about ind1...\n  field.ind1 = '0';\n  // usemarcon-cyrillux drops irrelevant subfields, so we do the same. However, we have included some control subfields in the kept side:\n  const keptSubfields = field.subfields.filter(sf => ['a', 'g', 'r', 't', 'u', '6', '8', '9'].includes(sf.code));\n\n  if (keptSubfields.some(sf => ['a', 'g', 'r', 't', 'u'].includes(sf.code))) {\n    field.subfields = keptSubfields;\n    return;\n  }\n}\n*/\n\nfunction translateFieldToFinnish(field) {\n  if (!['020', '300'].includes(field.tag)) {\n    return;\n  }\n  field.subfields?.forEach(sf => translateSubfieldToFinnish(sf));\n\n  function translateSubfieldToFinnish(subfield) {\n    if (field.tag === '020' && ['a', 'q', 'z'].includes(subfield.code)) {\n      subfield.value = finnishTranslationsAndMappings(expandFinnishAbbreviations(expandSwedishAbbreviations(expandEnglishAbbreviations(subfield.value))));\n      return;\n    }\n    if (field.tag === '300') {\n      subfield.value = finnishTranslationsAndMappings(expandFinnishAbbreviations(expandSwedishAbbreviations(expandEnglishAbbreviations(subfield.value))));\n      return;\n    }\n  }\n}\n\nfunction expandEnglishAbbreviations(value) {\n  return value.replace(/\\bbk\\.\\b/gui, 'book').\n    replace(/chiefly col\\./ui, 'chiefly color').\n    replace(/col\\. ill\\./ui, 'color illustrations').\n    replace(/diagrs\\./ui, 'diagrams').\n    replace(/\\bhbk\\.\\b/gui, 'hardcover').replace(/\\bhbk\\b/gui, 'hardcover'). // expand to MTS-compliant form\n    replace(/\\b1 hr\\./gui, '1 hour').\n    replace(/\\bhr\\./gui, 'hours').\n    replace(/\\bill\\./gui, 'illustrated'). // or illustrations (or Swedish \"illustrerad\" or...)\n    replace(/\\billus\\./gui, 'illustrated'). // or illustrations\n    replace(/incl\\./gui, 'includes').\n    replace(/fold\\.? maps/gui, 'folded maps').\n    // replace(/\\bmin\\./gu, 'minutes').\n    // replace(/\\bmin\\b/gu, 'minutes').\n    replace(/\\bp\\.\\b/gui, 'pages').replace(/\\bp\\b/gu, 'pages').\n    replace(/\\bpbk\\.\\b/gui, 'paperback').replace(/\\bpbk\\b/gui, 'paperback'). // expand to MTS-compliant form\n    replace(/\\bpdf\\b/gui, 'PDF').\n    replace(/\\bports\\./gui, 'portraits').\n    replace('sd., col.', 'sound, color').\n    replace(/ *\\((?:chiefly col\\.|chiefly color|some col[s.])\\)/gui, '').\n    replace(/\\b1 hr\\./gui, '1 hour');\n}\n\nfunction expandFinnishAbbreviations(value) {\n  return value.replace(/\\bcn\\. /gu, 'noin ').\n    // replace(/\\bmin\\./gu, 'minuuttia').\n    // replace(/\\bmin\\b/gu, 'minuuttia').\n    replace(/\\bnid\\./gu, 'nidottu').replace(/\\bnid\\b/gui, 'nidottu').\n    replace(/\\bsid\\./gu, 'sidottu').replace(/\\bsid\\b/gui, 'sidottu').\n    replace(/\\bverkkojulk\\.\\b/gu, 'verkkojulkaisu').replace(/\\bverkkojulk\\b/gu, 'verkkojulkaisu').\n    replace(/^\\(([^)]+)\\)$/u, '$1');\n  // <- removal of brackets above could use a better location\n}\n\nfunction expandSwedishAbbreviations(value) {\n  return value.replace(/\\bca\\. /gu, 'circa ').\n    replace(/\\bhft\\./gui, 'h\u00E4ftad').replace(/\\bhft\\b/gui, 'h\u00E4ftad');\n  // replace(/\\bmin\\./gu, 'minuter').\n  // replace(/\\bmin\\b/gu, 'minuter');\n}\n\nfunction finnishTranslationsAndMappings(value) {\n  return value.replace('analog', 'analoginen').\n    replace('approximately', 'noin').\n    replace('audio discs', '\u00E4\u00E4nilevy\u00E4').\n    replace('black and white', 'mustavalkoinen').\n    replace(/\\bbilaga\\b/gui, 'liite').\n    replace(/\\bbilagor\\b/gui, 'liitett\u00E4').\n    // https://github.com/NatLibFi/USEMARCON-BOOKWHERE-RDA/blob/master/bw_rda_kyril.rul#L365\n    replace(/(\\b1\\]?) \u0441\\./gui, '$1 sivu').\n    replace(/(\\d\\]?) \u0441\\./gui, '$1 sivua').\n    replace(/(\\d) \u0441\u043C/gui, '$1 cm').\n\n    replace(/\\bcharts\\b/gui, 'kaavioita').\n    replace('chiefly color illustrations', 'p\u00E4\u00E4osin v\u00E4rikuvitettu').\n    replace('chiefly', 'p\u00E4\u00E4osin').\n    replace(/\\bcirca\\b/gui, 'noin').\n    replace(/coil[- ]?bound/gui, 'kierreselk\u00E4').\n    replace('color illustrations', 'v\u00E4rikuvitus').\n    replace(/comb[- ]?bound/gui, 'kierreselk\u00E4').\n    replace(/\\bdigital\\b/gui, 'digitaalinen').\n    replace(/\\belectronic book\\b/gui, 'verkkoaineisto').\n    replace('(flera nummersviter)', '(useita numerointijaksoja)').\n    replace(/\\bfolded sheet\\b/gui, 'taitelehti').\n    replace(/\\bf\u00E4rgillustratione[nr]\\b/gui, 'v\u00E4rikuvitus').\n    replace(/\\bhard(?:back|cover)\\b/gui, 'kovakantinen').\n    replace(/\\bhours\\b/gui, 'tuntia').\n    replace(/\\bi flera nummersviter/gui, 'useina numerointijaksoina').\n    replace('illustrated', 'kuvitettu').\n    replace(/illustrations?\\b/gui, 'kuvitettu'). // Based on usemacron-bookwhere (NB! usemarcon-cyrillux had kuvitus/kuvitettu)\n    replace(/\\binbunden\\b/gui, 'kovakantinen'). // swe\n    replace(/\\binsert\\b/gui, 'liite').\n    replace(/\\binserts\\b/gui, 'liitteit\u00E4').\n    replace(/\\bin various pagings/gui, 'useina numerointijaksoina').\n    replace('leaves of plates', 'kuvalehte\u00E4').\n    replace(/\\bljudskiva\\b/gui, '\u00E4\u00E4nilevy').\n    replace(/\\bljudskivor\\b/gui, '\u00E4\u00E4nilevy\u00E4').\n    replace(/\\bmap\\b/gui, 'kartta').\n    replace(/\\bmaps\\b/gui, 'karttoja'). // or karttaa?\n    replace('minutes', 'minuuttia').\n    replace('mjuka p\u00E4rmar', 'pehme\u00E4kantinen').\n    replace('online resource', 'verkkoaineisto').\n    replace('onlineresurs', 'verkkoaineisto').\n    replace('onumrerade', 'numeroimatonta').\n    replace('pages of plates', 'kuvalehte\u00E4').\n    replace(/\\bpages\\b/gui, 'sivua').\n    replace(/\\bpaperback\\b/gui, 'pehme\u00E4kantinen'). // MTS alt\n    replace(/\\bSeiten\\b/gu, 'sivua').\n    replace(/\\bsoftcover\\b/gui, 'pehme\u00E4kantinen'). // MTS pref\n    replace('sound, color', '\u00E4\u00E4nellinen, v\u00E4rillinen').\n    replace('sound cassettes', '\u00E4\u00E4nikasettia').replace('sound cassette', '\u00E4\u00E4nikasetti').\n    replace('sound discs', '\u00E4\u00E4nilevy\u00E4').replace(/sound disc\\b/gui, '\u00E4\u00E4nilevy').\n    replace(/(?:spiral[- ]?bound|spiralrygg)/gui, 'kierreselk\u00E4').\n    replace('svartvit', 'mustavalkoinen').\n    replace('unnumbered', 'numeroimatonta').\n    replace('(various pagings)', '(useita numerointijaksoja)').\n    replace(/\\bverkkojulkaisu\\b/gui, 'verkkoaineisto').\n    replace('videodiscs', 'videolevy\u00E4').\n    replace('videodisc', 'videolevy').\n    replace(/\\b1 hour\\b/gui, '1 tunti');\n\n}\n"],
+  "mappings": "AAOA,OAAO,WAAW;AAClB,SAAQ,kBAAiB;AACzB,SAAQ,WAAW,cAAa;AAChC,SAAQ,WAAW,cAAa;AAChC,SAAQ,WAAW,cAAa;AAChC,SAAQ,WAAW,cAAa;AAChC,SAAQ,WAAW,cAAa;AAChC,SAAQ,WAAW,uBAAsB;AACzC,SAAQ,WAAW,wBAAuB;AAC1C,SAAQ,WAAW,uBAAsB;AACzC,SAAQ,WAAW,qBAAoB;AACvC,SAAQ,WAAW,sBAAqB;AACxC,SAAQ,WAAW,gCAA+B;AAClD,SAAQ,6BAA4B;AAGpC,SAAQ,kBAAkB,SAAS,gCAAgC,gBAAgB,sBAAqB;AAIxG,MAAM,cAAc;AAIpB,MAAM,WAAW,CAAC,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,KAAK;AAGlqB,0BAA2B;AACzB,SAAO;AAAA,IACL;AAAA,IAAa;AAAA,IAAK;AAAA,EACpB;AAEA,WAAS,IAAI,QAAQ;AACnB,YAAQ,GAAG,WAAW,OAAO;AAC7B,YAAQ,MAAM;AACd,UAAM,MAAM,EAAC,SAAS,CAAC,GAAG,KAAK,CAAC,GAAG,OAAO,KAAI;AAC9C,WAAO;AAAA,EACT;AAEA,WAAS,gBAAgB,QAAQ;AAC/B,QAAI,cAAc,MAAM,GAAG;AACzB;AAAA,IACF;AAGA,WAAO,SAAS,GAAG,OAAO,OAAO,UAAU,GAAG,EAAE,CAAC,IAAI,OAAO,OAAO,UAAU,IAAI,EAAE,CAAC;AAGpF,WAAO,SAAS,OAAO,OAAO,OAAO,OAAK,CAAC,SAAS,SAAS,EAAE,GAAG,CAAC;AAEnE,mBAAe,QAAQ,OAAO,GAAG;AAGjC,WAAO,SAAS,OAAO,OAAO,OAAO,OAAK,EAAE,QAAQ,SAAS,EAAE,UAAU,KAAK,QAAM,GAAG,SAAS,OAAO,GAAG,UAAU,KAAK,CAAC;AAE1H,uBAAmB,OAAO,MAAM;AAEhC,aAAS,mBAAmB,QAAQ;AAClC,YAAM,CAAC,OAAO,GAAG,IAAI,IAAI;AAEzB,UAAI,UAAU,QAAW;AACvB;AAAA,MACF;AAEA,+BAAyB,KAAK;AAC9B,2BAAqB,KAAK;AAC1B,8BAAwB,KAAK;AAE7B,aAAO,mBAAmB,IAAI;AAAA,IAChC;AAEA,gBAAY,MAAM;AAElB,wBAAoB,OAAO,MAAM;AAEjC,aAAS,oBAAoB,QAAQ;AACnC,YAAM,CAAC,OAAO,GAAG,IAAI,IAAI;AAEzB,UAAI,UAAU,QAAW;AACvB;AAAA,MACF;AAEA,sBAAgB,KAAK;AAErB,2BAAqB,KAAK;AAE1B,eAAS,qBAAqB,GAAG;AAC/B,YAAI,EAAE,QAAQ,SAAS,CAAC,iBAAiB,GAAG,GAAG,KAAK,OAAO,KAAK,GAAG;AACjE,YAAE,YAAY,CAAC,EAAC,MAAM,KAAK,OAAO,eAAc,GAAG,GAAG,EAAE,SAAS;AACjE,gCAAsB,CAAC;AAEvB;AAAA,QACF;AAAA,MACF;AAEA,qBAAe,OAAO,MAAM;AAG5B,0BAAoB,OAAO,MAAM;AACjC,0BAAoB,OAAO,MAAM;AAEjC,aAAO,oBAAoB,IAAI;AAAA,IACjC;AAAA,EAEF;AAEA,WAAS,YAAY,QAAQ;AAC3B,cAAU,MAAM;AAEhB,oBAAgB,EAAE,IAAI,MAAM;AAC5B,qBAAiB,EAAE,IAAI,MAAM;AAE7B,mCAA+B,MAAM;AAGrC,UAAM,OAAO,OAAO,OAAO,OAAO,OAAK,EAAE,QAAQ,KAAK;AACtD,SAAK,QAAQ,OAAK,sBAAsB,CAAC,CAAC;AAE1C,WAAO,EAAE,IAAI,MAAM;AAAA,EAErB;AAEA,WAAS,YAAY,QAAQ;AAC3B,6BAAyB,EAAE,IAAI,MAAM;AAGrC,oBAAgB,EAAE,IAAI,MAAM;AAC5B,WAAO,EAAE,IAAI,MAAM;AACnB,WAAO,EAAE,IAAI,MAAM;AACnB,WAAO,EAAE,IAAI,MAAM;AACnB,WAAO,EAAE,IAAI,MAAM;AAGnB,kBAAc,EAAE,IAAI,MAAM;AAE1B,mBAAe,EAAE,IAAI,MAAM;AAAA,EAC7B;AAEA,WAAS,QAAQ,QAAQ;AACvB,gBAAY,MAAM;AAElB,oBAAgB,MAAM;AAEtB,gBAAY,MAAM;AAElB,UAAM,MAAM,EAAC,SAAS,CAAC,GAAG,KAAK,CAAC,GAAG,OAAO,KAAI;AAC9C,WAAO;AAAA,EACT;AAGA,WAAS,SAAS,QAAQ;AACxB,YAAQ,GAAG,WAAW,YAAY;AAClC,UAAM,iBAAiB,eAAe,MAAM;AAC5C,UAAM,eAAe,IAAI,WAAW,QAAQ,EAAC,gBAAgB,MAAK,CAAC;AACnE,YAAQ,YAAY;AACpB,UAAM,iBAAiB,eAAe,YAAY;AAElD,QAAI,mBAAmB,gBAAgB;AACrC,aAAO,EAAC,SAAS,CAAC,GAAG,OAAO,KAAI;AAAA,IAClC;AAEA,WAAO,EAAC,SAAS,CAAC,gBAAgB,GAAG,OAAO,MAAK;AAAA,EAEnD;AACF;AAEA,SAAS,YAAY,QAAQ;AAC3B,QAAM,OAAO,OAAO,IAAI,KAAK;AAE7B,QAAM,cAAc;AAAA,IAClB,EAAC,MAAM,KAAK,OAAO,MAAK;AAAA,IACxB,EAAC,MAAM,KAAK,OAAO,MAAK;AAAA,EAC1B;AAGA,MAAI,KAAK,WAAW,GAAG;AACrB,UAAM,OAAO,EAAC,KAAK,OAAO,MAAM,KAAK,MAAM,KAAK,WAAW,YAAW;AAEtE,WAAO,YAAY,IAAI;AACvB;AAAA,EACF;AAEA,OAAK,QAAQ,OAAK,qBAAqB,CAAC,CAAC;AAEzC,WAAS,qBAAqB,OAAO;AACnC,UAAM,YAAY,MAAM,UAAU,OAAO,QAAM,CAAC,CAAC,KAAK,GAAG,EAAE,SAAS,GAAG,IAAI,CAAC;AAC5E,UAAM,UAAU,KAAK,YAAY,CAAC,CAAC;AACnC,UAAM,UAAU,KAAK,YAAY,CAAC,CAAC;AACnC,0BAAsB,KAAK;AAAA,EAC7B;AAEF;AAEO,gBAAS,qBAAqB,OAAO;AAC1C,MAAI,CAAC,MAAM,IAAI,MAAM,2CAA2C,GAAG;AACjE;AAAA,EACF;AAEA,QAAM,WAAW,QAAQ,QAAM,iCAAiC,EAAE,CAAC;AAEnE,WAAS,iCAAiC,UAAU;AAClD,QAAI,CAAC,SAAS,MAAM,SAAS,oBAAoB,GAAG;AAClD;AAAA,IACF;AACA,aAAS,QAAQ,SAAS,MAAM,QAAQ,6BAA6B,EAAE;AAAA,EACzE;AACF;AAEA,SAAS,gBAAgB,OAAO;AAC9B,MAAI,CAAC,MAAM,aAAa,CAAC,CAAC,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,OAAO,KAAK,EAAE,SAAS,MAAM,GAAG,GAAG;AACzL;AAAA,EACF;AAEA,QAAM,iBAAiB,MAAM,UAAU,OAAO,QAAM,GAAG,SAAS,GAAG;AACnE,MAAI,eAAe,SAAS,GAAG;AAC7B,UAAM,YAAY;AAClB;AAAA,EACF;AAEF;AAEO,gBAAS,yBAAyB,OAAO;AAC9C,MAAI,CAAC,MAAM,aAAa,MAAM,UAAU,WAAW,GAAG;AACpD;AAAA,EACF;AACA,QAAM,qBAAqB,MAAM,UAAU,OAAO,QAAM,GAAG,SAAS,GAAG;AACvE,MAAI,mBAAmB,WAAW,GAAG;AACnC;AAAA,EACF;AACA,QAAM,YAAY;AACpB;AAEO,gBAAS,UAAU,QAAQ;AAChC,SAAO,SAAS,GAAG,OAAO,OAAO,UAAU,GAAG,CAAC,CAAC,MAAM,OAAO,OAAO,UAAU,IAAI,EAAE,CAAC,IAAI,OAAO,OAAO,UAAU,IAAI,EAAE,CAAC;AAC1H;AAEA,SAAS,oBAAoB,OAAO,QAAQ;AAC1C,MAAI,MAAM,QAAQ,OAAO;AACvB;AAAA,EACF;AAEA,QAAM,WAAW,MAAM,KAAK;AAE5B,QAAM,MAAM;AACZ,QAAM,OAAO;AACb,QAAM,OAAO;AACb,wBAAsB,KAAK;AAI3B,WAAS,MAAM;AACf,WAAS,OAAO;AAEhB,SAAO,YAAY,QAAQ;AAC7B;AAEA,SAAS,oBAAoB,OAAO,QAAQ;AAC1C,MAAI,MAAM,QAAQ,OAAO;AACvB;AAAA,EACF;AAEA,QAAM,WAAW,MAAM,KAAK;AAE5B,QAAM,MAAM;AACZ,QAAM,OAAO;AACb,QAAM,OAAO;AAEb,WAAS,MAAM;AAEf,SAAO,YAAY,QAAQ;AAC7B;AAEA,SAAS,cAAc,QAAQ;AAE7B,SAAO,OAAO,OAAO,KAAK,WAAS,CAAC,OAAO,OAAO,OAAO,KAAK,EAAE,SAAS,MAAM,GAAG,CAAC;AACrF;AAEA,SAAS,eAAe,OAAO,QAAQ;AAErC,MAAI,MAAM,QAAQ,OAAO;AACvB;AAAA,EACF;AAEA,0BAAwB,KAAK;AAE7B,QAAM,MAAM;AACZ,QAAM,OAAO;AACb,QAAM,OAAO;AAIb,WAAS,iBAAiB,QAAQ;AAChC,QAAI,OAAO,MAAM,mFAAmF,GAAG;AACrG,aAAO,OAAO,QAAQ,YAAY,EAAE;AAAA,IACtC;AACA,WAAO;AAAA,EACT;AAEA,QAAM,WAAW,QAAQ,QAAM,2BAA2B,EAAE,CAAC;AAE7D,WAAS,2BAA2B,UAAU;AAC5C,aAAS,QAAQ,4BAA4B,QAAQ;AAAA,EACvD;AAEA,WAAS,wBAAwBA,QAAO;AAEtC,UAAM,CAAC,CAAC,IAAIA,OAAM,UAAU,OAAO,QAAM,GAAG,SAAS,GAAG;AACxD,QAAI,CAAC,GAAG;AACN,aAAO;AAAA,IACT;AACA,UAAM,gBAAgB,iBAAiB,EAAE,KAAK;AAC9C,QAAI,CAAC,eAAe;AAClB,aAAO;AAAA,IACT;AACA,UAAM,UAAU,EAAE,MAAM,MAAM,cAAc,IAAI,WAAM;AACtD,UAAM,cAAc,EAAE,MAAM,SAAS,GAAG,IAAI,IAAI,OAAO,GAAG,aAAa,MAAM,GAAG,OAAO,GAAG,aAAa;AAEvG,MAAE,QAAQ,IAAI,aAAa;AAC3B,WAAO;AAAA,EACT;AAEA,WAAS,wBAAwBA,QAAO;AACtC,UAAM,IAAI,wBAAwBA,MAAK;AACvC,QAAI,CAAC,GAAG;AACN,aAAO;AAAA,IACT;AACA,UAAM,OAAO,EAAC,OAAO,OAAO,QAAQ,KAAK,QAAQ,KAAK,aAAa,CAAC,EAAC,QAAQ,KAAK,SAAS,EAAC,CAAC,EAAC;AAC9F,WAAO,YAAY,IAAI;AAAA,EACzB;AAEA,WAAS,4BAA4B,UAAU;AAC7C,QAAI,SAAS,SAAS,KAAK;AACzB,aAAO,SAAS,MAAM,QAAQ,kBAAkB,4BAA4B;AAAA,IAC9E;AACA,QAAI,SAAS,SAAS,KAAK;AACzB,aAAO,SAAS,MAAM,QAAQ,kBAAkB,uBAAuB;AAAA,IACzE;AACA,QAAI,SAAS,SAAS,KAAK;AACzB,YAAM,OAAO,iBAAiB,SAAS,KAAK;AAC5C,UAAI,MAAM;AACR,cAAM,IAAI,SAAS,MAAM,MAAM,WAAW,IAAI,MAAM;AACpD,YAAI,SAAS,MAAM,SAAS,GAAG,GAAG;AAChC,iBAAO,GAAG,CAAC,IAAI,IAAI;AAAA,QACrB;AACA,eAAO,GAAG,CAAC,GAAG,IAAI;AAAA,MACpB;AACA,aAAO,SAAS,MAAM,QAAQ,kBAAkB,yBAAyB;AAAA,IAC3E;AACA,WAAO,SAAS;AAAA,EAClB;AAGF;AAmBA,SAAS,wBAAwB,OAAO;AACtC,MAAI,CAAC,CAAC,OAAO,KAAK,EAAE,SAAS,MAAM,GAAG,GAAG;AACvC;AAAA,EACF;AACA,QAAM,WAAW,QAAQ,QAAM,2BAA2B,EAAE,CAAC;AAE7D,WAAS,2BAA2B,UAAU;AAC5C,QAAI,MAAM,QAAQ,SAAS,CAAC,KAAK,KAAK,GAAG,EAAE,SAAS,SAAS,IAAI,GAAG;AAClE,eAAS,QAAQ,+BAA+B,2BAA2B,2BAA2B,2BAA2B,SAAS,KAAK,CAAC,CAAC,CAAC;AAClJ;AAAA,IACF;AACA,QAAI,MAAM,QAAQ,OAAO;AACvB,eAAS,QAAQ,+BAA+B,2BAA2B,2BAA2B,2BAA2B,SAAS,KAAK,CAAC,CAAC,CAAC;AAClJ;AAAA,IACF;AAAA,EACF;AACF;AAEA,SAAS,2BAA2B,OAAO;AACzC,SAAO,MAAM,QAAQ,eAAe,MAAM,EACxC,QAAQ,mBAAmB,eAAe,EAC1C,QAAQ,iBAAiB,qBAAqB,EAC9C,QAAQ,cAAc,UAAU,EAChC,QAAQ,gBAAgB,WAAW,EAAE,QAAQ,cAAc,WAAW,EACtE,QAAQ,eAAe,QAAQ,EAC/B,QAAQ,aAAa,OAAO,EAC5B,QAAQ,cAAc,aAAa,EACnC,QAAQ,gBAAgB,aAAa,EACrC,QAAQ,aAAa,UAAU,EAC/B,QAAQ,mBAAmB,aAAa,EAGxC,QAAQ,cAAc,OAAO,EAAE,QAAQ,WAAW,OAAO,EACzD,QAAQ,gBAAgB,WAAW,EAAE,QAAQ,cAAc,WAAW,EACtE,QAAQ,cAAc,KAAK,EAC3B,QAAQ,gBAAgB,WAAW,EACnC,QAAQ,aAAa,cAAc,EACnC,QAAQ,yDAAyD,EAAE,EACnE,QAAQ,eAAe,QAAQ;AACnC;AAEA,SAAS,2BAA2B,OAAO;AACzC,SAAO,MAAM,QAAQ,aAAa,OAAO,EAGvC,QAAQ,aAAa,SAAS,EAAE,QAAQ,cAAc,SAAS,EAC/D,QAAQ,aAAa,SAAS,EAAE,QAAQ,cAAc,SAAS,EAC/D,QAAQ,sBAAsB,gBAAgB,EAAE,QAAQ,oBAAoB,gBAAgB,EAC5F,QAAQ,kBAAkB,IAAI;AAElC;AAEA,SAAS,2BAA2B,OAAO;AACzC,SAAO,MAAM,QAAQ,aAAa,QAAQ,EACxC,QAAQ,cAAc,WAAQ,EAAE,QAAQ,cAAc,WAAQ;AAGlE;AAEA,SAAS,+BAA+B,OAAO;AAC7C,SAAO,MAAM,QAAQ,UAAU,YAAY,EACzC,QAAQ,iBAAiB,MAAM,EAC/B,QAAQ,eAAe,oBAAW,EAClC,QAAQ,mBAAmB,gBAAgB,EAC3C,QAAQ,iBAAiB,OAAO,EAChC,QAAQ,kBAAkB,aAAU,EAEpC,QAAQ,mBAAmB,SAAS,EACpC,QAAQ,kBAAkB,UAAU,EACpC,QAAQ,cAAc,OAAO,EAE7B,QAAQ,iBAAiB,WAAW,EACpC,QAAQ,+BAA+B,gCAAuB,EAC9D,QAAQ,WAAW,eAAS,EAC5B,QAAQ,gBAAgB,MAAM,EAC9B,QAAQ,qBAAqB,gBAAa,EAC1C,QAAQ,uBAAuB,gBAAa,EAC5C,QAAQ,qBAAqB,gBAAa,EAC1C,QAAQ,kBAAkB,cAAc,EACxC,QAAQ,0BAA0B,gBAAgB,EAClD,QAAQ,wBAAwB,4BAA4B,EAC5D,QAAQ,uBAAuB,YAAY,EAC3C,QAAQ,gCAAgC,gBAAa,EACrD,QAAQ,6BAA6B,cAAc,EACnD,QAAQ,gBAAgB,QAAQ,EAChC,QAAQ,6BAA6B,2BAA2B,EAChE,QAAQ,eAAe,WAAW,EAClC,QAAQ,uBAAuB,WAAW,EAC1C,QAAQ,mBAAmB,cAAc,EACzC,QAAQ,iBAAiB,OAAO,EAChC,QAAQ,kBAAkB,cAAW,EACrC,QAAQ,2BAA2B,2BAA2B,EAC9D,QAAQ,oBAAoB,eAAY,EACxC,QAAQ,oBAAoB,gBAAU,EACtC,QAAQ,qBAAqB,oBAAW,EACxC,QAAQ,cAAc,QAAQ,EAC9B,QAAQ,eAAe,UAAU,EACjC,QAAQ,WAAW,WAAW,EAC9B,QAAQ,mBAAgB,mBAAgB,EACxC,QAAQ,mBAAmB,gBAAgB,EAC3C,QAAQ,gBAAgB,gBAAgB,EACxC,QAAQ,cAAc,gBAAgB,EACtC,QAAQ,mBAAmB,eAAY,EACvC,QAAQ,gBAAgB,OAAO,EAC/B,QAAQ,oBAAoB,mBAAgB,EAC5C,QAAQ,gBAAgB,OAAO,EAC/B,QAAQ,oBAAoB,mBAAgB,EAC5C,QAAQ,gBAAgB,iCAAwB,EAChD,QAAQ,mBAAmB,oBAAc,EAAE,QAAQ,kBAAkB,mBAAa,EAClF,QAAQ,eAAe,oBAAW,EAAE,QAAQ,mBAAmB,gBAAU,EACzE,QAAQ,sCAAsC,gBAAa,EAC3D,QAAQ,YAAY,gBAAgB,EACpC,QAAQ,cAAc,gBAAgB,EACtC,QAAQ,qBAAqB,4BAA4B,EACzD,QAAQ,yBAAyB,gBAAgB,EACjD,QAAQ,cAAc,eAAY,EAClC,QAAQ,aAAa,WAAW,EAChC,QAAQ,iBAAiB,SAAS;AAEtC;",
+  "names": ["field"]
+}

package/dist/cyrillux-usemarcon-replacement.test.js

@@ -0,0 +1,43 @@
+import assert from "node:assert";
+import { MarcRecord } from "@natlibfi/marc-record";
+import validatorFactory from "./cyrillux-usemarcon-replacement.js";
+import { READERS } from "@natlibfi/fixura";
+import generateTests from "@natlibfi/fixugen";
+generateTests({
+  callback,
+  path: [import.meta.dirname, "..", "test-fixtures", "cyrillux-usemarcon-replacement"],
+  useMetadataFile: true,
+  recurse: false,
+  fixura: {
+    reader: READERS.JSON
+  },
+  hooks: {
+    before: async () => {
+      MarcRecord.setValidationOptions({ subfields: false, subfieldValues: false });
+      testValidatorFactory();
+    },
+    after: async () => {
+      MarcRecord.setValidationOptions({});
+    }
+  }
+});
+async function testValidatorFactory() {
+  const validator = await validatorFactory();
+  assert.equal(typeof validator, "object");
+  assert.equal(typeof validator.description, "string");
+  assert.equal(typeof validator.validate, "function");
+  assert.equal(typeof validator.fix, "function");
+}
+async function callback({ getFixture, fix = false }) {
+  const validator = await validatorFactory();
+  const record = new MarcRecord(getFixture("record.json"));
+  const expectedResult = getFixture("expectedResult.json");
+  if (!fix) {
+    const result = await validator.validate(record);
+    assert.deepEqual(result, expectedResult);
+    return;
+  }
+  await validator.fix(record);
+  assert.deepEqual(record, expectedResult);
+}
+//# sourceMappingURL=cyrillux-usemarcon-replacement.test.js.map

package/dist/cyrillux-usemarcon-replacement.test.js.map

@@ -0,0 +1,7 @@
+{
+  "version": 3,
+  "sources": ["../src/cyrillux-usemarcon-replacement.test.js"],
+  "sourcesContent": ["import assert from 'node:assert';\nimport {MarcRecord} from '@natlibfi/marc-record';\nimport validatorFactory from './cyrillux-usemarcon-replacement.js';\nimport {READERS} from '@natlibfi/fixura';\nimport generateTests from '@natlibfi/fixugen';\n\ngenerateTests({\n  callback,\n  path: [import.meta.dirname, '..', 'test-fixtures', 'cyrillux-usemarcon-replacement'],\n  useMetadataFile: true,\n  recurse: false,\n  fixura: {\n    reader: READERS.JSON\n  },\n  hooks: {\n    before: async () => {\n      MarcRecord.setValidationOptions({subfields: false, subfieldValues: false});\n      testValidatorFactory();\n    },\n    after: async () => {\n      MarcRecord.setValidationOptions({});\n    }\n  }\n});\n\n\nasync function testValidatorFactory() {\n  const validator = await validatorFactory();\n\n  assert.equal(typeof validator, 'object');\n  assert.equal(typeof validator.description, 'string');\n  assert.equal(typeof validator.validate, 'function');\n  assert.equal(typeof validator.fix, 'function');\n}\n\nasync function callback({getFixture, fix = false}) {\n  const validator = await validatorFactory();\n  const record = new MarcRecord(getFixture('record.json'));\n  const expectedResult = getFixture('expectedResult.json');\n  // console.log(expectedResult); // eslint-disable-line\n\n  if (!fix) {\n    const result = await validator.validate(record);\n    assert.deepEqual(result, expectedResult);\n    return;\n  }\n\n  await validator.fix(record);\n  assert.deepEqual(record, expectedResult);\n}\n"],
+  "mappings": "AAAA,OAAO,YAAY;AACnB,SAAQ,kBAAiB;AACzB,OAAO,sBAAsB;AAC7B,SAAQ,eAAc;AACtB,OAAO,mBAAmB;AAE1B,cAAc;AAAA,EACZ;AAAA,EACA,MAAM,CAAC,YAAY,SAAS,MAAM,iBAAiB,gCAAgC;AAAA,EACnF,iBAAiB;AAAA,EACjB,SAAS;AAAA,EACT,QAAQ;AAAA,IACN,QAAQ,QAAQ;AAAA,EAClB;AAAA,EACA,OAAO;AAAA,IACL,QAAQ,YAAY;AAClB,iBAAW,qBAAqB,EAAC,WAAW,OAAO,gBAAgB,MAAK,CAAC;AACzE,2BAAqB;AAAA,IACvB;AAAA,IACA,OAAO,YAAY;AACjB,iBAAW,qBAAqB,CAAC,CAAC;AAAA,IACpC;AAAA,EACF;AACF,CAAC;AAGD,eAAe,uBAAuB;AACpC,QAAM,YAAY,MAAM,iBAAiB;AAEzC,SAAO,MAAM,OAAO,WAAW,QAAQ;AACvC,SAAO,MAAM,OAAO,UAAU,aAAa,QAAQ;AACnD,SAAO,MAAM,OAAO,UAAU,UAAU,UAAU;AAClD,SAAO,MAAM,OAAO,UAAU,KAAK,UAAU;AAC/C;AAEA,eAAe,SAAS,EAAC,YAAY,MAAM,MAAK,GAAG;AACjD,QAAM,YAAY,MAAM,iBAAiB;AACzC,QAAM,SAAS,IAAI,WAAW,WAAW,aAAa,CAAC;AACvD,QAAM,iBAAiB,WAAW,qBAAqB;AAGvD,MAAI,CAAC,KAAK;AACR,UAAM,SAAS,MAAM,UAAU,SAAS,MAAM;AAC9C,WAAO,UAAU,QAAQ,cAAc;AACvC;AAAA,EACF;AAEA,QAAM,UAAU,IAAI,MAAM;AAC1B,SAAO,UAAU,QAAQ,cAAc;AACzC;",
+  "names": []
+}