Advertisement
keatondunsford

the beginnings of "samefringe" - loobeans - mint vain

Feb 23rd, 2017
101
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.37 KB | None | 0 0
  1. =a `(list @u)`[666 42 33 ~]
  2. =b `(list @u)`[666 42 33 ~]
  3.  
  4.  
  5.  
  6.  
  7. |= {a/(list @u) b/(list @u)}
  8. |- ^- ?
  9. ?~ a
  10. ?: ?=($~ b) %.y %.n
  11. ?: %.y %.y
  12. %.n
  13.  
  14. > +pastebin [a b]
  15. %.y
  16.  
  17.  
  18.  
  19.  
  20. |= {a/(list @u) b/(list @u)}
  21. |- ^- ?
  22. ?~ a
  23. ?: ?=($~ b) %.y %.n
  24. ?~ b :: <-
  25. ?: ?=($~ a) %.y %.n
  26. ?: %.y %.y
  27. %.n
  28.  
  29. > +pastebin [a b]
  30. ...
  31. mint-vain
  32. ...
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement