Morgen!

Morning!

I går kveld skrev jeg et ganske så giftig update statement i sql. Det er utrolig så mye mer digg det er å ha en database enn mongo.

Og, ja. Jeg vil heller skrive det i SQL enn i Clojure.

Jøss. Hvorfor?

Det er enda litt mer deklarativt enn det jeg får til i Clojure.

select f.model, b.value as "typeId" from field f, jsonb_array_elements_text(f."componentType") as b where (f.model, b.value) not in (select model, "typeId" from component_type_view);

(dette er ikke den giftige greia jeg skrev igår, men dette er nærmest en direkte oversettelse fra problemet (gi meg alle modelid’er og type id’er i felter som er slik at disse ikke finnes blandt komponent-typene).

En kollega skrev denne i Clojure og det var minst 20 linjer. Jeg har ikke prøvd å skrive det i clojure. Men, hvis du vil: Et felt i denne sammenhengen ser ut som:

{:_id 1 :model 2 :componentTypes [t1, t2, t3]}

[{:_id 1, :model 2, :type t1}, {:_id 1 :model 2 :type t2} {:_id 1 :model 2 :type t3}]

[{:model 2 :typeId t2}]

Det siste er vel egentlig ganske greit:

(remove (comp (set/project component-types [:model :typeId]) #(select-keys % [:model :type])) flattened-types )

Så det er egentlig utfordring nummer en som jeg ikke finner noen nice løsning på sånn off the top of my head.

Damn! chat-gtp to the rescue!

eg skulle nett til å svara med:

(comment
  (let [data [{:_id 1 :model 2 :componentTypes ['t1 't2 't3]}]]
    (vec
      (for [{:keys [model] :as d} data
            componentType (get d :componentTypes)]
        {:model model :typeId componentType}))))

for er digg for å "eksplodere"/utvide ting

for er så ikke en del av verktøykassa mi.

evt:

(for [{:keys [model componentTypes]} data
      componentType componentTypes]
  {:model model :typeId componentType})

Jeg tror jeg ville gått for typ:

(defn explode [k kk data] (for [explosion (k data)] (assoc data kk explosion)))

(mapcat (partial explode :componentTypes :type) all-my-datas)

Den siste uka har jeg skrivet om et digert Shell script til Babashka. Det ble skrevet av min sjefs sjef (mest Copilot). I går kom han innom pulten min for å slå av en prat (fordi jeg slutter), så benyttet jeg anledningen til å vise ham koden i VS Code/REPL. Han ble ganske tent! Senere på kvelden fikk jeg en melding: > Om du jobber neste uke også kan du ikke booke meg til en gjennomgang av clojure koden som du viste? Lettere å komme i gang med litt hjelp tenker jeg.

Enig i at for kanskje er best her. En annen map-variant:

(comment
  (let [fs [{:_id 1 :model 2 :componentTypes ['t1, 't2, 't3]}]]
    (mapcat (fn [f]
              (map (fn [ct]
                     (merge (select-keys f [:_id :model]) {:type ct})) (:componentTypes f))) fs)))

({:_id 1, :model 2, :type t1}
 {:_id 1, :model 2, :type t2}
 {:_id 1, :model 2, :type t3})

Takk @christian767 for at du sa “Jøss”, nå fikk jeg jo lært meg noe nytt.

hehe, moro å kunne hjelpe

Jeg er mest forbauset over at dette startet med "jeg vil heller gjøre update med sql" og endte opp i en diskusjon om datatransformasjon 😅

Jeg har levd så lenge i datomic-land at det falt meg ikke engang inn at det var selecten det handlet om

update’n var litt det samme:

update foo f
set bar = b.whatever
from baz b
where f.id = b.id and (b.whatever, b.whatnot) in (select whatever, whatnot from something_else...)

Skjønner det nå, det var bare uvant med side-effecting data-transformasjon 😅

for er Clojure's sql 😄

https://ericnormand.me/mini-guide/clojure-set er jo en klassiker (til glede for nye lesere) Jeg mener det er en til som er enda litt bedre, men jeg klarer ikke å finne den akkurat nå.

det er en som heter clojure.math.combinatorics som har snacks som permutations og subsets

BTW. jeg er skikkelig dårlig på å holde orden på alle join typene i sql. Jeg lærte sql en gang da vi skrev:

select a.foo, b.bar from aaas a, bbbbs b where a.id = b.id;

min goto: https://blog.codinghorror.com/a-visual-explanation-of-sql-joins/

Litt tynt med docs osv enn så lenge, men nå har @magnars og jeg sørget for at staten har minst ett API som leverer EDN 😄 https://www.matvaretabellen.no/api/

For ikke å snakke om åpen kildekode i Clojure! https://github.com/mattilsynet/matvaretabellen-deux

skal man vurdere en liten refactoring-runde her da kanskje?