Use ^- instead of ;; because to save resources (and cleaner)

This commit is contained in:
~wicrum-wicrun 2023-02-16 07:46:52 +01:00
parent 34328a0ac3
commit 55c3fedcfa

View File

@ -63,7 +63,7 @@
[where which ^when]
==
++ read
;; (map [ship dude path] [fail=? rock:lake])
^- (map [ship dude paths] [fail=? rock:lake])
%- ~(run by sub)
|= =flow
[fail rock]:flow
@ -225,7 +225,7 @@
tide(wav (lot:wav wav.tide (bind (ram:rok rok.tide) |=([r=@ *] (dec r))) ~))
::
++ read
;; (map path rock:lake)
^- (map paths rock:lake)
%- ~(run by pub)
|= =tide
=< rock