@natlibfi/marc-record-validators-melinda 11.3.5 → 11.3.7-alpha.1

package/dist/cyrillux.js

@@ -252,7 +252,7 @@ function _default(config = {}) {
   }
   function sfs4900PairCanBeTransliterated(field, record) {
     // MELINDA-10330: we already have public library data: (unmarked) SFS-4900 in FIELD and (unmarked) Cyrillic in 880
-    if (!tagCanBeTransliterated(field.tag) || !config.doISO9Transliteration) {
+    if (!field.subfields || !tagCanBeTransliterated(field.tag) || !config.doISO9Transliteration) {
       return false;
     }
 

package/dist/cyrillux.js.map

@@ -1 +1 @@
-{"version":3,"file":"cyrillux.js","names":["_clone","_interopRequireDefault","require","_utils","iso9","_interopRequireWildcard","_subfield6Utils","_xregexp","sfs4900","_sortFields","_reindexSubfield6OccurenceNumbers","_punctuation","_getRequireWildcardCache","e","WeakMap","r","t","__esModule","default","has","get","n","__proto__","a","Object","defineProperty","getOwnPropertyDescriptor","u","hasOwnProperty","call","i","set","iso9Trans","cyrillicTrans","sfs4900Trans","_default","config","description","validate","fix","preprocessConfig","doISO9Transliteration","doSFS4900Transliteration","record","res","message","valid","nBefore","fields","length","processFields","reindexSubfield6OccurenceNumbers","sortFields","input","output","currField","remainingInput","fakeRecord","createdMax","recordGetMaxSubfield6OccurrenceNumberAsInteger","result","processField","forEach","field","validateField","orig","fieldToString","normalizedFields","clone","mod","fieldsToString","replace","push","isCyrillicCharacter","char","XRegExp","test","containsCyrillicCharacters","str","split","some","fieldContainsCyrillicCharacters","subfields","sf","subfieldShouldTransliterateToIso9","subfield","isControlSubfieldCode","code","value","tagCanBeTransliterated","tag","includes","fieldCanBeTransliterated","mapSubfieldToIso9","convertToLatin","mapSubfieldToSfs4900","mapFieldToIso9","occurrenceNumber","map","ind1","ind2","subfield6","deriveSubfield6","subfield9","fieldHasSubfield","filter","initialSubfield","resetSubfield6Tag","mapFieldToCyrillicField880","nvdebug","newSubfield6","newSubfield9","newField","mapFieldToSfs4900Field880","getNewOccurrenceNumber","originalField","maxCreatedOccurrenceNumber","fieldGetMaxSubfield6OccurrenceNumberAsInteger","needsIso9Transliteration","existingPairedFields","f","needsSfs4900Transliteration","sfs4900PairCanBeTransliterated","fieldGetOccurrenceNumberPairs","pairedField","occurrenceNumberAsString","fieldGetUnambiguousOccurrenceNumber","field2","createFieldForSfs4900Comparison","field1","clonedField","fieldStripPunctuation","transliterateSfs4900Pair","tmpField","newMainField","newCyrillicField","newSFS4900Field","cyrilluxSkip","newOccurrenceNumberAsInt","newOccurrenceNumberAsString","intToOccurrenceNumberString","undefined"],"sources":["../src/cyrillux.js"],"sourcesContent":["//import createDebugLogger from 'debug';\nimport clone from 'clone';\nimport {fieldHasSubfield, fieldToString, fieldsToString, isControlSubfieldCode, nvdebug} from './utils';\nimport * as iso9 from 'iso9_1995';\nimport {fieldGetMaxSubfield6OccurrenceNumberAsInteger, fieldGetOccurrenceNumberPairs, fieldGetUnambiguousOccurrenceNumber, intToOccurrenceNumberString, recordGetMaxSubfield6OccurrenceNumberAsInteger, resetSubfield6Tag} from './subfield6Utils';\n\nimport XRegExp from 'xregexp';\nimport * as sfs4900 from 'sfs4900';\nimport {default as sortFields} from './sortFields';\nimport {default as reindexSubfield6OccurenceNumbers} from './reindexSubfield6OccurenceNumbers';\nimport {fieldStripPunctuation} from './punctuation2';\n\nconst iso9Trans = 'ISO9 <TRANS>';\nconst cyrillicTrans = 'CYRILLIC <TRANS>';\nconst sfs4900Trans = 'SFS4900 <TRANS>';\n\nexport default function (config = {}) {\n\n  return {\n    description: 'Cyrillux functionality: convert original field to latinitsa (ISO-9) and add 880s for original cyrillic and latinitsa (SFS-4900)',\n    validate, fix\n  };\n\n  function preprocessConfig() {\n    config.doISO9Transliteration = typeof config.doISO9Transliteration === 'undefined' ? true : config.doISO9Transliteration; // eslint-disable-line functional/immutable-data\n    config.doSFS4900Transliteration = typeof config.doSFS4900Transliteration === 'undefined' ? true : config.doSFS4900Transliteration; // eslint-disable-line functional/immutable-data\n  }\n\n  function fix(record) {\n    // Fix always succeeds\n    const res = {message: [], fix: [], valid: true};\n\n    preprocessConfig(config);\n\n    const nBefore = record.fields.length;\n\n    record.fields = processFields(record.fields); // eslint-disable-line functional/immutable-data\n\n    if (nBefore < record.fields.length) { // eslint-disable-line functional/no-conditional-statements\n      reindexSubfield6OccurenceNumbers().fix(record);\n      sortFields().fix(record);\n    }\n\n    function processFields(input, output = []) {\n      const [currField, ...remainingInput] = input;\n      if (!currField) {\n        return output;\n      }\n\n      const fakeRecord = {fields: output};\n      const createdMax = recordGetMaxSubfield6OccurrenceNumberAsInteger(fakeRecord);\n      const result = processField(currField, record, createdMax);\n\n      return processFields(remainingInput, [...output, ...result]);\n    }\n\n    return res;\n  }\n\n  function validate(record) {\n    const res = {message: [], valid: true};\n\n    preprocessConfig(config);\n\n    record.fields?.forEach(field => {\n      validateField(field, res, record);\n    });\n\n    res.valid = !(res.message.length >= 1); // eslint-disable-line functional/immutable-data\n    return res;\n  }\n\n  function validateField(field, res, record) {\n    const orig = fieldToString(field);\n\n    const normalizedFields = processField(clone(field), record);\n    const mod = fieldsToString(normalizedFields).replace(/\\t__SEPARATOR__\\t/ug, ', ').replace(/ (‡6 [0-9][0-9][0-9])-[0-9][0-9]+/gu, ' $1-NN'); // eslint-disable-line prefer-named-capture-group\n    if (orig !== mod) { // Fail as the input is \"broken\"/\"crap\"/sumthing\n      res.message.push(`CHANGE: ${orig} => ${mod}`); // eslint-disable-line functional/immutable-data\n      return;\n    }\n    return;\n  }\n\n  function isCyrillicCharacter(char) {\n    return XRegExp('[\\\\p{Cyrillic}]').test(char); // eslint-disable-line new-cap\n  }\n\n  function containsCyrillicCharacters(str) { // from melinda-ui-cyrillux\n    if (!str) {\n      return false;\n    }\n    return str.split('').some(isCyrillicCharacter);\n  }\n\n  function fieldContainsCyrillicCharacters(field) { // based on melinda-ui-cyrillux\n    return field.subfields && field.subfields.some(sf => subfieldShouldTransliterateToIso9(sf));\n  }\n\n  function subfieldShouldTransliterateToIso9(subfield) {\n    if (isControlSubfieldCode(subfield.code)) {\n      return false;\n    }\n    return containsCyrillicCharacters(subfield.value);\n  }\n\n  function tagCanBeTransliterated(tag) {\n    return !['336', '337', '338', '880'].includes(tag);\n  }\n\n  function fieldCanBeTransliterated(field) {\n    // Skip certain tags ('880' is the actual skip-me beef here, but we have seen other no-nos as well).\n    // Discussion: We should probably also skip others like 05X-08X, 648, 650, 651, and 655, but this needs thinking...\n    // Also I'd like to convert do CYRILLIC->ISO-9 in field 300 (and others?) without 880 mappings... (<- not implemented)\n\n    // nvdebug(`fieldCanBeTransliterated('${fieldToString(field)}') in...`);\n    if (!tagCanBeTransliterated(field.tag)) {\n      return false;\n    }\n\n    // Skip control fields:\n    if (!field.subfields) {\n      return false;\n    }\n    // When doing MELINDA-10330-ish, we noticed that $6 should not prevent translittaration per se, so this restriction is no longer applied!\n\n    if (field.subfields.some(sf => sf.code === '9' && sf.value.includes('<TRANS>'))) {\n      return false;\n    }\n\n    return fieldContainsCyrillicCharacters(field); // We have something to translitterate:\n  }\n\n\n  function mapSubfieldToIso9(subfield) {\n    if (!subfieldShouldTransliterateToIso9(subfield)) {\n      return {code: subfield.code, value: subfield.value}; // just clone\n    }\n    const value = iso9.convertToLatin(subfield.value);\n\n    return {code: subfield.code, value};\n  }\n\n  function mapSubfieldToSfs4900(subfield) {\n    const value = subfieldShouldTransliterateToIso9(subfield) ? sfs4900.convertToLatin(subfield.value).result : subfield.value;\n    return {code: subfield.code, value};\n  }\n\n\n  function mapFieldToIso9(field, occurrenceNumber) {\n    // This is the original non-880 field, that will be converted from Cyrillic to ISO\n\n    // Just converts the field to ISO-9 latinitsa, does not create any field-880s, so don't bother with $6 or $9 either\n    if (!config.doISO9Transliteration && !config.doSFS4900Transliteration) {\n      const subfields = field.subfields.map(sf => mapSubfieldToIso9(sf));\n      return {tag: field.tag, ind1: field.ind1, ind2: field.ind2, subfields};\n    }\n\n    const subfield6 = deriveSubfield6('880', field.subfields, occurrenceNumber);\n    const subfield9 = fieldHasSubfield(field, '9', iso9Trans) ? [] : [{code: '9', value: iso9Trans}];\n\n    const subfields = field.subfields.filter(sf => sf.code !== '6').map(sf => mapSubfieldToIso9(sf));\n\n    return {tag: field.tag, ind1: field.ind1, ind2: field.ind2, subfields: [subfield6, ...subfields, ...subfield9]};\n  }\n\n  function deriveSubfield6(tag, subfields, occurrenceNumber) {\n    const initialSubfield = {code: '6', value: `${tag}-${occurrenceNumber}`};\n    if (tag === '880') { // If *tag in subfield $6* is 880, field is not 880 :D\n      return initialSubfield;\n    }\n    // Try to use existing subfield\n    const [subfield6] = subfields.filter(sf => sf.code === '6').map(sf => clone(sf));\n    if (subfield6) {\n      resetSubfield6Tag(subfield6, tag); // Should we update occurrence number?\n      return subfield6;\n    }\n\n    return initialSubfield;\n  }\n\n  function mapFieldToCyrillicField880(field, occurrenceNumber) {\n    nvdebug(`Derive CYR 880 from ${fieldToString(field)}`);\n    const newSubfield6 = deriveSubfield6(field.tag, field.subfields, occurrenceNumber);\n    const newSubfield9 = fieldHasSubfield(field, '9', cyrillicTrans) ? [] : [{code: '9', value: cyrillicTrans}];\n    const subfields = [\n      newSubfield6,\n      ...field.subfields.filter(sf => sf.code !== '6').map(sf => clone(sf)),\n      ...newSubfield9\n    ];\n\n    const newField = {tag: '880', ind1: field.ind1, ind2: field.ind2, subfields};\n    nvdebug(`   New CYR 880      ${fieldToString(newField)}`);\n    return newField;\n  }\n\n  function mapFieldToSfs4900Field880(field, occurrenceNumber) {\n    nvdebug(`Derive SFS 880 from ${fieldToString(field)}`);\n    const newSubfield6 = deriveSubfield6(field.tag, field.subfields, occurrenceNumber);\n    const newSubfield9 = fieldHasSubfield(field, '9', sfs4900Trans) ? [] : [{code: '9', value: sfs4900Trans}];\n    const subfields = [\n      newSubfield6,\n      ...field.subfields.filter(sf => sf.code !== '6').map(sf => mapSubfieldToSfs4900(sf)),\n      ...newSubfield9\n    ];\n\n    const newField = {tag: '880', ind1: field.ind1, ind2: field.ind2, subfields};\n    nvdebug(`       SFS 880      ${fieldToString(newField)}`);\n    return newField;\n  }\n\n  function getNewOccurrenceNumber(originalField, record, maxCreatedOccurrenceNumber = 0) {\n    const occurrenceNumber = fieldGetMaxSubfield6OccurrenceNumberAsInteger(originalField);\n    // Return existing occurrence number:\n    if (occurrenceNumber > 0) {\n      return occurrenceNumber;\n    }\n    if (maxCreatedOccurrenceNumber) {\n      return maxCreatedOccurrenceNumber + 1;\n    }\n    return recordGetMaxSubfield6OccurrenceNumberAsInteger(record) + 1;\n  }\n\n  function needsIso9Transliteration(existingPairedFields) {\n    if (!config.doISO9Transliteration) {\n      return false;\n    }\n    // Actually normal field is always converted to ISO-9, and this function checks where we move original cyrillic field to 880.\n    // Thus we look for field 880$9 \"CYRILLIC <TRANS>\" here, and not \"ISO9 <TRANS>\"!\n    return !existingPairedFields.some(f => fieldHasSubfield(f, '9', cyrillicTrans));\n  }\n\n  function needsSfs4900Transliteration(existingPairedFields) {\n    if (!config.doSFS4900Transliteration) {\n      return false;\n    }\n    return !existingPairedFields.some(f => fieldHasSubfield(f, '9', sfs4900Trans));\n  }\n\n  function sfs4900PairCanBeTransliterated(field, record) {\n    // MELINDA-10330: we already have public library data: (unmarked) SFS-4900 in FIELD and (unmarked) Cyrillic in 880\n    if (!tagCanBeTransliterated(field.tag) || !config.doISO9Transliteration) {\n      return false;\n    }\n\n    // Original field: $9 ISO9 <TRANS> is the only legal <TRANS>\n    if (fieldContainsCyrillicCharacters(field) || field.subfields.some(sf => sf.code === '9' && sf.value.includes('<TRANS>') && sf.value !== iso9Trans)) {\n      return false;\n    }\n\n    const existingPairedFields = fieldGetOccurrenceNumberPairs(field, record.get('880'));\n    if (existingPairedFields.length !== 1) {\n      return false;\n    }\n\n    // Paired field: $9 CYRILLIC <TRANS> is the only legal <TRANS>\n    const [pairedField] = existingPairedFields;\n    if (!fieldContainsCyrillicCharacters(pairedField) || pairedField.subfields.some(sf => sf.code === '9' && sf.value.includes('<TRANS>') && sf.value !== cyrillicTrans)) {\n      return false;\n    }\n\n    // Actually check that original field and and sfs-4900-fied cyrillic field are equal (after punctuation clean-up),\n    // and thus it's a real case of MELINDA-10330 ISO9 adding:\n    const occurrenceNumberAsString = fieldGetUnambiguousOccurrenceNumber(field);\n    const field2 = fieldToString(createFieldForSfs4900Comparison(mapFieldToSfs4900Field880(pairedField, occurrenceNumberAsString), field.tag));\n    const field1 = fieldToString(createFieldForSfs4900Comparison(field, field.tag));\n    nvdebug(`COMPARE CONTENTS:\\n  '${field1}' vs\\n  '${field2}': ${field1 === field2 ? 'OK' : 'FAIL'}`);\n    return field1 === field2;\n  }\n\n  function createFieldForSfs4900Comparison(field, tag) {\n    const clonedField = clone(field);\n    clonedField.tag = tag; // eslint-disable-line functional/immutable-data\n    clonedField.subfields = clonedField.subfields.filter(sf => sf.code !== '9' || sf.value !== sfs4900Trans); // eslint-disable-line functional/immutable-data\n    return fieldStripPunctuation(clonedField);\n  }\n\n  function transliterateSfs4900Pair(field, record) {\n    // Handle MELINDA-10330: Field is already in SFS-4900 and the only paired field is in Cyrillic!\n    const [pairedField] = fieldGetOccurrenceNumberPairs(field, record.get('880'));\n\n    const occurrenceNumberAsString = fieldGetUnambiguousOccurrenceNumber(field);\n\n    const tmpField = {'tag': field.tag, 'ind1': field.ind1, 'ind2': field.ind2, 'subfields': pairedField.subfields};\n\n    const newMainField = mapFieldToIso9(tmpField, occurrenceNumberAsString); // Cyrillic => ISO-9\n    const newCyrillicField = mapFieldToCyrillicField880(tmpField, occurrenceNumberAsString); // CYRILLIC\n    const newSFS4900Field = mapFieldToSfs4900Field880(field, occurrenceNumberAsString); // SFS-4900\n\n    // Trigger the drop of original counterpart $6 :\n    pairedField.cyrilluxSkip = 1; // eslint-disable-line functional/immutable-data\n\n    return [newMainField, newCyrillicField, newSFS4900Field].filter(f => f);\n  }\n\n\n  function processField(originalField, record, maxCreatedOccurrenceNumber = 0) {\n    if (!fieldCanBeTransliterated(originalField)) {\n      if (sfs4900PairCanBeTransliterated(originalField, record)) { // MELINDA-10330\n        return transliterateSfs4900Pair(originalField, record);\n      }\n      if (originalField.cyrilluxSkip) { // MELINDA-10330 hack to remove 880 fields that were replaced/sort-of processed with their counterpair.\n        return [];\n      }\n      return [originalField];\n    }\n\n    // nvdebug(`PROCESSING: ${fieldToString(originalField)}`);\n\n    const newOccurrenceNumberAsInt = getNewOccurrenceNumber(originalField, record, maxCreatedOccurrenceNumber);\n    const newOccurrenceNumberAsString = intToOccurrenceNumberString(newOccurrenceNumberAsInt);\n\n    // nvdebug(`NEW OCCURRENCE NUMBER: '${newOccurrenceNumberAsString}'`);\n\n    const existingPairedFields = fieldGetOccurrenceNumberPairs(originalField, record.get('880'));\n\n    // nvdebug(`NUMBER OF PAIRED 880 FIELDS: ${existingPairedFields.length}`);\n\n    const newMainField = mapFieldToIso9(originalField, newOccurrenceNumberAsString); // ISO-9\n    const newCyrillicField = needsIso9Transliteration(existingPairedFields) ? mapFieldToCyrillicField880(originalField, newOccurrenceNumberAsString) : undefined; // CYRILLIC\n    const newSFS4900Field = needsSfs4900Transliteration(existingPairedFields) ? mapFieldToSfs4900Field880(originalField, newOccurrenceNumberAsString) : undefined; /// SFS-4900\n\n    return [newMainField, newCyrillicField, newSFS4900Field].filter(f => f);\n  }\n}\n"],"mappings":";;;;;;AACA,IAAAA,MAAA,GAAAC,sBAAA,CAAAC,OAAA;AACA,IAAAC,MAAA,GAAAD,OAAA;AACA,IAAAE,IAAA,GAAAC,uBAAA,CAAAH,OAAA;AACA,IAAAI,eAAA,GAAAJ,OAAA;AAEA,IAAAK,QAAA,GAAAN,sBAAA,CAAAC,OAAA;AACA,IAAAM,OAAA,GAAAH,uBAAA,CAAAH,OAAA;AACA,IAAAO,WAAA,GAAAR,sBAAA,CAAAC,OAAA;AACA,IAAAQ,iCAAA,GAAAT,sBAAA,CAAAC,OAAA;AACA,IAAAS,YAAA,GAAAT,OAAA;AAAqD,SAAAU,yBAAAC,CAAA,6BAAAC,OAAA,mBAAAC,CAAA,OAAAD,OAAA,IAAAE,CAAA,OAAAF,OAAA,YAAAF,wBAAA,YAAAA,CAAAC,CAAA,WAAAA,CAAA,GAAAG,CAAA,GAAAD,CAAA,KAAAF,CAAA;AAAA,SAAAR,wBAAAQ,CAAA,EAAAE,CAAA,SAAAA,CAAA,IAAAF,CAAA,IAAAA,CAAA,CAAAI,UAAA,SAAAJ,CAAA,eAAAA,CAAA,uBAAAA,CAAA,yBAAAA,CAAA,WAAAK,OAAA,EAAAL,CAAA,QAAAG,CAAA,GAAAJ,wBAAA,CAAAG,CAAA,OAAAC,CAAA,IAAAA,CAAA,CAAAG,GAAA,CAAAN,CAAA,UAAAG,CAAA,CAAAI,GAAA,CAAAP,CAAA,OAAAQ,CAAA,KAAAC,SAAA,UAAAC,CAAA,GAAAC,MAAA,CAAAC,cAAA,IAAAD,MAAA,CAAAE,wBAAA,WAAAC,CAAA,IAAAd,CAAA,oBAAAc,CAAA,OAAAC,cAAA,CAAAC,IAAA,CAAAhB,CAAA,EAAAc,CAAA,SAAAG,CAAA,GAAAP,CAAA,GAAAC,MAAA,CAAAE,wBAAA,CAAAb,CAAA,EAAAc,CAAA,UAAAG,CAAA,KAAAA,CAAA,CAAAV,GAAA,IAAAU,CAAA,CAAAC,GAAA,IAAAP,MAAA,CAAAC,cAAA,CAAAJ,CAAA,EAAAM,CAAA,EAAAG,CAAA,IAAAT,CAAA,CAAAM,CAAA,IAAAd,CAAA,CAAAc,CAAA,YAAAN,CAAA,CAAAH,OAAA,GAAAL,CAAA,EAAAG,CAAA,IAAAA,CAAA,CAAAe,GAAA,CAAAlB,CAAA,EAAAQ,CAAA,GAAAA,CAAA;AAAA,SAAApB,uBAAAY,CAAA,WAAAA,CAAA,IAAAA,CAAA,CAAAI,UAAA,GAAAJ,CAAA,KAAAK,OAAA,EAAAL,CAAA;AAVrD;;AAYA,MAAMmB,SAAS,GAAG,cAAc;AAChC,MAAMC,aAAa,GAAG,kBAAkB;AACxC,MAAMC,YAAY,GAAG,iBAAiB;AAEvB,SAAAC,SAAUC,MAAM,GAAG,CAAC,CAAC,EAAE;EAEpC,OAAO;IACLC,WAAW,EAAE,iIAAiI;IAC9IC,QAAQ;IAAEC;EACZ,CAAC;EAED,SAASC,gBAAgBA,CAAA,EAAG;IAC1BJ,MAAM,CAACK,qBAAqB,GAAG,OAAOL,MAAM,CAACK,qBAAqB,KAAK,WAAW,GAAG,IAAI,GAAGL,MAAM,CAACK,qBAAqB,CAAC,CAAC;IAC1HL,MAAM,CAACM,wBAAwB,GAAG,OAAON,MAAM,CAACM,wBAAwB,KAAK,WAAW,GAAG,IAAI,GAAGN,MAAM,CAACM,wBAAwB,CAAC,CAAC;EACrI;EAEA,SAASH,GAAGA,CAACI,MAAM,EAAE;IACnB;IACA,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEN,GAAG,EAAE,EAAE;MAAEO,KAAK,EAAE;IAAI,CAAC;IAE/CN,gBAAgB,CAACJ,MAAM,CAAC;IAExB,MAAMW,OAAO,GAAGJ,MAAM,CAACK,MAAM,CAACC,MAAM;IAEpCN,MAAM,CAACK,MAAM,GAAGE,aAAa,CAACP,MAAM,CAACK,MAAM,CAAC,CAAC,CAAC;;IAE9C,IAAID,OAAO,GAAGJ,MAAM,CAACK,MAAM,CAACC,MAAM,EAAE;MAAE;MACpC,IAAAE,yCAAgC,EAAC,CAAC,CAACZ,GAAG,CAACI,MAAM,CAAC;MAC9C,IAAAS,mBAAU,EAAC,CAAC,CAACb,GAAG,CAACI,MAAM,CAAC;IAC1B;IAEA,SAASO,aAAaA,CAACG,KAAK,EAAEC,MAAM,GAAG,EAAE,EAAE;MACzC,MAAM,CAACC,SAAS,EAAE,GAAGC,cAAc,CAAC,GAAGH,KAAK;MAC5C,IAAI,CAACE,SAAS,EAAE;QACd,OAAOD,MAAM;MACf;MAEA,MAAMG,UAAU,GAAG;QAACT,MAAM,EAAEM;MAAM,CAAC;MACnC,MAAMI,UAAU,GAAG,IAAAC,8DAA8C,EAACF,UAAU,CAAC;MAC7E,MAAMG,MAAM,GAAGC,YAAY,CAACN,SAAS,EAAEZ,MAAM,EAAEe,UAAU,CAAC;MAE1D,OAAOR,aAAa,CAACM,cAAc,EAAE,CAAC,GAAGF,MAAM,EAAE,GAAGM,MAAM,CAAC,CAAC;IAC9D;IAEA,OAAOhB,GAAG;EACZ;EAEA,SAASN,QAAQA,CAACK,MAAM,EAAE;IACxB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEC,KAAK,EAAE;IAAI,CAAC;IAEtCN,gBAAgB,CAACJ,MAAM,CAAC;IAExBO,MAAM,CAACK,MAAM,EAAEc,OAAO,CAACC,KAAK,IAAI;MAC9BC,aAAa,CAACD,KAAK,EAAEnB,GAAG,EAAED,MAAM,CAAC;IACnC,CAAC,CAAC;IAEFC,GAAG,CAACE,KAAK,GAAG,EAAEF,GAAG,CAACC,OAAO,CAACI,MAAM,IAAI,CAAC,CAAC,CAAC,CAAC;IACxC,OAAOL,GAAG;EACZ;EAEA,SAASoB,aAAaA,CAACD,KAAK,EAAEnB,GAAG,EAAED,MAAM,EAAE;IACzC,MAAMsB,IAAI,GAAG,IAAAC,oBAAa,EAACH,KAAK,CAAC;IAEjC,MAAMI,gBAAgB,GAAGN,YAAY,CAAC,IAAAO,cAAK,EAACL,KAAK,CAAC,EAAEpB,MAAM,CAAC;IAC3D,MAAM0B,GAAG,GAAG,IAAAC,qBAAc,EAACH,gBAAgB,CAAC,CAACI,OAAO,CAAC,qBAAqB,EAAE,IAAI,CAAC,CAACA,OAAO,CAAC,qCAAqC,EAAE,QAAQ,CAAC,CAAC,CAAC;IAC5I,IAAIN,IAAI,KAAKI,GAAG,EAAE;MAAE;MAClBzB,GAAG,CAACC,OAAO,CAAC2B,IAAI,CAAC,WAAWP,IAAI,OAAOI,GAAG,EAAE,CAAC,CAAC,CAAC;MAC/C;IACF;IACA;EACF;EAEA,SAASI,mBAAmBA,CAACC,IAAI,EAAE;IACjC,OAAO,IAAAC,gBAAO,EAAC,iBAAiB,CAAC,CAACC,IAAI,CAACF,IAAI,CAAC,CAAC,CAAC;EAChD;EAEA,SAASG,0BAA0BA,CAACC,GAAG,EAAE;IAAE;IACzC,IAAI,CAACA,GAAG,EAAE;MACR,OAAO,KAAK;IACd;IACA,OAAOA,GAAG,CAACC,KAAK,CAAC,EAAE,CAAC,CAACC,IAAI,CAACP,mBAAmB,CAAC;EAChD;EAEA,SAASQ,+BAA+BA,CAAClB,KAAK,EAAE;IAAE;IAChD,OAAOA,KAAK,CAACmB,SAAS,IAAInB,KAAK,CAACmB,SAAS,CAACF,IAAI,CAACG,EAAE,IAAIC,iCAAiC,CAACD,EAAE,CAAC,CAAC;EAC7F;EAEA,SAASC,iCAAiCA,CAACC,QAAQ,EAAE;IACnD,IAAI,IAAAC,4BAAqB,EAACD,QAAQ,CAACE,IAAI,CAAC,EAAE;MACxC,OAAO,KAAK;IACd;IACA,OAAOV,0BAA0B,CAACQ,QAAQ,CAACG,KAAK,CAAC;EACnD;EAEA,SAASC,sBAAsBA,CAACC,GAAG,EAAE;IACnC,OAAO,CAAC,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC,CAACC,QAAQ,CAACD,GAAG,CAAC;EACpD;EAEA,SAASE,wBAAwBA,CAAC7B,KAAK,EAAE;IACvC;IACA;IACA;;IAEA;IACA,IAAI,CAAC0B,sBAAsB,CAAC1B,KAAK,CAAC2B,GAAG,CAAC,EAAE;MACtC,OAAO,KAAK;IACd;;IAEA;IACA,IAAI,CAAC3B,KAAK,CAACmB,SAAS,EAAE;MACpB,OAAO,KAAK;IACd;IACA;;IAEA,IAAInB,KAAK,CAACmB,SAAS,CAACF,IAAI,CAACG,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,IAAIJ,EAAE,CAACK,KAAK,CAACG,QAAQ,CAAC,SAAS,CAAC,CAAC,EAAE;MAC/E,OAAO,KAAK;IACd;IAEA,OAAOV,+BAA+B,CAAClB,KAAK,CAAC,CAAC,CAAC;EACjD;EAGA,SAAS8B,iBAAiBA,CAACR,QAAQ,EAAE;IACnC,IAAI,CAACD,iCAAiC,CAACC,QAAQ,CAAC,EAAE;MAChD,OAAO;QAACE,IAAI,EAAEF,QAAQ,CAACE,IAAI;QAAEC,KAAK,EAAEH,QAAQ,CAACG;MAAK,CAAC,CAAC,CAAC;IACvD;IACA,MAAMA,KAAK,GAAGpF,IAAI,CAAC0F,cAAc,CAACT,QAAQ,CAACG,KAAK,CAAC;IAEjD,OAAO;MAACD,IAAI,EAAEF,QAAQ,CAACE,IAAI;MAAEC;IAAK,CAAC;EACrC;EAEA,SAASO,oBAAoBA,CAACV,QAAQ,EAAE;IACtC,MAAMG,KAAK,GAAGJ,iCAAiC,CAACC,QAAQ,CAAC,GAAG7E,OAAO,CAACsF,cAAc,CAACT,QAAQ,CAACG,KAAK,CAAC,CAAC5B,MAAM,GAAGyB,QAAQ,CAACG,KAAK;IAC1H,OAAO;MAACD,IAAI,EAAEF,QAAQ,CAACE,IAAI;MAAEC;IAAK,CAAC;EACrC;EAGA,SAASQ,cAAcA,CAACjC,KAAK,EAAEkC,gBAAgB,EAAE;IAC/C;;IAEA;IACA,IAAI,CAAC7D,MAAM,CAACK,qBAAqB,IAAI,CAACL,MAAM,CAACM,wBAAwB,EAAE;MACrE,MAAMwC,SAAS,GAAGnB,KAAK,CAACmB,SAAS,CAACgB,GAAG,CAACf,EAAE,IAAIU,iBAAiB,CAACV,EAAE,CAAC,CAAC;MAClE,OAAO;QAACO,GAAG,EAAE3B,KAAK,CAAC2B,GAAG;QAAES,IAAI,EAAEpC,KAAK,CAACoC,IAAI;QAAEC,IAAI,EAAErC,KAAK,CAACqC,IAAI;QAAElB;MAAS,CAAC;IACxE;IAEA,MAAMmB,SAAS,GAAGC,eAAe,CAAC,KAAK,EAAEvC,KAAK,CAACmB,SAAS,EAAEe,gBAAgB,CAAC;IAC3E,MAAMM,SAAS,GAAG,IAAAC,uBAAgB,EAACzC,KAAK,EAAE,GAAG,EAAE/B,SAAS,CAAC,GAAG,EAAE,GAAG,CAAC;MAACuD,IAAI,EAAE,GAAG;MAAEC,KAAK,EAAExD;IAAS,CAAC,CAAC;IAEhG,MAAMkD,SAAS,GAAGnB,KAAK,CAACmB,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,CAAC,CAACW,GAAG,CAACf,EAAE,IAAIU,iBAAiB,CAACV,EAAE,CAAC,CAAC;IAEhG,OAAO;MAACO,GAAG,EAAE3B,KAAK,CAAC2B,GAAG;MAAES,IAAI,EAAEpC,KAAK,CAACoC,IAAI;MAAEC,IAAI,EAAErC,KAAK,CAACqC,IAAI;MAAElB,SAAS,EAAE,CAACmB,SAAS,EAAE,GAAGnB,SAAS,EAAE,GAAGqB,SAAS;IAAC,CAAC;EACjH;EAEA,SAASD,eAAeA,CAACZ,GAAG,EAAER,SAAS,EAAEe,gBAAgB,EAAE;IACzD,MAAMS,eAAe,GAAG;MAACnB,IAAI,EAAE,GAAG;MAAEC,KAAK,EAAE,GAAGE,GAAG,IAAIO,gBAAgB;IAAE,CAAC;IACxE,IAAIP,GAAG,KAAK,KAAK,EAAE;MAAE;MACnB,OAAOgB,eAAe;IACxB;IACA;IACA,MAAM,CAACL,SAAS,CAAC,GAAGnB,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,CAAC,CAACW,GAAG,CAACf,EAAE,IAAI,IAAAf,cAAK,EAACe,EAAE,CAAC,CAAC;IAChF,IAAIkB,SAAS,EAAE;MACb,IAAAM,iCAAiB,EAACN,SAAS,EAAEX,GAAG,CAAC,CAAC,CAAC;MACnC,OAAOW,SAAS;IAClB;IAEA,OAAOK,eAAe;EACxB;EAEA,SAASE,0BAA0BA,CAAC7C,KAAK,EAAEkC,gBAAgB,EAAE;IAC3D,IAAAY,cAAO,EAAC,uBAAuB,IAAA3C,oBAAa,EAACH,KAAK,CAAC,EAAE,CAAC;IACtD,MAAM+C,YAAY,GAAGR,eAAe,CAACvC,KAAK,CAAC2B,GAAG,EAAE3B,KAAK,CAACmB,SAAS,EAAEe,gBAAgB,CAAC;IAClF,MAAMc,YAAY,GAAG,IAAAP,uBAAgB,EAACzC,KAAK,EAAE,GAAG,EAAE9B,aAAa,CAAC,GAAG,EAAE,GAAG,CAAC;MAACsD,IAAI,EAAE,GAAG;MAAEC,KAAK,EAAEvD;IAAa,CAAC,CAAC;IAC3G,MAAMiD,SAAS,GAAG,CAChB4B,YAAY,EACZ,GAAG/C,KAAK,CAACmB,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,CAAC,CAACW,GAAG,CAACf,EAAE,IAAI,IAAAf,cAAK,EAACe,EAAE,CAAC,CAAC,EACrE,GAAG4B,YAAY,CAChB;IAED,MAAMC,QAAQ,GAAG;MAACtB,GAAG,EAAE,KAAK;MAAES,IAAI,EAAEpC,KAAK,CAACoC,IAAI;MAAEC,IAAI,EAAErC,KAAK,CAACqC,IAAI;MAAElB;IAAS,CAAC;IAC5E,IAAA2B,cAAO,EAAC,uBAAuB,IAAA3C,oBAAa,EAAC8C,QAAQ,CAAC,EAAE,CAAC;IACzD,OAAOA,QAAQ;EACjB;EAEA,SAASC,yBAAyBA,CAAClD,KAAK,EAAEkC,gBAAgB,EAAE;IAC1D,IAAAY,cAAO,EAAC,uBAAuB,IAAA3C,oBAAa,EAACH,KAAK,CAAC,EAAE,CAAC;IACtD,MAAM+C,YAAY,GAAGR,eAAe,CAACvC,KAAK,CAAC2B,GAAG,EAAE3B,KAAK,CAACmB,SAAS,EAAEe,gBAAgB,CAAC;IAClF,MAAMc,YAAY,GAAG,IAAAP,uBAAgB,EAACzC,KAAK,EAAE,GAAG,EAAE7B,YAAY,CAAC,GAAG,EAAE,GAAG,CAAC;MAACqD,IAAI,EAAE,GAAG;MAAEC,KAAK,EAAEtD;IAAY,CAAC,CAAC;IACzG,MAAMgD,SAAS,GAAG,CAChB4B,YAAY,EACZ,GAAG/C,KAAK,CAACmB,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,CAAC,CAACW,GAAG,CAACf,EAAE,IAAIY,oBAAoB,CAACZ,EAAE,CAAC,CAAC,EACpF,GAAG4B,YAAY,CAChB;IAED,MAAMC,QAAQ,GAAG;MAACtB,GAAG,EAAE,KAAK;MAAES,IAAI,EAAEpC,KAAK,CAACoC,IAAI;MAAEC,IAAI,EAAErC,KAAK,CAACqC,IAAI;MAAElB;IAAS,CAAC;IAC5E,IAAA2B,cAAO,EAAC,uBAAuB,IAAA3C,oBAAa,EAAC8C,QAAQ,CAAC,EAAE,CAAC;IACzD,OAAOA,QAAQ;EACjB;EAEA,SAASE,sBAAsBA,CAACC,aAAa,EAAExE,MAAM,EAAEyE,0BAA0B,GAAG,CAAC,EAAE;IACrF,MAAMnB,gBAAgB,GAAG,IAAAoB,6DAA6C,EAACF,aAAa,CAAC;IACrF;IACA,IAAIlB,gBAAgB,GAAG,CAAC,EAAE;MACxB,OAAOA,gBAAgB;IACzB;IACA,IAAImB,0BAA0B,EAAE;MAC9B,OAAOA,0BAA0B,GAAG,CAAC;IACvC;IACA,OAAO,IAAAzD,8DAA8C,EAAChB,MAAM,CAAC,GAAG,CAAC;EACnE;EAEA,SAAS2E,wBAAwBA,CAACC,oBAAoB,EAAE;IACtD,IAAI,CAACnF,MAAM,CAACK,qBAAqB,EAAE;MACjC,OAAO,KAAK;IACd;IACA;IACA;IACA,OAAO,CAAC8E,oBAAoB,CAACvC,IAAI,CAACwC,CAAC,IAAI,IAAAhB,uBAAgB,EAACgB,CAAC,EAAE,GAAG,EAAEvF,aAAa,CAAC,CAAC;EACjF;EAEA,SAASwF,2BAA2BA,CAACF,oBAAoB,EAAE;IACzD,IAAI,CAACnF,MAAM,CAACM,wBAAwB,EAAE;MACpC,OAAO,KAAK;IACd;IACA,OAAO,CAAC6E,oBAAoB,CAACvC,IAAI,CAACwC,CAAC,IAAI,IAAAhB,uBAAgB,EAACgB,CAAC,EAAE,GAAG,EAAEtF,YAAY,CAAC,CAAC;EAChF;EAEA,SAASwF,8BAA8BA,CAAC3D,KAAK,EAAEpB,MAAM,EAAE;IACrD;IACA,IAAI,CAAC8C,sBAAsB,CAAC1B,KAAK,CAAC2B,GAAG,CAAC,IAAI,CAACtD,MAAM,CAACK,qBAAqB,EAAE;MACvE,OAAO,KAAK;IACd;;IAEA;IACA,IAAIwC,+BAA+B,CAAClB,KAAK,CAAC,IAAIA,KAAK,CAACmB,SAAS,CAACF,IAAI,CAACG,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,IAAIJ,EAAE,CAACK,KAAK,CAACG,QAAQ,CAAC,SAAS,CAAC,IAAIR,EAAE,CAACK,KAAK,KAAKxD,SAAS,CAAC,EAAE;MACnJ,OAAO,KAAK;IACd;IAEA,MAAMuF,oBAAoB,GAAG,IAAAI,6CAA6B,EAAC5D,KAAK,EAAEpB,MAAM,CAACvB,GAAG,CAAC,KAAK,CAAC,CAAC;IACpF,IAAImG,oBAAoB,CAACtE,MAAM,KAAK,CAAC,EAAE;MACrC,OAAO,KAAK;IACd;;IAEA;IACA,MAAM,CAAC2E,WAAW,CAAC,GAAGL,oBAAoB;IAC1C,IAAI,CAACtC,+BAA+B,CAAC2C,WAAW,CAAC,IAAIA,WAAW,CAAC1C,SAAS,CAACF,IAAI,CAACG,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,IAAIJ,EAAE,CAACK,KAAK,CAACG,QAAQ,CAAC,SAAS,CAAC,IAAIR,EAAE,CAACK,KAAK,KAAKvD,aAAa,CAAC,EAAE;MACpK,OAAO,KAAK;IACd;;IAEA;IACA;IACA,MAAM4F,wBAAwB,GAAG,IAAAC,mDAAmC,EAAC/D,KAAK,CAAC;IAC3E,MAAMgE,MAAM,GAAG,IAAA7D,oBAAa,EAAC8D,+BAA+B,CAACf,yBAAyB,CAACW,WAAW,EAAEC,wBAAwB,CAAC,EAAE9D,KAAK,CAAC2B,GAAG,CAAC,CAAC;IAC1I,MAAMuC,MAAM,GAAG,IAAA/D,oBAAa,EAAC8D,+BAA+B,CAACjE,KAAK,EAAEA,KAAK,CAAC2B,GAAG,CAAC,CAAC;IAC/E,IAAAmB,cAAO,EAAC,yBAAyBoB,MAAM,YAAYF,MAAM,MAAME,MAAM,KAAKF,MAAM,GAAG,IAAI,GAAG,MAAM,EAAE,CAAC;IACnG,OAAOE,MAAM,KAAKF,MAAM;EAC1B;EAEA,SAASC,+BAA+BA,CAACjE,KAAK,EAAE2B,GAAG,EAAE;IACnD,MAAMwC,WAAW,GAAG,IAAA9D,cAAK,EAACL,KAAK,CAAC;IAChCmE,WAAW,CAACxC,GAAG,GAAGA,GAAG,CAAC,CAAC;IACvBwC,WAAW,CAAChD,SAAS,GAAGgD,WAAW,CAAChD,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,IAAIJ,EAAE,CAACK,KAAK,KAAKtD,YAAY,CAAC,CAAC,CAAC;IAC1G,OAAO,IAAAiG,kCAAqB,EAACD,WAAW,CAAC;EAC3C;EAEA,SAASE,wBAAwBA,CAACrE,KAAK,EAAEpB,MAAM,EAAE;IAC/C;IACA,MAAM,CAACiF,WAAW,CAAC,GAAG,IAAAD,6CAA6B,EAAC5D,KAAK,EAAEpB,MAAM,CAACvB,GAAG,CAAC,KAAK,CAAC,CAAC;IAE7E,MAAMyG,wBAAwB,GAAG,IAAAC,mDAAmC,EAAC/D,KAAK,CAAC;IAE3E,MAAMsE,QAAQ,GAAG;MAAC,KAAK,EAAEtE,KAAK,CAAC2B,GAAG;MAAE,MAAM,EAAE3B,KAAK,CAACoC,IAAI;MAAE,MAAM,EAAEpC,KAAK,CAACqC,IAAI;MAAE,WAAW,EAAEwB,WAAW,CAAC1C;IAAS,CAAC;IAE/G,MAAMoD,YAAY,GAAGtC,cAAc,CAACqC,QAAQ,EAAER,wBAAwB,CAAC,CAAC,CAAC;IACzE,MAAMU,gBAAgB,GAAG3B,0BAA0B,CAACyB,QAAQ,EAAER,wBAAwB,CAAC,CAAC,CAAC;IACzF,MAAMW,eAAe,GAAGvB,yBAAyB,CAAClD,KAAK,EAAE8D,wBAAwB,CAAC,CAAC,CAAC;;IAEpF;IACAD,WAAW,CAACa,YAAY,GAAG,CAAC,CAAC,CAAC;;IAE9B,OAAO,CAACH,YAAY,EAAEC,gBAAgB,EAAEC,eAAe,CAAC,CAAC/B,MAAM,CAACe,CAAC,IAAIA,CAAC,CAAC;EACzE;EAGA,SAAS3D,YAAYA,CAACsD,aAAa,EAAExE,MAAM,EAAEyE,0BAA0B,GAAG,CAAC,EAAE;IAC3E,IAAI,CAACxB,wBAAwB,CAACuB,aAAa,CAAC,EAAE;MAC5C,IAAIO,8BAA8B,CAACP,aAAa,EAAExE,MAAM,CAAC,EAAE;QAAE;QAC3D,OAAOyF,wBAAwB,CAACjB,aAAa,EAAExE,MAAM,CAAC;MACxD;MACA,IAAIwE,aAAa,CAACsB,YAAY,EAAE;QAAE;QAChC,OAAO,EAAE;MACX;MACA,OAAO,CAACtB,aAAa,CAAC;IACxB;;IAEA;;IAEA,MAAMuB,wBAAwB,GAAGxB,sBAAsB,CAACC,aAAa,EAAExE,MAAM,EAAEyE,0BAA0B,CAAC;IAC1G,MAAMuB,2BAA2B,GAAG,IAAAC,2CAA2B,EAACF,wBAAwB,CAAC;;IAEzF;;IAEA,MAAMnB,oBAAoB,GAAG,IAAAI,6CAA6B,EAACR,aAAa,EAAExE,MAAM,CAACvB,GAAG,CAAC,KAAK,CAAC,CAAC;;IAE5F;;IAEA,MAAMkH,YAAY,GAAGtC,cAAc,CAACmB,aAAa,EAAEwB,2BAA2B,CAAC,CAAC,CAAC;IACjF,MAAMJ,gBAAgB,GAAGjB,wBAAwB,CAACC,oBAAoB,CAAC,GAAGX,0BAA0B,CAACO,aAAa,EAAEwB,2BAA2B,CAAC,GAAGE,SAAS,CAAC,CAAC;IAC9J,MAAML,eAAe,GAAGf,2BAA2B,CAACF,oBAAoB,CAAC,GAAGN,yBAAyB,CAACE,aAAa,EAAEwB,2BAA2B,CAAC,GAAGE,SAAS,CAAC,CAAC;;IAE/J,OAAO,CAACP,YAAY,EAAEC,gBAAgB,EAAEC,eAAe,CAAC,CAAC/B,MAAM,CAACe,CAAC,IAAIA,CAAC,CAAC;EACzE;AACF","ignoreList":[]}
+{"version":3,"file":"cyrillux.js","names":["_clone","_interopRequireDefault","require","_utils","iso9","_interopRequireWildcard","_subfield6Utils","_xregexp","sfs4900","_sortFields","_reindexSubfield6OccurenceNumbers","_punctuation","_getRequireWildcardCache","e","WeakMap","r","t","__esModule","default","has","get","n","__proto__","a","Object","defineProperty","getOwnPropertyDescriptor","u","hasOwnProperty","call","i","set","iso9Trans","cyrillicTrans","sfs4900Trans","_default","config","description","validate","fix","preprocessConfig","doISO9Transliteration","doSFS4900Transliteration","record","res","message","valid","nBefore","fields","length","processFields","reindexSubfield6OccurenceNumbers","sortFields","input","output","currField","remainingInput","fakeRecord","createdMax","recordGetMaxSubfield6OccurrenceNumberAsInteger","result","processField","forEach","field","validateField","orig","fieldToString","normalizedFields","clone","mod","fieldsToString","replace","push","isCyrillicCharacter","char","XRegExp","test","containsCyrillicCharacters","str","split","some","fieldContainsCyrillicCharacters","subfields","sf","subfieldShouldTransliterateToIso9","subfield","isControlSubfieldCode","code","value","tagCanBeTransliterated","tag","includes","fieldCanBeTransliterated","mapSubfieldToIso9","convertToLatin","mapSubfieldToSfs4900","mapFieldToIso9","occurrenceNumber","map","ind1","ind2","subfield6","deriveSubfield6","subfield9","fieldHasSubfield","filter","initialSubfield","resetSubfield6Tag","mapFieldToCyrillicField880","nvdebug","newSubfield6","newSubfield9","newField","mapFieldToSfs4900Field880","getNewOccurrenceNumber","originalField","maxCreatedOccurrenceNumber","fieldGetMaxSubfield6OccurrenceNumberAsInteger","needsIso9Transliteration","existingPairedFields","f","needsSfs4900Transliteration","sfs4900PairCanBeTransliterated","fieldGetOccurrenceNumberPairs","pairedField","occurrenceNumberAsString","fieldGetUnambiguousOccurrenceNumber","field2","createFieldForSfs4900Comparison","field1","clonedField","fieldStripPunctuation","transliterateSfs4900Pair","tmpField","newMainField","newCyrillicField","newSFS4900Field","cyrilluxSkip","newOccurrenceNumberAsInt","newOccurrenceNumberAsString","intToOccurrenceNumberString","undefined"],"sources":["../src/cyrillux.js"],"sourcesContent":["//import createDebugLogger from 'debug';\nimport clone from 'clone';\nimport {fieldHasSubfield, fieldToString, fieldsToString, isControlSubfieldCode, nvdebug} from './utils';\nimport * as iso9 from 'iso9_1995';\nimport {fieldGetMaxSubfield6OccurrenceNumberAsInteger, fieldGetOccurrenceNumberPairs, fieldGetUnambiguousOccurrenceNumber, intToOccurrenceNumberString, recordGetMaxSubfield6OccurrenceNumberAsInteger, resetSubfield6Tag} from './subfield6Utils';\n\nimport XRegExp from 'xregexp';\nimport * as sfs4900 from 'sfs4900';\nimport {default as sortFields} from './sortFields';\nimport {default as reindexSubfield6OccurenceNumbers} from './reindexSubfield6OccurenceNumbers';\nimport {fieldStripPunctuation} from './punctuation2';\n\nconst iso9Trans = 'ISO9 <TRANS>';\nconst cyrillicTrans = 'CYRILLIC <TRANS>';\nconst sfs4900Trans = 'SFS4900 <TRANS>';\n\nexport default function (config = {}) {\n\n  return {\n    description: 'Cyrillux functionality: convert original field to latinitsa (ISO-9) and add 880s for original cyrillic and latinitsa (SFS-4900)',\n    validate, fix\n  };\n\n  function preprocessConfig() {\n    config.doISO9Transliteration = typeof config.doISO9Transliteration === 'undefined' ? true : config.doISO9Transliteration; // eslint-disable-line functional/immutable-data\n    config.doSFS4900Transliteration = typeof config.doSFS4900Transliteration === 'undefined' ? true : config.doSFS4900Transliteration; // eslint-disable-line functional/immutable-data\n  }\n\n  function fix(record) {\n    // Fix always succeeds\n    const res = {message: [], fix: [], valid: true};\n\n    preprocessConfig(config);\n\n    const nBefore = record.fields.length;\n\n    record.fields = processFields(record.fields); // eslint-disable-line functional/immutable-data\n\n    if (nBefore < record.fields.length) { // eslint-disable-line functional/no-conditional-statements\n      reindexSubfield6OccurenceNumbers().fix(record);\n      sortFields().fix(record);\n    }\n\n    function processFields(input, output = []) {\n      const [currField, ...remainingInput] = input;\n      if (!currField) {\n        return output;\n      }\n\n      const fakeRecord = {fields: output};\n      const createdMax = recordGetMaxSubfield6OccurrenceNumberAsInteger(fakeRecord);\n      const result = processField(currField, record, createdMax);\n\n      return processFields(remainingInput, [...output, ...result]);\n    }\n\n    return res;\n  }\n\n  function validate(record) {\n    const res = {message: [], valid: true};\n\n    preprocessConfig(config);\n\n    record.fields?.forEach(field => {\n      validateField(field, res, record);\n    });\n\n    res.valid = !(res.message.length >= 1); // eslint-disable-line functional/immutable-data\n    return res;\n  }\n\n  function validateField(field, res, record) {\n    const orig = fieldToString(field);\n\n    const normalizedFields = processField(clone(field), record);\n    const mod = fieldsToString(normalizedFields).replace(/\\t__SEPARATOR__\\t/ug, ', ').replace(/ (‡6 [0-9][0-9][0-9])-[0-9][0-9]+/gu, ' $1-NN'); // eslint-disable-line prefer-named-capture-group\n    if (orig !== mod) { // Fail as the input is \"broken\"/\"crap\"/sumthing\n      res.message.push(`CHANGE: ${orig} => ${mod}`); // eslint-disable-line functional/immutable-data\n      return;\n    }\n    return;\n  }\n\n  function isCyrillicCharacter(char) {\n    return XRegExp('[\\\\p{Cyrillic}]').test(char); // eslint-disable-line new-cap\n  }\n\n  function containsCyrillicCharacters(str) { // from melinda-ui-cyrillux\n    if (!str) {\n      return false;\n    }\n    return str.split('').some(isCyrillicCharacter);\n  }\n\n  function fieldContainsCyrillicCharacters(field) { // based on melinda-ui-cyrillux\n    return field.subfields && field.subfields.some(sf => subfieldShouldTransliterateToIso9(sf));\n  }\n\n  function subfieldShouldTransliterateToIso9(subfield) {\n    if (isControlSubfieldCode(subfield.code)) {\n      return false;\n    }\n    return containsCyrillicCharacters(subfield.value);\n  }\n\n  function tagCanBeTransliterated(tag) {\n    return !['336', '337', '338', '880'].includes(tag);\n  }\n\n  function fieldCanBeTransliterated(field) {\n    // Skip certain tags ('880' is the actual skip-me beef here, but we have seen other no-nos as well).\n    // Discussion: We should probably also skip others like 05X-08X, 648, 650, 651, and 655, but this needs thinking...\n    // Also I'd like to convert do CYRILLIC->ISO-9 in field 300 (and others?) without 880 mappings... (<- not implemented)\n\n    // nvdebug(`fieldCanBeTransliterated('${fieldToString(field)}') in...`);\n    if (!tagCanBeTransliterated(field.tag)) {\n      return false;\n    }\n\n    // Skip control fields:\n    if (!field.subfields) {\n      return false;\n    }\n    // When doing MELINDA-10330-ish, we noticed that $6 should not prevent translittaration per se, so this restriction is no longer applied!\n\n    if (field.subfields.some(sf => sf.code === '9' && sf.value.includes('<TRANS>'))) {\n      return false;\n    }\n\n    return fieldContainsCyrillicCharacters(field); // We have something to translitterate:\n  }\n\n\n  function mapSubfieldToIso9(subfield) {\n    if (!subfieldShouldTransliterateToIso9(subfield)) {\n      return {code: subfield.code, value: subfield.value}; // just clone\n    }\n    const value = iso9.convertToLatin(subfield.value);\n\n    return {code: subfield.code, value};\n  }\n\n  function mapSubfieldToSfs4900(subfield) {\n    const value = subfieldShouldTransliterateToIso9(subfield) ? sfs4900.convertToLatin(subfield.value).result : subfield.value;\n    return {code: subfield.code, value};\n  }\n\n\n  function mapFieldToIso9(field, occurrenceNumber) {\n    // This is the original non-880 field, that will be converted from Cyrillic to ISO\n\n    // Just converts the field to ISO-9 latinitsa, does not create any field-880s, so don't bother with $6 or $9 either\n    if (!config.doISO9Transliteration && !config.doSFS4900Transliteration) {\n      const subfields = field.subfields.map(sf => mapSubfieldToIso9(sf));\n      return {tag: field.tag, ind1: field.ind1, ind2: field.ind2, subfields};\n    }\n\n    const subfield6 = deriveSubfield6('880', field.subfields, occurrenceNumber);\n    const subfield9 = fieldHasSubfield(field, '9', iso9Trans) ? [] : [{code: '9', value: iso9Trans}];\n\n    const subfields = field.subfields.filter(sf => sf.code !== '6').map(sf => mapSubfieldToIso9(sf));\n\n    return {tag: field.tag, ind1: field.ind1, ind2: field.ind2, subfields: [subfield6, ...subfields, ...subfield9]};\n  }\n\n  function deriveSubfield6(tag, subfields, occurrenceNumber) {\n    const initialSubfield = {code: '6', value: `${tag}-${occurrenceNumber}`};\n    if (tag === '880') { // If *tag in subfield $6* is 880, field is not 880 :D\n      return initialSubfield;\n    }\n    // Try to use existing subfield\n    const [subfield6] = subfields.filter(sf => sf.code === '6').map(sf => clone(sf));\n    if (subfield6) {\n      resetSubfield6Tag(subfield6, tag); // Should we update occurrence number?\n      return subfield6;\n    }\n\n    return initialSubfield;\n  }\n\n  function mapFieldToCyrillicField880(field, occurrenceNumber) {\n    nvdebug(`Derive CYR 880 from ${fieldToString(field)}`);\n    const newSubfield6 = deriveSubfield6(field.tag, field.subfields, occurrenceNumber);\n    const newSubfield9 = fieldHasSubfield(field, '9', cyrillicTrans) ? [] : [{code: '9', value: cyrillicTrans}];\n    const subfields = [\n      newSubfield6,\n      ...field.subfields.filter(sf => sf.code !== '6').map(sf => clone(sf)),\n      ...newSubfield9\n    ];\n\n    const newField = {tag: '880', ind1: field.ind1, ind2: field.ind2, subfields};\n    nvdebug(`   New CYR 880      ${fieldToString(newField)}`);\n    return newField;\n  }\n\n  function mapFieldToSfs4900Field880(field, occurrenceNumber) {\n    nvdebug(`Derive SFS 880 from ${fieldToString(field)}`);\n    const newSubfield6 = deriveSubfield6(field.tag, field.subfields, occurrenceNumber);\n    const newSubfield9 = fieldHasSubfield(field, '9', sfs4900Trans) ? [] : [{code: '9', value: sfs4900Trans}];\n    const subfields = [\n      newSubfield6,\n      ...field.subfields.filter(sf => sf.code !== '6').map(sf => mapSubfieldToSfs4900(sf)),\n      ...newSubfield9\n    ];\n\n    const newField = {tag: '880', ind1: field.ind1, ind2: field.ind2, subfields};\n    nvdebug(`       SFS 880      ${fieldToString(newField)}`);\n    return newField;\n  }\n\n  function getNewOccurrenceNumber(originalField, record, maxCreatedOccurrenceNumber = 0) {\n    const occurrenceNumber = fieldGetMaxSubfield6OccurrenceNumberAsInteger(originalField);\n    // Return existing occurrence number:\n    if (occurrenceNumber > 0) {\n      return occurrenceNumber;\n    }\n    if (maxCreatedOccurrenceNumber) {\n      return maxCreatedOccurrenceNumber + 1;\n    }\n    return recordGetMaxSubfield6OccurrenceNumberAsInteger(record) + 1;\n  }\n\n  function needsIso9Transliteration(existingPairedFields) {\n    if (!config.doISO9Transliteration) {\n      return false;\n    }\n    // Actually normal field is always converted to ISO-9, and this function checks where we move original cyrillic field to 880.\n    // Thus we look for field 880$9 \"CYRILLIC <TRANS>\" here, and not \"ISO9 <TRANS>\"!\n    return !existingPairedFields.some(f => fieldHasSubfield(f, '9', cyrillicTrans));\n  }\n\n  function needsSfs4900Transliteration(existingPairedFields) {\n    if (!config.doSFS4900Transliteration) {\n      return false;\n    }\n    return !existingPairedFields.some(f => fieldHasSubfield(f, '9', sfs4900Trans));\n  }\n\n  function sfs4900PairCanBeTransliterated(field, record) {\n    // MELINDA-10330: we already have public library data: (unmarked) SFS-4900 in FIELD and (unmarked) Cyrillic in 880\n    if (!field.subfields || !tagCanBeTransliterated(field.tag) || !config.doISO9Transliteration) {\n      return false;\n    }\n\n    // Original field: $9 ISO9 <TRANS> is the only legal <TRANS>\n    if (fieldContainsCyrillicCharacters(field) || field.subfields.some(sf => sf.code === '9' && sf.value.includes('<TRANS>') && sf.value !== iso9Trans)) {\n      return false;\n    }\n\n    const existingPairedFields = fieldGetOccurrenceNumberPairs(field, record.get('880'));\n    if (existingPairedFields.length !== 1) {\n      return false;\n    }\n\n    // Paired field: $9 CYRILLIC <TRANS> is the only legal <TRANS>\n    const [pairedField] = existingPairedFields;\n    if (!fieldContainsCyrillicCharacters(pairedField) || pairedField.subfields.some(sf => sf.code === '9' && sf.value.includes('<TRANS>') && sf.value !== cyrillicTrans)) {\n      return false;\n    }\n\n    // Actually check that original field and and sfs-4900-fied cyrillic field are equal (after punctuation clean-up),\n    // and thus it's a real case of MELINDA-10330 ISO9 adding:\n    const occurrenceNumberAsString = fieldGetUnambiguousOccurrenceNumber(field);\n    const field2 = fieldToString(createFieldForSfs4900Comparison(mapFieldToSfs4900Field880(pairedField, occurrenceNumberAsString), field.tag));\n    const field1 = fieldToString(createFieldForSfs4900Comparison(field, field.tag));\n    nvdebug(`COMPARE CONTENTS:\\n  '${field1}' vs\\n  '${field2}': ${field1 === field2 ? 'OK' : 'FAIL'}`);\n    return field1 === field2;\n  }\n\n  function createFieldForSfs4900Comparison(field, tag) {\n    const clonedField = clone(field);\n    clonedField.tag = tag; // eslint-disable-line functional/immutable-data\n    clonedField.subfields = clonedField.subfields.filter(sf => sf.code !== '9' || sf.value !== sfs4900Trans); // eslint-disable-line functional/immutable-data\n    return fieldStripPunctuation(clonedField);\n  }\n\n  function transliterateSfs4900Pair(field, record) {\n    // Handle MELINDA-10330: Field is already in SFS-4900 and the only paired field is in Cyrillic!\n    const [pairedField] = fieldGetOccurrenceNumberPairs(field, record.get('880'));\n\n    const occurrenceNumberAsString = fieldGetUnambiguousOccurrenceNumber(field);\n\n    const tmpField = {'tag': field.tag, 'ind1': field.ind1, 'ind2': field.ind2, 'subfields': pairedField.subfields};\n\n    const newMainField = mapFieldToIso9(tmpField, occurrenceNumberAsString); // Cyrillic => ISO-9\n    const newCyrillicField = mapFieldToCyrillicField880(tmpField, occurrenceNumberAsString); // CYRILLIC\n    const newSFS4900Field = mapFieldToSfs4900Field880(field, occurrenceNumberAsString); // SFS-4900\n\n    // Trigger the drop of original counterpart $6 :\n    pairedField.cyrilluxSkip = 1; // eslint-disable-line functional/immutable-data\n\n    return [newMainField, newCyrillicField, newSFS4900Field].filter(f => f);\n  }\n\n\n  function processField(originalField, record, maxCreatedOccurrenceNumber = 0) {\n    if (!fieldCanBeTransliterated(originalField)) {\n      if (sfs4900PairCanBeTransliterated(originalField, record)) { // MELINDA-10330\n        return transliterateSfs4900Pair(originalField, record);\n      }\n      if (originalField.cyrilluxSkip) { // MELINDA-10330 hack to remove 880 fields that were replaced/sort-of processed with their counterpair.\n        return [];\n      }\n      return [originalField];\n    }\n\n    // nvdebug(`PROCESSING: ${fieldToString(originalField)}`);\n\n    const newOccurrenceNumberAsInt = getNewOccurrenceNumber(originalField, record, maxCreatedOccurrenceNumber);\n    const newOccurrenceNumberAsString = intToOccurrenceNumberString(newOccurrenceNumberAsInt);\n\n    // nvdebug(`NEW OCCURRENCE NUMBER: '${newOccurrenceNumberAsString}'`);\n\n    const existingPairedFields = fieldGetOccurrenceNumberPairs(originalField, record.get('880'));\n\n    // nvdebug(`NUMBER OF PAIRED 880 FIELDS: ${existingPairedFields.length}`);\n\n    const newMainField = mapFieldToIso9(originalField, newOccurrenceNumberAsString); // ISO-9\n    const newCyrillicField = needsIso9Transliteration(existingPairedFields) ? mapFieldToCyrillicField880(originalField, newOccurrenceNumberAsString) : undefined; // CYRILLIC\n    const newSFS4900Field = needsSfs4900Transliteration(existingPairedFields) ? mapFieldToSfs4900Field880(originalField, newOccurrenceNumberAsString) : undefined; /// SFS-4900\n\n    return [newMainField, newCyrillicField, newSFS4900Field].filter(f => f);\n  }\n}\n"],"mappings":";;;;;;AACA,IAAAA,MAAA,GAAAC,sBAAA,CAAAC,OAAA;AACA,IAAAC,MAAA,GAAAD,OAAA;AACA,IAAAE,IAAA,GAAAC,uBAAA,CAAAH,OAAA;AACA,IAAAI,eAAA,GAAAJ,OAAA;AAEA,IAAAK,QAAA,GAAAN,sBAAA,CAAAC,OAAA;AACA,IAAAM,OAAA,GAAAH,uBAAA,CAAAH,OAAA;AACA,IAAAO,WAAA,GAAAR,sBAAA,CAAAC,OAAA;AACA,IAAAQ,iCAAA,GAAAT,sBAAA,CAAAC,OAAA;AACA,IAAAS,YAAA,GAAAT,OAAA;AAAqD,SAAAU,yBAAAC,CAAA,6BAAAC,OAAA,mBAAAC,CAAA,OAAAD,OAAA,IAAAE,CAAA,OAAAF,OAAA,YAAAF,wBAAA,YAAAA,CAAAC,CAAA,WAAAA,CAAA,GAAAG,CAAA,GAAAD,CAAA,KAAAF,CAAA;AAAA,SAAAR,wBAAAQ,CAAA,EAAAE,CAAA,SAAAA,CAAA,IAAAF,CAAA,IAAAA,CAAA,CAAAI,UAAA,SAAAJ,CAAA,eAAAA,CAAA,uBAAAA,CAAA,yBAAAA,CAAA,WAAAK,OAAA,EAAAL,CAAA,QAAAG,CAAA,GAAAJ,wBAAA,CAAAG,CAAA,OAAAC,CAAA,IAAAA,CAAA,CAAAG,GAAA,CAAAN,CAAA,UAAAG,CAAA,CAAAI,GAAA,CAAAP,CAAA,OAAAQ,CAAA,KAAAC,SAAA,UAAAC,CAAA,GAAAC,MAAA,CAAAC,cAAA,IAAAD,MAAA,CAAAE,wBAAA,WAAAC,CAAA,IAAAd,CAAA,oBAAAc,CAAA,OAAAC,cAAA,CAAAC,IAAA,CAAAhB,CAAA,EAAAc,CAAA,SAAAG,CAAA,GAAAP,CAAA,GAAAC,MAAA,CAAAE,wBAAA,CAAAb,CAAA,EAAAc,CAAA,UAAAG,CAAA,KAAAA,CAAA,CAAAV,GAAA,IAAAU,CAAA,CAAAC,GAAA,IAAAP,MAAA,CAAAC,cAAA,CAAAJ,CAAA,EAAAM,CAAA,EAAAG,CAAA,IAAAT,CAAA,CAAAM,CAAA,IAAAd,CAAA,CAAAc,CAAA,YAAAN,CAAA,CAAAH,OAAA,GAAAL,CAAA,EAAAG,CAAA,IAAAA,CAAA,CAAAe,GAAA,CAAAlB,CAAA,EAAAQ,CAAA,GAAAA,CAAA;AAAA,SAAApB,uBAAAY,CAAA,WAAAA,CAAA,IAAAA,CAAA,CAAAI,UAAA,GAAAJ,CAAA,KAAAK,OAAA,EAAAL,CAAA;AAVrD;;AAYA,MAAMmB,SAAS,GAAG,cAAc;AAChC,MAAMC,aAAa,GAAG,kBAAkB;AACxC,MAAMC,YAAY,GAAG,iBAAiB;AAEvB,SAAAC,SAAUC,MAAM,GAAG,CAAC,CAAC,EAAE;EAEpC,OAAO;IACLC,WAAW,EAAE,iIAAiI;IAC9IC,QAAQ;IAAEC;EACZ,CAAC;EAED,SAASC,gBAAgBA,CAAA,EAAG;IAC1BJ,MAAM,CAACK,qBAAqB,GAAG,OAAOL,MAAM,CAACK,qBAAqB,KAAK,WAAW,GAAG,IAAI,GAAGL,MAAM,CAACK,qBAAqB,CAAC,CAAC;IAC1HL,MAAM,CAACM,wBAAwB,GAAG,OAAON,MAAM,CAACM,wBAAwB,KAAK,WAAW,GAAG,IAAI,GAAGN,MAAM,CAACM,wBAAwB,CAAC,CAAC;EACrI;EAEA,SAASH,GAAGA,CAACI,MAAM,EAAE;IACnB;IACA,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEN,GAAG,EAAE,EAAE;MAAEO,KAAK,EAAE;IAAI,CAAC;IAE/CN,gBAAgB,CAACJ,MAAM,CAAC;IAExB,MAAMW,OAAO,GAAGJ,MAAM,CAACK,MAAM,CAACC,MAAM;IAEpCN,MAAM,CAACK,MAAM,GAAGE,aAAa,CAACP,MAAM,CAACK,MAAM,CAAC,CAAC,CAAC;;IAE9C,IAAID,OAAO,GAAGJ,MAAM,CAACK,MAAM,CAACC,MAAM,EAAE;MAAE;MACpC,IAAAE,yCAAgC,EAAC,CAAC,CAACZ,GAAG,CAACI,MAAM,CAAC;MAC9C,IAAAS,mBAAU,EAAC,CAAC,CAACb,GAAG,CAACI,MAAM,CAAC;IAC1B;IAEA,SAASO,aAAaA,CAACG,KAAK,EAAEC,MAAM,GAAG,EAAE,EAAE;MACzC,MAAM,CAACC,SAAS,EAAE,GAAGC,cAAc,CAAC,GAAGH,KAAK;MAC5C,IAAI,CAACE,SAAS,EAAE;QACd,OAAOD,MAAM;MACf;MAEA,MAAMG,UAAU,GAAG;QAACT,MAAM,EAAEM;MAAM,CAAC;MACnC,MAAMI,UAAU,GAAG,IAAAC,8DAA8C,EAACF,UAAU,CAAC;MAC7E,MAAMG,MAAM,GAAGC,YAAY,CAACN,SAAS,EAAEZ,MAAM,EAAEe,UAAU,CAAC;MAE1D,OAAOR,aAAa,CAACM,cAAc,EAAE,CAAC,GAAGF,MAAM,EAAE,GAAGM,MAAM,CAAC,CAAC;IAC9D;IAEA,OAAOhB,GAAG;EACZ;EAEA,SAASN,QAAQA,CAACK,MAAM,EAAE;IACxB,MAAMC,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEC,KAAK,EAAE;IAAI,CAAC;IAEtCN,gBAAgB,CAACJ,MAAM,CAAC;IAExBO,MAAM,CAACK,MAAM,EAAEc,OAAO,CAACC,KAAK,IAAI;MAC9BC,aAAa,CAACD,KAAK,EAAEnB,GAAG,EAAED,MAAM,CAAC;IACnC,CAAC,CAAC;IAEFC,GAAG,CAACE,KAAK,GAAG,EAAEF,GAAG,CAACC,OAAO,CAACI,MAAM,IAAI,CAAC,CAAC,CAAC,CAAC;IACxC,OAAOL,GAAG;EACZ;EAEA,SAASoB,aAAaA,CAACD,KAAK,EAAEnB,GAAG,EAAED,MAAM,EAAE;IACzC,MAAMsB,IAAI,GAAG,IAAAC,oBAAa,EAACH,KAAK,CAAC;IAEjC,MAAMI,gBAAgB,GAAGN,YAAY,CAAC,IAAAO,cAAK,EAACL,KAAK,CAAC,EAAEpB,MAAM,CAAC;IAC3D,MAAM0B,GAAG,GAAG,IAAAC,qBAAc,EAACH,gBAAgB,CAAC,CAACI,OAAO,CAAC,qBAAqB,EAAE,IAAI,CAAC,CAACA,OAAO,CAAC,qCAAqC,EAAE,QAAQ,CAAC,CAAC,CAAC;IAC5I,IAAIN,IAAI,KAAKI,GAAG,EAAE;MAAE;MAClBzB,GAAG,CAACC,OAAO,CAAC2B,IAAI,CAAC,WAAWP,IAAI,OAAOI,GAAG,EAAE,CAAC,CAAC,CAAC;MAC/C;IACF;IACA;EACF;EAEA,SAASI,mBAAmBA,CAACC,IAAI,EAAE;IACjC,OAAO,IAAAC,gBAAO,EAAC,iBAAiB,CAAC,CAACC,IAAI,CAACF,IAAI,CAAC,CAAC,CAAC;EAChD;EAEA,SAASG,0BAA0BA,CAACC,GAAG,EAAE;IAAE;IACzC,IAAI,CAACA,GAAG,EAAE;MACR,OAAO,KAAK;IACd;IACA,OAAOA,GAAG,CAACC,KAAK,CAAC,EAAE,CAAC,CAACC,IAAI,CAACP,mBAAmB,CAAC;EAChD;EAEA,SAASQ,+BAA+BA,CAAClB,KAAK,EAAE;IAAE;IAChD,OAAOA,KAAK,CAACmB,SAAS,IAAInB,KAAK,CAACmB,SAAS,CAACF,IAAI,CAACG,EAAE,IAAIC,iCAAiC,CAACD,EAAE,CAAC,CAAC;EAC7F;EAEA,SAASC,iCAAiCA,CAACC,QAAQ,EAAE;IACnD,IAAI,IAAAC,4BAAqB,EAACD,QAAQ,CAACE,IAAI,CAAC,EAAE;MACxC,OAAO,KAAK;IACd;IACA,OAAOV,0BAA0B,CAACQ,QAAQ,CAACG,KAAK,CAAC;EACnD;EAEA,SAASC,sBAAsBA,CAACC,GAAG,EAAE;IACnC,OAAO,CAAC,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC,CAACC,QAAQ,CAACD,GAAG,CAAC;EACpD;EAEA,SAASE,wBAAwBA,CAAC7B,KAAK,EAAE;IACvC;IACA;IACA;;IAEA;IACA,IAAI,CAAC0B,sBAAsB,CAAC1B,KAAK,CAAC2B,GAAG,CAAC,EAAE;MACtC,OAAO,KAAK;IACd;;IAEA;IACA,IAAI,CAAC3B,KAAK,CAACmB,SAAS,EAAE;MACpB,OAAO,KAAK;IACd;IACA;;IAEA,IAAInB,KAAK,CAACmB,SAAS,CAACF,IAAI,CAACG,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,IAAIJ,EAAE,CAACK,KAAK,CAACG,QAAQ,CAAC,SAAS,CAAC,CAAC,EAAE;MAC/E,OAAO,KAAK;IACd;IAEA,OAAOV,+BAA+B,CAAClB,KAAK,CAAC,CAAC,CAAC;EACjD;EAGA,SAAS8B,iBAAiBA,CAACR,QAAQ,EAAE;IACnC,IAAI,CAACD,iCAAiC,CAACC,QAAQ,CAAC,EAAE;MAChD,OAAO;QAACE,IAAI,EAAEF,QAAQ,CAACE,IAAI;QAAEC,KAAK,EAAEH,QAAQ,CAACG;MAAK,CAAC,CAAC,CAAC;IACvD;IACA,MAAMA,KAAK,GAAGpF,IAAI,CAAC0F,cAAc,CAACT,QAAQ,CAACG,KAAK,CAAC;IAEjD,OAAO;MAACD,IAAI,EAAEF,QAAQ,CAACE,IAAI;MAAEC;IAAK,CAAC;EACrC;EAEA,SAASO,oBAAoBA,CAACV,QAAQ,EAAE;IACtC,MAAMG,KAAK,GAAGJ,iCAAiC,CAACC,QAAQ,CAAC,GAAG7E,OAAO,CAACsF,cAAc,CAACT,QAAQ,CAACG,KAAK,CAAC,CAAC5B,MAAM,GAAGyB,QAAQ,CAACG,KAAK;IAC1H,OAAO;MAACD,IAAI,EAAEF,QAAQ,CAACE,IAAI;MAAEC;IAAK,CAAC;EACrC;EAGA,SAASQ,cAAcA,CAACjC,KAAK,EAAEkC,gBAAgB,EAAE;IAC/C;;IAEA;IACA,IAAI,CAAC7D,MAAM,CAACK,qBAAqB,IAAI,CAACL,MAAM,CAACM,wBAAwB,EAAE;MACrE,MAAMwC,SAAS,GAAGnB,KAAK,CAACmB,SAAS,CAACgB,GAAG,CAACf,EAAE,IAAIU,iBAAiB,CAACV,EAAE,CAAC,CAAC;MAClE,OAAO;QAACO,GAAG,EAAE3B,KAAK,CAAC2B,GAAG;QAAES,IAAI,EAAEpC,KAAK,CAACoC,IAAI;QAAEC,IAAI,EAAErC,KAAK,CAACqC,IAAI;QAAElB;MAAS,CAAC;IACxE;IAEA,MAAMmB,SAAS,GAAGC,eAAe,CAAC,KAAK,EAAEvC,KAAK,CAACmB,SAAS,EAAEe,gBAAgB,CAAC;IAC3E,MAAMM,SAAS,GAAG,IAAAC,uBAAgB,EAACzC,KAAK,EAAE,GAAG,EAAE/B,SAAS,CAAC,GAAG,EAAE,GAAG,CAAC;MAACuD,IAAI,EAAE,GAAG;MAAEC,KAAK,EAAExD;IAAS,CAAC,CAAC;IAEhG,MAAMkD,SAAS,GAAGnB,KAAK,CAACmB,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,CAAC,CAACW,GAAG,CAACf,EAAE,IAAIU,iBAAiB,CAACV,EAAE,CAAC,CAAC;IAEhG,OAAO;MAACO,GAAG,EAAE3B,KAAK,CAAC2B,GAAG;MAAES,IAAI,EAAEpC,KAAK,CAACoC,IAAI;MAAEC,IAAI,EAAErC,KAAK,CAACqC,IAAI;MAAElB,SAAS,EAAE,CAACmB,SAAS,EAAE,GAAGnB,SAAS,EAAE,GAAGqB,SAAS;IAAC,CAAC;EACjH;EAEA,SAASD,eAAeA,CAACZ,GAAG,EAAER,SAAS,EAAEe,gBAAgB,EAAE;IACzD,MAAMS,eAAe,GAAG;MAACnB,IAAI,EAAE,GAAG;MAAEC,KAAK,EAAE,GAAGE,GAAG,IAAIO,gBAAgB;IAAE,CAAC;IACxE,IAAIP,GAAG,KAAK,KAAK,EAAE;MAAE;MACnB,OAAOgB,eAAe;IACxB;IACA;IACA,MAAM,CAACL,SAAS,CAAC,GAAGnB,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,CAAC,CAACW,GAAG,CAACf,EAAE,IAAI,IAAAf,cAAK,EAACe,EAAE,CAAC,CAAC;IAChF,IAAIkB,SAAS,EAAE;MACb,IAAAM,iCAAiB,EAACN,SAAS,EAAEX,GAAG,CAAC,CAAC,CAAC;MACnC,OAAOW,SAAS;IAClB;IAEA,OAAOK,eAAe;EACxB;EAEA,SAASE,0BAA0BA,CAAC7C,KAAK,EAAEkC,gBAAgB,EAAE;IAC3D,IAAAY,cAAO,EAAC,uBAAuB,IAAA3C,oBAAa,EAACH,KAAK,CAAC,EAAE,CAAC;IACtD,MAAM+C,YAAY,GAAGR,eAAe,CAACvC,KAAK,CAAC2B,GAAG,EAAE3B,KAAK,CAACmB,SAAS,EAAEe,gBAAgB,CAAC;IAClF,MAAMc,YAAY,GAAG,IAAAP,uBAAgB,EAACzC,KAAK,EAAE,GAAG,EAAE9B,aAAa,CAAC,GAAG,EAAE,GAAG,CAAC;MAACsD,IAAI,EAAE,GAAG;MAAEC,KAAK,EAAEvD;IAAa,CAAC,CAAC;IAC3G,MAAMiD,SAAS,GAAG,CAChB4B,YAAY,EACZ,GAAG/C,KAAK,CAACmB,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,CAAC,CAACW,GAAG,CAACf,EAAE,IAAI,IAAAf,cAAK,EAACe,EAAE,CAAC,CAAC,EACrE,GAAG4B,YAAY,CAChB;IAED,MAAMC,QAAQ,GAAG;MAACtB,GAAG,EAAE,KAAK;MAAES,IAAI,EAAEpC,KAAK,CAACoC,IAAI;MAAEC,IAAI,EAAErC,KAAK,CAACqC,IAAI;MAAElB;IAAS,CAAC;IAC5E,IAAA2B,cAAO,EAAC,uBAAuB,IAAA3C,oBAAa,EAAC8C,QAAQ,CAAC,EAAE,CAAC;IACzD,OAAOA,QAAQ;EACjB;EAEA,SAASC,yBAAyBA,CAAClD,KAAK,EAAEkC,gBAAgB,EAAE;IAC1D,IAAAY,cAAO,EAAC,uBAAuB,IAAA3C,oBAAa,EAACH,KAAK,CAAC,EAAE,CAAC;IACtD,MAAM+C,YAAY,GAAGR,eAAe,CAACvC,KAAK,CAAC2B,GAAG,EAAE3B,KAAK,CAACmB,SAAS,EAAEe,gBAAgB,CAAC;IAClF,MAAMc,YAAY,GAAG,IAAAP,uBAAgB,EAACzC,KAAK,EAAE,GAAG,EAAE7B,YAAY,CAAC,GAAG,EAAE,GAAG,CAAC;MAACqD,IAAI,EAAE,GAAG;MAAEC,KAAK,EAAEtD;IAAY,CAAC,CAAC;IACzG,MAAMgD,SAAS,GAAG,CAChB4B,YAAY,EACZ,GAAG/C,KAAK,CAACmB,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,CAAC,CAACW,GAAG,CAACf,EAAE,IAAIY,oBAAoB,CAACZ,EAAE,CAAC,CAAC,EACpF,GAAG4B,YAAY,CAChB;IAED,MAAMC,QAAQ,GAAG;MAACtB,GAAG,EAAE,KAAK;MAAES,IAAI,EAAEpC,KAAK,CAACoC,IAAI;MAAEC,IAAI,EAAErC,KAAK,CAACqC,IAAI;MAAElB;IAAS,CAAC;IAC5E,IAAA2B,cAAO,EAAC,uBAAuB,IAAA3C,oBAAa,EAAC8C,QAAQ,CAAC,EAAE,CAAC;IACzD,OAAOA,QAAQ;EACjB;EAEA,SAASE,sBAAsBA,CAACC,aAAa,EAAExE,MAAM,EAAEyE,0BAA0B,GAAG,CAAC,EAAE;IACrF,MAAMnB,gBAAgB,GAAG,IAAAoB,6DAA6C,EAACF,aAAa,CAAC;IACrF;IACA,IAAIlB,gBAAgB,GAAG,CAAC,EAAE;MACxB,OAAOA,gBAAgB;IACzB;IACA,IAAImB,0BAA0B,EAAE;MAC9B,OAAOA,0BAA0B,GAAG,CAAC;IACvC;IACA,OAAO,IAAAzD,8DAA8C,EAAChB,MAAM,CAAC,GAAG,CAAC;EACnE;EAEA,SAAS2E,wBAAwBA,CAACC,oBAAoB,EAAE;IACtD,IAAI,CAACnF,MAAM,CAACK,qBAAqB,EAAE;MACjC,OAAO,KAAK;IACd;IACA;IACA;IACA,OAAO,CAAC8E,oBAAoB,CAACvC,IAAI,CAACwC,CAAC,IAAI,IAAAhB,uBAAgB,EAACgB,CAAC,EAAE,GAAG,EAAEvF,aAAa,CAAC,CAAC;EACjF;EAEA,SAASwF,2BAA2BA,CAACF,oBAAoB,EAAE;IACzD,IAAI,CAACnF,MAAM,CAACM,wBAAwB,EAAE;MACpC,OAAO,KAAK;IACd;IACA,OAAO,CAAC6E,oBAAoB,CAACvC,IAAI,CAACwC,CAAC,IAAI,IAAAhB,uBAAgB,EAACgB,CAAC,EAAE,GAAG,EAAEtF,YAAY,CAAC,CAAC;EAChF;EAEA,SAASwF,8BAA8BA,CAAC3D,KAAK,EAAEpB,MAAM,EAAE;IACrD;IACA,IAAI,CAACoB,KAAK,CAACmB,SAAS,IAAI,CAACO,sBAAsB,CAAC1B,KAAK,CAAC2B,GAAG,CAAC,IAAI,CAACtD,MAAM,CAACK,qBAAqB,EAAE;MAC3F,OAAO,KAAK;IACd;;IAEA;IACA,IAAIwC,+BAA+B,CAAClB,KAAK,CAAC,IAAIA,KAAK,CAACmB,SAAS,CAACF,IAAI,CAACG,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,IAAIJ,EAAE,CAACK,KAAK,CAACG,QAAQ,CAAC,SAAS,CAAC,IAAIR,EAAE,CAACK,KAAK,KAAKxD,SAAS,CAAC,EAAE;MACnJ,OAAO,KAAK;IACd;IAEA,MAAMuF,oBAAoB,GAAG,IAAAI,6CAA6B,EAAC5D,KAAK,EAAEpB,MAAM,CAACvB,GAAG,CAAC,KAAK,CAAC,CAAC;IACpF,IAAImG,oBAAoB,CAACtE,MAAM,KAAK,CAAC,EAAE;MACrC,OAAO,KAAK;IACd;;IAEA;IACA,MAAM,CAAC2E,WAAW,CAAC,GAAGL,oBAAoB;IAC1C,IAAI,CAACtC,+BAA+B,CAAC2C,WAAW,CAAC,IAAIA,WAAW,CAAC1C,SAAS,CAACF,IAAI,CAACG,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,IAAIJ,EAAE,CAACK,KAAK,CAACG,QAAQ,CAAC,SAAS,CAAC,IAAIR,EAAE,CAACK,KAAK,KAAKvD,aAAa,CAAC,EAAE;MACpK,OAAO,KAAK;IACd;;IAEA;IACA;IACA,MAAM4F,wBAAwB,GAAG,IAAAC,mDAAmC,EAAC/D,KAAK,CAAC;IAC3E,MAAMgE,MAAM,GAAG,IAAA7D,oBAAa,EAAC8D,+BAA+B,CAACf,yBAAyB,CAACW,WAAW,EAAEC,wBAAwB,CAAC,EAAE9D,KAAK,CAAC2B,GAAG,CAAC,CAAC;IAC1I,MAAMuC,MAAM,GAAG,IAAA/D,oBAAa,EAAC8D,+BAA+B,CAACjE,KAAK,EAAEA,KAAK,CAAC2B,GAAG,CAAC,CAAC;IAC/E,IAAAmB,cAAO,EAAC,yBAAyBoB,MAAM,YAAYF,MAAM,MAAME,MAAM,KAAKF,MAAM,GAAG,IAAI,GAAG,MAAM,EAAE,CAAC;IACnG,OAAOE,MAAM,KAAKF,MAAM;EAC1B;EAEA,SAASC,+BAA+BA,CAACjE,KAAK,EAAE2B,GAAG,EAAE;IACnD,MAAMwC,WAAW,GAAG,IAAA9D,cAAK,EAACL,KAAK,CAAC;IAChCmE,WAAW,CAACxC,GAAG,GAAGA,GAAG,CAAC,CAAC;IACvBwC,WAAW,CAAChD,SAAS,GAAGgD,WAAW,CAAChD,SAAS,CAACuB,MAAM,CAACtB,EAAE,IAAIA,EAAE,CAACI,IAAI,KAAK,GAAG,IAAIJ,EAAE,CAACK,KAAK,KAAKtD,YAAY,CAAC,CAAC,CAAC;IAC1G,OAAO,IAAAiG,kCAAqB,EAACD,WAAW,CAAC;EAC3C;EAEA,SAASE,wBAAwBA,CAACrE,KAAK,EAAEpB,MAAM,EAAE;IAC/C;IACA,MAAM,CAACiF,WAAW,CAAC,GAAG,IAAAD,6CAA6B,EAAC5D,KAAK,EAAEpB,MAAM,CAACvB,GAAG,CAAC,KAAK,CAAC,CAAC;IAE7E,MAAMyG,wBAAwB,GAAG,IAAAC,mDAAmC,EAAC/D,KAAK,CAAC;IAE3E,MAAMsE,QAAQ,GAAG;MAAC,KAAK,EAAEtE,KAAK,CAAC2B,GAAG;MAAE,MAAM,EAAE3B,KAAK,CAACoC,IAAI;MAAE,MAAM,EAAEpC,KAAK,CAACqC,IAAI;MAAE,WAAW,EAAEwB,WAAW,CAAC1C;IAAS,CAAC;IAE/G,MAAMoD,YAAY,GAAGtC,cAAc,CAACqC,QAAQ,EAAER,wBAAwB,CAAC,CAAC,CAAC;IACzE,MAAMU,gBAAgB,GAAG3B,0BAA0B,CAACyB,QAAQ,EAAER,wBAAwB,CAAC,CAAC,CAAC;IACzF,MAAMW,eAAe,GAAGvB,yBAAyB,CAAClD,KAAK,EAAE8D,wBAAwB,CAAC,CAAC,CAAC;;IAEpF;IACAD,WAAW,CAACa,YAAY,GAAG,CAAC,CAAC,CAAC;;IAE9B,OAAO,CAACH,YAAY,EAAEC,gBAAgB,EAAEC,eAAe,CAAC,CAAC/B,MAAM,CAACe,CAAC,IAAIA,CAAC,CAAC;EACzE;EAGA,SAAS3D,YAAYA,CAACsD,aAAa,EAAExE,MAAM,EAAEyE,0BAA0B,GAAG,CAAC,EAAE;IAC3E,IAAI,CAACxB,wBAAwB,CAACuB,aAAa,CAAC,EAAE;MAC5C,IAAIO,8BAA8B,CAACP,aAAa,EAAExE,MAAM,CAAC,EAAE;QAAE;QAC3D,OAAOyF,wBAAwB,CAACjB,aAAa,EAAExE,MAAM,CAAC;MACxD;MACA,IAAIwE,aAAa,CAACsB,YAAY,EAAE;QAAE;QAChC,OAAO,EAAE;MACX;MACA,OAAO,CAACtB,aAAa,CAAC;IACxB;;IAEA;;IAEA,MAAMuB,wBAAwB,GAAGxB,sBAAsB,CAACC,aAAa,EAAExE,MAAM,EAAEyE,0BAA0B,CAAC;IAC1G,MAAMuB,2BAA2B,GAAG,IAAAC,2CAA2B,EAACF,wBAAwB,CAAC;;IAEzF;;IAEA,MAAMnB,oBAAoB,GAAG,IAAAI,6CAA6B,EAACR,aAAa,EAAExE,MAAM,CAACvB,GAAG,CAAC,KAAK,CAAC,CAAC;;IAE5F;;IAEA,MAAMkH,YAAY,GAAGtC,cAAc,CAACmB,aAAa,EAAEwB,2BAA2B,CAAC,CAAC,CAAC;IACjF,MAAMJ,gBAAgB,GAAGjB,wBAAwB,CAACC,oBAAoB,CAAC,GAAGX,0BAA0B,CAACO,aAAa,EAAEwB,2BAA2B,CAAC,GAAGE,SAAS,CAAC,CAAC;IAC9J,MAAML,eAAe,GAAGf,2BAA2B,CAACF,oBAAoB,CAAC,GAAGN,yBAAyB,CAACE,aAAa,EAAEwB,2BAA2B,CAAC,GAAGE,SAAS,CAAC,CAAC;;IAE/J,OAAO,CAACP,YAAY,EAAEC,gBAAgB,EAAEC,eAAe,CAAC,CAAC/B,MAAM,CAACe,CAAC,IAAIA,CAAC,CAAC;EACzE;AACF","ignoreList":[]}

package/dist/punctuation2.js

@@ -95,6 +95,7 @@ const defaultNeedsPuncAfter2 = /(?:[\]a-zA-Z0-9)]|ä|å|ö|Å|Ä|Ö)$/u;
 const doesNotEndInPunc = /[^!?.:;,]$/u; // non-punc for pre-240/700/XXX $, note that '.' comes if preceded by ')'
 const blocksPuncRHS = /^(?:\()/u;
 const allowsPuncRHS = /^(?:[A-Za-z0-9]|å|ä|ö|Å|Ä|Ö)/u;
+const aToZ = 'abcdefghijklmnopqrstuvwxyz';
 const dotIsProbablyPunc = /(?:[a-z0-9)]|å|ä|ö|(?:[A-Za-z0-9]|Å|Ä|Ö)(?:[A-Z]|Å|Ä|Ö))\.$/u;
 const puncIsProbablyPunc = /(?:[a-z0-9)]|å|ä|ö) ?[.,:;]$/u;
 // NB! 65X: Finnish terms don't use punctuation, but international ones do. Neither one is currently (2021-11-08) coded here.
