From 21df22136d9e18647daa08d5cde39f03ca574be8 Mon Sep 17 00:00:00 2001
From: kwahlin <kalle.wahlin@kb.se>
Date: Mon, 20 Nov 2023 17:35:51 +0100
Subject: [PATCH] Filter out works with certain genre/form terms from SVSK
 selection

---
 librisworks/scripts/swedish-fiction.groovy         |  2 +-
 .../main/groovy/se/kb/libris/mergeworks/Doc.groovy | 14 +++++++++++++-
 2 files changed, 14 insertions(+), 2 deletions(-)

diff --git a/librisworks/scripts/swedish-fiction.groovy b/librisworks/scripts/swedish-fiction.groovy
index 4e6ec15086..76a65c7e7c 100644
--- a/librisworks/scripts/swedish-fiction.groovy
+++ b/librisworks/scripts/swedish-fiction.groovy
@@ -13,7 +13,7 @@ new File(System.getProperty('clusters')).splitEachLine(~/[\t ]+/) {cluster ->
                 && !doc.isMaybeAggregate()
                 && doc.encodingLevel() != 'marc:PartialPreliminaryLevel'
                 && doc.encodingLevel() != 'marc:PrepublicationLevel'
-                && !doc.isTactile()
+                && !doc.isNotRegularText()
                 && !doc.isDrama()
                 && !doc.isThesis()
                 && !doc.isInSb17Bibliography()
diff --git a/librisworks/src/main/groovy/se/kb/libris/mergeworks/Doc.groovy b/librisworks/src/main/groovy/se/kb/libris/mergeworks/Doc.groovy
index a06ae51cc3..3d08898dab 100644
--- a/librisworks/src/main/groovy/se/kb/libris/mergeworks/Doc.groovy
+++ b/librisworks/src/main/groovy/se/kb/libris/mergeworks/Doc.groovy
@@ -308,9 +308,21 @@ class Doc {
         asList(genreForm()).any { it['@id'] in DRAMA_GF }
     }
 
-    boolean isTactile() {
+    boolean isNotRegularText() {
+        Set barnGfs = [
+                'https://id.kb.se/term/barngf/Mekaniska%20b%C3%B6cker',
+                'https://id.kb.se/term/barngf/Pop-up-b%C3%B6cker',
+                'https://id.kb.se/term/barngf/TAKK',
+                'https://id.kb.se/term/barngf/Taktila%20b%C3%B6cker',
+                'https://id.kb.se/term/barngf/Taktila%20illustrationer',
+                'https://id.kb.se/term/barngf/Teckenspr%C3%A5k',
+                'https://id.kb.se/term/barngf/Tecken%20som%20st%C3%B6d%20till%20talet',
+                'https://id.kb.se/term/barngf/Bliss%20%28symbolspr%C3%A5k%29'
+        ] as Set
+
         asList(workData['contentType']).contains(['@id': 'https://id.kb.se/term/rda/TactileText'])
                 || asList(instanceData?.carrierType).any { it['@id'] in ['https://id.kb.se/marc/Braille', 'https://id.kb.se/marc/TacMaterialType-b'] }
+                || genreForm().any {it['@id'] in barnGfs || whelk.relations.isImpliedBy('https://id.kb.se/term/saogf/Taktila%20verk', it['@id']) }
     }
 
     boolean isThesis() {