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

package/dist/merge-fields/controlSubfields.js

@@ -1,135 +1,100 @@
-"use strict";
-
-Object.defineProperty(exports, "__esModule", {
-  value: true
-});
-exports.controlSubfieldsPermitMerge = controlSubfieldsPermitMerge;
-var _marcRecord = require("@natlibfi/marc-record");
-var _debug = _interopRequireDefault(require("debug"));
-var _utils = require("../utils.js");
-var _normalizeIdentifiers = require("../normalize-identifiers");
-function _interopRequireDefault(e) { return e && e.__esModule ? e : { default: e }; }
-//import {normalizeControlSubfieldValue} from './normalizeIdentifier';
-
-const debug = (0, _debug.default)('@natlibfi/marc-record-validators-melinda:merge-fields:controlSubfields');
-//const debugData = debug.extend('data');
-const debugDev = debug.extend('dev');
+import { MarcRecord } from "@natlibfi/marc-record";
+import createDebugLogger from "debug";
+import { fieldHasSubfield, fieldToString, nvdebug, nvdebugSubfieldArray, subfieldIsRepeatable, subfieldsAreIdentical } from "../utils.js";
+import { normalizeControlSubfieldValue } from "../normalize-identifiers.js";
+const debug = createDebugLogger("@natlibfi/marc-record-validators-melinda:merge-fields:controlSubfields");
+const debugDev = debug.extend("dev");
 function subfieldsAreEqual(field1, field2, subfieldCode) {
-  // Check OK if neither one has given subfield.
-  // Check fails if one field has given subfield and the other one does not
-  if (!(0, _utils.fieldHasSubfield)(field1, subfieldCode)) {
-    return !(0, _utils.fieldHasSubfield)(field2, subfieldCode);
+  if (!fieldHasSubfield(field1, subfieldCode)) {
+    return !fieldHasSubfield(field2, subfieldCode);
   }
-  if (!(0, _utils.fieldHasSubfield)(field2, subfieldCode)) {
+  if (!fieldHasSubfield(field2, subfieldCode)) {
     return false;
   }
-  // Compare $3 subfields. If everything matches, OK, else FAIL:
-  const sfSet1 = field1.subfields.filter(subfield => subfield.code === subfieldCode);
-  const sfSet2 = field2.subfields.filter(subfield => subfield.code === subfieldCode);
-  return _marcRecord.MarcRecord.isEqual(sfSet1, sfSet2);
+  const sfSet1 = field1.subfields.filter((subfield) => subfield.code === subfieldCode);
+  const sfSet2 = field2.subfields.filter((subfield) => subfield.code === subfieldCode);
+  return MarcRecord.isEqual(sfSet1, sfSet2);
 }
 function subfieldsAreEmpty(field1, field2, subfieldCode) {
-  if (!(0, _utils.fieldHasSubfield)(field1, subfieldCode) && !(0, _utils.fieldHasSubfield)(field2, subfieldCode)) {
+  if (!fieldHasSubfield(field1, subfieldCode) && !fieldHasSubfield(field2, subfieldCode)) {
     return true;
   }
   return false;
 }
 function sixlessIsSubset(fieldWith6, fieldWithout6) {
-  // Remove $0 and $1, and then check that remaining $6-less field is a subset of the one with $6.
-  // No need to check indicators.
-  // NB! We could use punctuation-stripping here.
-  const subset = fieldWithout6.subfields.filter(subfield => !['0', '1'].includes(subfield.code));
-  return subset.every(sf => fieldWith6.subfields.some(sf2 => (0, _utils.subfieldsAreIdentical)(sf, sf2)));
-  //return MarcRecord.isEqual(strippedField1, strippedField2);
+  const subset = fieldWithout6.subfields.filter((subfield) => !["0", "1"].includes(subfield.code));
+  return subset.every((sf) => fieldWith6.subfields.some((sf2) => subfieldsAreIdentical(sf, sf2)));
 }
 function controlSubfield6PermitsMerge(field1, field2) {
-  if (subfieldsAreEmpty(field1, field2, '6')) {
+  if (subfieldsAreEmpty(field1, field2, "6")) {
     return true;
   }
-
-  // Handle cases where one has a $6 and the other has not:
-  // Should this accept $0 (FI-ASTERI-N) vs none?
-  if (!(0, _utils.fieldHasSubfield)(field1, '6') && (0, _utils.fieldHasSubfield)(field2, '6') && sixlessIsSubset(field2, field1)) {
+  if (!fieldHasSubfield(field1, "6") && fieldHasSubfield(field2, "6") && sixlessIsSubset(field2, field1)) {
     return true;
   }
-  if (!(0, _utils.fieldHasSubfield)(field2, '6') && (0, _utils.fieldHasSubfield)(field1, '6') && sixlessIsSubset(field1, field2)) {
+  if (!fieldHasSubfield(field2, "6") && fieldHasSubfield(field1, "6") && sixlessIsSubset(field1, field2)) {
     return true;
   }
-
-  // There are at least two (plus) fields involved (Field XXX (one) and field 880 (one plus).
-  // Thus this generic solution can't handle them. Postprocess step removes some chains instead!
   debugDev(`  controlSubfield6PermitsMerge() fails always on generic part (feature).`);
   return false;
 }
 function controlSubfield5PermitsMerge(field1, field2) {
-  // field1.$5 XOR field2.$5 means false, NEITHER and BOTH mean true, regardless of value
-  if (!(0, _utils.fieldHasSubfield)(field1, '5')) {
-    if (!(0, _utils.fieldHasSubfield)(field2, '5')) {
-      return true; // If neither one has $5, it's ok to merge
+  if (!fieldHasSubfield(field1, "5")) {
+    if (!fieldHasSubfield(field2, "5")) {
+      return true;
     }
-    // If $5 contents are same, merge can be perfomed:
-    const fives1 = field1.subfields.filter(sf => sf.code === '5');
-    const fives2 = field2.subfields.filter(sf => sf.code === '5');
-    if (fives1.every(sf1 => fives2.some(sf2 => sf1.value === sf2.value)) && fives2.every(sf2 => fives1.some(sf1 => sf1.value === sf2.value))) {
+    const fives1 = field1.subfields.filter((sf) => sf.code === "5");
+    const fives2 = field2.subfields.filter((sf) => sf.code === "5");
+    if (fives1.every((sf1) => fives2.some((sf2) => sf1.value === sf2.value)) && fives2.every((sf2) => fives1.some((sf1) => sf1.value === sf2.value))) {
       return true;
     }
     return false;
   }
-  if (!(0, _utils.fieldHasSubfield)(field2, '5')) {
+  if (!fieldHasSubfield(field2, "5")) {
     return false;
   }
   return true;
 }
 function controlSubfield9PermitsMerge(baseField, sourceField) {
-  const baseFieldSubfields9 = baseField.subfields.filter(sf => sf.code === '9');
-  const sourceFieldSubfields9 = sourceField.subfields.filter(sf => sf.code === '9');
-
-  //nvdebug('CHECK $9', debugDev);
-  // There are no $9s. Skip:
+  const baseFieldSubfields9 = baseField.subfields.filter((sf) => sf.code === "9");
+  const sourceFieldSubfields9 = sourceField.subfields.filter((sf) => sf.code === "9");
   if (baseFieldSubfields9.length === 0 && sourceFieldSubfields9.length === 0) {
-    //nvdebug(` No subfield $9 detected`, debugDev);
     return true;
   }
   if (keepOrDropPreventsMerge()) {
-    (0, _utils.nvdebug)(` Subfield $9 KEEPs and DROPs disallow merge`, debugDev);
+    nvdebug(` Subfield $9 KEEPs and DROPs disallow merge`, debugDev);
     return false;
   }
   if (transPreventsMerge()) {
-    (0, _utils.nvdebug)(` Subfield $9 <TRANS> mismatch disallows merge`, debugDev);
+    nvdebug(` Subfield $9 <TRANS> mismatch disallows merge`, debugDev);
     return false;
   }
-
-  //nvdebug('CHECK $9 OK', debugDev);
-
   return true;
   function subfieldHasKeepOrDrop(subfield) {
-    // nvdebug(`Has <KEEP>? ${subfieldToString(subfield)}`, debugDev);
-    return subfield.code === '9' && /(?:<KEEP>|<DROP>)/u.test(subfield.value);
+    return subfield.code === "9" && /(?:<KEEP>|<DROP>)/u.test(subfield.value);
   }
   function subfieldHasTrans(subfield) {
-    return subfield.code === '9' && /<TRANS>/u.test(subfield.value);
+    return subfield.code === "9" && /<TRANS>/u.test(subfield.value);
   }
   function transPreventsMerge() {
-    const trans1 = baseFieldSubfields9.filter(sf => subfieldHasTrans(sf));
-    const trans2 = sourceFieldSubfields9.filter(sf => subfieldHasTrans(sf));
+    const trans1 = baseFieldSubfields9.filter((sf) => subfieldHasTrans(sf));
+    const trans2 = sourceFieldSubfields9.filter((sf) => subfieldHasTrans(sf));
     if (trans1.length > 0 && trans2.length > 0) {
-      if (!_marcRecord.MarcRecord.isEqual(trans1, trans2)) {
+      if (!MarcRecord.isEqual(trans1, trans2)) {
         return true;
       }
     }
     return false;
   }
   function retainSubfieldForKeepComparison(subfield) {
-    // Don't compare <KEEP>, <DROP> nor <TRANS> here (<TRANS> has it's own check)
     if (subfieldHasKeepOrDrop(subfield) || subfieldHasTrans(subfield)) {
       return false;
     }
-    if (['0', '1'].includes(subfield.code)) {
+    if (["0", "1"].includes(subfield.code)) {
       return false;
     }
-    if (['100', '600', '700', '800'].includes(baseField.tag)) {
-      // Despite $9 KEEP/DROP, we are interested in merging $d years (better than two separate fields)
-      if (['d'].includes(subfield.code)) {
+    if (["100", "600", "700", "800"].includes(baseField.tag)) {
+      if (["d"].includes(subfield.code)) {
         return false;
       }
     }
@@ -139,96 +104,75 @@ function controlSubfield9PermitsMerge(baseField, sourceField) {
     if (sourceSubfield.code !== subfieldCode) {
       return false;
     }
-    // In this context, there's no need to check the value of a non-repeatable subfield.
-    // If value is different, pairing will fail when comparing the subfield itself.
-    // This allows us to tolerate little differences in punctuation: different punctuation does not get copied to base,
-    // so they don't alter base and and thus redundant when comparing.
-    if (!(0, _utils.subfieldIsRepeatable)(tag, subfieldCode)) {
+    if (!subfieldIsRepeatable(tag, subfieldCode)) {
       return true;
     }
     return sourceSubfield.value === subfieldValue;
   }
   function keepOrDropPreventsMerge() {
-    const keepOrDrop1 = baseFieldSubfields9.filter(sf => subfieldHasKeepOrDrop(sf));
-    const keepOrDrop2 = sourceFieldSubfields9.filter(sf => subfieldHasKeepOrDrop(sf));
+    const keepOrDrop1 = baseFieldSubfields9.filter((sf) => subfieldHasKeepOrDrop(sf));
+    const keepOrDrop2 = sourceFieldSubfields9.filter((sf) => subfieldHasKeepOrDrop(sf));
     if (keepOrDrop1.length === 0 && keepOrDrop2.length === 0) {
       return false;
     }
-    if (baseField.tag.charAt(0) === '1' && !keepOrDrop2.some(sf => /<DROP>/u.test(sf.value))) {
+    if (baseField.tag.charAt(0) === "1" && !keepOrDrop2.some((sf) => /<DROP>/u.test(sf.value))) {
       return false;
     }
-    const sf9lessField1 = baseField.subfields.filter(subfield => retainSubfieldForKeepComparison(subfield));
-    const sf9lessField2 = sourceField.subfields.filter(subfield => retainSubfieldForKeepComparison(subfield));
-    (0, _utils.nvdebugSubfieldArray)(baseField.subfields, 'FIELD   ', debugDev);
-    (0, _utils.nvdebugSubfieldArray)(sf9lessField1, 'FILTER  ', debugDev);
-    (0, _utils.nvdebugSubfieldArray)(sourceField.subfields, 'FIELD2  ', debugDev);
-    (0, _utils.nvdebugSubfieldArray)(sf9lessField2, 'FILTER2 ', debugDev);
-
-    // Keepless field can be a subset field with <KEEP>/<DROP>! Note that punctuation still causes remnants to fail.
+    const sf9lessField1 = baseField.subfields.filter((subfield) => retainSubfieldForKeepComparison(subfield));
+    const sf9lessField2 = sourceField.subfields.filter((subfield) => retainSubfieldForKeepComparison(subfield));
+    nvdebugSubfieldArray(baseField.subfields, "FIELD   ", debugDev);
+    nvdebugSubfieldArray(sf9lessField1, "FILTER  ", debugDev);
+    nvdebugSubfieldArray(sourceField.subfields, "FIELD2  ", debugDev);
+    nvdebugSubfieldArray(sf9lessField2, "FILTER2 ", debugDev);
     if (keepOrDrop1.length === 0) {
-      return !sf9lessField1.every(sf => sf9lessField2.some(sf2 => (0, _utils.subfieldsAreIdentical)(sf, sf2)));
+      return !sf9lessField1.every((sf) => sf9lessField2.some((sf2) => subfieldsAreIdentical(sf, sf2)));
     }
-    // However, to alleviate the above-mentioned punctuation problem, we can check keep/drop-less *source* subfields
     if (keepOrDrop2.length === 0) {
-      const unhandledSubfield = sf9lessField2.find(sf2 => !sf9lessField1.some(sf => acceptKeeplessSourceSubfield(sf2, baseField.tag, sf.code, sf.value)));
+      const unhandledSubfield = sf9lessField2.find((sf2) => !sf9lessField1.some((sf) => acceptKeeplessSourceSubfield(sf2, baseField.tag, sf.code, sf.value)));
       if (unhandledSubfield) {
-        //nvdebug(`Failed to pair ${subfieldToString(unhandledSubfield)}`, debugDev);
         return true;
       }
-      //return !sf9lessField2.every(sf2 => sf9lessField1.some(sf => subfieldsAreIdentical(sf, sf2)));
       return false;
     }
-
-    //nvdebugSubfieldArray(sf9lessField2, 'SOURCE(?)', debugDev);
-    //nvdebugSubfieldArray(sf9lessField1, 'BASE(?)  ', debugDev);
-
-    // $9 <KEEP> or <DROP> detected on both fields.
-    // Non-keeps and non-drops must be equal, otherwise fail:
-    if (_marcRecord.MarcRecord.isEqual(sf9lessField1, sf9lessField2)) {
+    if (MarcRecord.isEqual(sf9lessField1, sf9lessField2)) {
       return false;
     }
-    // Prevent:
     return true;
   }
 }
 function getPrefix(value) {
-  const normalizedValue = (0, _normalizeIdentifiers.normalizeControlSubfieldValue)(value);
+  const normalizedValue = normalizeControlSubfieldValue(value);
   if (normalizedValue.match(/^\([^)]+\)[0-9]+$/u)) {
-    return normalizedValue.substr(0, normalizedValue.indexOf(')') + 1);
+    return normalizedValue.substr(0, normalizedValue.indexOf(")") + 1);
   }
   if (value.match(/^https?:\/\//u)) {
-    return normalizedValue.substr(0, normalizedValue.lastIndexOf('/') + 1);
+    return normalizedValue.substr(0, normalizedValue.lastIndexOf("/") + 1);
   }
-  return '';
+  return "";
 }
 function isMatchAfterNormalization(currSubfield, otherField) {
-  // NB! Add implement isni normalizations (to normalize.js) and apply here:
-  const normalizedCurrSubfieldValue = (0, _normalizeIdentifiers.normalizeControlSubfieldValue)(currSubfield.value);
+  const normalizedCurrSubfieldValue = normalizeControlSubfieldValue(currSubfield.value);
   const prefix = getPrefix(normalizedCurrSubfieldValue);
-
-  //debug(`FFS-PREFIX '${prefix}'`);
-  // Look for same prefix + different identifier
-  const hits = otherField.subfields.filter(sf2 => sf2.code === currSubfield.code && (0, _normalizeIdentifiers.normalizeControlSubfieldValue)(sf2.value).indexOf(prefix) === 0);
-  if (hits.length === 0 ||
-  // <-- Nothing found, so it can't be a mismatch
+  const hits = otherField.subfields.filter((sf2) => sf2.code === currSubfield.code && normalizeControlSubfieldValue(sf2.value).indexOf(prefix) === 0);
+  if (hits.length === 0 || // <-- Nothing found, so it can't be a mismatch
   // Every opposing subfields match:
-  hits.every(sf2 => normalizedCurrSubfieldValue === (0, _normalizeIdentifiers.normalizeControlSubfieldValue)(sf2.value))) {
-    debugDev(`Subfield ‡${currSubfield.code} check OK: No opposing ${prefix} prefixes found.`);
+  hits.every((sf2) => normalizedCurrSubfieldValue === normalizeControlSubfieldValue(sf2.value))) {
+    debugDev(`Subfield \u2021${currSubfield.code} check OK: No opposing ${prefix} prefixes found.`);
     return true;
   }
-  debugDev(`Subfield ‡${currSubfield.code} check FAILED: ‡${currSubfield.code} '${currSubfield.value}' vs ‡${currSubfield.code} '${hits[0].value}'.`);
+  debugDev(`Subfield \u2021${currSubfield.code} check FAILED: \u2021${currSubfield.code} '${currSubfield.value}' vs \u2021${currSubfield.code} '${hits[0].value}'.`);
   return false;
 }
 function controlSubfieldContainingIdentifierPermitsMerge(field1, field2, subfieldCode) {
-  if (!(0, _utils.fieldHasSubfield)(field1, subfieldCode, null) || !(0, _utils.fieldHasSubfield)(field2, subfieldCode, null)) {
+  if (!fieldHasSubfield(field1, subfieldCode, null) || !fieldHasSubfield(field2, subfieldCode, null)) {
     return true;
   }
-  const result = field1.subfields.every(subfield => {
+  const result = field1.subfields.every((subfield) => {
     if (subfield.code !== subfieldCode) {
       return true;
     }
-    debugDev(`Compare ‡${subfieldCode} '${subfield.value}' with '${(0, _utils.fieldToString)(field2)}'.`);
-    if ((0, _utils.fieldHasSubfield)(field2, field1.code, field1.value)) {
+    debugDev(`Compare \u2021${subfieldCode} '${subfield.value}' with '${fieldToString(field2)}'.`);
+    if (fieldHasSubfield(field2, field1.code, field1.value)) {
       return true;
     }
     return isMatchAfterNormalization(subfield, field2, subfieldCode);
@@ -239,40 +183,29 @@ function controlSubfieldContainingIdentifierPermitsMerge(field1, field2, subfiel
   }
   return true;
 }
-const controlSubfieldsContainingIdentifier = ['w', '0', '1', '2']; // 2 ain't identifier, but the logic can be applied here as well
-
-function controlSubfieldsPermitMerge(baseField, sourceField) {
-  // Check $w, $0, $1, $2 (which isn't an identifier per se, but the sama logic can be applied)
-  if (!controlSubfieldsContainingIdentifier.every(subfieldCode => controlSubfieldContainingIdentifierPermitsMerge(baseField, sourceField, subfieldCode))) {
-    //debug(' control subfields with identifiers failed');
+const controlSubfieldsContainingIdentifier = ["w", "0", "1", "2"];
+export function controlSubfieldsPermitMerge(baseField, sourceField) {
+  if (!controlSubfieldsContainingIdentifier.every((subfieldCode) => controlSubfieldContainingIdentifierPermitsMerge(baseField, sourceField, subfieldCode))) {
     return false;
   }
-  if (!subfieldsAreEqual(baseField, sourceField, '3')) {
-    //debug(' similar control subfield fails');
+  if (!subfieldsAreEqual(baseField, sourceField, "3")) {
     return false;
   }
   if (!controlSubfield5PermitsMerge(baseField, sourceField) || !controlSubfield6PermitsMerge(baseField, sourceField) || !controlSubfield9PermitsMerge(baseField, sourceField)) {
     return false;
   }
-  // We fully prevent merging $8 subfields here, as they affect multiple fields! Also these would get screwed:
-  // 38211 |8 3\u |a kuoro |2 seko
-  // 38211 |8 6\u |a kuoro |2 seko |9 VIOLA<DROP>
-  // Thus only copy works with $8...
-  if (!subfieldsAreEmpty(baseField, sourceField, '8')) {
-    // We could alleviate this a bit esp. for non-repeatable fields.
-    // At least, if the source has '8' and otherwise the two fields are identical...
+  if (!subfieldsAreEmpty(baseField, sourceField, "8")) {
     const subsetOfSourceField = {
-      'tag': sourceField.tag,
-      'ind1': sourceField.ind1,
-      'ind2': sourceField.ind2,
-      subfields: sourceField.subfields.filter(sf => sf.code !== '8')
+      "tag": sourceField.tag,
+      "ind1": sourceField.ind1,
+      "ind2": sourceField.ind2,
+      subfields: sourceField.subfields.filter((sf) => sf.code !== "8")
     };
-    if ((0, _utils.fieldToString)(baseField) === (0, _utils.fieldToString)(subsetOfSourceField)) {
+    if (fieldToString(baseField) === fieldToString(subsetOfSourceField)) {
       return true;
     }
-    //debug(' csf8 failed');
     return false;
   }
   return true;
 }
-//# sourceMappingURL=controlSubfields.js.map
+//# sourceMappingURL=controlSubfields.js.map

package/dist/merge-fields/controlSubfields.js.map

@@ -1 +1,7 @@
-{"version":3,"file":"controlSubfields.js","names":["_marcRecord","require","_debug","_interopRequireDefault","_utils","_normalizeIdentifiers","e","__esModule","default","debug","createDebugLogger","debugDev","extend","subfieldsAreEqual","field1","field2","subfieldCode","fieldHasSubfield","sfSet1","subfields","filter","subfield","code","sfSet2","MarcRecord","isEqual","subfieldsAreEmpty","sixlessIsSubset","fieldWith6","fieldWithout6","subset","includes","every","sf","some","sf2","subfieldsAreIdentical","controlSubfield6PermitsMerge","controlSubfield5PermitsMerge","fives1","fives2","sf1","value","controlSubfield9PermitsMerge","baseField","sourceField","baseFieldSubfields9","sourceFieldSubfields9","length","keepOrDropPreventsMerge","nvdebug","transPreventsMerge","subfieldHasKeepOrDrop","test","subfieldHasTrans","trans1","trans2","retainSubfieldForKeepComparison","tag","acceptKeeplessSourceSubfield","sourceSubfield","subfieldValue","subfieldIsRepeatable","keepOrDrop1","keepOrDrop2","charAt","sf9lessField1","sf9lessField2","nvdebugSubfieldArray","unhandledSubfield","find","getPrefix","normalizedValue","normalizeControlSubfieldValue","match","substr","indexOf","lastIndexOf","isMatchAfterNormalization","currSubfield","otherField","normalizedCurrSubfieldValue","prefix","hits","controlSubfieldContainingIdentifierPermitsMerge","result","fieldToString","controlSubfieldsContainingIdentifier","controlSubfieldsPermitMerge","subsetOfSourceField","ind1","ind2"],"sources":["../../src/merge-fields/controlSubfields.js"],"sourcesContent":["import {MarcRecord} from '@natlibfi/marc-record';\nimport createDebugLogger from 'debug';\nimport {fieldHasSubfield, fieldToString, nvdebug, nvdebugSubfieldArray, subfieldIsRepeatable, subfieldsAreIdentical} from '../utils.js';\n\n//import {normalizeControlSubfieldValue} from './normalizeIdentifier';\nimport {normalizeControlSubfieldValue} from '../normalize-identifiers';\n\nconst debug = createDebugLogger('@natlibfi/marc-record-validators-melinda:merge-fields:controlSubfields');\n//const debugData = debug.extend('data');\nconst debugDev = debug.extend('dev');\n\nfunction subfieldsAreEqual(field1, field2, subfieldCode) {\n  // Check OK if neither one has given subfield.\n  // Check fails if one field has given subfield and the other one does not\n  if (!fieldHasSubfield(field1, subfieldCode)) {\n    return !fieldHasSubfield(field2, subfieldCode);\n  }\n  if (!fieldHasSubfield(field2, subfieldCode)) {\n    return false;\n  }\n  // Compare $3 subfields. If everything matches, OK, else FAIL:\n  const sfSet1 = field1.subfields.filter(subfield => subfield.code === subfieldCode);\n  const sfSet2 = field2.subfields.filter(subfield => subfield.code === subfieldCode);\n  return MarcRecord.isEqual(sfSet1, sfSet2);\n}\n\nfunction subfieldsAreEmpty(field1, field2, subfieldCode) {\n  if (!fieldHasSubfield(field1, subfieldCode) && !fieldHasSubfield(field2, subfieldCode)) {\n    return true;\n  }\n  return false;\n}\n\n\nfunction sixlessIsSubset(fieldWith6, fieldWithout6) {\n  // Remove $0 and $1, and then check that remaining $6-less field is a subset of the one with $6.\n  // No need to check indicators.\n  // NB! We could use punctuation-stripping here.\n  const subset = fieldWithout6.subfields.filter(subfield => !['0', '1'].includes(subfield.code));\n  return subset.every(sf => fieldWith6.subfields.some(sf2 => subfieldsAreIdentical(sf, sf2)));\n  //return MarcRecord.isEqual(strippedField1, strippedField2);\n}\n\nfunction controlSubfield6PermitsMerge(field1, field2) {\n  if (subfieldsAreEmpty(field1, field2, '6')) {\n    return true;\n  }\n\n  // Handle cases where one has a $6 and the other has not:\n  // Should this accept $0 (FI-ASTERI-N) vs none?\n  if (!fieldHasSubfield(field1, '6') && fieldHasSubfield(field2, '6') && sixlessIsSubset(field2, field1)) {\n    return true;\n  }\n  if (!fieldHasSubfield(field2, '6') && fieldHasSubfield(field1, '6') && sixlessIsSubset(field1, field2)) {\n    return true;\n  }\n\n  // There are at least two (plus) fields involved (Field XXX (one) and field 880 (one plus).\n  // Thus this generic solution can't handle them. Postprocess step removes some chains instead!\n  debugDev(`  controlSubfield6PermitsMerge() fails always on generic part (feature).`);\n  return false;\n}\n\nfunction controlSubfield5PermitsMerge(field1, field2) {\n  // field1.$5 XOR field2.$5 means false, NEITHER and BOTH mean true, regardless of value\n  if (!fieldHasSubfield(field1, '5')) {\n    if (!fieldHasSubfield(field2, '5')) {\n      return true; // If neither one has $5, it's ok to merge\n    }\n    // If $5 contents are same, merge can be perfomed:\n    const fives1 = field1.subfields.filter(sf => sf.code === '5');\n    const fives2 = field2.subfields.filter(sf => sf.code === '5');\n    if (fives1.every(sf1 => fives2.some(sf2 => sf1.value === sf2.value)) && fives2.every(sf2 => fives1.some(sf1 => sf1.value === sf2.value))) {\n      return true;\n    }\n    return false;\n  }\n  if (!fieldHasSubfield(field2, '5')) {\n    return false;\n  }\n  return true;\n}\n\nfunction controlSubfield9PermitsMerge(baseField, sourceField) {\n  const baseFieldSubfields9 = baseField.subfields.filter(sf => sf.code === '9');\n  const sourceFieldSubfields9 = sourceField.subfields.filter(sf => sf.code === '9');\n\n  //nvdebug('CHECK $9', debugDev);\n  // There are no $9s. Skip:\n  if (baseFieldSubfields9.length === 0 && sourceFieldSubfields9.length === 0) {\n    //nvdebug(` No subfield $9 detected`, debugDev);\n    return true;\n  }\n\n  if (keepOrDropPreventsMerge()) {\n    nvdebug(` Subfield $9 KEEPs and DROPs disallow merge`, debugDev);\n    return false;\n  }\n\n  if (transPreventsMerge()) {\n    nvdebug(` Subfield $9 <TRANS> mismatch disallows merge`, debugDev);\n    return false;\n  }\n\n  //nvdebug('CHECK $9 OK', debugDev);\n\n  return true;\n\n  function subfieldHasKeepOrDrop(subfield) {\n    // nvdebug(`Has <KEEP>? ${subfieldToString(subfield)}`, debugDev);\n    return subfield.code === '9' && (/(?:<KEEP>|<DROP>)/u).test(subfield.value);\n  }\n\n  function subfieldHasTrans(subfield) {\n    return subfield.code === '9' && (/<TRANS>/u).test(subfield.value);\n  }\n\n  function transPreventsMerge() {\n    const trans1 = baseFieldSubfields9.filter(sf => subfieldHasTrans(sf));\n    const trans2 = sourceFieldSubfields9.filter(sf => subfieldHasTrans(sf));\n    if (trans1.length > 0 && trans2.length > 0) {\n      if (!MarcRecord.isEqual(trans1, trans2)) {\n        return true;\n      }\n    }\n    return false;\n  }\n\n  function retainSubfieldForKeepComparison(subfield) {\n    // Don't compare <KEEP>, <DROP> nor <TRANS> here (<TRANS> has it's own check)\n    if (subfieldHasKeepOrDrop(subfield) || subfieldHasTrans(subfield)) {\n      return false;\n    }\n\n    if (['0', '1'].includes(subfield.code)) {\n      return false;\n    }\n    if (['100', '600', '700', '800'].includes(baseField.tag)) {\n      // Despite $9 KEEP/DROP, we are interested in merging $d years (better than two separate fields)\n      if (['d'].includes(subfield.code)) {\n        return false;\n      }\n    }\n\n\n    return true;\n  }\n\n  function acceptKeeplessSourceSubfield(sourceSubfield, tag, subfieldCode, subfieldValue) {\n    if (sourceSubfield.code !== subfieldCode) {\n      return false;\n    }\n    // In this context, there's no need to check the value of a non-repeatable subfield.\n    // If value is different, pairing will fail when comparing the subfield itself.\n    // This allows us to tolerate little differences in punctuation: different punctuation does not get copied to base,\n    // so they don't alter base and and thus redundant when comparing.\n    if (!subfieldIsRepeatable(tag, subfieldCode)) {\n      return true;\n    }\n    return sourceSubfield.value === subfieldValue;\n  }\n\n  function keepOrDropPreventsMerge() {\n    const keepOrDrop1 = baseFieldSubfields9.filter(sf => subfieldHasKeepOrDrop(sf));\n    const keepOrDrop2 = sourceFieldSubfields9.filter(sf => subfieldHasKeepOrDrop(sf));\n\n    if (keepOrDrop1.length === 0 && keepOrDrop2.length === 0) {\n      return false;\n    }\n\n    if (baseField.tag.charAt(0) === '1' && !keepOrDrop2.some(sf => (/<DROP>/u).test(sf.value))) {\n      return false;\n    }\n\n    const sf9lessField1 = baseField.subfields.filter(subfield => retainSubfieldForKeepComparison(subfield));\n    const sf9lessField2 = sourceField.subfields.filter(subfield => retainSubfieldForKeepComparison(subfield));\n\n    nvdebugSubfieldArray(baseField.subfields, 'FIELD   ', debugDev);\n    nvdebugSubfieldArray(sf9lessField1, 'FILTER  ', debugDev);\n\n    nvdebugSubfieldArray(sourceField.subfields, 'FIELD2  ', debugDev);\n    nvdebugSubfieldArray(sf9lessField2, 'FILTER2 ', debugDev);\n\n    // Keepless field can be a subset field with <KEEP>/<DROP>! Note that punctuation still causes remnants to fail.\n    if (keepOrDrop1.length === 0) {\n      return !sf9lessField1.every(sf => sf9lessField2.some(sf2 => subfieldsAreIdentical(sf, sf2)));\n    }\n    // However, to alleviate the above-mentioned punctuation problem, we can check keep/drop-less *source* subfields\n    if (keepOrDrop2.length === 0) {\n      const unhandledSubfield = sf9lessField2.find(sf2 => !sf9lessField1.some(sf => acceptKeeplessSourceSubfield(sf2, baseField.tag, sf.code, sf.value)));\n      if (unhandledSubfield) {\n        //nvdebug(`Failed to pair ${subfieldToString(unhandledSubfield)}`, debugDev);\n        return true;\n      }\n      //return !sf9lessField2.every(sf2 => sf9lessField1.some(sf => subfieldsAreIdentical(sf, sf2)));\n      return false;\n    }\n\n    //nvdebugSubfieldArray(sf9lessField2, 'SOURCE(?)', debugDev);\n    //nvdebugSubfieldArray(sf9lessField1, 'BASE(?)  ', debugDev);\n\n    // $9 <KEEP> or <DROP> detected on both fields.\n    // Non-keeps and non-drops must be equal, otherwise fail:\n    if (MarcRecord.isEqual(sf9lessField1, sf9lessField2)) {\n      return false;\n    }\n    // Prevent:\n    return true;\n  }\n}\n\nfunction getPrefix(value) {\n  const normalizedValue = normalizeControlSubfieldValue(value);\n\n  if (normalizedValue.match(/^\\([^)]+\\)[0-9]+$/u)) {\n    return normalizedValue.substr(0, normalizedValue.indexOf(')') + 1);\n  }\n\n  if (value.match(/^https?:\\/\\//u)) {\n    return normalizedValue.substr(0, normalizedValue.lastIndexOf('/') + 1);\n  }\n\n  return '';\n}\n\nfunction isMatchAfterNormalization(currSubfield, otherField) {\n  // NB! Add implement isni normalizations (to normalize.js) and apply here:\n  const normalizedCurrSubfieldValue = normalizeControlSubfieldValue(currSubfield.value);\n  const prefix = getPrefix(normalizedCurrSubfieldValue);\n\n  //debug(`FFS-PREFIX '${prefix}'`);\n  // Look for same prefix + different identifier\n  const hits = otherField.subfields.filter(sf2 => sf2.code === currSubfield.code && normalizeControlSubfieldValue(sf2.value).indexOf(prefix) === 0);\n  if (hits.length === 0 || // <-- Nothing found, so it can't be a mismatch\n      // Every opposing subfields match:\n      hits.every(sf2 => normalizedCurrSubfieldValue === normalizeControlSubfieldValue(sf2.value))) {\n    debugDev(`Subfield ‡${currSubfield.code} check OK: No opposing ${prefix} prefixes found.`);\n    return true;\n  }\n\n  debugDev(`Subfield ‡${currSubfield.code} check FAILED: ‡${currSubfield.code} '${currSubfield.value}' vs ‡${currSubfield.code} '${hits[0].value}'.`);\n  return false;\n}\n\nfunction controlSubfieldContainingIdentifierPermitsMerge(field1, field2, subfieldCode) {\n  if (!fieldHasSubfield(field1, subfieldCode, null) || !fieldHasSubfield(field2, subfieldCode, null)) {\n    return true;\n  }\n\n  const result = field1.subfields.every(subfield => {\n    if (subfield.code !== subfieldCode) {\n      return true;\n    }\n\n    debugDev(`Compare ‡${subfieldCode} '${subfield.value}' with '${fieldToString(field2)}'.`);\n    if (fieldHasSubfield(field2, field1.code, field1.value)) {\n      return true;\n    }\n\n    return isMatchAfterNormalization(subfield, field2, subfieldCode);\n  });\n\n  if (!result) {\n    debugDev(`Control subfield '${subfieldCode}' check failed.`);\n    return false;\n  }\n  return true;\n}\n\nconst controlSubfieldsContainingIdentifier = ['w', '0', '1', '2']; // 2 ain't identifier, but the logic can be applied here as well\n\nexport function controlSubfieldsPermitMerge(baseField, sourceField) {\n  // Check $w, $0, $1, $2 (which isn't an identifier per se, but the sama logic can be applied)\n  if (!controlSubfieldsContainingIdentifier.every(subfieldCode => controlSubfieldContainingIdentifierPermitsMerge(baseField, sourceField, subfieldCode))) {\n    //debug(' control subfields with identifiers failed');\n    return false;\n  }\n\n  if (!subfieldsAreEqual(baseField, sourceField, '3')) {\n    //debug(' similar control subfield fails');\n    return false;\n  }\n\n  if (!controlSubfield5PermitsMerge(baseField, sourceField) || !controlSubfield6PermitsMerge(baseField, sourceField) || !controlSubfield9PermitsMerge(baseField, sourceField)) {\n    return false;\n  }\n  // We fully prevent merging $8 subfields here, as they affect multiple fields! Also these would get screwed:\n  // 38211 |8 3\\u |a kuoro |2 seko\n  // 38211 |8 6\\u |a kuoro |2 seko |9 VIOLA<DROP>\n  // Thus only copy works with $8...\n  if (!subfieldsAreEmpty(baseField, sourceField, '8')) {\n    // We could alleviate this a bit esp. for non-repeatable fields.\n    // At least, if the source has '8' and otherwise the two fields are identical...\n    const subsetOfSourceField = {\n      'tag': sourceField.tag,\n      'ind1': sourceField.ind1,\n      'ind2': sourceField.ind2, subfields: sourceField.subfields.filter(sf => sf.code !== '8')\n    };\n    if (fieldToString(baseField) === fieldToString(subsetOfSourceField)) {\n      return true;\n    }\n    //debug(' csf8 failed');\n    return false;\n  }\n\n  return true;\n}\n"],"mappings":";;;;;;AAAA,IAAAA,WAAA,GAAAC,OAAA;AACA,IAAAC,MAAA,GAAAC,sBAAA,CAAAF,OAAA;AACA,IAAAG,MAAA,GAAAH,OAAA;AAGA,IAAAI,qBAAA,GAAAJ,OAAA;AAAuE,SAAAE,uBAAAG,CAAA,WAAAA,CAAA,IAAAA,CAAA,CAAAC,UAAA,GAAAD,CAAA,KAAAE,OAAA,EAAAF,CAAA;AADvE;;AAGA,MAAMG,KAAK,GAAG,IAAAC,cAAiB,EAAC,wEAAwE,CAAC;AACzG;AACA,MAAMC,QAAQ,GAAGF,KAAK,CAACG,MAAM,CAAC,KAAK,CAAC;AAEpC,SAASC,iBAAiBA,CAACC,MAAM,EAAEC,MAAM,EAAEC,YAAY,EAAE;EACvD;EACA;EACA,IAAI,CAAC,IAAAC,uBAAgB,EAACH,MAAM,EAAEE,YAAY,CAAC,EAAE;IAC3C,OAAO,CAAC,IAAAC,uBAAgB,EAACF,MAAM,EAAEC,YAAY,CAAC;EAChD;EACA,IAAI,CAAC,IAAAC,uBAAgB,EAACF,MAAM,EAAEC,YAAY,CAAC,EAAE;IAC3C,OAAO,KAAK;EACd;EACA;EACA,MAAME,MAAM,GAAGJ,MAAM,CAACK,SAAS,CAACC,MAAM,CAACC,QAAQ,IAAIA,QAAQ,CAACC,IAAI,KAAKN,YAAY,CAAC;EAClF,MAAMO,MAAM,GAAGR,MAAM,CAACI,SAAS,CAACC,MAAM,CAACC,QAAQ,IAAIA,QAAQ,CAACC,IAAI,KAAKN,YAAY,CAAC;EAClF,OAAOQ,sBAAU,CAACC,OAAO,CAACP,MAAM,EAAEK,MAAM,CAAC;AAC3C;AAEA,SAASG,iBAAiBA,CAACZ,MAAM,EAAEC,MAAM,EAAEC,YAAY,EAAE;EACvD,IAAI,CAAC,IAAAC,uBAAgB,EAACH,MAAM,EAAEE,YAAY,CAAC,IAAI,CAAC,IAAAC,uBAAgB,EAACF,MAAM,EAAEC,YAAY,CAAC,EAAE;IACtF,OAAO,IAAI;EACb;EACA,OAAO,KAAK;AACd;AAGA,SAASW,eAAeA,CAACC,UAAU,EAAEC,aAAa,EAAE;EAClD;EACA;EACA;EACA,MAAMC,MAAM,GAAGD,aAAa,CAACV,SAAS,CAACC,MAAM,CAACC,QAAQ,IAAI,CAAC,CAAC,GAAG,EAAE,GAAG,CAAC,CAACU,QAAQ,CAACV,QAAQ,CAACC,IAAI,CAAC,CAAC;EAC9F,OAAOQ,MAAM,CAACE,KAAK,CAACC,EAAE,IAAIL,UAAU,CAACT,SAAS,CAACe,IAAI,CAACC,GAAG,IAAI,IAAAC,4BAAqB,EAACH,EAAE,EAAEE,GAAG,CAAC,CAAC,CAAC;EAC3F;AACF;AAEA,SAASE,4BAA4BA,CAACvB,MAAM,EAAEC,MAAM,EAAE;EACpD,IAAIW,iBAAiB,CAACZ,MAAM,EAAEC,MAAM,EAAE,GAAG,CAAC,EAAE;IAC1C,OAAO,IAAI;EACb;;EAEA;EACA;EACA,IAAI,CAAC,IAAAE,uBAAgB,EAACH,MAAM,EAAE,GAAG,CAAC,IAAI,IAAAG,uBAAgB,EAACF,MAAM,EAAE,GAAG,CAAC,IAAIY,eAAe,CAACZ,MAAM,EAAED,MAAM,CAAC,EAAE;IACtG,OAAO,IAAI;EACb;EACA,IAAI,CAAC,IAAAG,uBAAgB,EAACF,MAAM,EAAE,GAAG,CAAC,IAAI,IAAAE,uBAAgB,EAACH,MAAM,EAAE,GAAG,CAAC,IAAIa,eAAe,CAACb,MAAM,EAAEC,MAAM,CAAC,EAAE;IACtG,OAAO,IAAI;EACb;;EAEA;EACA;EACAJ,QAAQ,CAAC,0EAA0E,CAAC;EACpF,OAAO,KAAK;AACd;AAEA,SAAS2B,4BAA4BA,CAACxB,MAAM,EAAEC,MAAM,EAAE;EACpD;EACA,IAAI,CAAC,IAAAE,uBAAgB,EAACH,MAAM,EAAE,GAAG,CAAC,EAAE;IAClC,IAAI,CAAC,IAAAG,uBAAgB,EAACF,MAAM,EAAE,GAAG,CAAC,EAAE;MAClC,OAAO,IAAI,CAAC,CAAC;IACf;IACA;IACA,MAAMwB,MAAM,GAAGzB,MAAM,CAACK,SAAS,CAACC,MAAM,CAACa,EAAE,IAAIA,EAAE,CAACX,IAAI,KAAK,GAAG,CAAC;IAC7D,MAAMkB,MAAM,GAAGzB,MAAM,CAACI,SAAS,CAACC,MAAM,CAACa,EAAE,IAAIA,EAAE,CAACX,IAAI,KAAK,GAAG,CAAC;IAC7D,IAAIiB,MAAM,CAACP,KAAK,CAACS,GAAG,IAAID,MAAM,CAACN,IAAI,CAACC,GAAG,IAAIM,GAAG,CAACC,KAAK,KAAKP,GAAG,CAACO,KAAK,CAAC,CAAC,IAAIF,MAAM,CAACR,KAAK,CAACG,GAAG,IAAII,MAAM,CAACL,IAAI,CAACO,GAAG,IAAIA,GAAG,CAACC,KAAK,KAAKP,GAAG,CAACO,KAAK,CAAC,CAAC,EAAE;MACxI,OAAO,IAAI;IACb;IACA,OAAO,KAAK;EACd;EACA,IAAI,CAAC,IAAAzB,uBAAgB,EAACF,MAAM,EAAE,GAAG,CAAC,EAAE;IAClC,OAAO,KAAK;EACd;EACA,OAAO,IAAI;AACb;AAEA,SAAS4B,4BAA4BA,CAACC,SAAS,EAAEC,WAAW,EAAE;EAC5D,MAAMC,mBAAmB,GAAGF,SAAS,CAACzB,SAAS,CAACC,MAAM,CAACa,EAAE,IAAIA,EAAE,CAACX,IAAI,KAAK,GAAG,CAAC;EAC7E,MAAMyB,qBAAqB,GAAGF,WAAW,CAAC1B,SAAS,CAACC,MAAM,CAACa,EAAE,IAAIA,EAAE,CAACX,IAAI,KAAK,GAAG,CAAC;;EAEjF;EACA;EACA,IAAIwB,mBAAmB,CAACE,MAAM,KAAK,CAAC,IAAID,qBAAqB,CAACC,MAAM,KAAK,CAAC,EAAE;IAC1E;IACA,OAAO,IAAI;EACb;EAEA,IAAIC,uBAAuB,CAAC,CAAC,EAAE;IAC7B,IAAAC,cAAO,EAAC,6CAA6C,EAAEvC,QAAQ,CAAC;IAChE,OAAO,KAAK;EACd;EAEA,IAAIwC,kBAAkB,CAAC,CAAC,EAAE;IACxB,IAAAD,cAAO,EAAC,+CAA+C,EAAEvC,QAAQ,CAAC;IAClE,OAAO,KAAK;EACd;;EAEA;;EAEA,OAAO,IAAI;EAEX,SAASyC,qBAAqBA,CAAC/B,QAAQ,EAAE;IACvC;IACA,OAAOA,QAAQ,CAACC,IAAI,KAAK,GAAG,IAAK,oBAAoB,CAAE+B,IAAI,CAAChC,QAAQ,CAACqB,KAAK,CAAC;EAC7E;EAEA,SAASY,gBAAgBA,CAACjC,QAAQ,EAAE;IAClC,OAAOA,QAAQ,CAACC,IAAI,KAAK,GAAG,IAAK,UAAU,CAAE+B,IAAI,CAAChC,QAAQ,CAACqB,KAAK,CAAC;EACnE;EAEA,SAASS,kBAAkBA,CAAA,EAAG;IAC5B,MAAMI,MAAM,GAAGT,mBAAmB,CAAC1B,MAAM,CAACa,EAAE,IAAIqB,gBAAgB,CAACrB,EAAE,CAAC,CAAC;IACrE,MAAMuB,MAAM,GAAGT,qBAAqB,CAAC3B,MAAM,CAACa,EAAE,IAAIqB,gBAAgB,CAACrB,EAAE,CAAC,CAAC;IACvE,IAAIsB,MAAM,CAACP,MAAM,GAAG,CAAC,IAAIQ,MAAM,CAACR,MAAM,GAAG,CAAC,EAAE;MAC1C,IAAI,CAACxB,sBAAU,CAACC,OAAO,CAAC8B,MAAM,EAAEC,MAAM,CAAC,EAAE;QACvC,OAAO,IAAI;MACb;IACF;IACA,OAAO,KAAK;EACd;EAEA,SAASC,+BAA+BA,CAACpC,QAAQ,EAAE;IACjD;IACA,IAAI+B,qBAAqB,CAAC/B,QAAQ,CAAC,IAAIiC,gBAAgB,CAACjC,QAAQ,CAAC,EAAE;MACjE,OAAO,KAAK;IACd;IAEA,IAAI,CAAC,GAAG,EAAE,GAAG,CAAC,CAACU,QAAQ,CAACV,QAAQ,CAACC,IAAI,CAAC,EAAE;MACtC,OAAO,KAAK;IACd;IACA,IAAI,CAAC,KAAK,EAAE,KAAK,EAAE,KAAK,EAAE,KAAK,CAAC,CAACS,QAAQ,CAACa,SAAS,CAACc,GAAG,CAAC,EAAE;MACxD;MACA,IAAI,CAAC,GAAG,CAAC,CAAC3B,QAAQ,CAACV,QAAQ,CAACC,IAAI,CAAC,EAAE;QACjC,OAAO,KAAK;MACd;IACF;IAGA,OAAO,IAAI;EACb;EAEA,SAASqC,4BAA4BA,CAACC,cAAc,EAAEF,GAAG,EAAE1C,YAAY,EAAE6C,aAAa,EAAE;IACtF,IAAID,cAAc,CAACtC,IAAI,KAAKN,YAAY,EAAE;MACxC,OAAO,KAAK;IACd;IACA;IACA;IACA;IACA;IACA,IAAI,CAAC,IAAA8C,2BAAoB,EAACJ,GAAG,EAAE1C,YAAY,CAAC,EAAE;MAC5C,OAAO,IAAI;IACb;IACA,OAAO4C,cAAc,CAAClB,KAAK,KAAKmB,aAAa;EAC/C;EAEA,SAASZ,uBAAuBA,CAAA,EAAG;IACjC,MAAMc,WAAW,GAAGjB,mBAAmB,CAAC1B,MAAM,CAACa,EAAE,IAAImB,qBAAqB,CAACnB,EAAE,CAAC,CAAC;IAC/E,MAAM+B,WAAW,GAAGjB,qBAAqB,CAAC3B,MAAM,CAACa,EAAE,IAAImB,qBAAqB,CAACnB,EAAE,CAAC,CAAC;IAEjF,IAAI8B,WAAW,CAACf,MAAM,KAAK,CAAC,IAAIgB,WAAW,CAAChB,MAAM,KAAK,CAAC,EAAE;MACxD,OAAO,KAAK;IACd;IAEA,IAAIJ,SAAS,CAACc,GAAG,CAACO,MAAM,CAAC,CAAC,CAAC,KAAK,GAAG,IAAI,CAACD,WAAW,CAAC9B,IAAI,CAACD,EAAE,IAAK,SAAS,CAAEoB,IAAI,CAACpB,EAAE,CAACS,KAAK,CAAC,CAAC,EAAE;MAC1F,OAAO,KAAK;IACd;IAEA,MAAMwB,aAAa,GAAGtB,SAAS,CAACzB,SAAS,CAACC,MAAM,CAACC,QAAQ,IAAIoC,+BAA+B,CAACpC,QAAQ,CAAC,CAAC;IACvG,MAAM8C,aAAa,GAAGtB,WAAW,CAAC1B,SAAS,CAACC,MAAM,CAACC,QAAQ,IAAIoC,+BAA+B,CAACpC,QAAQ,CAAC,CAAC;IAEzG,IAAA+C,2BAAoB,EAACxB,SAAS,CAACzB,SAAS,EAAE,UAAU,EAAER,QAAQ,CAAC;IAC/D,IAAAyD,2BAAoB,EAACF,aAAa,EAAE,UAAU,EAAEvD,QAAQ,CAAC;IAEzD,IAAAyD,2BAAoB,EAACvB,WAAW,CAAC1B,SAAS,EAAE,UAAU,EAAER,QAAQ,CAAC;IACjE,IAAAyD,2BAAoB,EAACD,aAAa,EAAE,UAAU,EAAExD,QAAQ,CAAC;;IAEzD;IACA,IAAIoD,WAAW,CAACf,MAAM,KAAK,CAAC,EAAE;MAC5B,OAAO,CAACkB,aAAa,CAAClC,KAAK,CAACC,EAAE,IAAIkC,aAAa,CAACjC,IAAI,CAACC,GAAG,IAAI,IAAAC,4BAAqB,EAACH,EAAE,EAAEE,GAAG,CAAC,CAAC,CAAC;IAC9F;IACA;IACA,IAAI6B,WAAW,CAAChB,MAAM,KAAK,CAAC,EAAE;MAC5B,MAAMqB,iBAAiB,GAAGF,aAAa,CAACG,IAAI,CAACnC,GAAG,IAAI,CAAC+B,aAAa,CAAChC,IAAI,CAACD,EAAE,IAAI0B,4BAA4B,CAACxB,GAAG,EAAES,SAAS,CAACc,GAAG,EAAEzB,EAAE,CAACX,IAAI,EAAEW,EAAE,CAACS,KAAK,CAAC,CAAC,CAAC;MACnJ,IAAI2B,iBAAiB,EAAE;QACrB;QACA,OAAO,IAAI;MACb;MACA;MACA,OAAO,KAAK;IACd;;IAEA;IACA;;IAEA;IACA;IACA,IAAI7C,sBAAU,CAACC,OAAO,CAACyC,aAAa,EAAEC,aAAa,CAAC,EAAE;MACpD,OAAO,KAAK;IACd;IACA;IACA,OAAO,IAAI;EACb;AACF;AAEA,SAASI,SAASA,CAAC7B,KAAK,EAAE;EACxB,MAAM8B,eAAe,GAAG,IAAAC,mDAA6B,EAAC/B,KAAK,CAAC;EAE5D,IAAI8B,eAAe,CAACE,KAAK,CAAC,oBAAoB,CAAC,EAAE;IAC/C,OAAOF,eAAe,CAACG,MAAM,CAAC,CAAC,EAAEH,eAAe,CAACI,OAAO,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC;EACpE;EAEA,IAAIlC,KAAK,CAACgC,KAAK,CAAC,eAAe,CAAC,EAAE;IAChC,OAAOF,eAAe,CAACG,MAAM,CAAC,CAAC,EAAEH,eAAe,CAACK,WAAW,CAAC,GAAG,CAAC,GAAG,CAAC,CAAC;EACxE;EAEA,OAAO,EAAE;AACX;AAEA,SAASC,yBAAyBA,CAACC,YAAY,EAAEC,UAAU,EAAE;EAC3D;EACA,MAAMC,2BAA2B,GAAG,IAAAR,mDAA6B,EAACM,YAAY,CAACrC,KAAK,CAAC;EACrF,MAAMwC,MAAM,GAAGX,SAAS,CAACU,2BAA2B,CAAC;;EAErD;EACA;EACA,MAAME,IAAI,GAAGH,UAAU,CAAC7D,SAAS,CAACC,MAAM,CAACe,GAAG,IAAIA,GAAG,CAACb,IAAI,KAAKyD,YAAY,CAACzD,IAAI,IAAI,IAAAmD,mDAA6B,EAACtC,GAAG,CAACO,KAAK,CAAC,CAACkC,OAAO,CAACM,MAAM,CAAC,KAAK,CAAC,CAAC;EACjJ,IAAIC,IAAI,CAACnC,MAAM,KAAK,CAAC;EAAI;EACrB;EACAmC,IAAI,CAACnD,KAAK,CAACG,GAAG,IAAI8C,2BAA2B,KAAK,IAAAR,mDAA6B,EAACtC,GAAG,CAACO,KAAK,CAAC,CAAC,EAAE;IAC/F/B,QAAQ,CAAC,aAAaoE,YAAY,CAACzD,IAAI,0BAA0B4D,MAAM,kBAAkB,CAAC;IAC1F,OAAO,IAAI;EACb;EAEAvE,QAAQ,CAAC,aAAaoE,YAAY,CAACzD,IAAI,mBAAmByD,YAAY,CAACzD,IAAI,KAAKyD,YAAY,CAACrC,KAAK,SAASqC,YAAY,CAACzD,IAAI,KAAK6D,IAAI,CAAC,CAAC,CAAC,CAACzC,KAAK,IAAI,CAAC;EACnJ,OAAO,KAAK;AACd;AAEA,SAAS0C,+CAA+CA,CAACtE,MAAM,EAAEC,MAAM,EAAEC,YAAY,EAAE;EACrF,IAAI,CAAC,IAAAC,uBAAgB,EAACH,MAAM,EAAEE,YAAY,EAAE,IAAI,CAAC,IAAI,CAAC,IAAAC,uBAAgB,EAACF,MAAM,EAAEC,YAAY,EAAE,IAAI,CAAC,EAAE;IAClG,OAAO,IAAI;EACb;EAEA,MAAMqE,MAAM,GAAGvE,MAAM,CAACK,SAAS,CAACa,KAAK,CAACX,QAAQ,IAAI;IAChD,IAAIA,QAAQ,CAACC,IAAI,KAAKN,YAAY,EAAE;MAClC,OAAO,IAAI;IACb;IAEAL,QAAQ,CAAC,YAAYK,YAAY,KAAKK,QAAQ,CAACqB,KAAK,WAAW,IAAA4C,oBAAa,EAACvE,MAAM,CAAC,IAAI,CAAC;IACzF,IAAI,IAAAE,uBAAgB,EAACF,MAAM,EAAED,MAAM,CAACQ,IAAI,EAAER,MAAM,CAAC4B,KAAK,CAAC,EAAE;MACvD,OAAO,IAAI;IACb;IAEA,OAAOoC,yBAAyB,CAACzD,QAAQ,EAAEN,MAAM,EAAEC,YAAY,CAAC;EAClE,CAAC,CAAC;EAEF,IAAI,CAACqE,MAAM,EAAE;IACX1E,QAAQ,CAAC,qBAAqBK,YAAY,iBAAiB,CAAC;IAC5D,OAAO,KAAK;EACd;EACA,OAAO,IAAI;AACb;AAEA,MAAMuE,oCAAoC,GAAG,CAAC,GAAG,EAAE,GAAG,EAAE,GAAG,EAAE,GAAG,CAAC,CAAC,CAAC;;AAE5D,SAASC,2BAA2BA,CAAC5C,SAAS,EAAEC,WAAW,EAAE;EAClE;EACA,IAAI,CAAC0C,oCAAoC,CAACvD,KAAK,CAAChB,YAAY,IAAIoE,+CAA+C,CAACxC,SAAS,EAAEC,WAAW,EAAE7B,YAAY,CAAC,CAAC,EAAE;IACtJ;IACA,OAAO,KAAK;EACd;EAEA,IAAI,CAACH,iBAAiB,CAAC+B,SAAS,EAAEC,WAAW,EAAE,GAAG,CAAC,EAAE;IACnD;IACA,OAAO,KAAK;EACd;EAEA,IAAI,CAACP,4BAA4B,CAACM,SAAS,EAAEC,WAAW,CAAC,IAAI,CAACR,4BAA4B,CAACO,SAAS,EAAEC,WAAW,CAAC,IAAI,CAACF,4BAA4B,CAACC,SAAS,EAAEC,WAAW,CAAC,EAAE;IAC3K,OAAO,KAAK;EACd;EACA;EACA;EACA;EACA;EACA,IAAI,CAACnB,iBAAiB,CAACkB,SAAS,EAAEC,WAAW,EAAE,GAAG,CAAC,EAAE;IACnD;IACA;IACA,MAAM4C,mBAAmB,GAAG;MAC1B,KAAK,EAAE5C,WAAW,CAACa,GAAG;MACtB,MAAM,EAAEb,WAAW,CAAC6C,IAAI;MACxB,MAAM,EAAE7C,WAAW,CAAC8C,IAAI;MAAExE,SAAS,EAAE0B,WAAW,CAAC1B,SAAS,CAACC,MAAM,CAACa,EAAE,IAAIA,EAAE,CAACX,IAAI,KAAK,GAAG;IACzF,CAAC;IACD,IAAI,IAAAgE,oBAAa,EAAC1C,SAAS,CAAC,KAAK,IAAA0C,oBAAa,EAACG,mBAAmB,CAAC,EAAE;MACnE,OAAO,IAAI;IACb;IACA;IACA,OAAO,KAAK;EACd;EAEA,OAAO,IAAI;AACb","ignoreList":[]}
+{
+  "version": 3,
+  "sources": ["../../src/merge-fields/controlSubfields.js"],
+  "sourcesContent": ["import {MarcRecord} from '@natlibfi/marc-record';\nimport createDebugLogger from 'debug';\nimport {fieldHasSubfield, fieldToString, nvdebug, nvdebugSubfieldArray, subfieldIsRepeatable, subfieldsAreIdentical} from '../utils.js';\n\n//import {normalizeControlSubfieldValue} from './normalizeIdentifier';\nimport {normalizeControlSubfieldValue} from '../normalize-identifiers.js';\n\nconst debug = createDebugLogger('@natlibfi/marc-record-validators-melinda:merge-fields:controlSubfields');\n//const debugData = debug.extend('data');\nconst debugDev = debug.extend('dev');\n\nfunction subfieldsAreEqual(field1, field2, subfieldCode) {\n  // Check OK if neither one has given subfield.\n  // Check fails if one field has given subfield and the other one does not\n  if (!fieldHasSubfield(field1, subfieldCode)) {\n    return !fieldHasSubfield(field2, subfieldCode);\n  }\n  if (!fieldHasSubfield(field2, subfieldCode)) {\n    return false;\n  }\n  // Compare $3 subfields. If everything matches, OK, else FAIL:\n  const sfSet1 = field1.subfields.filter(subfield => subfield.code === subfieldCode);\n  const sfSet2 = field2.subfields.filter(subfield => subfield.code === subfieldCode);\n  return MarcRecord.isEqual(sfSet1, sfSet2);\n}\n\nfunction subfieldsAreEmpty(field1, field2, subfieldCode) {\n  if (!fieldHasSubfield(field1, subfieldCode) && !fieldHasSubfield(field2, subfieldCode)) {\n    return true;\n  }\n  return false;\n}\n\n\nfunction sixlessIsSubset(fieldWith6, fieldWithout6) {\n  // Remove $0 and $1, and then check that remaining $6-less field is a subset of the one with $6.\n  // No need to check indicators.\n  // NB! We could use punctuation-stripping here.\n  const subset = fieldWithout6.subfields.filter(subfield => !['0', '1'].includes(subfield.code));\n  return subset.every(sf => fieldWith6.subfields.some(sf2 => subfieldsAreIdentical(sf, sf2)));\n  //return MarcRecord.isEqual(strippedField1, strippedField2);\n}\n\nfunction controlSubfield6PermitsMerge(field1, field2) {\n  if (subfieldsAreEmpty(field1, field2, '6')) {\n    return true;\n  }\n\n  // Handle cases where one has a $6 and the other has not:\n  // Should this accept $0 (FI-ASTERI-N) vs none?\n  if (!fieldHasSubfield(field1, '6') && fieldHasSubfield(field2, '6') && sixlessIsSubset(field2, field1)) {\n    return true;\n  }\n  if (!fieldHasSubfield(field2, '6') && fieldHasSubfield(field1, '6') && sixlessIsSubset(field1, field2)) {\n    return true;\n  }\n\n  // There are at least two (plus) fields involved (Field XXX (one) and field 880 (one plus).\n  // Thus this generic solution can't handle them. Postprocess step removes some chains instead!\n  debugDev(`  controlSubfield6PermitsMerge() fails always on generic part (feature).`);\n  return false;\n}\n\nfunction controlSubfield5PermitsMerge(field1, field2) {\n  // field1.$5 XOR field2.$5 means false, NEITHER and BOTH mean true, regardless of value\n  if (!fieldHasSubfield(field1, '5')) {\n    if (!fieldHasSubfield(field2, '5')) {\n      return true; // If neither one has $5, it's ok to merge\n    }\n    // If $5 contents are same, merge can be perfomed:\n    const fives1 = field1.subfields.filter(sf => sf.code === '5');\n    const fives2 = field2.subfields.filter(sf => sf.code === '5');\n    if (fives1.every(sf1 => fives2.some(sf2 => sf1.value === sf2.value)) && fives2.every(sf2 => fives1.some(sf1 => sf1.value === sf2.value))) {\n      return true;\n    }\n    return false;\n  }\n  if (!fieldHasSubfield(field2, '5')) {\n    return false;\n  }\n  return true;\n}\n\nfunction controlSubfield9PermitsMerge(baseField, sourceField) {\n  const baseFieldSubfields9 = baseField.subfields.filter(sf => sf.code === '9');\n  const sourceFieldSubfields9 = sourceField.subfields.filter(sf => sf.code === '9');\n\n  //nvdebug('CHECK $9', debugDev);\n  // There are no $9s. Skip:\n  if (baseFieldSubfields9.length === 0 && sourceFieldSubfields9.length === 0) {\n    //nvdebug(` No subfield $9 detected`, debugDev);\n    return true;\n  }\n\n  if (keepOrDropPreventsMerge()) {\n    nvdebug(` Subfield $9 KEEPs and DROPs disallow merge`, debugDev);\n    return false;\n  }\n\n  if (transPreventsMerge()) {\n    nvdebug(` Subfield $9 <TRANS> mismatch disallows merge`, debugDev);\n    return false;\n  }\n\n  //nvdebug('CHECK $9 OK', debugDev);\n\n  return true;\n\n  function subfieldHasKeepOrDrop(subfield) {\n    // nvdebug(`Has <KEEP>? ${subfieldToString(subfield)}`, debugDev);\n    return subfield.code === '9' && (/(?:<KEEP>|<DROP>)/u).test(subfield.value);\n  }\n\n  function subfieldHasTrans(subfield) {\n    return subfield.code === '9' && (/<TRANS>/u).test(subfield.value);\n  }\n\n  function transPreventsMerge() {\n    const trans1 = baseFieldSubfields9.filter(sf => subfieldHasTrans(sf));\n    const trans2 = sourceFieldSubfields9.filter(sf => subfieldHasTrans(sf));\n    if (trans1.length > 0 && trans2.length > 0) {\n      if (!MarcRecord.isEqual(trans1, trans2)) {\n        return true;\n      }\n    }\n    return false;\n  }\n\n  function retainSubfieldForKeepComparison(subfield) {\n    // Don't compare <KEEP>, <DROP> nor <TRANS> here (<TRANS> has it's own check)\n    if (subfieldHasKeepOrDrop(subfield) || subfieldHasTrans(subfield)) {\n      return false;\n    }\n\n    if (['0', '1'].includes(subfield.code)) {\n      return false;\n    }\n    if (['100', '600', '700', '800'].includes(baseField.tag)) {\n      // Despite $9 KEEP/DROP, we are interested in merging $d years (better than two separate fields)\n      if (['d'].includes(subfield.code)) {\n        return false;\n      }\n    }\n\n\n    return true;\n  }\n\n  function acceptKeeplessSourceSubfield(sourceSubfield, tag, subfieldCode, subfieldValue) {\n    if (sourceSubfield.code !== subfieldCode) {\n      return false;\n    }\n    // In this context, there's no need to check the value of a non-repeatable subfield.\n    // If value is different, pairing will fail when comparing the subfield itself.\n    // This allows us to tolerate little differences in punctuation: different punctuation does not get copied to base,\n    // so they don't alter base and and thus redundant when comparing.\n    if (!subfieldIsRepeatable(tag, subfieldCode)) {\n      return true;\n    }\n    return sourceSubfield.value === subfieldValue;\n  }\n\n  function keepOrDropPreventsMerge() {\n    const keepOrDrop1 = baseFieldSubfields9.filter(sf => subfieldHasKeepOrDrop(sf));\n    const keepOrDrop2 = sourceFieldSubfields9.filter(sf => subfieldHasKeepOrDrop(sf));\n\n    if (keepOrDrop1.length === 0 && keepOrDrop2.length === 0) {\n      return false;\n    }\n\n    if (baseField.tag.charAt(0) === '1' && !keepOrDrop2.some(sf => (/<DROP>/u).test(sf.value))) {\n      return false;\n    }\n\n    const sf9lessField1 = baseField.subfields.filter(subfield => retainSubfieldForKeepComparison(subfield));\n    const sf9lessField2 = sourceField.subfields.filter(subfield => retainSubfieldForKeepComparison(subfield));\n\n    nvdebugSubfieldArray(baseField.subfields, 'FIELD   ', debugDev);\n    nvdebugSubfieldArray(sf9lessField1, 'FILTER  ', debugDev);\n\n    nvdebugSubfieldArray(sourceField.subfields, 'FIELD2  ', debugDev);\n    nvdebugSubfieldArray(sf9lessField2, 'FILTER2 ', debugDev);\n\n    // Keepless field can be a subset field with <KEEP>/<DROP>! Note that punctuation still causes remnants to fail.\n    if (keepOrDrop1.length === 0) {\n      return !sf9lessField1.every(sf => sf9lessField2.some(sf2 => subfieldsAreIdentical(sf, sf2)));\n    }\n    // However, to alleviate the above-mentioned punctuation problem, we can check keep/drop-less *source* subfields\n    if (keepOrDrop2.length === 0) {\n      const unhandledSubfield = sf9lessField2.find(sf2 => !sf9lessField1.some(sf => acceptKeeplessSourceSubfield(sf2, baseField.tag, sf.code, sf.value)));\n      if (unhandledSubfield) {\n        //nvdebug(`Failed to pair ${subfieldToString(unhandledSubfield)}`, debugDev);\n        return true;\n      }\n      //return !sf9lessField2.every(sf2 => sf9lessField1.some(sf => subfieldsAreIdentical(sf, sf2)));\n      return false;\n    }\n\n    //nvdebugSubfieldArray(sf9lessField2, 'SOURCE(?)', debugDev);\n    //nvdebugSubfieldArray(sf9lessField1, 'BASE(?)  ', debugDev);\n\n    // $9 <KEEP> or <DROP> detected on both fields.\n    // Non-keeps and non-drops must be equal, otherwise fail:\n    if (MarcRecord.isEqual(sf9lessField1, sf9lessField2)) {\n      return false;\n    }\n    // Prevent:\n    return true;\n  }\n}\n\nfunction getPrefix(value) {\n  const normalizedValue = normalizeControlSubfieldValue(value);\n\n  if (normalizedValue.match(/^\\([^)]+\\)[0-9]+$/u)) {\n    return normalizedValue.substr(0, normalizedValue.indexOf(')') + 1);\n  }\n\n  if (value.match(/^https?:\\/\\//u)) {\n    return normalizedValue.substr(0, normalizedValue.lastIndexOf('/') + 1);\n  }\n\n  return '';\n}\n\nfunction isMatchAfterNormalization(currSubfield, otherField) {\n  // NB! Add implement isni normalizations (to normalize.js) and apply here:\n  const normalizedCurrSubfieldValue = normalizeControlSubfieldValue(currSubfield.value);\n  const prefix = getPrefix(normalizedCurrSubfieldValue);\n\n  //debug(`FFS-PREFIX '${prefix}'`);\n  // Look for same prefix + different identifier\n  const hits = otherField.subfields.filter(sf2 => sf2.code === currSubfield.code && normalizeControlSubfieldValue(sf2.value).indexOf(prefix) === 0);\n  if (hits.length === 0 || // <-- Nothing found, so it can't be a mismatch\n      // Every opposing subfields match:\n      hits.every(sf2 => normalizedCurrSubfieldValue === normalizeControlSubfieldValue(sf2.value))) {\n    debugDev(`Subfield \u2021${currSubfield.code} check OK: No opposing ${prefix} prefixes found.`);\n    return true;\n  }\n\n  debugDev(`Subfield \u2021${currSubfield.code} check FAILED: \u2021${currSubfield.code} '${currSubfield.value}' vs \u2021${currSubfield.code} '${hits[0].value}'.`);\n  return false;\n}\n\nfunction controlSubfieldContainingIdentifierPermitsMerge(field1, field2, subfieldCode) {\n  if (!fieldHasSubfield(field1, subfieldCode, null) || !fieldHasSubfield(field2, subfieldCode, null)) {\n    return true;\n  }\n\n  const result = field1.subfields.every(subfield => {\n    if (subfield.code !== subfieldCode) {\n      return true;\n    }\n\n    debugDev(`Compare \u2021${subfieldCode} '${subfield.value}' with '${fieldToString(field2)}'.`);\n    if (fieldHasSubfield(field2, field1.code, field1.value)) {\n      return true;\n    }\n\n    return isMatchAfterNormalization(subfield, field2, subfieldCode);\n  });\n\n  if (!result) {\n    debugDev(`Control subfield '${subfieldCode}' check failed.`);\n    return false;\n  }\n  return true;\n}\n\nconst controlSubfieldsContainingIdentifier = ['w', '0', '1', '2']; // 2 ain't identifier, but the logic can be applied here as well\n\nexport function controlSubfieldsPermitMerge(baseField, sourceField) {\n  // Check $w, $0, $1, $2 (which isn't an identifier per se, but the sama logic can be applied)\n  if (!controlSubfieldsContainingIdentifier.every(subfieldCode => controlSubfieldContainingIdentifierPermitsMerge(baseField, sourceField, subfieldCode))) {\n    //debug(' control subfields with identifiers failed');\n    return false;\n  }\n\n  if (!subfieldsAreEqual(baseField, sourceField, '3')) {\n    //debug(' similar control subfield fails');\n    return false;\n  }\n\n  if (!controlSubfield5PermitsMerge(baseField, sourceField) || !controlSubfield6PermitsMerge(baseField, sourceField) || !controlSubfield9PermitsMerge(baseField, sourceField)) {\n    return false;\n  }\n  // We fully prevent merging $8 subfields here, as they affect multiple fields! Also these would get screwed:\n  // 38211 |8 3\\u |a kuoro |2 seko\n  // 38211 |8 6\\u |a kuoro |2 seko |9 VIOLA<DROP>\n  // Thus only copy works with $8...\n  if (!subfieldsAreEmpty(baseField, sourceField, '8')) {\n    // We could alleviate this a bit esp. for non-repeatable fields.\n    // At least, if the source has '8' and otherwise the two fields are identical...\n    const subsetOfSourceField = {\n      'tag': sourceField.tag,\n      'ind1': sourceField.ind1,\n      'ind2': sourceField.ind2, subfields: sourceField.subfields.filter(sf => sf.code !== '8')\n    };\n    if (fieldToString(baseField) === fieldToString(subsetOfSourceField)) {\n      return true;\n    }\n    //debug(' csf8 failed');\n    return false;\n  }\n\n  return true;\n}\n"],
+  "mappings": "AAAA,SAAQ,kBAAiB;AACzB,OAAO,uBAAuB;AAC9B,SAAQ,kBAAkB,eAAe,SAAS,sBAAsB,sBAAsB,6BAA4B;AAG1H,SAAQ,qCAAoC;AAE5C,MAAM,QAAQ,kBAAkB,wEAAwE;AAExG,MAAM,WAAW,MAAM,OAAO,KAAK;AAEnC,SAAS,kBAAkB,QAAQ,QAAQ,cAAc;AAGvD,MAAI,CAAC,iBAAiB,QAAQ,YAAY,GAAG;AAC3C,WAAO,CAAC,iBAAiB,QAAQ,YAAY;AAAA,EAC/C;AACA,MAAI,CAAC,iBAAiB,QAAQ,YAAY,GAAG;AAC3C,WAAO;AAAA,EACT;AAEA,QAAM,SAAS,OAAO,UAAU,OAAO,cAAY,SAAS,SAAS,YAAY;AACjF,QAAM,SAAS,OAAO,UAAU,OAAO,cAAY,SAAS,SAAS,YAAY;AACjF,SAAO,WAAW,QAAQ,QAAQ,MAAM;AAC1C;AAEA,SAAS,kBAAkB,QAAQ,QAAQ,cAAc;AACvD,MAAI,CAAC,iBAAiB,QAAQ,YAAY,KAAK,CAAC,iBAAiB,QAAQ,YAAY,GAAG;AACtF,WAAO;AAAA,EACT;AACA,SAAO;AACT;AAGA,SAAS,gBAAgB,YAAY,eAAe;AAIlD,QAAM,SAAS,cAAc,UAAU,OAAO,cAAY,CAAC,CAAC,KAAK,GAAG,EAAE,SAAS,SAAS,IAAI,CAAC;AAC7F,SAAO,OAAO,MAAM,QAAM,WAAW,UAAU,KAAK,SAAO,sBAAsB,IAAI,GAAG,CAAC,CAAC;AAE5F;AAEA,SAAS,6BAA6B,QAAQ,QAAQ;AACpD,MAAI,kBAAkB,QAAQ,QAAQ,GAAG,GAAG;AAC1C,WAAO;AAAA,EACT;AAIA,MAAI,CAAC,iBAAiB,QAAQ,GAAG,KAAK,iBAAiB,QAAQ,GAAG,KAAK,gBAAgB,QAAQ,MAAM,GAAG;AACtG,WAAO;AAAA,EACT;AACA,MAAI,CAAC,iBAAiB,QAAQ,GAAG,KAAK,iBAAiB,QAAQ,GAAG,KAAK,gBAAgB,QAAQ,MAAM,GAAG;AACtG,WAAO;AAAA,EACT;AAIA,WAAS,0EAA0E;AACnF,SAAO;AACT;AAEA,SAAS,6BAA6B,QAAQ,QAAQ;AAEpD,MAAI,CAAC,iBAAiB,QAAQ,GAAG,GAAG;AAClC,QAAI,CAAC,iBAAiB,QAAQ,GAAG,GAAG;AAClC,aAAO;AAAA,IACT;AAEA,UAAM,SAAS,OAAO,UAAU,OAAO,QAAM,GAAG,SAAS,GAAG;AAC5D,UAAM,SAAS,OAAO,UAAU,OAAO,QAAM,GAAG,SAAS,GAAG;AAC5D,QAAI,OAAO,MAAM,SAAO,OAAO,KAAK,SAAO,IAAI,UAAU,IAAI,KAAK,CAAC,KAAK,OAAO,MAAM,SAAO,OAAO,KAAK,SAAO,IAAI,UAAU,IAAI,KAAK,CAAC,GAAG;AACxI,aAAO;AAAA,IACT;AACA,WAAO;AAAA,EACT;AACA,MAAI,CAAC,iBAAiB,QAAQ,GAAG,GAAG;AAClC,WAAO;AAAA,EACT;AACA,SAAO;AACT;AAEA,SAAS,6BAA6B,WAAW,aAAa;AAC5D,QAAM,sBAAsB,UAAU,UAAU,OAAO,QAAM,GAAG,SAAS,GAAG;AAC5E,QAAM,wBAAwB,YAAY,UAAU,OAAO,QAAM,GAAG,SAAS,GAAG;AAIhF,MAAI,oBAAoB,WAAW,KAAK,sBAAsB,WAAW,GAAG;AAE1E,WAAO;AAAA,EACT;AAEA,MAAI,wBAAwB,GAAG;AAC7B,YAAQ,+CAA+C,QAAQ;AAC/D,WAAO;AAAA,EACT;AAEA,MAAI,mBAAmB,GAAG;AACxB,YAAQ,iDAAiD,QAAQ;AACjE,WAAO;AAAA,EACT;AAIA,SAAO;AAEP,WAAS,sBAAsB,UAAU;AAEvC,WAAO,SAAS,SAAS,OAAQ,qBAAsB,KAAK,SAAS,KAAK;AAAA,EAC5E;AAEA,WAAS,iBAAiB,UAAU;AAClC,WAAO,SAAS,SAAS,OAAQ,WAAY,KAAK,SAAS,KAAK;AAAA,EAClE;AAEA,WAAS,qBAAqB;AAC5B,UAAM,SAAS,oBAAoB,OAAO,QAAM,iBAAiB,EAAE,CAAC;AACpE,UAAM,SAAS,sBAAsB,OAAO,QAAM,iBAAiB,EAAE,CAAC;AACtE,QAAI,OAAO,SAAS,KAAK,OAAO,SAAS,GAAG;AAC1C,UAAI,CAAC,WAAW,QAAQ,QAAQ,MAAM,GAAG;AACvC,eAAO;AAAA,MACT;AAAA,IACF;AACA,WAAO;AAAA,EACT;AAEA,WAAS,gCAAgC,UAAU;AAEjD,QAAI,sBAAsB,QAAQ,KAAK,iBAAiB,QAAQ,GAAG;AACjE,aAAO;AAAA,IACT;AAEA,QAAI,CAAC,KAAK,GAAG,EAAE,SAAS,SAAS,IAAI,GAAG;AACtC,aAAO;AAAA,IACT;AACA,QAAI,CAAC,OAAO,OAAO,OAAO,KAAK,EAAE,SAAS,UAAU,GAAG,GAAG;AAExD,UAAI,CAAC,GAAG,EAAE,SAAS,SAAS,IAAI,GAAG;AACjC,eAAO;AAAA,MACT;AAAA,IACF;AAGA,WAAO;AAAA,EACT;AAEA,WAAS,6BAA6B,gBAAgB,KAAK,cAAc,eAAe;AACtF,QAAI,eAAe,SAAS,cAAc;AACxC,aAAO;AAAA,IACT;AAKA,QAAI,CAAC,qBAAqB,KAAK,YAAY,GAAG;AAC5C,aAAO;AAAA,IACT;AACA,WAAO,eAAe,UAAU;AAAA,EAClC;AAEA,WAAS,0BAA0B;AACjC,UAAM,cAAc,oBAAoB,OAAO,QAAM,sBAAsB,EAAE,CAAC;AAC9E,UAAM,cAAc,sBAAsB,OAAO,QAAM,sBAAsB,EAAE,CAAC;AAEhF,QAAI,YAAY,WAAW,KAAK,YAAY,WAAW,GAAG;AACxD,aAAO;AAAA,IACT;AAEA,QAAI,UAAU,IAAI,OAAO,CAAC,MAAM,OAAO,CAAC,YAAY,KAAK,QAAO,UAAW,KAAK,GAAG,KAAK,CAAC,GAAG;AAC1F,aAAO;AAAA,IACT;AAEA,UAAM,gBAAgB,UAAU,UAAU,OAAO,cAAY,gCAAgC,QAAQ,CAAC;AACtG,UAAM,gBAAgB,YAAY,UAAU,OAAO,cAAY,gCAAgC,QAAQ,CAAC;AAExG,yBAAqB,UAAU,WAAW,YAAY,QAAQ;AAC9D,yBAAqB,eAAe,YAAY,QAAQ;AAExD,yBAAqB,YAAY,WAAW,YAAY,QAAQ;AAChE,yBAAqB,eAAe,YAAY,QAAQ;AAGxD,QAAI,YAAY,WAAW,GAAG;AAC5B,aAAO,CAAC,cAAc,MAAM,QAAM,cAAc,KAAK,SAAO,sBAAsB,IAAI,GAAG,CAAC,CAAC;AAAA,IAC7F;AAEA,QAAI,YAAY,WAAW,GAAG;AAC5B,YAAM,oBAAoB,cAAc,KAAK,SAAO,CAAC,cAAc,KAAK,QAAM,6BAA6B,KAAK,UAAU,KAAK,GAAG,MAAM,GAAG,KAAK,CAAC,CAAC;AAClJ,UAAI,mBAAmB;AAErB,eAAO;AAAA,MACT;AAEA,aAAO;AAAA,IACT;AAOA,QAAI,WAAW,QAAQ,eAAe,aAAa,GAAG;AACpD,aAAO;AAAA,IACT;AAEA,WAAO;AAAA,EACT;AACF;AAEA,SAAS,UAAU,OAAO;AACxB,QAAM,kBAAkB,8BAA8B,KAAK;AAE3D,MAAI,gBAAgB,MAAM,oBAAoB,GAAG;AAC/C,WAAO,gBAAgB,OAAO,GAAG,gBAAgB,QAAQ,GAAG,IAAI,CAAC;AAAA,EACnE;AAEA,MAAI,MAAM,MAAM,eAAe,GAAG;AAChC,WAAO,gBAAgB,OAAO,GAAG,gBAAgB,YAAY,GAAG,IAAI,CAAC;AAAA,EACvE;AAEA,SAAO;AACT;AAEA,SAAS,0BAA0B,cAAc,YAAY;AAE3D,QAAM,8BAA8B,8BAA8B,aAAa,KAAK;AACpF,QAAM,SAAS,UAAU,2BAA2B;AAIpD,QAAM,OAAO,WAAW,UAAU,OAAO,SAAO,IAAI,SAAS,aAAa,QAAQ,8BAA8B,IAAI,KAAK,EAAE,QAAQ,MAAM,MAAM,CAAC;AAChJ,MAAI,KAAK,WAAW;AAAA;AAAA,EAEhB,KAAK,MAAM,SAAO,gCAAgC,8BAA8B,IAAI,KAAK,CAAC,GAAG;AAC/F,aAAS,kBAAa,aAAa,IAAI,0BAA0B,MAAM,kBAAkB;AACzF,WAAO;AAAA,EACT;AAEA,WAAS,kBAAa,aAAa,IAAI,wBAAmB,aAAa,IAAI,KAAK,aAAa,KAAK,cAAS,aAAa,IAAI,KAAK,KAAK,CAAC,EAAE,KAAK,IAAI;AAClJ,SAAO;AACT;AAEA,SAAS,gDAAgD,QAAQ,QAAQ,cAAc;AACrF,MAAI,CAAC,iBAAiB,QAAQ,cAAc,IAAI,KAAK,CAAC,iBAAiB,QAAQ,cAAc,IAAI,GAAG;AAClG,WAAO;AAAA,EACT;AAEA,QAAM,SAAS,OAAO,UAAU,MAAM,cAAY;AAChD,QAAI,SAAS,SAAS,cAAc;AAClC,aAAO;AAAA,IACT;AAEA,aAAS,iBAAY,YAAY,KAAK,SAAS,KAAK,WAAW,cAAc,MAAM,CAAC,IAAI;AACxF,QAAI,iBAAiB,QAAQ,OAAO,MAAM,OAAO,KAAK,GAAG;AACvD,aAAO;AAAA,IACT;AAEA,WAAO,0BAA0B,UAAU,QAAQ,YAAY;AAAA,EACjE,CAAC;AAED,MAAI,CAAC,QAAQ;AACX,aAAS,qBAAqB,YAAY,iBAAiB;AAC3D,WAAO;AAAA,EACT;AACA,SAAO;AACT;AAEA,MAAM,uCAAuC,CAAC,KAAK,KAAK,KAAK,GAAG;AAEzD,gBAAS,4BAA4B,WAAW,aAAa;AAElE,MAAI,CAAC,qCAAqC,MAAM,kBAAgB,gDAAgD,WAAW,aAAa,YAAY,CAAC,GAAG;AAEtJ,WAAO;AAAA,EACT;AAEA,MAAI,CAAC,kBAAkB,WAAW,aAAa,GAAG,GAAG;AAEnD,WAAO;AAAA,EACT;AAEA,MAAI,CAAC,6BAA6B,WAAW,WAAW,KAAK,CAAC,6BAA6B,WAAW,WAAW,KAAK,CAAC,6BAA6B,WAAW,WAAW,GAAG;AAC3K,WAAO;AAAA,EACT;AAKA,MAAI,CAAC,kBAAkB,WAAW,aAAa,GAAG,GAAG;AAGnD,UAAM,sBAAsB;AAAA,MAC1B,OAAO,YAAY;AAAA,MACnB,QAAQ,YAAY;AAAA,MACpB,QAAQ,YAAY;AAAA,MAAM,WAAW,YAAY,UAAU,OAAO,QAAM,GAAG,SAAS,GAAG;AAAA,IACzF;AACA,QAAI,cAAc,SAAS,MAAM,cAAc,mBAAmB,GAAG;AACnE,aAAO;AAAA,IACT;AAEA,WAAO;AAAA,EACT;AAEA,SAAO;AACT;",
+  "names": []
+}