begin de flopped

This commit is contained in:
Galen Wolfe-Pauly 2015-01-28 07:13:30 -08:00
parent ea2ca20e25
commit 51708dd145

View File

@ -397,7 +397,7 @@
%+ welp %+ welp
?~(pot.res ~ (spam %rush %prompt u.pot.res)) ?~(pot.res ~ (spam %rush %prompt u.pot.res))
%^ spam %rush %tang %^ spam %rush %tang
(turn (flop tak.res) |=(a=cord [%leaf (trip a)])) (turn tak.res |=(a=cord [%leaf (trip a)]))
:: ::
++ pour ++ pour
|= [ost=bone pax=path sih=*] |= [ost=bone pax=path sih=*]
@ -415,7 +415,7 @@
%+ welp %+ welp
?~(pot.res ~ (spam %rush %prompt u.pot.res)) ?~(pot.res ~ (spam %rush %prompt u.pot.res))
%^ spam %rush %tang %^ spam %rush %tang
(turn (flop tak.res) |=(a=cord [%leaf (trip a)])) (turn tak.res |=(a=cord [%leaf (trip a)]))
:_ +>.$ :_ +>.$
:- [ost %give +.sih] :- [ost %give +.sih]
?+ +<.sih ~ ?+ +<.sih ~