This commit is contained in:
C. Guy Yarvin 2015-06-08 15:17:47 -07:00
parent 5865526981
commit 4a10194d5c

View File

@ -1390,7 +1390,7 @@
(pa-sauce ost [%quit ~]~) (pa-sauce ost [%quit ~]~)
=+ ^= ruv ^- (unit river) =+ ^= ruv ^- (unit river)
?: ?=(~ pax) ?: ?=(~ pax)
Q`[[%ud ?:((lth count 64) 0 (sub count 64))] [%da (dec (bex 128))]] `[[%ud ?:((lth count 64) 0 (sub count 64))] [%da (dec (bex 128))]]
?: ?=([@ ~] pax) ?: ?=([@ ~] pax)
=+ say=(slay i.pax) =+ say=(slay i.pax)
?. ?=([~ %$ ?(%ud %da) @] say) ~ ?. ?=([~ %$ ?(%ud %da) @] say) ~