SI
в идеале, нужно что-то в таком формате и такое же доходчевое как вот эта статья только по типам и классам https://habr.com/ru/post/183150/
может что-то есть на примете простое?
Size: a a a
SI
MK
SI
ЮБ
SI
KV
Y
let adjoinAll =
cloneTraversal
. foldl1 (\t1 t2 -> adjoin (cloneTraversal t1) (cloneTraversal t2)) in
"{\"a\":1,\"b\":2}" & partsOf (_Value . (adjoinAll [ix "a", ix "b"]) . _Number) .~ [2,3]
\t1 t2 -> adjoin (cloneTraversal t1) (cloneTraversal t2)
это, кстати, adjoin `on` cloneTraversal
KV
\t1 t2 -> adjoin (cloneTraversal t1) (cloneTraversal t2)
это, кстати, adjoin `on` cloneTraversal
KV
AA
AA
AA