hoon: make +slab respect variance using given mode and return false
[p.gun (slum q.gat q.sam)]
::
++ slab :: test if contains
- |= {cog/@tas typ/type}
+ |= {cog/@tas way/?(%read %rite %both) typ/type}
?= [%| *]
- (~(find ut typ) %read ~[cog])
+ (~(find ut typ) way ~[cog])
::
++ slap
|= {vax/vase gen/hoon} ^- vase :: untyped vase .*
