urbit/try/bin/reverse.hoon
Steven Dee 4025898428 Ye olde whitespace cleanup
Run using
  find . -type f | xargs sed -i '\s\+$'

And not even glanced at. It's fine. Don't worry about it.
2013-12-08 21:23:03 +00:00

27 lines
425 B
Plaintext

!:
:: /=try=/bin/reverse/hoon
::
|= *
|= ~
:- ~ :- ~
:- ^- (list slip)
:~ [~ %$ %atom %t]
==
|= [now=@da pax=path nut=note]
^- bowl
?+ -.nut !!
%$
?~ p.nut
[~ ~]
=+ liz=((hard (list ,@t)) q.u.p.nut)
:- ^- (list gift)
:~ :+ %mu [%atom %t]
(turn liz |=(a=@t (rap 3 (flop (trip a)))))
==
:- ~
:- ^- (list slip)
:~ [~ %$ %atom %t]
==
..$
==