(
+
/
)*
.
(
++
)*
.
zip2
.
((b_allvec[0]o)*.zip2.(repeat.(id,#)o,id)o,(priffle)*.zip3.(((<)*)*.(zip2)*.zip2.(((-)*)*.(zip2)*.zip2.((repeat)*.zip2.(id,repeat.(id,id)o.#)o,repeat.(id,#)o)o,repeat.(repeat.(0,#)o,#)o)o,((-)*)*.(zip2)*.zip2.((repeat)*.zip2.(repeat.(0,#)o,(#)*.(mask)*.zip2.(repeat.(iota,id)o.#,((<)*)*.(zip2)*.zip2.(((-)*)*.(zip2)*.zip2.((repeat)*.zip2.(id,repeat.(id,id)o.#)o,repeat.(id,#)o)o,repeat.(repeat.(0,#)o,#)o)o)o)o,((-)*)*.(zip2)*.zip2.((repeat)*.zip2.(id,(#)*.(mask)*.zip2.(repeat.(iota,id)o.#,((<)*)*.(zip2)*.zip2.(((-)*)*.(zip2)*.zip2.((repeat)*.zip2.(id,repeat.(id,id)o.#)o,repeat.(id,#)o)o,repeat.(repeat.(0,#)o,#)o)o)o)o,(mask)*.zip2.(repeat.(id,#)o,((<)*)*.(zip2)*.zip2.(((-)*)*.(zip2)*.zip2.((repeat)*.zip2.(id,repeat.(id,id)o.#)o,repeat.(id,#)o)o,repeat.(repeat.(0,#)o,#)o)o)o)o)o,((-)*)*.(zip2)*.zip2.((repeat)*.zip2.(id,(#)*.(mask)*.zip2.(repeat.(iota,id)o.#,((~)*)*.((<)*)*.(zip2)*.zip2.(((-)*)*.(zip2)*.zip2.((repeat)*.zip2.(id,repeat.(id,id)o.#)o,repeat.(id,#)o)o,repeat.(repeat.(0,#)o,#)o)o)o)o,(mask)*.zip2.(repeat.(id,#)o,((~)*)*.((<)*)*.(zip2)*.zip2.(((-)*)*.(zip2)*.zip2.((repeat)*.zip2.(id,repeat.(id,id)o.#)o,repeat.(id,#)o)o,repeat.(repeat.(0,#)o,#)o)o)o)o)o)o