From 79e34e39295185fa4a2b00f42eac07c984b82972 Mon Sep 17 00:00:00 2001
From: Steve Dee <steve@smartercode.net>
Date: Tue, 15 Apr 2014 13:07:11 -0700
Subject: [PATCH] Map union jet

---
 arvo/hoon.hoon | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/arvo/hoon.hoon b/arvo/hoon.hoon
index 105ac15cd..bd5dcafa5 100644
--- a/arvo/hoon.hoon
+++ b/arvo/hoon.hoon
@@ -1588,6 +1588,15 @@
       b
     $(a r.a, b [n.a $(a l.a)])
   ::
+  +-  uni
+    ~/  %uni
+    |=  b=_a
+    ?@  b  a
+    %=  $
+      a  (~(put by a) p.n.b q.n.b)
+      b  (~(uni by l.b) r.b)
+    ==
+  ::
   +-  wyt
     .+
     |-  ^-  @