@@ -253,7 +254,16 @@ const remove490And830Whatever = [{
   'followedBy': 'axyzv',
   'remove': /(?: *;| *=|,)$/u
 }];
-const linkingEntryWhatever = [{
+const linkingEntryRemoveWhatever = [{
+  'code': 'i',
+  'followedBy': 'at',
+  'remove': / ?:$/u
+},
+// ':'
+{
+  'code': 'at',
+  'remove': /\.$/u
+}, {
   'code': 'abdghiklmnopqrstuwxyz',
   'followedBy': 'abdghiklmnopqrstuwxyz',
   'remove': /\. -$/u
@@ -341,9 +351,10 @@ const cleanCrappyPunctuationRules = {
   '710': removeX10Whatever,
   '711': removeX11Whatever,
   '730': removeX30Whatever,
-  '773': linkingEntryWhatever,
-  '774': linkingEntryWhatever,
-  '776': linkingEntryWhatever,
+  '773': linkingEntryRemoveWhatever,
+  '774': linkingEntryRemoveWhatever,
+  '776': linkingEntryRemoveWhatever,
+  '787': linkingEntryRemoveWhatever,
   '800': removeX00Whatever,
   '810': removeX10Whatever,
   '830': remove490And830Whatever,
@@ -608,6 +619,24 @@ const addSeriesTitle = [
   'context': defaultNeedsPuncAfter2
 }, addSemicolonBeforeVolumeDesignation //  eg. 490$axyz-$v
 ];
+const addLinkingEntry = [
+// NB! Music 773 uses different punctuation rules, that are not implement here (can they even be?)
+{
+  'code': 'i',
+  'followedBy': aToZ,
+  'add': ':',
+  'context': defaultNeedsPuncAfter2
+}, {
+  'code': 'a',
+  'followedBy': 't',
+  'add': '.',
+  'context': defaultNeedsPuncAfter2
+}, {
+  'code': 't',
+  'followedBy': 'dghoz',
+  'add': '.',
+  'context': defaultNeedsPuncAfter2
+}];
 const addPairedPunctuationRules = {
   '100': addX00,
   '110': addX10,
@@ -700,6 +729,8 @@ const addPairedPunctuationRules = {
   '710': addX10,
   '711': addX11,
   '730': addX30,
+  '773': addLinkingEntry,
+  '787': addLinkingEntry,
   '800': addX00,
   '810': addX10,
   '811': addX11,
@@ -830,25 +861,24 @@ function applyPunctuationRules(field, subfield1, subfield2, ruleArray = null, op
 
   //nvdebug(`OP=${operation} ${tag2}: '${subfield1.code}: ${subfield1.value}' ??? '${subfield2 ? subfield2.code : '#'}'`);
   const candRules = ruleArray[tag2];
-  candRules.forEach(rule => {
+  candRules.every(rule => {
+    // uses "every", not "forEach", so that only one rule is applies to the given subfields
     //debugRule(rule);
-    //nvdebug(' WP1');
     if (!checkRule(rule, field, subfield1, subfield2)) {
-      return;
+      return true;
     }
-    //nvdebug(' WP2');
 
     //const originalValue = subfield1.value;
     if (rule.remove && [REMOVE, REMOVE_AND_ADD].includes(operation) && subfield1.value.match(rule.remove)) {
-      // eslint-disable-line functional/no-conditional-statements
       //nvdebug(`    PUNC REMOVAL TO BE PERFORMED FOR $${subfield1.code} '${subfield1.value}'`, debug);
       subfield1.value = subfield1.value.replace(rule.remove, ''); // eslint-disable-line functional/immutable-data
       //nvdebug(`    PUNC REMOVAL PERFORMED FOR '${subfield1.value}'`);
+      return false;
     }
     if (rule.add && [ADD, REMOVE_AND_ADD].includes(operation)) {
-      // eslint-disable-line functional/no-conditional-statements
       subfield1.value += rule.add; // eslint-disable-line functional/immutable-data
       //nvdebug(`    ADDED '${rule.add}' TO FORM '${subfield1.value}'`);
+      return false;
     }
 
     /*
@@ -856,6 +886,8 @@ function applyPunctuationRules(field, subfield1, subfield2, ruleArray = null, op
       nvdebug(` PROCESS PUNC: '‡${subfield1.code} ${originalValue}' => '‡${subfield1.code} ${subfield1.value}'`, debug); // eslint-disable-line functional/immutable-data
     }
     */
+
+    return true;
   });
 }
 function subfieldFixPunctuation(field, subfield1, subfield2) {

package/dist/punctuation2.js.map

@@ -1 +1 @@
-{"version":3,"file":"punctuation2.js","names":["_endingPunctuation","require","_subfield6Utils","_utils","_clone","_interopRequireDefault","e","__esModule","default","descriptionString","_default","description","validate","fix","record","nvdebug","res","message","valid","fields","forEach","f","fieldFixPunctuation","fieldsNeedingModification","filter","fieldNeedsModification","values","map","fieldToString","newValues","fieldGetFixedString","messages","val","i","length","isControlSubfield","subfield","includes","code","getNextRelevantSubfield","field","currSubfieldIndex","subfields","find","index","add","cloneField","clone","operation","subfieldFixPunctuation","subfieldStripPunctuation","sf","originalFieldAsString","modifiedFieldAsString","needsPuncAfterAlphanumeric","defaultNeedsPuncAfter2","doesNotEndInPunc","blocksPuncRHS","allowsPuncRHS","dotIsProbablyPunc","puncIsProbablyPunc","removeColons","removeX00Comma","cleanRHS","cleanX00dCommaOrDot","cleanX00aDot","cleanCorruption","cleanX00eDot","removeCommaBeforeLanguageSubfieldL","removeCommaBeforeTitleSubfieldT","X00RemoveDotAfterBracket","cleanPuncBeforeLanguage","addX00aComma","addX00dComma","addX00aComma2","addX00Dot","addX10iColon","addX10bDot","addX10eComma","addX10Dot","addColonToRelationshipInformation","addDotBeforeLanguageSubfieldL","addSemicolonBeforeVolumeDesignation","NONE","ADD","REMOVE","REMOVE_AND_ADD","removeCrapFromAllEntryFields","removeX00Whatever","removeX10Whatever","removeX11Whatever","removeX30Whatever","remove490And830Whatever","linkingEntryWhatever","crappy24X","cleanCrappyPunctuationRules","cleanLegalX00Comma","cleanLegalX00bDot","context","cleanLegalX00iColon","cleanLegalX00Dot","cleanDotBeforeLanguageSubfieldL","legalEntryField","legalX00punc","cleanLegalX10Comma","cleanLegalX10Dot","legalX10punc","cleanLegalSeriesTitle","clean24X","cleanValidPunctuationRules","addToAllEntryFields","addX00","addX10","addX11","addX30","add24X","add245","addSeriesTitle","addPairedPunctuationRules","ruleAppliesToSubfieldCode","targetSubfieldCodes","currSubfieldCode","negation","ruleAppliesToField","rule","ind1","ind2","ruleAppliesToCurrentSubfield","value","match","ruleAppliesToNextSubfield","nextSubfield","followedBy","contextRHS","checkRule","subfield1","subfield2","applyPunctuationRules","ruleArray","tag2","tag","fieldGetUnambiguousTag","candRules","remove","replace","fieldStripPunctuation","useExternalEndPunctuation","validateSingleField"],"sources":["../src/punctuation2.js"],"sourcesContent":["/*\n* punctuation.js -- try and fix a marc field punctuation\n*\n* Author(s): Nicholas Volk <nicholas.volk@helsinki.fi>\n*\n* NOTE #1: https://www.kiwi.fi/display/kumea/Loppupisteohje is implemented via another validator/fixer (ending-punctuation).\n*          This file has some support but it's now yet thorough. (And mmight never be.)\n* NOTE #2: Validator/fixer punctuation does similar stuff, but focuses on X00 fields.\n* NOTE #3: As of 2023-06-05 control subfields ($0...$9) are obsolete. Don't use them in rules.\n*          (They are jumped over when looking for next (non-controlfield subfield)\n*/\nimport {validateSingleField} from './ending-punctuation';\nimport {fieldGetUnambiguousTag} from './subfield6Utils';\n//import createDebugLogger from 'debug';\nimport {fieldToString, nvdebug} from './utils';\nimport clone from 'clone';\n\n//const debug = createDebugLogger('debug/punctuation2');\n\nconst descriptionString = 'Remove invalid and add valid punctuation to data fields';\nexport default function () {\n  return {\n    description: descriptionString,\n    validate, fix\n  };\n\n  function fix(record) {\n    nvdebug(`${descriptionString}: fixer`);\n    const res = {message: [], fix: [], valid: true};\n    record.fields.forEach(f => fieldFixPunctuation(f));\n    return res;\n  }\n\n  function validate(record) {\n    nvdebug(`${descriptionString}: validate`);\n\n    const fieldsNeedingModification = record.fields.filter(f => fieldNeedsModification(f, true));\n\n\n    const values = fieldsNeedingModification.map(f => fieldToString(f));\n    const newValues = fieldsNeedingModification.map(f => fieldGetFixedString(f, true));\n\n    const messages = values.map((val, i) => `'${val}' => '${newValues[i]}'`);\n\n    const res = {message: messages};\n\n    res.valid = res.message.length < 1; // eslint-disable-line functional/immutable-data\n    return res;\n  }\n}\n\nfunction isControlSubfield(subfield) {\n  return ['0', '1', '2', '3', '4', '5', '6', '7', '8', '9'].includes(subfield.code);\n}\n\nfunction getNextRelevantSubfield(field, currSubfieldIndex) {\n  return field.subfields.find((subfield, index) => index > currSubfieldIndex && !isControlSubfield(subfield));\n}\n\nexport function fieldGetFixedString(field, add = true) {\n  const cloneField = clone(field);\n  const operation = add ? subfieldFixPunctuation : subfieldStripPunctuation;\n  cloneField.subfields.forEach((sf, i) => {\n    // NB! instead of next subfield, we should actually get next *non-control-subfield*!!!\n    // (In plain English: We should skip $0 - $9 at least, maybe $w as well...)\n    operation(cloneField, sf, getNextRelevantSubfield(cloneField, i));\n  });\n  return fieldToString(cloneField);\n}\n\nexport function fieldNeedsModification(field, add = true) {\n  if (!field.subfields) {\n    return false;\n  }\n\n  const originalFieldAsString = fieldToString(field);\n  const modifiedFieldAsString = fieldGetFixedString(field, add);\n\n  return modifiedFieldAsString !== originalFieldAsString;\n}\n\n/////////////////////////////////////////////////////////////////////////////////////\n// <= Above code is written for the validator logic <=                             //\n// => Everything below was originally transferred from reducers' punctuation.js => //\n/////////////////////////////////////////////////////////////////////////////////////\n\n\n//const stripCrap = / *[-;:,+]+$/u;\nconst needsPuncAfterAlphanumeric = /(?:[a-z0-9A-Z]|å|ä|ö|Å|Ä|Ö)$/u;\nconst defaultNeedsPuncAfter2 = /(?:[\\]a-zA-Z0-9)]|ä|å|ö|Å|Ä|Ö)$/u;\nconst doesNotEndInPunc = /[^!?.:;,]$/u; // non-punc for pre-240/700/XXX $, note that '.' comes if preceded by ')'\nconst blocksPuncRHS = /^(?:\\()/u;\nconst allowsPuncRHS = /^(?:[A-Za-z0-9]|å|ä|ö|Å|Ä|Ö)/u;\n\nconst dotIsProbablyPunc = /(?:[a-z0-9)]|å|ä|ö|(?:[A-Za-z0-9]|Å|Ä|Ö)(?:[A-Z]|Å|Ä|Ö))\\.$/u;\nconst puncIsProbablyPunc = /(?:[a-z0-9)]|å|ä|ö) ?[.,:;]$/u;\n// NB! 65X: Finnish terms don't use punctuation, but international ones do. Neither one is currently (2021-11-08) coded here.\n\n// Will unfortunately trigger \"Sukunimi, Th.\" type:\nconst removeColons = {'code': 'abcdefghijklmnopqrstuvwxyz', 'remove': / *[;:]$/u};\nconst removeX00Comma = {'code': 'abcdenqt', 'followedBy': 'abcdenqtv#', 'context': /.,$/u, 'remove': /,$/u};\nconst cleanRHS = {'code': 'abcd', 'followedBy': 'bcde', 'context': /(?:(?:[a-z0-9]|å|ä|ö)\\.|,)$/u, 'contextRHS': blocksPuncRHS, 'remove': /[.,]$/u};\nconst cleanX00dCommaOrDot = {'code': 'd', 'followedBy': 'et#', 'context': /[0-9]-[,.]$/u, 'remove': /[,.]$/u};\nconst cleanX00aDot = {'code': 'abcde', 'followedBy': 'cdegj', 'context': dotIsProbablyPunc, 'remove': /\\.$/u};\nconst cleanCorruption = {'code': 'abcdefghijklmnopqrstuvwxyz', 'remove': / \\.$/u};\n// These $e dot removals are tricky: before removing the comma, we should know that it ain't an abbreviation such as \"esitt.\"...\nconst cleanX00eDot = {'code': 'e', 'followedBy': 'egj#', 'context': /(?:[ai]ja|jä)[.,]$/u, 'remove': /\\.$/u};\nconst removeCommaBeforeLanguageSubfieldL = {'followedBy': 'l', 'remove': /,$/u};\nconst removeCommaBeforeTitleSubfieldT = {'followedBy': 't', 'remove': /,$/u};\n\nconst X00RemoveDotAfterBracket = {'code': 'cq', 'context': /\\)\\.$/u, 'remove': /\\.$/u};\n// 390, 800, 810, 830...\nconst cleanPuncBeforeLanguage = {'code': 'atvxyz', 'followedBy': 'l', 'context': puncIsProbablyPunc, 'remove': / *[.,:;]$/u};\n\nconst addX00aComma = {'add': ',', 'code': 'abcqej', 'followedBy': 'cdeg', 'context': doesNotEndInPunc, 'contextRHS': allowsPuncRHS};\nconst addX00dComma = {'name': 'X00$d ending in \"-\" does not get comma', 'add': ',', 'code': 'd', 'followedBy': 'cdeg', 'context': /[^-,.!]$/u, 'contextRHS': allowsPuncRHS};\nconst addX00aComma2 = {'add': ',', 'code': 'abcdej', 'followedBy': 'cdeg', 'context': /(?:[A-Z]|Å|Ä|Ö)\\.$/u, 'contextRHS': allowsPuncRHS};\nconst addX00Dot = {'add': '.', 'code': 'abcdetv', 'followedBy': '#fklptu', 'context': needsPuncAfterAlphanumeric};\n\n\nconst addX10iColon = {'name': 'Punctuate relationship information', 'code': 'i', 'context': defaultNeedsPuncAfter2};\nconst addX10bDot = {'name': 'Add X10 pre-$b dot', 'add': '.', 'code': 'ab', 'followedBy': 'b', 'context': needsPuncAfterAlphanumeric};\nconst addX10eComma = {'add': ',', 'code': 'abe', 'followedBy': 'e', 'context': defaultNeedsPuncAfter2};\nconst addX10Dot = {'name': 'Add X10 final dot', 'add': '.', 'code': 'abet', 'followedBy': 'tu#', 'context': needsPuncAfterAlphanumeric};\nconst addColonToRelationshipInformation = {'name': 'Add \\':\\' to 7X0 $i relationship info', 'add': ':', 'code': 'i', 'context': defaultNeedsPuncAfter2};\n\nconst addDotBeforeLanguageSubfieldL = {'name': 'Add dot before $l', 'add': '.', 'code': 'abepst', 'followedBy': 'l', 'context': doesNotEndInPunc};\n\n// 490:\nconst addSemicolonBeforeVolumeDesignation = {'name': 'Add \" ;\" before $v', 'add': ' ;', 'code': 'atxyz', 'followedBy': 'v', 'context': /[^;]$/u};\n\nconst NONE = 0;\nconst ADD = 2;\nconst REMOVE = 1;\nconst REMOVE_AND_ADD = 3;\n\n// Crappy punctuation consists of various crap that is somewhat common.\n// We strip crap for merge decisions. We are not trying to actively remove crap here.\n\nconst removeCrapFromAllEntryFields = [removeCommaBeforeLanguageSubfieldL, removeCommaBeforeTitleSubfieldT];\n\nconst removeX00Whatever = [removeX00Comma, cleanX00aDot, cleanX00eDot, cleanCorruption, cleanX00dCommaOrDot, cleanRHS, X00RemoveDotAfterBracket, removeColons, cleanPuncBeforeLanguage, ...removeCrapFromAllEntryFields];\nconst removeX10Whatever = [removeX00Comma, cleanX00aDot, cleanX00eDot, cleanCorruption, removeColons, cleanPuncBeforeLanguage, ...removeCrapFromAllEntryFields];\nconst removeX11Whatever = removeCrapFromAllEntryFields;\nconst removeX30Whatever = removeCrapFromAllEntryFields;\n\nconst remove490And830Whatever = [{'code': 'axyzv', 'followedBy': 'axyzv', 'remove': /(?: *;| *=|,)$/u}];\n\nconst linkingEntryWhatever = [{'code': 'abdghiklmnopqrstuwxyz', 'followedBy': 'abdghiklmnopqrstuwxyz', 'remove': /\\. -$/u}];\n\n\n// '!' means negation, thus '!b' means any other subfield but 'b'.\n// 'followedBy': '#' means that current subfield is the last subfield.\n// NB! Note that control subfields are ignored in punctuation rules.\n// NB #2! Control field ignorance causes issues with field 257: https://wiki.helsinki.fi/display/rdasovellusohje/Loppupisteohje\n//        Might need to work on that at some point. NOT a top priority though.\n// NB #3! Final punctuation creation is/should be handled by endind-punctuation.js validator!\n\nconst crappy24X = [\n  {'code': 'abnp', 'followedBy': '!c', 'remove': / \\/$/u},\n  {'code': 'abn', 'followedBy': 'c', 'remove': /\\.$/u, 'context': dotIsProbablyPunc},\n  {'code': 'abc', 'followedBy': '#', 'remove': /\\.$/u, 'context': dotIsProbablyPunc},\n  {'code': 'abfghinp', 'followedBy': '#', 'remove': /\\.$/u, 'context': dotIsProbablyPunc},\n  {'code': 'n', 'followedBy': 'p', 'remove': /\\.$/u, 'context': dotIsProbablyPunc}, // MELINDA-8817\n  {'code': 'p', 'followedBy': 'pc', 'remove': /\\.$/u, 'context': dotIsProbablyPunc}, // MELINDA-8817\n  removeCommaBeforeLanguageSubfieldL\n];\n\n\nconst cleanCrappyPunctuationRules = {\n  '100': removeX00Whatever,\n  '110': removeX10Whatever,\n  '111': removeX11Whatever,\n  '130': removeX30Whatever,\n  '240': crappy24X,\n  '245': crappy24X,\n  '246': crappy24X,\n  '300': [\n    {'code': 'a', 'followedBy': '!b', 'remove': / *:$/u},\n    {'code': 'a', 'followedBy': 'b', 'remove': /:$/u, 'context': /[^ ]:$/u},\n    {'code': 'ab', 'followedBy': '!c', 'remove': / *;$/u},\n    {'code': 'ab', 'followedBy': 'c', 'remove': /;$/u, 'context': /[^ ];$/u},\n    {'code': 'abc', 'followedBy': '!e', 'remove': / *\\+$/u} // Removes both valid (with one space) and invalid (spaceless et al) puncs\n\n  ],\n\n  '490': remove490And830Whatever,\n  '600': removeX00Whatever,\n  '610': removeX10Whatever,\n  '611': removeX11Whatever,\n  '630': removeX30Whatever,\n  '700': removeX00Whatever,\n  '710': removeX10Whatever,\n  '711': removeX11Whatever,\n  '730': removeX30Whatever,\n  '773': linkingEntryWhatever,\n  '774': linkingEntryWhatever,\n  '776': linkingEntryWhatever,\n  '800': removeX00Whatever,\n  '810': removeX10Whatever,\n  '830': remove490And830Whatever,\n  '946': crappy24X\n};\n\nconst cleanLegalX00Comma = {'code': 'abcde', 'followedBy': 'cdegj', 'context': /.,$/u, 'remove': /,$/u};\n// Accept upper case letters in X00$b, since they are probably Roman numerals.\nconst cleanLegalX00bDot = {'code': 'b', 'followedBy': 't#', context: /^[IVXLCDM]+\\.$/u, 'remove': /\\.$/u};\nconst cleanLegalX00iColon = {'code': 'i', 'followedBy': 'a', 'remove': / *:$/u}; // NB! context is not needed\nconst cleanLegalX00Dot = {'code': 'abcdetvl', 'followedBy': 'tu#', 'context': /(?:[a-z0-9)]|å|ä|ö)\\.$/u, 'remove': /\\.$/u};\nconst cleanDotBeforeLanguageSubfieldL = {'name': 'pre-language-$l dot', 'followedBy': 'l', 'context': /.\\.$/u, 'remove': /\\.$/u};\n\nconst legalEntryField = [cleanDotBeforeLanguageSubfieldL];\n\nconst legalX00punc = [cleanLegalX00Comma, cleanLegalX00iColon, cleanLegalX00bDot, cleanLegalX00Dot, ...legalEntryField];\n\nconst cleanLegalX10Comma = {'name': 'X10comma', 'code': 'abe', 'followedBy': 'e', 'context': /.,$/u, 'remove': /,$/u};\nconst cleanLegalX10Dot = {'name': 'X10dot', 'code': 'abt', 'followedBy': 'bst#', 'context': /.\\.$/u, 'remove': /\\.$/u};\n\nconst legalX10punc = [cleanLegalX10Comma, cleanLegalX10Dot, cleanX00eDot, ...legalEntryField];\n\nconst cleanLegalSeriesTitle = [ // 490 and 830\n  {'code': 'a', 'followedBy': 'a', 'remove': / =$/u},\n  {'code': 'axyz', 'followedBy': 'xyz', 'remove': /,$/u, 'context': /.,$/u},\n  {'code': 'axyz', 'followedBy': 'v', 'remove': / *;$/u}\n];\n\nconst clean24X = [\n  {'name': 'I:A', 'code': 'i', 'followedBy': 'a', 'remove': / *:$/u},\n  {'name': 'A:B', 'code': 'a', 'followedBy': 'b', 'remove': / [:;=]$/u},\n  {'name': 'AB:K', 'code': 'ab', 'followedBy': 'k', 'remove': / :$/u},\n  {'name': 'ABK:F', 'code': 'abk', 'followedBy': 'f', 'remove': /,$/u},\n  {'name': 'ABFNP:C', 'code': 'abfnp', 'followedBy': 'c', 'remove': / \\/$/u},\n  {'name': 'ABN:N', 'code': 'abn', 'followedBy': 'n', 'remove': /\\.$/u},\n  {'name': 'ABNP:#', 'code': 'abnp', 'followedBy': '#', 'remove': /\\.$/u},\n  {'name': 'N:P', 'code': 'n', 'followedBy': 'p', 'remove': /,$/u},\n  cleanDotBeforeLanguageSubfieldL\n];\n\nconst cleanValidPunctuationRules = {\n  '100': legalX00punc,\n  '110': legalX10punc,\n  '111': legalEntryField,\n  '130': legalEntryField,\n  '240': clean24X,\n  '243': clean24X,\n  '245': clean24X,\n  '246': clean24X,\n  '260': [\n    {'code': 'abc', 'followedBy': 'a', 'remove': / ;$/u},\n    {'code': 'a', 'followedBy': 'b', 'remove': / :$/u},\n    {'code': 'b', 'followedBy': 'c', 'remove': /,$/u},\n    {'code': 'c', 'followedBy': '#', 'remove': /\\.$/u},\n    {'code': 'd', 'followedBy': 'e', 'remove': / :$/u},\n    {'code': 'e', 'followedBy': 'f', 'remove': /,$/u},\n    {'code': 'f', 'followedBy': '#', 'remove': /\\.$/u} // Probably ')' but should it be removed?\n  ],\n  '264': [\n    {'code': 'a', 'followedBy': 'b', 'remove': / :$/u},\n    {'code': 'b', 'followedBy': 'c', 'remove': /,$/u},\n    {'code': 'c', 'followedBy': '#', 'remove': /\\.$/u}\n  ],\n  '300': [\n    // NB! Remove crap as well, thus the '*' in / *:$/\n    {'code': 'a', 'followedBy': 'b', 'remove': / :$/u},\n    {'code': 'ab', 'followedBy': 'c', 'remove': / ;$/u},\n    {'code': 'abc', 'followedBy': 'e', 'remove': / \\+$/u}\n  ],\n  '490': cleanLegalSeriesTitle,\n  '534': [{'code': 'p', 'followedBy': 'c', 'remove': /:$/u}],\n  '600': legalX00punc,\n  '610': legalX10punc,\n  '611': legalEntryField,\n  '630': legalEntryField,\n  // Experimental, MET366-ish (end punc in internationally valid, but we don't use it here in Finland):\n  '648': [{'code': 'a', 'content': /^[0-9]+\\.$/u, 'ind2': ['4'], 'remove': /\\.$/u}],\n  '700': legalX00punc,\n  '710': legalX10punc,\n  '711': legalEntryField,\n  '730': legalEntryField,\n  '800': legalX00punc,\n  '810': legalX10punc,\n  '811': legalEntryField,\n  '830': [...legalEntryField, ...cleanLegalSeriesTitle],\n  '946': clean24X\n};\n\n\n// Overgeneralizes a bit: eg. addColonToRelationshipInformation only applies to 700/710 but as others don't have $i, it's fine.\nconst addToAllEntryFields = [addDotBeforeLanguageSubfieldL, addSemicolonBeforeVolumeDesignation, addColonToRelationshipInformation];\n\n\nconst addX00 = [addX00aComma, addX00aComma2, addX00Dot, addX00dComma, ...addToAllEntryFields];\nconst addX10 = [addX10iColon, addX10bDot, addX10eComma, addX10Dot, ...addToAllEntryFields];\nconst addX11 = [...addToAllEntryFields];\nconst addX30 = [...addToAllEntryFields];\n\nconst add24X = [\n  {'code': 'i', 'followedBy': 'a', 'add': ':', 'context': needsPuncAfterAlphanumeric},\n  {'code': 'a', 'followedBy': 'b', 'add': ' :', 'context': needsPuncAfterAlphanumeric},\n  {'code': 'abk', 'followedBy': 'f', 'add': ',', 'context': needsPuncAfterAlphanumeric},\n  {'code': 'abfnp', 'followedBy': 'c', 'add': ' /', 'context': needsPuncAfterAlphanumeric},\n  addDotBeforeLanguageSubfieldL\n];\n\nconst add245 = [\n  ...add24X,\n  // Blah! Also \"$a = $b\" and \"$a ; $b\" can be valid... But ' :' is better than nothing, I guess...\n  {'code': 'ab', 'followedBy': 'n', 'add': '.', 'context': needsPuncAfterAlphanumeric},\n  {'code': 'n', 'followedBy': 'p', 'add': ',', 'context': defaultNeedsPuncAfter2},\n  {'code': 'abc', 'followedBy': '#', 'add': '.', 'context': needsPuncAfterAlphanumeric} // Stepping on \"punctuation validator's\" toes\n];\n\nconst addSeriesTitle = [ // 490 and 830\n  {'code': 'a', 'followedBy': 'a', 'add': ' =', 'context': defaultNeedsPuncAfter2},\n  {'code': 'axyz', 'followedBy': 'xy', 'add': ',', 'context': defaultNeedsPuncAfter2},\n  addSemicolonBeforeVolumeDesignation //  eg. 490$axyz-$v\n];\n\nconst addPairedPunctuationRules = {\n  '100': addX00,\n  '110': addX10,\n  '111': addX11,\n  '130': addX30,\n  '240': add24X,\n  '243': add24X,\n  '245': add245,\n  '246': add24X,\n  '260': [\n    {'code': 'a', 'followedBy': 'b', 'add': ' :', 'context': defaultNeedsPuncAfter2},\n    {'code': 'ab', 'followedBy': 'c', 'add': ',', 'context': defaultNeedsPuncAfter2},\n    {'code': 'abc', 'followedBy': 'a', 'add': ' ;', 'context': defaultNeedsPuncAfter2},\n    {'code': 'e', 'followedBy': 'f', 'add': ' :', 'context': defaultNeedsPuncAfter2},\n    {'code': 'f', 'followedBy': 'g', 'add': ',', 'context': defaultNeedsPuncAfter2}\n  ],\n  '264': [\n    {'code': 'a', 'followedBy': 'b', 'add': ' :', 'context': defaultNeedsPuncAfter2},\n    {'code': 'b', 'followedBy': 'c', 'add': ',', 'context': defaultNeedsPuncAfter2},\n    // NB! The $c rule messes dotless exception \"264 #4 $c p1983\" up\n    // We'll need to add a hacky postprocessor for this? Add 'hasInd1': '0123' etc?\n    {'code': 'c', 'followedBy': '#', 'add': '.', 'context': needsPuncAfterAlphanumeric, 'ind2': ['0', '1', '2', '3']}\n  ],\n  '300': [\n    {'code': 'a', 'followedBy': 'b', 'add': ' :', 'context': defaultNeedsPuncAfter2},\n    {'code': 'ab', 'followedBy': 'c', 'add': ' ;', 'context': defaultNeedsPuncAfter2},\n    {'code': 'abc', 'followedBy': 'e', 'add': ' +', 'context': defaultNeedsPuncAfter2}\n  ],\n  '490': addSeriesTitle,\n  '506': [{'code': 'a', 'followedBy': '#', 'add': '.', 'context': defaultNeedsPuncAfter2}],\n  '534': [{'code': 'p', 'followedBy': 'c', 'add': ':', 'context': defaultNeedsPuncAfter2}],\n  '600': addX00,\n  '610': addX10,\n  '611': addX11,\n  '630': addX30,\n  '700': addX00,\n  '710': addX10,\n  '711': addX11,\n  '730': addX30,\n  '800': addX00,\n  '810': addX10,\n  '811': addX11,\n  '830': [...addX30, ...addSeriesTitle],\n  '946': [{'code': 'i', 'followedBy': 'a', 'add': ':', 'context': defaultNeedsPuncAfter2}]\n};\n\n/*\nfunction debugRule(rule) {\n  //nvdebug('');\n  nvdebug(`NAME ${rule.name ? rule.name : '<unnamed>'}`);\n  nvdebug(`SUBFIELD CODE '${rule.code}' FOLLOWED BY SUBFIELD CODE '${rule.followedBy}'`);\n  if ('add' in rule) { // eslint-disable-line functional/no-conditional-statements\n    nvdebug(`ADD '${rule.add}'`);\n  }\n  if ('remove' in rule) { // eslint-disable-line functional/no-conditional-statements\n    nvdebug(`REMOVE '${rule.remove}'`);\n  }\n  if ('context' in rule) { // eslint-disable-line functional/no-conditional-statements\n    nvdebug(`CONTEXT '${rule.context.toString()}'`);\n  }\n  //nvdebug('');\n}\n*/\n\nfunction ruleAppliesToSubfieldCode(targetSubfieldCodes, currSubfieldCode) {\n  if (!targetSubfieldCodes) { // We are not interested in what subfield precedes 240$l, ',' is removed anyway\n    return true;\n  }\n  const negation = targetSubfieldCodes.includes('!');\n  if (negation) {\n    return !targetSubfieldCodes.includes(currSubfieldCode);\n  }\n  return targetSubfieldCodes.includes(currSubfieldCode);\n}\n\n\nfunction ruleAppliesToField(rule, field) {\n  if ('ind1' in rule && !rule.ind1.includes(field.ind1)) {\n    return false;\n  }\n\n  if ('ind2' in rule && !rule.ind2.includes(field.ind2)) {\n    return false;\n  }\n\n  // If we want to check, say, $2, it should be implemented here!\n\n  return true;\n}\n\n\nfunction ruleAppliesToCurrentSubfield(rule, subfield) {\n  //nvdebug(`  Apply rule on LHS?`);\n  if (!ruleAppliesToSubfieldCode(rule.code, subfield.code)) {\n    //nvdebug(`  Reject rule!`);\n    return false;\n  }\n  if ('context' in rule) {\n    //nvdebug(`  Check '${subfield.value}' versus '${rule.context.toString()}'`);\n    if (!subfield.value.match(rule.context)) { // njsscan-ignore: regex_injection_dos\n      //nvdebug(`  Reject rule!`);\n      return false;\n    }\n  }\n  //nvdebug(`  Apply rule!`);\n  return true;\n}\n\nfunction ruleAppliesToNextSubfield(rule, nextSubfield) {\n  if (!('followedBy' in rule)) { // Return true, if we are not interested in the next subfield\n    return true;\n  }\n  // The '#' existence check applies only to the RHS field. LHS always exists.\n  if (!nextSubfield) {\n    const negation = rule.followedBy.includes('!');\n    if (negation) {\n      return !rule.followedBy.includes('#');\n    }\n    return rule.followedBy.includes('#');\n  }\n\n  if (!ruleAppliesToSubfieldCode(rule.followedBy, nextSubfield.code)) {\n    return false;\n  }\n  if ('contextRHS' in rule && !nextSubfield.value.match(rule.contextRHS)) { // njsscan-ignore: regex_injection_dos\n    return false;\n  }\n  return true;\n}\n\nfunction checkRule(rule, field, subfield1, subfield2) {\n  if (!ruleAppliesToField(rule, field)) {\n    //nvdebug(`FAIL ON WHOLE FIELD: '${fieldToString(field)}`);\n    return false;\n  }\n  //const name = rule.name || 'UNNAMED';\n  if (!ruleAppliesToCurrentSubfield(rule, subfield1)) {\n    //nvdebug(`${name}: FAIL ON LHS SUBFIELD: '$${subfield1.code} ${subfield1.value}', SF=${rule.code}`, debug);\n    return false;\n  }\n\n  // NB! This is not a perfect solution. We might have $e$0$e where $e$0 punctuation should actually be based on $e$e rules\n  if (!ruleAppliesToNextSubfield(rule, subfield2)) {\n    //const msg = subfield2 ? `${name}: FAIL ON RHS SUBFIELD '${subfield2.code}' not in [${rule.followedBy}]` : `${name}: FAIL ON RHS FIELD`;\n    //nvdebug(msg, debug);\n    return false;\n  }\n\n  //nvdebug(`${rule.name ? rule.name : '<unnamed>'}: ACCEPT ${rule.code} (${subfield1.code}), SF2=${rule.followedBy} (${subfield2 ? subfield2.code : '#'})`, debug);\n  return true;\n}\n\n\nfunction applyPunctuationRules(field, subfield1, subfield2, ruleArray = null, operation = NONE) {\n  if (operation === NONE || ruleArray === null) { // !fieldIsApplicable(field, ruleArray)) {\n    return;\n  }\n  const tag2 = field.tag === '880' ? fieldGetUnambiguousTag(field) : field.tag;\n  if (!tag2) {\n    return;\n  }\n  if (!(`${tag2}` in ruleArray)) {\n    return;\n  }\n\n  //nvdebug(`PUNCTUATE ${field.tag}/${tag2} '${subfieldToString(subfield1)}' XXX '${subfield2 ? subfieldToString(subfield2) : '#'} }`);\n\n  //nvdebug(`OP=${operation} ${tag2}: '${subfield1.code}: ${subfield1.value}' ??? '${subfield2 ? subfield2.code : '#'}'`);\n  const candRules = ruleArray[tag2];\n  candRules.forEach(rule => {\n    //debugRule(rule);\n    //nvdebug(' WP1');\n    if (!checkRule(rule, field, subfield1, subfield2)) {\n      return;\n    }\n    //nvdebug(' WP2');\n\n    //const originalValue = subfield1.value;\n    if (rule.remove && [REMOVE, REMOVE_AND_ADD].includes(operation) && subfield1.value.match(rule.remove)) { // eslint-disable-line functional/no-conditional-statements\n      //nvdebug(`    PUNC REMOVAL TO BE PERFORMED FOR $${subfield1.code} '${subfield1.value}'`, debug);\n      subfield1.value = subfield1.value.replace(rule.remove, ''); // eslint-disable-line functional/immutable-data\n      //nvdebug(`    PUNC REMOVAL PERFORMED FOR '${subfield1.value}'`);\n    }\n    if (rule.add && [ADD, REMOVE_AND_ADD].includes(operation)) { // eslint-disable-line functional/no-conditional-statements\n      subfield1.value += rule.add; // eslint-disable-line functional/immutable-data\n      //nvdebug(`    ADDED '${rule.add}' TO FORM '${subfield1.value}'`);\n    }\n\n    /*\n    if (subfield1.value !== originalValue) { // eslint-disable-line functional/no-conditional-statements\n      nvdebug(` PROCESS PUNC: '‡${subfield1.code} ${originalValue}' => '‡${subfield1.code} ${subfield1.value}'`, debug); // eslint-disable-line functional/immutable-data\n    }\n    */\n  });\n}\n\nfunction subfieldFixPunctuation(field, subfield1, subfield2) {\n  applyPunctuationRules(field, subfield1, subfield2, cleanCrappyPunctuationRules, REMOVE);\n  applyPunctuationRules(field, subfield1, subfield2, addPairedPunctuationRules, ADD);\n}\n\nfunction subfieldStripPunctuation(field, subfield1, subfield2) {\n  //nvdebug(`FSP1: '${subfield1.value}'`);\n  applyPunctuationRules(field, subfield1, subfield2, cleanValidPunctuationRules, REMOVE);\n  //nvdebug(`FSP2: '${subfield1.value}'`);\n  applyPunctuationRules(field, subfield1, subfield2, cleanCrappyPunctuationRules, REMOVE);\n  //nvdebug(`FSP3: '${subfield1.value}'`);\n\n}\n\nexport function fieldStripPunctuation(field) {\n  if (!field.subfields) {\n    return field;\n  }\n\n  field.subfields.forEach((sf, i) => {\n    // NB! instead of next subfield, we should actually get next *non-control-subfield*!!!\n    // (In plain English: We should skip $0 - $9 at least, maybe $w as well...)\n    subfieldStripPunctuation(field, sf, getNextRelevantSubfield(field, i));\n\n  });\n  return field;\n}\n\nexport function fieldFixPunctuation(field) {\n  if (!field.subfields) {\n    return field;\n  }\n  //nvdebug(`################### fieldFixPunctuation() TEST ${fieldToString(field)}`);\n\n  field.subfields.forEach((sf, i) => {\n    // NB! instead of next subfield, we should actually get next *non-control-subfield*!!!\n    // (In plain English: We should skip $0 - $9 at least, maybe $w as well...)\n    // We'll need some magic for field 257 here, do we? (Also Finnish lexicons vs global lexicons in 65X fields)\n    subfieldFixPunctuation(field, sf, getNextRelevantSubfield(field, i));\n  });\n\n  // Use shared code for final punctuation (sadly this does not fix intermediate punc):\n  if (field.useExternalEndPunctuation) { // eslint-disable-line functional/no-conditional-statements\n    // addFinalPunctuation(field); // local version. use shared code instead.\n    validateSingleField(field, false, true); // NB! Don't use field.tag as second argument! It's a string, not an int. 3rd arg must be true (=fix)\n  }\n  return field;\n}\n"],"mappings":";;;;;;;;;;AAWA,IAAAA,kBAAA,GAAAC,OAAA;AACA,IAAAC,eAAA,GAAAD,OAAA;AAEA,IAAAE,MAAA,GAAAF,OAAA;AACA,IAAAG,MAAA,GAAAC,sBAAA,CAAAJ,OAAA;AAA0B,SAAAI,uBAAAC,CAAA,WAAAA,CAAA,IAAAA,CAAA,CAAAC,UAAA,GAAAD,CAAA,KAAAE,OAAA,EAAAF,CAAA;AAf1B;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;;AAGA;;AAIA;;AAEA,MAAMG,iBAAiB,GAAG,yDAAyD;AACpE,SAAAC,SAAA,EAAY;EACzB,OAAO;IACLC,WAAW,EAAEF,iBAAiB;IAC9BG,QAAQ;IAAEC;EACZ,CAAC;EAED,SAASA,GAAGA,CAACC,MAAM,EAAE;IACnB,IAAAC,cAAO,EAAC,GAAGN,iBAAiB,SAAS,CAAC;IACtC,MAAMO,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEJ,GAAG,EAAE,EAAE;MAAEK,KAAK,EAAE;IAAI,CAAC;IAC/CJ,MAAM,CAACK,MAAM,CAACC,OAAO,CAACC,CAAC,IAAIC,mBAAmB,CAACD,CAAC,CAAC,CAAC;IAClD,OAAOL,GAAG;EACZ;EAEA,SAASJ,QAAQA,CAACE,MAAM,EAAE;IACxB,IAAAC,cAAO,EAAC,GAAGN,iBAAiB,YAAY,CAAC;IAEzC,MAAMc,yBAAyB,GAAGT,MAAM,CAACK,MAAM,CAACK,MAAM,CAACH,CAAC,IAAII,sBAAsB,CAACJ,CAAC,EAAE,IAAI,CAAC,CAAC;IAG5F,MAAMK,MAAM,GAAGH,yBAAyB,CAACI,GAAG,CAACN,CAAC,IAAI,IAAAO,oBAAa,EAACP,CAAC,CAAC,CAAC;IACnE,MAAMQ,SAAS,GAAGN,yBAAyB,CAACI,GAAG,CAACN,CAAC,IAAIS,mBAAmB,CAACT,CAAC,EAAE,IAAI,CAAC,CAAC;IAElF,MAAMU,QAAQ,GAAGL,MAAM,CAACC,GAAG,CAAC,CAACK,GAAG,EAAEC,CAAC,KAAK,IAAID,GAAG,SAASH,SAAS,CAACI,CAAC,CAAC,GAAG,CAAC;IAExE,MAAMjB,GAAG,GAAG;MAACC,OAAO,EAAEc;IAAQ,CAAC;IAE/Bf,GAAG,CAACE,KAAK,GAAGF,GAAG,CAACC,OAAO,CAACiB,MAAM,GAAG,CAAC,CAAC,CAAC;IACpC,OAAOlB,GAAG;EACZ;AACF;AAEA,SAASmB,iBAAiBA,CAACC,QAAQ,EAAE;EACnC,OAAO,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAACC,QAAQ,CAACD,QAAQ,CAACE,IAAI,CAAC;AACnF;AAEA,SAASC,uBAAuBA,CAACC,KAAK,EAAEC,iBAAiB,EAAE;EACzD,OAAOD,KAAK,CAACE,SAAS,CAACC,IAAI,CAAC,CAACP,QAAQ,EAAEQ,KAAK,KAAKA,KAAK,GAAGH,iBAAiB,IAAI,CAACN,iBAAiB,CAACC,QAAQ,CAAC,CAAC;AAC7G;AAEO,SAASN,mBAAmBA,CAACU,KAAK,EAAEK,GAAG,GAAG,IAAI,EAAE;EACrD,MAAMC,UAAU,GAAG,IAAAC,cAAK,EAACP,KAAK,CAAC;EAC/B,MAAMQ,SAAS,GAAGH,GAAG,GAAGI,sBAAsB,GAAGC,wBAAwB;EACzEJ,UAAU,CAACJ,SAAS,CAACtB,OAAO,CAAC,CAAC+B,EAAE,EAAElB,CAAC,KAAK;IACtC;IACA;IACAe,SAAS,CAACF,UAAU,EAAEK,EAAE,EAAEZ,uBAAuB,CAACO,UAAU,EAAEb,CAAC,CAAC,CAAC;EACnE,CAAC,CAAC;EACF,OAAO,IAAAL,oBAAa,EAACkB,UAAU,CAAC;AAClC;AAEO,SAASrB,sBAAsBA,CAACe,KAAK,EAAEK,GAAG,GAAG,IAAI,EAAE;EACxD,IAAI,CAACL,KAAK,CAACE,SAAS,EAAE;IACpB,OAAO,KAAK;EACd;EAEA,MAAMU,qBAAqB,GAAG,IAAAxB,oBAAa,EAACY,KAAK,CAAC;EAClD,MAAMa,qBAAqB,GAAGvB,mBAAmB,CAACU,KAAK,EAAEK,GAAG,CAAC;EAE7D,OAAOQ,qBAAqB,KAAKD,qBAAqB;AACxD;;AAEA;AACA;AACA;AACA;;AAGA;AACA,MAAME,0BAA0B,GAAG,+BAA+B;AAClE,MAAMC,sBAAsB,GAAG,kCAAkC;AACjE,MAAMC,gBAAgB,GAAG,aAAa,CAAC,CAAC;AACxC,MAAMC,aAAa,GAAG,UAAU;AAChC,MAAMC,aAAa,GAAG,+BAA+B;AAErD,MAAMC,iBAAiB,GAAG,8DAA8D;AACxF,MAAMC,kBAAkB,GAAG,+BAA+B;AAC1D;;AAEA;AACA,MAAMC,YAAY,GAAG;EAAC,MAAM,EAAE,4BAA4B;EAAE,QAAQ,EAAE;AAAU,CAAC;AACjF,MAAMC,cAAc,GAAG;EAAC,MAAM,EAAE,UAAU;EAAE,YAAY,EAAE,YAAY;EAAE,SAAS,EAAE,MAAM;EAAE,QAAQ,EAAE;AAAK,CAAC;AAC3G,MAAMC,QAAQ,GAAG;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,8BAA8B;EAAE,YAAY,EAAEN,aAAa;EAAE,QAAQ,EAAE;AAAQ,CAAC;AACnJ,MAAMO,mBAAmB,GAAG;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,KAAK;EAAE,SAAS,EAAE,cAAc;EAAE,QAAQ,EAAE;AAAQ,CAAC;AAC7G,MAAMC,YAAY,GAAG;EAAC,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,OAAO;EAAE,SAAS,EAAEN,iBAAiB;EAAE,QAAQ,EAAE;AAAM,CAAC;AAC7G,MAAMO,eAAe,GAAG;EAAC,MAAM,EAAE,4BAA4B;EAAE,QAAQ,EAAE;AAAO,CAAC;AACjF;AACA,MAAMC,YAAY,GAAG;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,qBAAqB;EAAE,QAAQ,EAAE;AAAM,CAAC;AAC5G,MAAMC,kCAAkC,GAAG;EAAC,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAK,CAAC;AAC/E,MAAMC,+BAA+B,GAAG;EAAC,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAK,CAAC;AAE5E,MAAMC,wBAAwB,GAAG;EAAC,MAAM,EAAE,IAAI;EAAE,SAAS,EAAE,QAAQ;EAAE,QAAQ,EAAE;AAAM,CAAC;AACtF;AACA,MAAMC,uBAAuB,GAAG;EAAC,MAAM,EAAE,QAAQ;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAEX,kBAAkB;EAAE,QAAQ,EAAE;AAAY,CAAC;AAE5H,MAAMY,YAAY,GAAG;EAAC,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,QAAQ;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAEhB,gBAAgB;EAAE,YAAY,EAAEE;AAAa,CAAC;AACnI,MAAMe,YAAY,GAAG;EAAC,MAAM,EAAE,wCAAwC;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,WAAW;EAAE,YAAY,EAAEf;AAAa,CAAC;AAC3K,MAAMgB,aAAa,GAAG;EAAC,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,QAAQ;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,qBAAqB;EAAE,YAAY,EAAEhB;AAAa,CAAC;AACzI,MAAMiB,SAAS,GAAG;EAAC,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,SAAS;EAAE,YAAY,EAAE,SAAS;EAAE,SAAS,EAAErB;AAA0B,CAAC;AAGjH,MAAMsB,YAAY,GAAG;EAAC,MAAM,EAAE,oCAAoC;EAAE,MAAM,EAAE,GAAG;EAAE,SAAS,EAAErB;AAAsB,CAAC;AACnH,MAAMsB,UAAU,GAAG;EAAC,MAAM,EAAE,oBAAoB;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,IAAI;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAEvB;AAA0B,CAAC;AACrI,MAAMwB,YAAY,GAAG;EAAC,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAEvB;AAAsB,CAAC;AACtG,MAAMwB,SAAS,GAAG;EAAC,MAAM,EAAE,mBAAmB;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,KAAK;EAAE,SAAS,EAAEzB;AAA0B,CAAC;AACvI,MAAM0B,iCAAiC,GAAG;EAAC,MAAM,EAAE,uCAAuC;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,GAAG;EAAE,SAAS,EAAEzB;AAAsB,CAAC;AAEvJ,MAAM0B,6BAA6B,GAAG;EAAC,MAAM,EAAE,mBAAmB;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,QAAQ;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAEzB;AAAgB,CAAC;;AAEjJ;AACA,MAAM0B,mCAAmC,GAAG;EAAC,MAAM,EAAE,oBAAoB;EAAE,KAAK,EAAE,IAAI;EAAE,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAE;AAAQ,CAAC;AAEhJ,MAAMC,IAAI,GAAG,CAAC;AACd,MAAMC,GAAG,GAAG,CAAC;AACb,MAAMC,MAAM,GAAG,CAAC;AAChB,MAAMC,cAAc,GAAG,CAAC;;AAExB;AACA;;AAEA,MAAMC,4BAA4B,GAAG,CAACnB,kCAAkC,EAAEC,+BAA+B,CAAC;AAE1G,MAAMmB,iBAAiB,GAAG,CAAC1B,cAAc,EAAEG,YAAY,EAAEE,YAAY,EAAED,eAAe,EAAEF,mBAAmB,EAAED,QAAQ,EAAEO,wBAAwB,EAAET,YAAY,EAAEU,uBAAuB,EAAE,GAAGgB,4BAA4B,CAAC;AACxN,MAAME,iBAAiB,GAAG,CAAC3B,cAAc,EAAEG,YAAY,EAAEE,YAAY,EAAED,eAAe,EAAEL,YAAY,EAAEU,uBAAuB,EAAE,GAAGgB,4BAA4B,CAAC;AAC/J,MAAMG,iBAAiB,GAAGH,4BAA4B;AACtD,MAAMI,iBAAiB,GAAGJ,4BAA4B;AAEtD,MAAMK,uBAAuB,GAAG,CAAC;EAAC,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,OAAO;EAAE,QAAQ,EAAE;AAAiB,CAAC,CAAC;AAEvG,MAAMC,oBAAoB,GAAG,CAAC;EAAC,MAAM,EAAE,uBAAuB;EAAE,YAAY,EAAE,uBAAuB;EAAE,QAAQ,EAAE;AAAQ,CAAC,CAAC;;AAG3H;AACA;AACA;AACA;AACA;AACA;;AAEA,MAAMC,SAAS,GAAG,CAChB;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,IAAI;EAAE,QAAQ,EAAE;AAAO,CAAC,EACvD;EAAC,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEnC;AAAiB,CAAC,EAClF;EAAC,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEA;AAAiB,CAAC,EAClF;EAAC,MAAM,EAAE,UAAU;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEA;AAAiB,CAAC,EACvF;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEA;AAAiB,CAAC;AAAE;AAClF;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,IAAI;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEA;AAAiB,CAAC;AAAE;AACnFS,kCAAkC,CACnC;AAGD,MAAM2B,2BAA2B,GAAG;EAClC,KAAK,EAAEP,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEG,SAAS;EAChB,KAAK,EAAEA,SAAS;EAChB,KAAK,EAAEA,SAAS;EAChB,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,IAAI;IAAE,QAAQ,EAAE;EAAO,CAAC,EACpD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE,KAAK;IAAE,SAAS,EAAE;EAAS,CAAC,EACvE;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,IAAI;IAAE,QAAQ,EAAE;EAAO,CAAC,EACrD;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE,KAAK;IAAE,SAAS,EAAE;EAAS,CAAC,EACxE;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,IAAI;IAAE,QAAQ,EAAE;EAAQ,CAAC,CAAC;EAAA,CAEzD;EAED,KAAK,EAAEF,uBAAuB;EAC9B,KAAK,EAAEJ,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEH,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEE,oBAAoB;EAC3B,KAAK,EAAEA,oBAAoB;EAC3B,KAAK,EAAEA,oBAAoB;EAC3B,KAAK,EAAEL,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEG,uBAAuB;EAC9B,KAAK,EAAEE;AACT,CAAC;AAED,MAAME,kBAAkB,GAAG;EAAC,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,OAAO;EAAE,SAAS,EAAE,MAAM;EAAE,QAAQ,EAAE;AAAK,CAAC;AACvG;AACA,MAAMC,iBAAiB,GAAG;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,IAAI;EAAEC,OAAO,EAAE,iBAAiB;EAAE,QAAQ,EAAE;AAAM,CAAC;AACzG,MAAMC,mBAAmB,GAAG;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAO,CAAC,CAAC,CAAC;AACjF,MAAMC,gBAAgB,GAAG;EAAC,MAAM,EAAE,UAAU;EAAE,YAAY,EAAE,KAAK;EAAE,SAAS,EAAE,yBAAyB;EAAE,QAAQ,EAAE;AAAM,CAAC;AAC1H,MAAMC,+BAA+B,GAAG;EAAC,MAAM,EAAE,qBAAqB;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAE,OAAO;EAAE,QAAQ,EAAE;AAAM,CAAC;AAEhI,MAAMC,eAAe,GAAG,CAACD,+BAA+B,CAAC;AAEzD,MAAME,YAAY,GAAG,CAACP,kBAAkB,EAAEG,mBAAmB,EAAEF,iBAAiB,EAAEG,gBAAgB,EAAE,GAAGE,eAAe,CAAC;AAEvH,MAAME,kBAAkB,GAAG;EAAC,MAAM,EAAE,UAAU;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAE,MAAM;EAAE,QAAQ,EAAE;AAAK,CAAC;AACrH,MAAMC,gBAAgB,GAAG;EAAC,MAAM,EAAE,QAAQ;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,OAAO;EAAE,QAAQ,EAAE;AAAM,CAAC;AAEtH,MAAMC,YAAY,GAAG,CAACF,kBAAkB,EAAEC,gBAAgB,EAAEtC,YAAY,EAAE,GAAGmC,eAAe,CAAC;AAE7F,MAAMK,qBAAqB,GAAG;AAAE;AAC9B;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAM,CAAC,EAClD;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,KAAK;EAAE,QAAQ,EAAE,KAAK;EAAE,SAAS,EAAE;AAAM,CAAC,EACzE;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAO,CAAC,CACvD;AAED,MAAMC,QAAQ,GAAG,CACf;EAAC,MAAM,EAAE,KAAK;EAAE,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAO,CAAC,EAClE;EAAC,MAAM,EAAE,KAAK;EAAE,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAU,CAAC,EACrE;EAAC,MAAM,EAAE,MAAM;EAAE,MAAM,EAAE,IAAI;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAM,CAAC,EACnE;EAAC,MAAM,EAAE,OAAO;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAK,CAAC,EACpE;EAAC,MAAM,EAAE,SAAS;EAAE,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAO,CAAC,EAC1E;EAAC,MAAM,EAAE,OAAO;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAM,CAAC,EACrE;EAAC,MAAM,EAAE,QAAQ;EAAE,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAM,CAAC,EACvE;EAAC,MAAM,EAAE,KAAK;EAAE,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAK,CAAC,EAChEP,+BAA+B,CAChC;AAED,MAAMQ,0BAA0B,GAAG;EACjC,KAAK,EAAEN,YAAY;EACnB,KAAK,EAAEG,YAAY;EACnB,KAAK,EAAEJ,eAAe;EACtB,KAAK,EAAEA,eAAe;EACtB,KAAK,EAAEM,QAAQ;EACf,KAAK,EAAEA,QAAQ;EACf,KAAK,EAAEA,QAAQ;EACf,KAAK,EAAEA,QAAQ;EACf,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EACpD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAK,CAAC,EACjD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAK,CAAC,EACjD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,CAAC;EAAA,CACpD;EACD,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAK,CAAC,EACjD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,CACnD;EACD,KAAK,EAAE;EACL;EACA;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EACnD;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAO,CAAC,CACtD;EACD,KAAK,EAAED,qBAAqB;EAC5B,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAK,CAAC,CAAC;EAC1D,KAAK,EAAEJ,YAAY;EACnB,KAAK,EAAEG,YAAY;EACnB,KAAK,EAAEJ,eAAe;EACtB,KAAK,EAAEA,eAAe;EACtB;EACA,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,SAAS,EAAE,aAAa;IAAE,MAAM,EAAE,CAAC,GAAG,CAAC;IAAE,QAAQ,EAAE;EAAM,CAAC,CAAC;EACjF,KAAK,EAAEC,YAAY;EACnB,KAAK,EAAEG,YAAY;EACnB,KAAK,EAAEJ,eAAe;EACtB,KAAK,EAAEA,eAAe;EACtB,KAAK,EAAEC,YAAY;EACnB,KAAK,EAAEG,YAAY;EACnB,KAAK,EAAEJ,eAAe;EACtB,KAAK,EAAE,CAAC,GAAGA,eAAe,EAAE,GAAGK,qBAAqB,CAAC;EACrD,KAAK,EAAEC;AACT,CAAC;;AAGD;AACA,MAAME,mBAAmB,GAAG,CAAC7B,6BAA6B,EAAEC,mCAAmC,EAAEF,iCAAiC,CAAC;AAGnI,MAAM+B,MAAM,GAAG,CAACvC,YAAY,EAAEE,aAAa,EAAEC,SAAS,EAAEF,YAAY,EAAE,GAAGqC,mBAAmB,CAAC;AAC7F,MAAME,MAAM,GAAG,CAACpC,YAAY,EAAEC,UAAU,EAAEC,YAAY,EAAEC,SAAS,EAAE,GAAG+B,mBAAmB,CAAC;AAC1F,MAAMG,MAAM,GAAG,CAAC,GAAGH,mBAAmB,CAAC;AACvC,MAAMI,MAAM,GAAG,CAAC,GAAGJ,mBAAmB,CAAC;AAEvC,MAAMK,MAAM,GAAG,CACb;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAE7D;AAA0B,CAAC,EACnF;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,IAAI;EAAE,SAAS,EAAEA;AAA0B,CAAC,EACpF;EAAC,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAEA;AAA0B,CAAC,EACrF;EAAC,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,IAAI;EAAE,SAAS,EAAEA;AAA0B,CAAC,EACxF2B,6BAA6B,CAC9B;AAED,MAAMmC,MAAM,GAAG,CACb,GAAGD,MAAM;AACT;AACA;EAAC,MAAM,EAAE,IAAI;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAE7D;AAA0B,CAAC,EACpF;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAEC;AAAsB,CAAC,EAC/E;EAAC,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAED;AAA0B,CAAC,CAAC;AAAA,CACvF;AAED,MAAM+D,cAAc,GAAG;AAAE;AACvB;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,IAAI;EAAE,SAAS,EAAE9D;AAAsB,CAAC,EAChF;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,IAAI;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAEA;AAAsB,CAAC,EACnF2B,mCAAmC,CAAC;AAAA,CACrC;AAED,MAAMoC,yBAAyB,GAAG;EAChC,KAAK,EAAEP,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEA,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAED,MAAM;EACb,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAE5D;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAEA;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,EAClF;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAEA;EAAsB,CAAC,CAChF;EACD,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAEA;EAAsB,CAAC;EAC/E;EACA;EACA;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAED,0BAA0B;IAAE,MAAM,EAAE,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG;EAAC,CAAC,CAClH;EACD,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEC;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,EACjF;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,CACnF;EACD,KAAK,EAAE8D,cAAc;EACrB,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAE9D;EAAsB,CAAC,CAAC;EACxF,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAEA;EAAsB,CAAC,CAAC;EACxF,KAAK,EAAEwD,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEH,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEH,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAE,CAAC,GAAGC,MAAM,EAAE,GAAGG,cAAc,CAAC;EACrC,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAE9D;EAAsB,CAAC;AACzF,CAAC;;AAED;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;;AAEA,SAASgE,yBAAyBA,CAACC,mBAAmB,EAAEC,gBAAgB,EAAE;EACxE,IAAI,CAACD,mBAAmB,EAAE;IAAE;IAC1B,OAAO,IAAI;EACb;EACA,MAAME,QAAQ,GAAGF,mBAAmB,CAACnF,QAAQ,CAAC,GAAG,CAAC;EAClD,IAAIqF,QAAQ,EAAE;IACZ,OAAO,CAACF,mBAAmB,CAACnF,QAAQ,CAACoF,gBAAgB,CAAC;EACxD;EACA,OAAOD,mBAAmB,CAACnF,QAAQ,CAACoF,gBAAgB,CAAC;AACvD;AAGA,SAASE,kBAAkBA,CAACC,IAAI,EAAEpF,KAAK,EAAE;EACvC,IAAI,MAAM,IAAIoF,IAAI,IAAI,CAACA,IAAI,CAACC,IAAI,CAACxF,QAAQ,CAACG,KAAK,CAACqF,IAAI,CAAC,EAAE;IACrD,OAAO,KAAK;EACd;EAEA,IAAI,MAAM,IAAID,IAAI,IAAI,CAACA,IAAI,CAACE,IAAI,CAACzF,QAAQ,CAACG,KAAK,CAACsF,IAAI,CAAC,EAAE;IACrD,OAAO,KAAK;EACd;;EAEA;;EAEA,OAAO,IAAI;AACb;AAGA,SAASC,4BAA4BA,CAACH,IAAI,EAAExF,QAAQ,EAAE;EACpD;EACA,IAAI,CAACmF,yBAAyB,CAACK,IAAI,CAACtF,IAAI,EAAEF,QAAQ,CAACE,IAAI,CAAC,EAAE;IACxD;IACA,OAAO,KAAK;EACd;EACA,IAAI,SAAS,IAAIsF,IAAI,EAAE;IACrB;IACA,IAAI,CAACxF,QAAQ,CAAC4F,KAAK,CAACC,KAAK,CAACL,IAAI,CAAC1B,OAAO,CAAC,EAAE;MAAE;MACzC;MACA,OAAO,KAAK;IACd;EACF;EACA;EACA,OAAO,IAAI;AACb;AAEA,SAASgC,yBAAyBA,CAACN,IAAI,EAAEO,YAAY,EAAE;EACrD,IAAI,EAAE,YAAY,IAAIP,IAAI,CAAC,EAAE;IAAE;IAC7B,OAAO,IAAI;EACb;EACA;EACA,IAAI,CAACO,YAAY,EAAE;IACjB,MAAMT,QAAQ,GAAGE,IAAI,CAACQ,UAAU,CAAC/F,QAAQ,CAAC,GAAG,CAAC;IAC9C,IAAIqF,QAAQ,EAAE;MACZ,OAAO,CAACE,IAAI,CAACQ,UAAU,CAAC/F,QAAQ,CAAC,GAAG,CAAC;IACvC;IACA,OAAOuF,IAAI,CAACQ,UAAU,CAAC/F,QAAQ,CAAC,GAAG,CAAC;EACtC;EAEA,IAAI,CAACkF,yBAAyB,CAACK,IAAI,CAACQ,UAAU,EAAED,YAAY,CAAC7F,IAAI,CAAC,EAAE;IAClE,OAAO,KAAK;EACd;EACA,IAAI,YAAY,IAAIsF,IAAI,IAAI,CAACO,YAAY,CAACH,KAAK,CAACC,KAAK,CAACL,IAAI,CAACS,UAAU,CAAC,EAAE;IAAE;IACxE,OAAO,KAAK;EACd;EACA,OAAO,IAAI;AACb;AAEA,SAASC,SAASA,CAACV,IAAI,EAAEpF,KAAK,EAAE+F,SAAS,EAAEC,SAAS,EAAE;EACpD,IAAI,CAACb,kBAAkB,CAACC,IAAI,EAAEpF,KAAK,CAAC,EAAE;IACpC;IACA,OAAO,KAAK;EACd;EACA;EACA,IAAI,CAACuF,4BAA4B,CAACH,IAAI,EAAEW,SAAS,CAAC,EAAE;IAClD;IACA,OAAO,KAAK;EACd;;EAEA;EACA,IAAI,CAACL,yBAAyB,CAACN,IAAI,EAAEY,SAAS,CAAC,EAAE;IAC/C;IACA;IACA,OAAO,KAAK;EACd;;EAEA;EACA,OAAO,IAAI;AACb;AAGA,SAASC,qBAAqBA,CAACjG,KAAK,EAAE+F,SAAS,EAAEC,SAAS,EAAEE,SAAS,GAAG,IAAI,EAAE1F,SAAS,GAAGmC,IAAI,EAAE;EAC9F,IAAInC,SAAS,KAAKmC,IAAI,IAAIuD,SAAS,KAAK,IAAI,EAAE;IAAE;IAC9C;EACF;EACA,MAAMC,IAAI,GAAGnG,KAAK,CAACoG,GAAG,KAAK,KAAK,GAAG,IAAAC,sCAAsB,EAACrG,KAAK,CAAC,GAAGA,KAAK,CAACoG,GAAG;EAC5E,IAAI,CAACD,IAAI,EAAE;IACT;EACF;EACA,IAAI,EAAE,GAAGA,IAAI,EAAE,IAAID,SAAS,CAAC,EAAE;IAC7B;EACF;;EAEA;;EAEA;EACA,MAAMI,SAAS,GAAGJ,SAAS,CAACC,IAAI,CAAC;EACjCG,SAAS,CAAC1H,OAAO,CAACwG,IAAI,IAAI;IACxB;IACA;IACA,IAAI,CAACU,SAAS,CAACV,IAAI,EAAEpF,KAAK,EAAE+F,SAAS,EAAEC,SAAS,CAAC,EAAE;MACjD;IACF;IACA;;IAEA;IACA,IAAIZ,IAAI,CAACmB,MAAM,IAAI,CAAC1D,MAAM,EAAEC,cAAc,CAAC,CAACjD,QAAQ,CAACW,SAAS,CAAC,IAAIuF,SAAS,CAACP,KAAK,CAACC,KAAK,CAACL,IAAI,CAACmB,MAAM,CAAC,EAAE;MAAE;MACvG;MACAR,SAAS,CAACP,KAAK,GAAGO,SAAS,CAACP,KAAK,CAACgB,OAAO,CAACpB,IAAI,CAACmB,MAAM,EAAE,EAAE,CAAC,CAAC,CAAC;MAC5D;IACF;IACA,IAAInB,IAAI,CAAC/E,GAAG,IAAI,CAACuC,GAAG,EAAEE,cAAc,CAAC,CAACjD,QAAQ,CAACW,SAAS,CAAC,EAAE;MAAE;MAC3DuF,SAAS,CAACP,KAAK,IAAIJ,IAAI,CAAC/E,GAAG,CAAC,CAAC;MAC7B;IACF;;IAEA;AACJ;AACA;AACA;AACA;EACE,CAAC,CAAC;AACJ;AAEA,SAASI,sBAAsBA,CAACT,KAAK,EAAE+F,SAAS,EAAEC,SAAS,EAAE;EAC3DC,qBAAqB,CAACjG,KAAK,EAAE+F,SAAS,EAAEC,SAAS,EAAEzC,2BAA2B,EAAEV,MAAM,CAAC;EACvFoD,qBAAqB,CAACjG,KAAK,EAAE+F,SAAS,EAAEC,SAAS,EAAElB,yBAAyB,EAAElC,GAAG,CAAC;AACpF;AAEA,SAASlC,wBAAwBA,CAACV,KAAK,EAAE+F,SAAS,EAAEC,SAAS,EAAE;EAC7D;EACAC,qBAAqB,CAACjG,KAAK,EAAE+F,SAAS,EAAEC,SAAS,EAAE3B,0BAA0B,EAAExB,MAAM,CAAC;EACtF;EACAoD,qBAAqB,CAACjG,KAAK,EAAE+F,SAAS,EAAEC,SAAS,EAAEzC,2BAA2B,EAAEV,MAAM,CAAC;EACvF;AAEF;AAEO,SAAS4D,qBAAqBA,CAACzG,KAAK,EAAE;EAC3C,IAAI,CAACA,KAAK,CAACE,SAAS,EAAE;IACpB,OAAOF,KAAK;EACd;EAEAA,KAAK,CAACE,SAAS,CAACtB,OAAO,CAAC,CAAC+B,EAAE,EAAElB,CAAC,KAAK;IACjC;IACA;IACAiB,wBAAwB,CAACV,KAAK,EAAEW,EAAE,EAAEZ,uBAAuB,CAACC,KAAK,EAAEP,CAAC,CAAC,CAAC;EAExE,CAAC,CAAC;EACF,OAAOO,KAAK;AACd;AAEO,SAASlB,mBAAmBA,CAACkB,KAAK,EAAE;EACzC,IAAI,CAACA,KAAK,CAACE,SAAS,EAAE;IACpB,OAAOF,KAAK;EACd;EACA;;EAEAA,KAAK,CAACE,SAAS,CAACtB,OAAO,CAAC,CAAC+B,EAAE,EAAElB,CAAC,KAAK;IACjC;IACA;IACA;IACAgB,sBAAsB,CAACT,KAAK,EAAEW,EAAE,EAAEZ,uBAAuB,CAACC,KAAK,EAAEP,CAAC,CAAC,CAAC;EACtE,CAAC,CAAC;;EAEF;EACA,IAAIO,KAAK,CAAC0G,yBAAyB,EAAE;IAAE;IACrC;IACA,IAAAC,sCAAmB,EAAC3G,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,CAAC,CAAC;EAC3C;EACA,OAAOA,KAAK;AACd","ignoreList":[]}
+{"version":3,"file":"punctuation2.js","names":["_endingPunctuation","require","_subfield6Utils","_utils","_clone","_interopRequireDefault","e","__esModule","default","descriptionString","_default","description","validate","fix","record","nvdebug","res","message","valid","fields","forEach","f","fieldFixPunctuation","fieldsNeedingModification","filter","fieldNeedsModification","values","map","fieldToString","newValues","fieldGetFixedString","messages","val","i","length","isControlSubfield","subfield","includes","code","getNextRelevantSubfield","field","currSubfieldIndex","subfields","find","index","add","cloneField","clone","operation","subfieldFixPunctuation","subfieldStripPunctuation","sf","originalFieldAsString","modifiedFieldAsString","needsPuncAfterAlphanumeric","defaultNeedsPuncAfter2","doesNotEndInPunc","blocksPuncRHS","allowsPuncRHS","aToZ","dotIsProbablyPunc","puncIsProbablyPunc","removeColons","removeX00Comma","cleanRHS","cleanX00dCommaOrDot","cleanX00aDot","cleanCorruption","cleanX00eDot","removeCommaBeforeLanguageSubfieldL","removeCommaBeforeTitleSubfieldT","X00RemoveDotAfterBracket","cleanPuncBeforeLanguage","addX00aComma","addX00dComma","addX00aComma2","addX00Dot","addX10iColon","addX10bDot","addX10eComma","addX10Dot","addColonToRelationshipInformation","addDotBeforeLanguageSubfieldL","addSemicolonBeforeVolumeDesignation","NONE","ADD","REMOVE","REMOVE_AND_ADD","removeCrapFromAllEntryFields","removeX00Whatever","removeX10Whatever","removeX11Whatever","removeX30Whatever","remove490And830Whatever","linkingEntryRemoveWhatever","crappy24X","cleanCrappyPunctuationRules","cleanLegalX00Comma","cleanLegalX00bDot","context","cleanLegalX00iColon","cleanLegalX00Dot","cleanDotBeforeLanguageSubfieldL","legalEntryField","legalX00punc","cleanLegalX10Comma","cleanLegalX10Dot","legalX10punc","cleanLegalSeriesTitle","clean24X","cleanValidPunctuationRules","addToAllEntryFields","addX00","addX10","addX11","addX30","add24X","add245","addSeriesTitle","addLinkingEntry","addPairedPunctuationRules","ruleAppliesToSubfieldCode","targetSubfieldCodes","currSubfieldCode","negation","ruleAppliesToField","rule","ind1","ind2","ruleAppliesToCurrentSubfield","value","match","ruleAppliesToNextSubfield","nextSubfield","followedBy","contextRHS","checkRule","subfield1","subfield2","applyPunctuationRules","ruleArray","tag2","tag","fieldGetUnambiguousTag","candRules","every","remove","replace","fieldStripPunctuation","useExternalEndPunctuation","validateSingleField"],"sources":["../src/punctuation2.js"],"sourcesContent":["/*\n* punctuation.js -- try and fix a marc field punctuation\n*\n* Author(s): Nicholas Volk <nicholas.volk@helsinki.fi>\n*\n* NOTE #1: https://www.kiwi.fi/display/kumea/Loppupisteohje is implemented via another validator/fixer (ending-punctuation).\n*          This file has some support but it's now yet thorough. (And mmight never be.)\n* NOTE #2: Validator/fixer punctuation does similar stuff, but focuses on X00 fields.\n* NOTE #3: As of 2023-06-05 control subfields ($0...$9) are obsolete. Don't use them in rules.\n*          (They are jumped over when looking for next (non-controlfield subfield)\n*/\nimport {validateSingleField} from './ending-punctuation';\nimport {fieldGetUnambiguousTag} from './subfield6Utils';\n//import createDebugLogger from 'debug';\nimport {fieldToString, nvdebug} from './utils';\nimport clone from 'clone';\n\n//const debug = createDebugLogger('debug/punctuation2');\n\nconst descriptionString = 'Remove invalid and add valid punctuation to data fields';\nexport default function () {\n  return {\n    description: descriptionString,\n    validate, fix\n  };\n\n  function fix(record) {\n    nvdebug(`${descriptionString}: fixer`);\n    const res = {message: [], fix: [], valid: true};\n    record.fields.forEach(f => fieldFixPunctuation(f));\n    return res;\n  }\n\n  function validate(record) {\n    nvdebug(`${descriptionString}: validate`);\n\n    const fieldsNeedingModification = record.fields.filter(f => fieldNeedsModification(f, true));\n\n\n    const values = fieldsNeedingModification.map(f => fieldToString(f));\n    const newValues = fieldsNeedingModification.map(f => fieldGetFixedString(f, true));\n\n    const messages = values.map((val, i) => `'${val}' => '${newValues[i]}'`);\n\n    const res = {message: messages};\n\n    res.valid = res.message.length < 1; // eslint-disable-line functional/immutable-data\n    return res;\n  }\n}\n\nfunction isControlSubfield(subfield) {\n  return ['0', '1', '2', '3', '4', '5', '6', '7', '8', '9'].includes(subfield.code);\n}\n\nfunction getNextRelevantSubfield(field, currSubfieldIndex) {\n  return field.subfields.find((subfield, index) => index > currSubfieldIndex && !isControlSubfield(subfield));\n}\n\nexport function fieldGetFixedString(field, add = true) {\n  const cloneField = clone(field);\n  const operation = add ? subfieldFixPunctuation : subfieldStripPunctuation;\n  cloneField.subfields.forEach((sf, i) => {\n    // NB! instead of next subfield, we should actually get next *non-control-subfield*!!!\n    // (In plain English: We should skip $0 - $9 at least, maybe $w as well...)\n    operation(cloneField, sf, getNextRelevantSubfield(cloneField, i));\n  });\n  return fieldToString(cloneField);\n}\n\nexport function fieldNeedsModification(field, add = true) {\n  if (!field.subfields) {\n    return false;\n  }\n\n  const originalFieldAsString = fieldToString(field);\n  const modifiedFieldAsString = fieldGetFixedString(field, add);\n\n  return modifiedFieldAsString !== originalFieldAsString;\n}\n\n/////////////////////////////////////////////////////////////////////////////////////\n// <= Above code is written for the validator logic <=                             //\n// => Everything below was originally transferred from reducers' punctuation.js => //\n/////////////////////////////////////////////////////////////////////////////////////\n\n\n//const stripCrap = / *[-;:,+]+$/u;\nconst needsPuncAfterAlphanumeric = /(?:[a-z0-9A-Z]|å|ä|ö|Å|Ä|Ö)$/u;\nconst defaultNeedsPuncAfter2 = /(?:[\\]a-zA-Z0-9)]|ä|å|ö|Å|Ä|Ö)$/u;\nconst doesNotEndInPunc = /[^!?.:;,]$/u; // non-punc for pre-240/700/XXX $, note that '.' comes if preceded by ')'\nconst blocksPuncRHS = /^(?:\\()/u;\nconst allowsPuncRHS = /^(?:[A-Za-z0-9]|å|ä|ö|Å|Ä|Ö)/u;\nconst aToZ = 'abcdefghijklmnopqrstuvwxyz';\n\n\nconst dotIsProbablyPunc = /(?:[a-z0-9)]|å|ä|ö|(?:[A-Za-z0-9]|Å|Ä|Ö)(?:[A-Z]|Å|Ä|Ö))\\.$/u;\nconst puncIsProbablyPunc = /(?:[a-z0-9)]|å|ä|ö) ?[.,:;]$/u;\n// NB! 65X: Finnish terms don't use punctuation, but international ones do. Neither one is currently (2021-11-08) coded here.\n\n// Will unfortunately trigger \"Sukunimi, Th.\" type:\nconst removeColons = {'code': 'abcdefghijklmnopqrstuvwxyz', 'remove': / *[;:]$/u};\nconst removeX00Comma = {'code': 'abcdenqt', 'followedBy': 'abcdenqtv#', 'context': /.,$/u, 'remove': /,$/u};\nconst cleanRHS = {'code': 'abcd', 'followedBy': 'bcde', 'context': /(?:(?:[a-z0-9]|å|ä|ö)\\.|,)$/u, 'contextRHS': blocksPuncRHS, 'remove': /[.,]$/u};\nconst cleanX00dCommaOrDot = {'code': 'd', 'followedBy': 'et#', 'context': /[0-9]-[,.]$/u, 'remove': /[,.]$/u};\nconst cleanX00aDot = {'code': 'abcde', 'followedBy': 'cdegj', 'context': dotIsProbablyPunc, 'remove': /\\.$/u};\nconst cleanCorruption = {'code': 'abcdefghijklmnopqrstuvwxyz', 'remove': / \\.$/u};\n// These $e dot removals are tricky: before removing the comma, we should know that it ain't an abbreviation such as \"esitt.\"...\nconst cleanX00eDot = {'code': 'e', 'followedBy': 'egj#', 'context': /(?:[ai]ja|jä)[.,]$/u, 'remove': /\\.$/u};\nconst removeCommaBeforeLanguageSubfieldL = {'followedBy': 'l', 'remove': /,$/u};\nconst removeCommaBeforeTitleSubfieldT = {'followedBy': 't', 'remove': /,$/u};\n\nconst X00RemoveDotAfterBracket = {'code': 'cq', 'context': /\\)\\.$/u, 'remove': /\\.$/u};\n// 390, 800, 810, 830...\nconst cleanPuncBeforeLanguage = {'code': 'atvxyz', 'followedBy': 'l', 'context': puncIsProbablyPunc, 'remove': / *[.,:;]$/u};\n\nconst addX00aComma = {'add': ',', 'code': 'abcqej', 'followedBy': 'cdeg', 'context': doesNotEndInPunc, 'contextRHS': allowsPuncRHS};\nconst addX00dComma = {'name': 'X00$d ending in \"-\" does not get comma', 'add': ',', 'code': 'd', 'followedBy': 'cdeg', 'context': /[^-,.!]$/u, 'contextRHS': allowsPuncRHS};\nconst addX00aComma2 = {'add': ',', 'code': 'abcdej', 'followedBy': 'cdeg', 'context': /(?:[A-Z]|Å|Ä|Ö)\\.$/u, 'contextRHS': allowsPuncRHS};\nconst addX00Dot = {'add': '.', 'code': 'abcdetv', 'followedBy': '#fklptu', 'context': needsPuncAfterAlphanumeric};\n\n\nconst addX10iColon = {'name': 'Punctuate relationship information', 'code': 'i', 'context': defaultNeedsPuncAfter2};\nconst addX10bDot = {'name': 'Add X10 pre-$b dot', 'add': '.', 'code': 'ab', 'followedBy': 'b', 'context': needsPuncAfterAlphanumeric};\nconst addX10eComma = {'add': ',', 'code': 'abe', 'followedBy': 'e', 'context': defaultNeedsPuncAfter2};\nconst addX10Dot = {'name': 'Add X10 final dot', 'add': '.', 'code': 'abet', 'followedBy': 'tu#', 'context': needsPuncAfterAlphanumeric};\nconst addColonToRelationshipInformation = {'name': 'Add \\':\\' to 7X0 $i relationship info', 'add': ':', 'code': 'i', 'context': defaultNeedsPuncAfter2};\n\nconst addDotBeforeLanguageSubfieldL = {'name': 'Add dot before $l', 'add': '.', 'code': 'abepst', 'followedBy': 'l', 'context': doesNotEndInPunc};\n\n// 490:\nconst addSemicolonBeforeVolumeDesignation = {'name': 'Add \" ;\" before $v', 'add': ' ;', 'code': 'atxyz', 'followedBy': 'v', 'context': /[^;]$/u};\n\nconst NONE = 0;\nconst ADD = 2;\nconst REMOVE = 1;\nconst REMOVE_AND_ADD = 3;\n\n// Crappy punctuation consists of various crap that is somewhat common.\n// We strip crap for merge decisions. We are not trying to actively remove crap here.\n\nconst removeCrapFromAllEntryFields = [removeCommaBeforeLanguageSubfieldL, removeCommaBeforeTitleSubfieldT];\n\nconst removeX00Whatever = [removeX00Comma, cleanX00aDot, cleanX00eDot, cleanCorruption, cleanX00dCommaOrDot, cleanRHS, X00RemoveDotAfterBracket, removeColons, cleanPuncBeforeLanguage, ...removeCrapFromAllEntryFields];\nconst removeX10Whatever = [removeX00Comma, cleanX00aDot, cleanX00eDot, cleanCorruption, removeColons, cleanPuncBeforeLanguage, ...removeCrapFromAllEntryFields];\nconst removeX11Whatever = removeCrapFromAllEntryFields;\nconst removeX30Whatever = removeCrapFromAllEntryFields;\n\nconst remove490And830Whatever = [{'code': 'axyzv', 'followedBy': 'axyzv', 'remove': /(?: *;| *=|,)$/u}];\n\nconst linkingEntryRemoveWhatever = [\n  {'code': 'i', 'followedBy': 'at', 'remove': / ?:$/u}, // ':'\n  {'code': 'at', 'remove': /\\.$/u},\n  {'code': 'abdghiklmnopqrstuwxyz', 'followedBy': 'abdghiklmnopqrstuwxyz', 'remove': /\\. -$/u}\n];\n\n\n// '!' means negation, thus '!b' means any other subfield but 'b'.\n// 'followedBy': '#' means that current subfield is the last subfield.\n// NB! Note that control subfields are ignored in punctuation rules.\n// NB #2! Control field ignorance causes issues with field 257: https://wiki.helsinki.fi/display/rdasovellusohje/Loppupisteohje\n//        Might need to work on that at some point. NOT a top priority though.\n// NB #3! Final punctuation creation is/should be handled by endind-punctuation.js validator!\n\nconst crappy24X = [\n  {'code': 'abnp', 'followedBy': '!c', 'remove': / \\/$/u},\n  {'code': 'abn', 'followedBy': 'c', 'remove': /\\.$/u, 'context': dotIsProbablyPunc},\n  {'code': 'abc', 'followedBy': '#', 'remove': /\\.$/u, 'context': dotIsProbablyPunc},\n  {'code': 'abfghinp', 'followedBy': '#', 'remove': /\\.$/u, 'context': dotIsProbablyPunc},\n  {'code': 'n', 'followedBy': 'p', 'remove': /\\.$/u, 'context': dotIsProbablyPunc}, // MELINDA-8817\n  {'code': 'p', 'followedBy': 'pc', 'remove': /\\.$/u, 'context': dotIsProbablyPunc}, // MELINDA-8817\n  removeCommaBeforeLanguageSubfieldL\n];\n\n\nconst cleanCrappyPunctuationRules = {\n  '100': removeX00Whatever,\n  '110': removeX10Whatever,\n  '111': removeX11Whatever,\n  '130': removeX30Whatever,\n  '240': crappy24X,\n  '245': crappy24X,\n  '246': crappy24X,\n  '300': [\n    {'code': 'a', 'followedBy': '!b', 'remove': / *:$/u},\n    {'code': 'a', 'followedBy': 'b', 'remove': /:$/u, 'context': /[^ ]:$/u},\n    {'code': 'ab', 'followedBy': '!c', 'remove': / *;$/u},\n    {'code': 'ab', 'followedBy': 'c', 'remove': /;$/u, 'context': /[^ ];$/u},\n    {'code': 'abc', 'followedBy': '!e', 'remove': / *\\+$/u} // Removes both valid (with one space) and invalid (spaceless et al) puncs\n\n  ],\n\n  '490': remove490And830Whatever,\n  '600': removeX00Whatever,\n  '610': removeX10Whatever,\n  '611': removeX11Whatever,\n  '630': removeX30Whatever,\n  '700': removeX00Whatever,\n  '710': removeX10Whatever,\n  '711': removeX11Whatever,\n  '730': removeX30Whatever,\n  '773': linkingEntryRemoveWhatever,\n  '774': linkingEntryRemoveWhatever,\n  '776': linkingEntryRemoveWhatever,\n  '787': linkingEntryRemoveWhatever,\n  '800': removeX00Whatever,\n  '810': removeX10Whatever,\n  '830': remove490And830Whatever,\n  '946': crappy24X\n};\n\nconst cleanLegalX00Comma = {'code': 'abcde', 'followedBy': 'cdegj', 'context': /.,$/u, 'remove': /,$/u};\n// Accept upper case letters in X00$b, since they are probably Roman numerals.\nconst cleanLegalX00bDot = {'code': 'b', 'followedBy': 't#', context: /^[IVXLCDM]+\\.$/u, 'remove': /\\.$/u};\nconst cleanLegalX00iColon = {'code': 'i', 'followedBy': 'a', 'remove': / *:$/u}; // NB! context is not needed\nconst cleanLegalX00Dot = {'code': 'abcdetvl', 'followedBy': 'tu#', 'context': /(?:[a-z0-9)]|å|ä|ö)\\.$/u, 'remove': /\\.$/u};\nconst cleanDotBeforeLanguageSubfieldL = {'name': 'pre-language-$l dot', 'followedBy': 'l', 'context': /.\\.$/u, 'remove': /\\.$/u};\n\nconst legalEntryField = [cleanDotBeforeLanguageSubfieldL];\n\nconst legalX00punc = [cleanLegalX00Comma, cleanLegalX00iColon, cleanLegalX00bDot, cleanLegalX00Dot, ...legalEntryField];\n\nconst cleanLegalX10Comma = {'name': 'X10comma', 'code': 'abe', 'followedBy': 'e', 'context': /.,$/u, 'remove': /,$/u};\nconst cleanLegalX10Dot = {'name': 'X10dot', 'code': 'abt', 'followedBy': 'bst#', 'context': /.\\.$/u, 'remove': /\\.$/u};\n\nconst legalX10punc = [cleanLegalX10Comma, cleanLegalX10Dot, cleanX00eDot, ...legalEntryField];\n\nconst cleanLegalSeriesTitle = [ // 490 and 830\n  {'code': 'a', 'followedBy': 'a', 'remove': / =$/u},\n  {'code': 'axyz', 'followedBy': 'xyz', 'remove': /,$/u, 'context': /.,$/u},\n  {'code': 'axyz', 'followedBy': 'v', 'remove': / *;$/u}\n];\n\nconst clean24X = [\n  {'name': 'I:A', 'code': 'i', 'followedBy': 'a', 'remove': / *:$/u},\n  {'name': 'A:B', 'code': 'a', 'followedBy': 'b', 'remove': / [:;=]$/u},\n  {'name': 'AB:K', 'code': 'ab', 'followedBy': 'k', 'remove': / :$/u},\n  {'name': 'ABK:F', 'code': 'abk', 'followedBy': 'f', 'remove': /,$/u},\n  {'name': 'ABFNP:C', 'code': 'abfnp', 'followedBy': 'c', 'remove': / \\/$/u},\n  {'name': 'ABN:N', 'code': 'abn', 'followedBy': 'n', 'remove': /\\.$/u},\n  {'name': 'ABNP:#', 'code': 'abnp', 'followedBy': '#', 'remove': /\\.$/u},\n  {'name': 'N:P', 'code': 'n', 'followedBy': 'p', 'remove': /,$/u},\n  cleanDotBeforeLanguageSubfieldL\n];\n\nconst cleanValidPunctuationRules = {\n  '100': legalX00punc,\n  '110': legalX10punc,\n  '111': legalEntryField,\n  '130': legalEntryField,\n  '240': clean24X,\n  '243': clean24X,\n  '245': clean24X,\n  '246': clean24X,\n  '260': [\n    {'code': 'abc', 'followedBy': 'a', 'remove': / ;$/u},\n    {'code': 'a', 'followedBy': 'b', 'remove': / :$/u},\n    {'code': 'b', 'followedBy': 'c', 'remove': /,$/u},\n    {'code': 'c', 'followedBy': '#', 'remove': /\\.$/u},\n    {'code': 'd', 'followedBy': 'e', 'remove': / :$/u},\n    {'code': 'e', 'followedBy': 'f', 'remove': /,$/u},\n    {'code': 'f', 'followedBy': '#', 'remove': /\\.$/u} // Probably ')' but should it be removed?\n  ],\n  '264': [\n    {'code': 'a', 'followedBy': 'b', 'remove': / :$/u},\n    {'code': 'b', 'followedBy': 'c', 'remove': /,$/u},\n    {'code': 'c', 'followedBy': '#', 'remove': /\\.$/u}\n  ],\n  '300': [\n    // NB! Remove crap as well, thus the '*' in / *:$/\n    {'code': 'a', 'followedBy': 'b', 'remove': / :$/u},\n    {'code': 'ab', 'followedBy': 'c', 'remove': / ;$/u},\n    {'code': 'abc', 'followedBy': 'e', 'remove': / \\+$/u}\n  ],\n  '490': cleanLegalSeriesTitle,\n  '534': [{'code': 'p', 'followedBy': 'c', 'remove': /:$/u}],\n  '600': legalX00punc,\n  '610': legalX10punc,\n  '611': legalEntryField,\n  '630': legalEntryField,\n  // Experimental, MET366-ish (end punc in internationally valid, but we don't use it here in Finland):\n  '648': [{'code': 'a', 'content': /^[0-9]+\\.$/u, 'ind2': ['4'], 'remove': /\\.$/u}],\n  '700': legalX00punc,\n  '710': legalX10punc,\n  '711': legalEntryField,\n  '730': legalEntryField,\n  '800': legalX00punc,\n  '810': legalX10punc,\n  '811': legalEntryField,\n  '830': [...legalEntryField, ...cleanLegalSeriesTitle],\n  '946': clean24X\n};\n\n\n// Overgeneralizes a bit: eg. addColonToRelationshipInformation only applies to 700/710 but as others don't have $i, it's fine.\nconst addToAllEntryFields = [addDotBeforeLanguageSubfieldL, addSemicolonBeforeVolumeDesignation, addColonToRelationshipInformation];\n\n\nconst addX00 = [addX00aComma, addX00aComma2, addX00Dot, addX00dComma, ...addToAllEntryFields];\nconst addX10 = [addX10iColon, addX10bDot, addX10eComma, addX10Dot, ...addToAllEntryFields];\nconst addX11 = [...addToAllEntryFields];\nconst addX30 = [...addToAllEntryFields];\n\nconst add24X = [\n  {'code': 'i', 'followedBy': 'a', 'add': ':', 'context': needsPuncAfterAlphanumeric},\n  {'code': 'a', 'followedBy': 'b', 'add': ' :', 'context': needsPuncAfterAlphanumeric},\n  {'code': 'abk', 'followedBy': 'f', 'add': ',', 'context': needsPuncAfterAlphanumeric},\n  {'code': 'abfnp', 'followedBy': 'c', 'add': ' /', 'context': needsPuncAfterAlphanumeric},\n  addDotBeforeLanguageSubfieldL\n];\n\nconst add245 = [\n  ...add24X,\n  // Blah! Also \"$a = $b\" and \"$a ; $b\" can be valid... But ' :' is better than nothing, I guess...\n  {'code': 'ab', 'followedBy': 'n', 'add': '.', 'context': needsPuncAfterAlphanumeric},\n  {'code': 'n', 'followedBy': 'p', 'add': ',', 'context': defaultNeedsPuncAfter2},\n  {'code': 'abc', 'followedBy': '#', 'add': '.', 'context': needsPuncAfterAlphanumeric} // Stepping on \"punctuation validator's\" toes\n];\n\nconst addSeriesTitle = [ // 490 and 830\n  {'code': 'a', 'followedBy': 'a', 'add': ' =', 'context': defaultNeedsPuncAfter2},\n  {'code': 'axyz', 'followedBy': 'xy', 'add': ',', 'context': defaultNeedsPuncAfter2},\n  addSemicolonBeforeVolumeDesignation //  eg. 490$axyz-$v\n];\n\nconst addLinkingEntry = [ // NB! Music 773 uses different punctuation rules, that are not implement here (can they even be?)\n  {'code': 'i', 'followedBy': aToZ, 'add': ':', 'context': defaultNeedsPuncAfter2},\n  {'code': 'a', 'followedBy': 't', 'add': '.', 'context': defaultNeedsPuncAfter2},\n  {'code': 't', 'followedBy': 'dghoz', 'add': '.', 'context': defaultNeedsPuncAfter2}\n];\n\nconst addPairedPunctuationRules = {\n  '100': addX00,\n  '110': addX10,\n  '111': addX11,\n  '130': addX30,\n  '240': add24X,\n  '243': add24X,\n  '245': add245,\n  '246': add24X,\n  '260': [\n    {'code': 'a', 'followedBy': 'b', 'add': ' :', 'context': defaultNeedsPuncAfter2},\n    {'code': 'ab', 'followedBy': 'c', 'add': ',', 'context': defaultNeedsPuncAfter2},\n    {'code': 'abc', 'followedBy': 'a', 'add': ' ;', 'context': defaultNeedsPuncAfter2},\n    {'code': 'e', 'followedBy': 'f', 'add': ' :', 'context': defaultNeedsPuncAfter2},\n    {'code': 'f', 'followedBy': 'g', 'add': ',', 'context': defaultNeedsPuncAfter2}\n  ],\n  '264': [\n    {'code': 'a', 'followedBy': 'b', 'add': ' :', 'context': defaultNeedsPuncAfter2},\n    {'code': 'b', 'followedBy': 'c', 'add': ',', 'context': defaultNeedsPuncAfter2},\n    // NB! The $c rule messes dotless exception \"264 #4 $c p1983\" up\n    // We'll need to add a hacky postprocessor for this? Add 'hasInd1': '0123' etc?\n    {'code': 'c', 'followedBy': '#', 'add': '.', 'context': needsPuncAfterAlphanumeric, 'ind2': ['0', '1', '2', '3']}\n  ],\n  '300': [\n    {'code': 'a', 'followedBy': 'b', 'add': ' :', 'context': defaultNeedsPuncAfter2},\n    {'code': 'ab', 'followedBy': 'c', 'add': ' ;', 'context': defaultNeedsPuncAfter2},\n    {'code': 'abc', 'followedBy': 'e', 'add': ' +', 'context': defaultNeedsPuncAfter2}\n  ],\n  '490': addSeriesTitle,\n  '506': [{'code': 'a', 'followedBy': '#', 'add': '.', 'context': defaultNeedsPuncAfter2}],\n  '534': [{'code': 'p', 'followedBy': 'c', 'add': ':', 'context': defaultNeedsPuncAfter2}],\n  '600': addX00,\n  '610': addX10,\n  '611': addX11,\n  '630': addX30,\n  '700': addX00,\n  '710': addX10,\n  '711': addX11,\n  '730': addX30,\n  '773': addLinkingEntry,\n  '787': addLinkingEntry,\n  '800': addX00,\n  '810': addX10,\n  '811': addX11,\n  '830': [...addX30, ...addSeriesTitle],\n  '946': [{'code': 'i', 'followedBy': 'a', 'add': ':', 'context': defaultNeedsPuncAfter2}]\n};\n\n/*\nfunction debugRule(rule) {\n  //nvdebug('');\n  nvdebug(`NAME ${rule.name ? rule.name : '<unnamed>'}`);\n  nvdebug(`SUBFIELD CODE '${rule.code}' FOLLOWED BY SUBFIELD CODE '${rule.followedBy}'`);\n  if ('add' in rule) { // eslint-disable-line functional/no-conditional-statements\n    nvdebug(`ADD '${rule.add}'`);\n  }\n  if ('remove' in rule) { // eslint-disable-line functional/no-conditional-statements\n    nvdebug(`REMOVE '${rule.remove}'`);\n  }\n  if ('context' in rule) { // eslint-disable-line functional/no-conditional-statements\n    nvdebug(`CONTEXT '${rule.context.toString()}'`);\n  }\n  //nvdebug('');\n}\n*/\n\nfunction ruleAppliesToSubfieldCode(targetSubfieldCodes, currSubfieldCode) {\n  if (!targetSubfieldCodes) { // We are not interested in what subfield precedes 240$l, ',' is removed anyway\n    return true;\n  }\n  const negation = targetSubfieldCodes.includes('!');\n  if (negation) {\n    return !targetSubfieldCodes.includes(currSubfieldCode);\n  }\n  return targetSubfieldCodes.includes(currSubfieldCode);\n}\n\n\nfunction ruleAppliesToField(rule, field) {\n  if ('ind1' in rule && !rule.ind1.includes(field.ind1)) {\n    return false;\n  }\n\n  if ('ind2' in rule && !rule.ind2.includes(field.ind2)) {\n    return false;\n  }\n\n  // If we want to check, say, $2, it should be implemented here!\n\n  return true;\n}\n\n\nfunction ruleAppliesToCurrentSubfield(rule, subfield) {\n  //nvdebug(`  Apply rule on LHS?`);\n  if (!ruleAppliesToSubfieldCode(rule.code, subfield.code)) {\n    //nvdebug(`  Reject rule!`);\n    return false;\n  }\n  if ('context' in rule) {\n    //nvdebug(`  Check '${subfield.value}' versus '${rule.context.toString()}'`);\n    if (!subfield.value.match(rule.context)) { // njsscan-ignore: regex_injection_dos\n      //nvdebug(`  Reject rule!`);\n      return false;\n    }\n  }\n  //nvdebug(`  Apply rule!`);\n  return true;\n}\n\nfunction ruleAppliesToNextSubfield(rule, nextSubfield) {\n  if (!('followedBy' in rule)) { // Return true, if we are not interested in the next subfield\n    return true;\n  }\n  // The '#' existence check applies only to the RHS field. LHS always exists.\n  if (!nextSubfield) {\n    const negation = rule.followedBy.includes('!');\n    if (negation) {\n      return !rule.followedBy.includes('#');\n    }\n    return rule.followedBy.includes('#');\n  }\n\n  if (!ruleAppliesToSubfieldCode(rule.followedBy, nextSubfield.code)) {\n    return false;\n  }\n  if ('contextRHS' in rule && !nextSubfield.value.match(rule.contextRHS)) { // njsscan-ignore: regex_injection_dos\n    return false;\n  }\n  return true;\n}\n\nfunction checkRule(rule, field, subfield1, subfield2) {\n  if (!ruleAppliesToField(rule, field)) {\n    //nvdebug(`FAIL ON WHOLE FIELD: '${fieldToString(field)}`);\n    return false;\n  }\n  //const name = rule.name || 'UNNAMED';\n  if (!ruleAppliesToCurrentSubfield(rule, subfield1)) {\n    //nvdebug(`${name}: FAIL ON LHS SUBFIELD: '$${subfield1.code} ${subfield1.value}', SF=${rule.code}`, debug);\n    return false;\n  }\n\n  // NB! This is not a perfect solution. We might have $e$0$e where $e$0 punctuation should actually be based on $e$e rules\n  if (!ruleAppliesToNextSubfield(rule, subfield2)) {\n    //const msg = subfield2 ? `${name}: FAIL ON RHS SUBFIELD '${subfield2.code}' not in [${rule.followedBy}]` : `${name}: FAIL ON RHS FIELD`;\n    //nvdebug(msg, debug);\n    return false;\n  }\n\n  //nvdebug(`${rule.name ? rule.name : '<unnamed>'}: ACCEPT ${rule.code} (${subfield1.code}), SF2=${rule.followedBy} (${subfield2 ? subfield2.code : '#'})`, debug);\n  return true;\n}\n\n\nfunction applyPunctuationRules(field, subfield1, subfield2, ruleArray = null, operation = NONE) {\n  if (operation === NONE || ruleArray === null) { // !fieldIsApplicable(field, ruleArray)) {\n    return;\n  }\n  const tag2 = field.tag === '880' ? fieldGetUnambiguousTag(field) : field.tag;\n  if (!tag2) {\n    return;\n  }\n  if (!(`${tag2}` in ruleArray)) {\n    return;\n  }\n\n  //nvdebug(`PUNCTUATE ${field.tag}/${tag2} '${subfieldToString(subfield1)}' XXX '${subfield2 ? subfieldToString(subfield2) : '#'} }`);\n\n  //nvdebug(`OP=${operation} ${tag2}: '${subfield1.code}: ${subfield1.value}' ??? '${subfield2 ? subfield2.code : '#'}'`);\n  const candRules = ruleArray[tag2];\n  candRules.every(rule => { // uses \"every\", not \"forEach\", so that only one rule is applies to the given subfields\n    //debugRule(rule);\n    if (!checkRule(rule, field, subfield1, subfield2)) {\n      return true;\n    }\n\n    //const originalValue = subfield1.value;\n    if (rule.remove && [REMOVE, REMOVE_AND_ADD].includes(operation) && subfield1.value.match(rule.remove)) {\n      //nvdebug(`    PUNC REMOVAL TO BE PERFORMED FOR $${subfield1.code} '${subfield1.value}'`, debug);\n      subfield1.value = subfield1.value.replace(rule.remove, ''); // eslint-disable-line functional/immutable-data\n      //nvdebug(`    PUNC REMOVAL PERFORMED FOR '${subfield1.value}'`);\n      return false;\n    }\n    if (rule.add && [ADD, REMOVE_AND_ADD].includes(operation)) {\n      subfield1.value += rule.add; // eslint-disable-line functional/immutable-data\n      //nvdebug(`    ADDED '${rule.add}' TO FORM '${subfield1.value}'`);\n      return false;\n    }\n\n    /*\n    if (subfield1.value !== originalValue) { // eslint-disable-line functional/no-conditional-statements\n      nvdebug(` PROCESS PUNC: '‡${subfield1.code} ${originalValue}' => '‡${subfield1.code} ${subfield1.value}'`, debug); // eslint-disable-line functional/immutable-data\n    }\n    */\n\n    return true;\n  });\n}\n\nfunction subfieldFixPunctuation(field, subfield1, subfield2) {\n  applyPunctuationRules(field, subfield1, subfield2, cleanCrappyPunctuationRules, REMOVE);\n  applyPunctuationRules(field, subfield1, subfield2, addPairedPunctuationRules, ADD);\n}\n\nfunction subfieldStripPunctuation(field, subfield1, subfield2) {\n  //nvdebug(`FSP1: '${subfield1.value}'`);\n  applyPunctuationRules(field, subfield1, subfield2, cleanValidPunctuationRules, REMOVE);\n  //nvdebug(`FSP2: '${subfield1.value}'`);\n  applyPunctuationRules(field, subfield1, subfield2, cleanCrappyPunctuationRules, REMOVE);\n  //nvdebug(`FSP3: '${subfield1.value}'`);\n\n}\n\nexport function fieldStripPunctuation(field) {\n  if (!field.subfields) {\n    return field;\n  }\n\n  field.subfields.forEach((sf, i) => {\n    // NB! instead of next subfield, we should actually get next *non-control-subfield*!!!\n    // (In plain English: We should skip $0 - $9 at least, maybe $w as well...)\n    subfieldStripPunctuation(field, sf, getNextRelevantSubfield(field, i));\n\n  });\n  return field;\n}\n\nexport function fieldFixPunctuation(field) {\n  if (!field.subfields) {\n    return field;\n  }\n  //nvdebug(`################### fieldFixPunctuation() TEST ${fieldToString(field)}`);\n\n  field.subfields.forEach((sf, i) => {\n    // NB! instead of next subfield, we should actually get next *non-control-subfield*!!!\n    // (In plain English: We should skip $0 - $9 at least, maybe $w as well...)\n    // We'll need some magic for field 257 here, do we? (Also Finnish lexicons vs global lexicons in 65X fields)\n    subfieldFixPunctuation(field, sf, getNextRelevantSubfield(field, i));\n  });\n\n  // Use shared code for final punctuation (sadly this does not fix intermediate punc):\n  if (field.useExternalEndPunctuation) { // eslint-disable-line functional/no-conditional-statements\n    // addFinalPunctuation(field); // local version. use shared code instead.\n    validateSingleField(field, false, true); // NB! Don't use field.tag as second argument! It's a string, not an int. 3rd arg must be true (=fix)\n  }\n  return field;\n}\n"],"mappings":";;;;;;;;;;AAWA,IAAAA,kBAAA,GAAAC,OAAA;AACA,IAAAC,eAAA,GAAAD,OAAA;AAEA,IAAAE,MAAA,GAAAF,OAAA;AACA,IAAAG,MAAA,GAAAC,sBAAA,CAAAJ,OAAA;AAA0B,SAAAI,uBAAAC,CAAA,WAAAA,CAAA,IAAAA,CAAA,CAAAC,UAAA,GAAAD,CAAA,KAAAE,OAAA,EAAAF,CAAA;AAf1B;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;;AAGA;;AAIA;;AAEA,MAAMG,iBAAiB,GAAG,yDAAyD;AACpE,SAAAC,SAAA,EAAY;EACzB,OAAO;IACLC,WAAW,EAAEF,iBAAiB;IAC9BG,QAAQ;IAAEC;EACZ,CAAC;EAED,SAASA,GAAGA,CAACC,MAAM,EAAE;IACnB,IAAAC,cAAO,EAAC,GAAGN,iBAAiB,SAAS,CAAC;IACtC,MAAMO,GAAG,GAAG;MAACC,OAAO,EAAE,EAAE;MAAEJ,GAAG,EAAE,EAAE;MAAEK,KAAK,EAAE;IAAI,CAAC;IAC/CJ,MAAM,CAACK,MAAM,CAACC,OAAO,CAACC,CAAC,IAAIC,mBAAmB,CAACD,CAAC,CAAC,CAAC;IAClD,OAAOL,GAAG;EACZ;EAEA,SAASJ,QAAQA,CAACE,MAAM,EAAE;IACxB,IAAAC,cAAO,EAAC,GAAGN,iBAAiB,YAAY,CAAC;IAEzC,MAAMc,yBAAyB,GAAGT,MAAM,CAACK,MAAM,CAACK,MAAM,CAACH,CAAC,IAAII,sBAAsB,CAACJ,CAAC,EAAE,IAAI,CAAC,CAAC;IAG5F,MAAMK,MAAM,GAAGH,yBAAyB,CAACI,GAAG,CAACN,CAAC,IAAI,IAAAO,oBAAa,EAACP,CAAC,CAAC,CAAC;IACnE,MAAMQ,SAAS,GAAGN,yBAAyB,CAACI,GAAG,CAACN,CAAC,IAAIS,mBAAmB,CAACT,CAAC,EAAE,IAAI,CAAC,CAAC;IAElF,MAAMU,QAAQ,GAAGL,MAAM,CAACC,GAAG,CAAC,CAACK,GAAG,EAAEC,CAAC,KAAK,IAAID,GAAG,SAASH,SAAS,CAACI,CAAC,CAAC,GAAG,CAAC;IAExE,MAAMjB,GAAG,GAAG;MAACC,OAAO,EAAEc;IAAQ,CAAC;IAE/Bf,GAAG,CAACE,KAAK,GAAGF,GAAG,CAACC,OAAO,CAACiB,MAAM,GAAG,CAAC,CAAC,CAAC;IACpC,OAAOlB,GAAG;EACZ;AACF;AAEA,SAASmB,iBAAiBA,CAACC,QAAQ,EAAE;EACnC,OAAO,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAACC,QAAQ,CAACD,QAAQ,CAACE,IAAI,CAAC;AACnF;AAEA,SAASC,uBAAuBA,CAACC,KAAK,EAAEC,iBAAiB,EAAE;EACzD,OAAOD,KAAK,CAACE,SAAS,CAACC,IAAI,CAAC,CAACP,QAAQ,EAAEQ,KAAK,KAAKA,KAAK,GAAGH,iBAAiB,IAAI,CAACN,iBAAiB,CAACC,QAAQ,CAAC,CAAC;AAC7G;AAEO,SAASN,mBAAmBA,CAACU,KAAK,EAAEK,GAAG,GAAG,IAAI,EAAE;EACrD,MAAMC,UAAU,GAAG,IAAAC,cAAK,EAACP,KAAK,CAAC;EAC/B,MAAMQ,SAAS,GAAGH,GAAG,GAAGI,sBAAsB,GAAGC,wBAAwB;EACzEJ,UAAU,CAACJ,SAAS,CAACtB,OAAO,CAAC,CAAC+B,EAAE,EAAElB,CAAC,KAAK;IACtC;IACA;IACAe,SAAS,CAACF,UAAU,EAAEK,EAAE,EAAEZ,uBAAuB,CAACO,UAAU,EAAEb,CAAC,CAAC,CAAC;EACnE,CAAC,CAAC;EACF,OAAO,IAAAL,oBAAa,EAACkB,UAAU,CAAC;AAClC;AAEO,SAASrB,sBAAsBA,CAACe,KAAK,EAAEK,GAAG,GAAG,IAAI,EAAE;EACxD,IAAI,CAACL,KAAK,CAACE,SAAS,EAAE;IACpB,OAAO,KAAK;EACd;EAEA,MAAMU,qBAAqB,GAAG,IAAAxB,oBAAa,EAACY,KAAK,CAAC;EAClD,MAAMa,qBAAqB,GAAGvB,mBAAmB,CAACU,KAAK,EAAEK,GAAG,CAAC;EAE7D,OAAOQ,qBAAqB,KAAKD,qBAAqB;AACxD;;AAEA;AACA;AACA;AACA;;AAGA;AACA,MAAME,0BAA0B,GAAG,+BAA+B;AAClE,MAAMC,sBAAsB,GAAG,kCAAkC;AACjE,MAAMC,gBAAgB,GAAG,aAAa,CAAC,CAAC;AACxC,MAAMC,aAAa,GAAG,UAAU;AAChC,MAAMC,aAAa,GAAG,+BAA+B;AACrD,MAAMC,IAAI,GAAG,4BAA4B;AAGzC,MAAMC,iBAAiB,GAAG,8DAA8D;AACxF,MAAMC,kBAAkB,GAAG,+BAA+B;AAC1D;;AAEA;AACA,MAAMC,YAAY,GAAG;EAAC,MAAM,EAAE,4BAA4B;EAAE,QAAQ,EAAE;AAAU,CAAC;AACjF,MAAMC,cAAc,GAAG;EAAC,MAAM,EAAE,UAAU;EAAE,YAAY,EAAE,YAAY;EAAE,SAAS,EAAE,MAAM;EAAE,QAAQ,EAAE;AAAK,CAAC;AAC3G,MAAMC,QAAQ,GAAG;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,8BAA8B;EAAE,YAAY,EAAEP,aAAa;EAAE,QAAQ,EAAE;AAAQ,CAAC;AACnJ,MAAMQ,mBAAmB,GAAG;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,KAAK;EAAE,SAAS,EAAE,cAAc;EAAE,QAAQ,EAAE;AAAQ,CAAC;AAC7G,MAAMC,YAAY,GAAG;EAAC,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,OAAO;EAAE,SAAS,EAAEN,iBAAiB;EAAE,QAAQ,EAAE;AAAM,CAAC;AAC7G,MAAMO,eAAe,GAAG;EAAC,MAAM,EAAE,4BAA4B;EAAE,QAAQ,EAAE;AAAO,CAAC;AACjF;AACA,MAAMC,YAAY,GAAG;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,qBAAqB;EAAE,QAAQ,EAAE;AAAM,CAAC;AAC5G,MAAMC,kCAAkC,GAAG;EAAC,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAK,CAAC;AAC/E,MAAMC,+BAA+B,GAAG;EAAC,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAK,CAAC;AAE5E,MAAMC,wBAAwB,GAAG;EAAC,MAAM,EAAE,IAAI;EAAE,SAAS,EAAE,QAAQ;EAAE,QAAQ,EAAE;AAAM,CAAC;AACtF;AACA,MAAMC,uBAAuB,GAAG;EAAC,MAAM,EAAE,QAAQ;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAEX,kBAAkB;EAAE,QAAQ,EAAE;AAAY,CAAC;AAE5H,MAAMY,YAAY,GAAG;EAAC,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,QAAQ;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAEjB,gBAAgB;EAAE,YAAY,EAAEE;AAAa,CAAC;AACnI,MAAMgB,YAAY,GAAG;EAAC,MAAM,EAAE,wCAAwC;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,WAAW;EAAE,YAAY,EAAEhB;AAAa,CAAC;AAC3K,MAAMiB,aAAa,GAAG;EAAC,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,QAAQ;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,qBAAqB;EAAE,YAAY,EAAEjB;AAAa,CAAC;AACzI,MAAMkB,SAAS,GAAG;EAAC,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,SAAS;EAAE,YAAY,EAAE,SAAS;EAAE,SAAS,EAAEtB;AAA0B,CAAC;AAGjH,MAAMuB,YAAY,GAAG;EAAC,MAAM,EAAE,oCAAoC;EAAE,MAAM,EAAE,GAAG;EAAE,SAAS,EAAEtB;AAAsB,CAAC;AACnH,MAAMuB,UAAU,GAAG;EAAC,MAAM,EAAE,oBAAoB;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,IAAI;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAExB;AAA0B,CAAC;AACrI,MAAMyB,YAAY,GAAG;EAAC,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAExB;AAAsB,CAAC;AACtG,MAAMyB,SAAS,GAAG;EAAC,MAAM,EAAE,mBAAmB;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,KAAK;EAAE,SAAS,EAAE1B;AAA0B,CAAC;AACvI,MAAM2B,iCAAiC,GAAG;EAAC,MAAM,EAAE,uCAAuC;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,GAAG;EAAE,SAAS,EAAE1B;AAAsB,CAAC;AAEvJ,MAAM2B,6BAA6B,GAAG;EAAC,MAAM,EAAE,mBAAmB;EAAE,KAAK,EAAE,GAAG;EAAE,MAAM,EAAE,QAAQ;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAE1B;AAAgB,CAAC;;AAEjJ;AACA,MAAM2B,mCAAmC,GAAG;EAAC,MAAM,EAAE,oBAAoB;EAAE,KAAK,EAAE,IAAI;EAAE,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAE;AAAQ,CAAC;AAEhJ,MAAMC,IAAI,GAAG,CAAC;AACd,MAAMC,GAAG,GAAG,CAAC;AACb,MAAMC,MAAM,GAAG,CAAC;AAChB,MAAMC,cAAc,GAAG,CAAC;;AAExB;AACA;;AAEA,MAAMC,4BAA4B,GAAG,CAACnB,kCAAkC,EAAEC,+BAA+B,CAAC;AAE1G,MAAMmB,iBAAiB,GAAG,CAAC1B,cAAc,EAAEG,YAAY,EAAEE,YAAY,EAAED,eAAe,EAAEF,mBAAmB,EAAED,QAAQ,EAAEO,wBAAwB,EAAET,YAAY,EAAEU,uBAAuB,EAAE,GAAGgB,4BAA4B,CAAC;AACxN,MAAME,iBAAiB,GAAG,CAAC3B,cAAc,EAAEG,YAAY,EAAEE,YAAY,EAAED,eAAe,EAAEL,YAAY,EAAEU,uBAAuB,EAAE,GAAGgB,4BAA4B,CAAC;AAC/J,MAAMG,iBAAiB,GAAGH,4BAA4B;AACtD,MAAMI,iBAAiB,GAAGJ,4BAA4B;AAEtD,MAAMK,uBAAuB,GAAG,CAAC;EAAC,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,OAAO;EAAE,QAAQ,EAAE;AAAiB,CAAC,CAAC;AAEvG,MAAMC,0BAA0B,GAAG,CACjC;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,IAAI;EAAE,QAAQ,EAAE;AAAO,CAAC;AAAE;AACtD;EAAC,MAAM,EAAE,IAAI;EAAE,QAAQ,EAAE;AAAM,CAAC,EAChC;EAAC,MAAM,EAAE,uBAAuB;EAAE,YAAY,EAAE,uBAAuB;EAAE,QAAQ,EAAE;AAAQ,CAAC,CAC7F;;AAGD;AACA;AACA;AACA;AACA;AACA;;AAEA,MAAMC,SAAS,GAAG,CAChB;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,IAAI;EAAE,QAAQ,EAAE;AAAO,CAAC,EACvD;EAAC,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEnC;AAAiB,CAAC,EAClF;EAAC,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEA;AAAiB,CAAC,EAClF;EAAC,MAAM,EAAE,UAAU;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEA;AAAiB,CAAC,EACvF;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEA;AAAiB,CAAC;AAAE;AAClF;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,IAAI;EAAE,QAAQ,EAAE,MAAM;EAAE,SAAS,EAAEA;AAAiB,CAAC;AAAE;AACnFS,kCAAkC,CACnC;AAGD,MAAM2B,2BAA2B,GAAG;EAClC,KAAK,EAAEP,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEG,SAAS;EAChB,KAAK,EAAEA,SAAS;EAChB,KAAK,EAAEA,SAAS;EAChB,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,IAAI;IAAE,QAAQ,EAAE;EAAO,CAAC,EACpD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE,KAAK;IAAE,SAAS,EAAE;EAAS,CAAC,EACvE;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,IAAI;IAAE,QAAQ,EAAE;EAAO,CAAC,EACrD;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE,KAAK;IAAE,SAAS,EAAE;EAAS,CAAC,EACxE;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,IAAI;IAAE,QAAQ,EAAE;EAAQ,CAAC,CAAC;EAAA,CAEzD;EAED,KAAK,EAAEF,uBAAuB;EAC9B,KAAK,EAAEJ,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEH,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEE,0BAA0B;EACjC,KAAK,EAAEA,0BAA0B;EACjC,KAAK,EAAEA,0BAA0B;EACjC,KAAK,EAAEA,0BAA0B;EACjC,KAAK,EAAEL,iBAAiB;EACxB,KAAK,EAAEC,iBAAiB;EACxB,KAAK,EAAEG,uBAAuB;EAC9B,KAAK,EAAEE;AACT,CAAC;AAED,MAAME,kBAAkB,GAAG;EAAC,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,OAAO;EAAE,SAAS,EAAE,MAAM;EAAE,QAAQ,EAAE;AAAK,CAAC;AACvG;AACA,MAAMC,iBAAiB,GAAG;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,IAAI;EAAEC,OAAO,EAAE,iBAAiB;EAAE,QAAQ,EAAE;AAAM,CAAC;AACzG,MAAMC,mBAAmB,GAAG;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAO,CAAC,CAAC,CAAC;AACjF,MAAMC,gBAAgB,GAAG;EAAC,MAAM,EAAE,UAAU;EAAE,YAAY,EAAE,KAAK;EAAE,SAAS,EAAE,yBAAyB;EAAE,QAAQ,EAAE;AAAM,CAAC;AAC1H,MAAMC,+BAA+B,GAAG;EAAC,MAAM,EAAE,qBAAqB;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAE,OAAO;EAAE,QAAQ,EAAE;AAAM,CAAC;AAEhI,MAAMC,eAAe,GAAG,CAACD,+BAA+B,CAAC;AAEzD,MAAME,YAAY,GAAG,CAACP,kBAAkB,EAAEG,mBAAmB,EAAEF,iBAAiB,EAAEG,gBAAgB,EAAE,GAAGE,eAAe,CAAC;AAEvH,MAAME,kBAAkB,GAAG;EAAC,MAAM,EAAE,UAAU;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,SAAS,EAAE,MAAM;EAAE,QAAQ,EAAE;AAAK,CAAC;AACrH,MAAMC,gBAAgB,GAAG;EAAC,MAAM,EAAE,QAAQ;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,MAAM;EAAE,SAAS,EAAE,OAAO;EAAE,QAAQ,EAAE;AAAM,CAAC;AAEtH,MAAMC,YAAY,GAAG,CAACF,kBAAkB,EAAEC,gBAAgB,EAAEtC,YAAY,EAAE,GAAGmC,eAAe,CAAC;AAE7F,MAAMK,qBAAqB,GAAG;AAAE;AAC9B;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAM,CAAC,EAClD;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,KAAK;EAAE,QAAQ,EAAE,KAAK;EAAE,SAAS,EAAE;AAAM,CAAC,EACzE;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAO,CAAC,CACvD;AAED,MAAMC,QAAQ,GAAG,CACf;EAAC,MAAM,EAAE,KAAK;EAAE,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAO,CAAC,EAClE;EAAC,MAAM,EAAE,KAAK;EAAE,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAU,CAAC,EACrE;EAAC,MAAM,EAAE,MAAM;EAAE,MAAM,EAAE,IAAI;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAM,CAAC,EACnE;EAAC,MAAM,EAAE,OAAO;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAK,CAAC,EACpE;EAAC,MAAM,EAAE,SAAS;EAAE,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAO,CAAC,EAC1E;EAAC,MAAM,EAAE,OAAO;EAAE,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAM,CAAC,EACrE;EAAC,MAAM,EAAE,QAAQ;EAAE,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAM,CAAC,EACvE;EAAC,MAAM,EAAE,KAAK;EAAE,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,QAAQ,EAAE;AAAK,CAAC,EAChEP,+BAA+B,CAChC;AAED,MAAMQ,0BAA0B,GAAG;EACjC,KAAK,EAAEN,YAAY;EACnB,KAAK,EAAEG,YAAY;EACnB,KAAK,EAAEJ,eAAe;EACtB,KAAK,EAAEA,eAAe;EACtB,KAAK,EAAEM,QAAQ;EACf,KAAK,EAAEA,QAAQ;EACf,KAAK,EAAEA,QAAQ;EACf,KAAK,EAAEA,QAAQ;EACf,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EACpD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAK,CAAC,EACjD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAK,CAAC,EACjD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,CAAC;EAAA,CACpD;EACD,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAK,CAAC,EACjD;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,CACnD;EACD,KAAK,EAAE;EACL;EACA;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EAClD;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAM,CAAC,EACnD;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAO,CAAC,CACtD;EACD,KAAK,EAAED,qBAAqB;EAC5B,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,QAAQ,EAAE;EAAK,CAAC,CAAC;EAC1D,KAAK,EAAEJ,YAAY;EACnB,KAAK,EAAEG,YAAY;EACnB,KAAK,EAAEJ,eAAe;EACtB,KAAK,EAAEA,eAAe;EACtB;EACA,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,SAAS,EAAE,aAAa;IAAE,MAAM,EAAE,CAAC,GAAG,CAAC;IAAE,QAAQ,EAAE;EAAM,CAAC,CAAC;EACjF,KAAK,EAAEC,YAAY;EACnB,KAAK,EAAEG,YAAY;EACnB,KAAK,EAAEJ,eAAe;EACtB,KAAK,EAAEA,eAAe;EACtB,KAAK,EAAEC,YAAY;EACnB,KAAK,EAAEG,YAAY;EACnB,KAAK,EAAEJ,eAAe;EACtB,KAAK,EAAE,CAAC,GAAGA,eAAe,EAAE,GAAGK,qBAAqB,CAAC;EACrD,KAAK,EAAEC;AACT,CAAC;;AAGD;AACA,MAAME,mBAAmB,GAAG,CAAC7B,6BAA6B,EAAEC,mCAAmC,EAAEF,iCAAiC,CAAC;AAGnI,MAAM+B,MAAM,GAAG,CAACvC,YAAY,EAAEE,aAAa,EAAEC,SAAS,EAAEF,YAAY,EAAE,GAAGqC,mBAAmB,CAAC;AAC7F,MAAME,MAAM,GAAG,CAACpC,YAAY,EAAEC,UAAU,EAAEC,YAAY,EAAEC,SAAS,EAAE,GAAG+B,mBAAmB,CAAC;AAC1F,MAAMG,MAAM,GAAG,CAAC,GAAGH,mBAAmB,CAAC;AACvC,MAAMI,MAAM,GAAG,CAAC,GAAGJ,mBAAmB,CAAC;AAEvC,MAAMK,MAAM,GAAG,CACb;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAE9D;AAA0B,CAAC,EACnF;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,IAAI;EAAE,SAAS,EAAEA;AAA0B,CAAC,EACpF;EAAC,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAEA;AAA0B,CAAC,EACrF;EAAC,MAAM,EAAE,OAAO;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,IAAI;EAAE,SAAS,EAAEA;AAA0B,CAAC,EACxF4B,6BAA6B,CAC9B;AAED,MAAMmC,MAAM,GAAG,CACb,GAAGD,MAAM;AACT;AACA;EAAC,MAAM,EAAE,IAAI;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAE9D;AAA0B,CAAC,EACpF;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAEC;AAAsB,CAAC,EAC/E;EAAC,MAAM,EAAE,KAAK;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAED;AAA0B,CAAC,CAAC;AAAA,CACvF;AAED,MAAMgE,cAAc,GAAG;AAAE;AACvB;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,IAAI;EAAE,SAAS,EAAE/D;AAAsB,CAAC,EAChF;EAAC,MAAM,EAAE,MAAM;EAAE,YAAY,EAAE,IAAI;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAEA;AAAsB,CAAC,EACnF4B,mCAAmC,CAAC;AAAA,CACrC;AAED,MAAMoC,eAAe,GAAG;AAAE;AACxB;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE5D,IAAI;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAEJ;AAAsB,CAAC,EAChF;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,GAAG;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAEA;AAAsB,CAAC,EAC/E;EAAC,MAAM,EAAE,GAAG;EAAE,YAAY,EAAE,OAAO;EAAE,KAAK,EAAE,GAAG;EAAE,SAAS,EAAEA;AAAsB,CAAC,CACpF;AAED,MAAMiE,yBAAyB,GAAG;EAChC,KAAK,EAAER,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEA,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAED,MAAM;EACb,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAE7D;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAEA;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,EAClF;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAEA;EAAsB,CAAC,CAChF;EACD,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAEA;EAAsB,CAAC;EAC/E;EACA;EACA;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAED,0BAA0B;IAAE,MAAM,EAAE,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG;EAAC,CAAC,CAClH;EACD,KAAK,EAAE,CACL;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEC;EAAsB,CAAC,EAChF;IAAC,MAAM,EAAE,IAAI;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,EACjF;IAAC,MAAM,EAAE,KAAK;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,IAAI;IAAE,SAAS,EAAEA;EAAsB,CAAC,CACnF;EACD,KAAK,EAAE+D,cAAc;EACrB,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAE/D;EAAsB,CAAC,CAAC;EACxF,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAEA;EAAsB,CAAC,CAAC;EACxF,KAAK,EAAEyD,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEH,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEI,eAAe;EACtB,KAAK,EAAEA,eAAe;EACtB,KAAK,EAAEP,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAEC,MAAM;EACb,KAAK,EAAE,CAAC,GAAGC,MAAM,EAAE,GAAGG,cAAc,CAAC;EACrC,KAAK,EAAE,CAAC;IAAC,MAAM,EAAE,GAAG;IAAE,YAAY,EAAE,GAAG;IAAE,KAAK,EAAE,GAAG;IAAE,SAAS,EAAE/D;EAAsB,CAAC;AACzF,CAAC;;AAED;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;AACA;;AAEA,SAASkE,yBAAyBA,CAACC,mBAAmB,EAAEC,gBAAgB,EAAE;EACxE,IAAI,CAACD,mBAAmB,EAAE;IAAE;IAC1B,OAAO,IAAI;EACb;EACA,MAAME,QAAQ,GAAGF,mBAAmB,CAACrF,QAAQ,CAAC,GAAG,CAAC;EAClD,IAAIuF,QAAQ,EAAE;IACZ,OAAO,CAACF,mBAAmB,CAACrF,QAAQ,CAACsF,gBAAgB,CAAC;EACxD;EACA,OAAOD,mBAAmB,CAACrF,QAAQ,CAACsF,gBAAgB,CAAC;AACvD;AAGA,SAASE,kBAAkBA,CAACC,IAAI,EAAEtF,KAAK,EAAE;EACvC,IAAI,MAAM,IAAIsF,IAAI,IAAI,CAACA,IAAI,CAACC,IAAI,CAAC1F,QAAQ,CAACG,KAAK,CAACuF,IAAI,CAAC,EAAE;IACrD,OAAO,KAAK;EACd;EAEA,IAAI,MAAM,IAAID,IAAI,IAAI,CAACA,IAAI,CAACE,IAAI,CAAC3F,QAAQ,CAACG,KAAK,CAACwF,IAAI,CAAC,EAAE;IACrD,OAAO,KAAK;EACd;;EAEA;;EAEA,OAAO,IAAI;AACb;AAGA,SAASC,4BAA4BA,CAACH,IAAI,EAAE1F,QAAQ,EAAE;EACpD;EACA,IAAI,CAACqF,yBAAyB,CAACK,IAAI,CAACxF,IAAI,EAAEF,QAAQ,CAACE,IAAI,CAAC,EAAE;IACxD;IACA,OAAO,KAAK;EACd;EACA,IAAI,SAAS,IAAIwF,IAAI,EAAE;IACrB;IACA,IAAI,CAAC1F,QAAQ,CAAC8F,KAAK,CAACC,KAAK,CAACL,IAAI,CAAC3B,OAAO,CAAC,EAAE;MAAE;MACzC;MACA,OAAO,KAAK;IACd;EACF;EACA;EACA,OAAO,IAAI;AACb;AAEA,SAASiC,yBAAyBA,CAACN,IAAI,EAAEO,YAAY,EAAE;EACrD,IAAI,EAAE,YAAY,IAAIP,IAAI,CAAC,EAAE;IAAE;IAC7B,OAAO,IAAI;EACb;EACA;EACA,IAAI,CAACO,YAAY,EAAE;IACjB,MAAMT,QAAQ,GAAGE,IAAI,CAACQ,UAAU,CAACjG,QAAQ,CAAC,GAAG,CAAC;IAC9C,IAAIuF,QAAQ,EAAE;MACZ,OAAO,CAACE,IAAI,CAACQ,UAAU,CAACjG,QAAQ,CAAC,GAAG,CAAC;IACvC;IACA,OAAOyF,IAAI,CAACQ,UAAU,CAACjG,QAAQ,CAAC,GAAG,CAAC;EACtC;EAEA,IAAI,CAACoF,yBAAyB,CAACK,IAAI,CAACQ,UAAU,EAAED,YAAY,CAAC/F,IAAI,CAAC,EAAE;IAClE,OAAO,KAAK;EACd;EACA,IAAI,YAAY,IAAIwF,IAAI,IAAI,CAACO,YAAY,CAACH,KAAK,CAACC,KAAK,CAACL,IAAI,CAACS,UAAU,CAAC,EAAE;IAAE;IACxE,OAAO,KAAK;EACd;EACA,OAAO,IAAI;AACb;AAEA,SAASC,SAASA,CAACV,IAAI,EAAEtF,KAAK,EAAEiG,SAAS,EAAEC,SAAS,EAAE;EACpD,IAAI,CAACb,kBAAkB,CAACC,IAAI,EAAEtF,KAAK,CAAC,EAAE;IACpC;IACA,OAAO,KAAK;EACd;EACA;EACA,IAAI,CAACyF,4BAA4B,CAACH,IAAI,EAAEW,SAAS,CAAC,EAAE;IAClD;IACA,OAAO,KAAK;EACd;;EAEA;EACA,IAAI,CAACL,yBAAyB,CAACN,IAAI,EAAEY,SAAS,CAAC,EAAE;IAC/C;IACA;IACA,OAAO,KAAK;EACd;;EAEA;EACA,OAAO,IAAI;AACb;AAGA,SAASC,qBAAqBA,CAACnG,KAAK,EAAEiG,SAAS,EAAEC,SAAS,EAAEE,SAAS,GAAG,IAAI,EAAE5F,SAAS,GAAGoC,IAAI,EAAE;EAC9F,IAAIpC,SAAS,KAAKoC,IAAI,IAAIwD,SAAS,KAAK,IAAI,EAAE;IAAE;IAC9C;EACF;EACA,MAAMC,IAAI,GAAGrG,KAAK,CAACsG,GAAG,KAAK,KAAK,GAAG,IAAAC,sCAAsB,EAACvG,KAAK,CAAC,GAAGA,KAAK,CAACsG,GAAG;EAC5E,IAAI,CAACD,IAAI,EAAE;IACT;EACF;EACA,IAAI,EAAE,GAAGA,IAAI,EAAE,IAAID,SAAS,CAAC,EAAE;IAC7B;EACF;;EAEA;;EAEA;EACA,MAAMI,SAAS,GAAGJ,SAAS,CAACC,IAAI,CAAC;EACjCG,SAAS,CAACC,KAAK,CAACnB,IAAI,IAAI;IAAE;IACxB;IACA,IAAI,CAACU,SAAS,CAACV,IAAI,EAAEtF,KAAK,EAAEiG,SAAS,EAAEC,SAAS,CAAC,EAAE;MACjD,OAAO,IAAI;IACb;;IAEA;IACA,IAAIZ,IAAI,CAACoB,MAAM,IAAI,CAAC5D,MAAM,EAAEC,cAAc,CAAC,CAAClD,QAAQ,CAACW,SAAS,CAAC,IAAIyF,SAAS,CAACP,KAAK,CAACC,KAAK,CAACL,IAAI,CAACoB,MAAM,CAAC,EAAE;MACrG;MACAT,SAAS,CAACP,KAAK,GAAGO,SAAS,CAACP,KAAK,CAACiB,OAAO,CAACrB,IAAI,CAACoB,MAAM,EAAE,EAAE,CAAC,CAAC,CAAC;MAC5D;MACA,OAAO,KAAK;IACd;IACA,IAAIpB,IAAI,CAACjF,GAAG,IAAI,CAACwC,GAAG,EAAEE,cAAc,CAAC,CAAClD,QAAQ,CAACW,SAAS,CAAC,EAAE;MACzDyF,SAAS,CAACP,KAAK,IAAIJ,IAAI,CAACjF,GAAG,CAAC,CAAC;MAC7B;MACA,OAAO,KAAK;IACd;;IAEA;AACJ;AACA;AACA;AACA;;IAEI,OAAO,IAAI;EACb,CAAC,CAAC;AACJ;AAEA,SAASI,sBAAsBA,CAACT,KAAK,EAAEiG,SAAS,EAAEC,SAAS,EAAE;EAC3DC,qBAAqB,CAACnG,KAAK,EAAEiG,SAAS,EAAEC,SAAS,EAAE1C,2BAA2B,EAAEV,MAAM,CAAC;EACvFqD,qBAAqB,CAACnG,KAAK,EAAEiG,SAAS,EAAEC,SAAS,EAAElB,yBAAyB,EAAEnC,GAAG,CAAC;AACpF;AAEA,SAASnC,wBAAwBA,CAACV,KAAK,EAAEiG,SAAS,EAAEC,SAAS,EAAE;EAC7D;EACAC,qBAAqB,CAACnG,KAAK,EAAEiG,SAAS,EAAEC,SAAS,EAAE5B,0BAA0B,EAAExB,MAAM,CAAC;EACtF;EACAqD,qBAAqB,CAACnG,KAAK,EAAEiG,SAAS,EAAEC,SAAS,EAAE1C,2BAA2B,EAAEV,MAAM,CAAC;EACvF;AAEF;AAEO,SAAS8D,qBAAqBA,CAAC5G,KAAK,EAAE;EAC3C,IAAI,CAACA,KAAK,CAACE,SAAS,EAAE;IACpB,OAAOF,KAAK;EACd;EAEAA,KAAK,CAACE,SAAS,CAACtB,OAAO,CAAC,CAAC+B,EAAE,EAAElB,CAAC,KAAK;IACjC;IACA;IACAiB,wBAAwB,CAACV,KAAK,EAAEW,EAAE,EAAEZ,uBAAuB,CAACC,KAAK,EAAEP,CAAC,CAAC,CAAC;EAExE,CAAC,CAAC;EACF,OAAOO,KAAK;AACd;AAEO,SAASlB,mBAAmBA,CAACkB,KAAK,EAAE;EACzC,IAAI,CAACA,KAAK,CAACE,SAAS,EAAE;IACpB,OAAOF,KAAK;EACd;EACA;;EAEAA,KAAK,CAACE,SAAS,CAACtB,OAAO,CAAC,CAAC+B,EAAE,EAAElB,CAAC,KAAK;IACjC;IACA;IACA;IACAgB,sBAAsB,CAACT,KAAK,EAAEW,EAAE,EAAEZ,uBAAuB,CAACC,KAAK,EAAEP,CAAC,CAAC,CAAC;EACtE,CAAC,CAAC;;EAEF;EACA,IAAIO,KAAK,CAAC6G,yBAAyB,EAAE;IAAE;IACrC;IACA,IAAAC,sCAAmB,EAAC9G,KAAK,EAAE,KAAK,EAAE,IAAI,CAAC,CAAC,CAAC;EAC3C;EACA,OAAOA,KAAK;AACd","ignoreList":[]}

package/dist/urn.js

@@ -13,22 +13,31 @@ function _default(isLegalDeposit = false, useMelindaTemp = true) {
   const debug = (0, _debug.default)('@natlibfi/marc-record-validators-melinda:urn');
   const debugData = debug.extend('data');
 
+  //console.log(`IS LEGAL DEPOSIT? ${isLegalDeposit ? 'YES' : 'NO'}`); // eslint-disable-line no-console
+
   // We should check that the f856 with URN has second indicator '0' (Resource), ' ' (No information provided) or '8' (No display constant generated)
   // - if second indicator is '1' (Version of resource) or '2' (Related resource) the URN in f856 is not correct for the resource described in the record
 
   // This checks only the existence of URNs from the Finnish urn.fi -resolver
 
-  const hasURN = f => f.tag === '856' && f.subfields.some(({
-    code,
-    value
-  }) => code === 'u' && /urn.fi/u.test(value));
+  function hasLegalDepositURN(field) {
+    if (field.tag !== '856' || ['1', '2', '3', '4'].includes(field.ind2)) {
+      return false;
+    }
+
+    // First attempt to fix MET-573. However, does useMelindaTemp come into play as well?
+    if (isLegalDeposit && !field.subfields.some(sf => sf.code === '5' && sf.value === 'FI-Vapaa')) {
+      return false;
+    }
+    return field.subfields.some(sf => sf.code === 'u' && /^https?:\/\/urn\.fi/u.test(sf.value));
+  }
   return {
     description: 'Adds URN for record, to 856-field (if not existing). If isLegalDeposit is active, adds legal deposit subfields to the f856s with URN.',
     validate,
     fix
   };
   async function fix(record) {
-    const f856sUrn = record.fields.filter(hasURN);
+    const f856sUrn = record.fields.filter(hasLegalDepositURN);
     debugData(`f856sUrn: ${JSON.stringify(f856sUrn)}`);
     const ldSubfields = isLegalDeposit ? createLDSubfields() : [];
     debugData(`IsLegalDeposit: ${isLegalDeposit}, LegalDepositSubfields: ${JSON.stringify(ldSubfields)}`);
@@ -181,7 +190,7 @@ function _default(isLegalDeposit = false, useMelindaTemp = true) {
         valid: true
       };
     }
-    const f856sUrn = record.fields.filter(hasURN);
+    const f856sUrn = record.fields.filter(hasLegalDepositURN);
     if (f856sUrn.length > 0) {
       debug(`Record has ${f856sUrn.length} URN fields`);
       debugData(`f856sUrn: ${JSON.stringify(f856sUrn)}`);