mirror of
https://github.com/urbit/shrub.git
synced 2024-12-15 12:43:31 +03:00
10 lines
240 B
Plaintext
10 lines
240 B
Plaintext
|
!:
|
||
|
:: /=main=/toy/veer/hoon
|
||
|
::
|
||
|
=> .(- `[who=@p how=path]`-)
|
||
|
|= [est=time *]
|
||
|
|= [nam=@tas ~]
|
||
|
=+ tip=(end 3 1 nam)
|
||
|
=+ pax=[(scot %p who) %arvo (scot %da est) nam %hoon ~]
|
||
|
[[[%xx [%veer ?:(=('z' tip) %$ tip) pax (,@ .^(%cx pax))]] ~] ~]
|