From 54da18639aa06b0348f2697199b50d463cd743a0 Mon Sep 17 00:00:00 2001 From: johncburnham Date: Tue, 29 Apr 2014 21:35:21 -0700 Subject: [PATCH] found and fixed a bug in ++shan --- arvo/hoon.hoon | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/arvo/hoon.hoon b/arvo/hoon.hoon index cb64ef885d..5dc8f05e36 100644 --- a/arvo/hoon.hoon +++ b/arvo/hoon.hoon @@ -4250,7 +4250,7 @@ =+ i=0 |- ?: =(i lex) - hax + (rep 5 (flop (rip 5 hax))) =+ ^= wox =+ dux=(cut 9 [i 1] ful) =+ wox=(rep 5 (turn (rip 5 dux) net)) @@ -4278,11 +4278,11 @@ i +(i) hax %+ rep 5 :~ - (sum e (wac 4 hax)) - (sum d (wac 3 hax)) - (sum c (wac 2 hax)) - (sum b (wac 1 hax)) (sum a (wac 0 hax)) + (sum b (wac 1 hax)) + (sum c (wac 2 hax)) + (sum d (wac 3 hax)) + (sum e (wac 4 hax)) == == =+ fx=(con (dis b c) (dis (not 5 1 b) d))