mirror of
https://github.com/urbit/shrub.git
synced 2024-12-21 09:51:36 +03:00
9 lines
236 B
Plaintext
9 lines
236 B
Plaintext
|
/- aquarium
|
||
|
|
=, aquarium
|
||
|
|
:- %say
|
||
|
|
|= [[now=@da eny=@uvJ bec=beak] [label=@ta] ships=(list ship)]
|
||
|
|
:- %aqua-events
|
||
|
|
=? ships ?=(~ ships)
|
||
|
|
.^((list ship) %gx /(scot %p p.bec)/aqua/(scot %da now)/ships/noun)
|
||
|
|
[%snap-ships label ships]~
|