ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-09-21 15:38:59 +03:00
Code Issues Packages Projects Releases Wiki Activity

Further ~? tweaking

Browse Source
This commit is contained in:
Anton Dyudin 2015-01-14 15:18:03 -08:00
parent 1e30a55ad9
commit e4945f22e6
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
arvo/hoon.hoon
View File

@ -6463,10 +6463,10 @@
::
[%sgts *] [%sggr [%germ p.gen] q.gen]
[%sgwt *]
:+ %tsls q.gen
:^ %wtdt [~ 2]
:+ %tsls [%wtdt q.gen [%bczp %null] [[%bczp %null] r.gen]]
:^ %wtsg [~ 2]~
[%tsgr [~ 3] s.gen]
[%sgpm p.gen r.gen [%tsgr [~ 3] s.gen]]
[%sgpm p.gen [~ 5] [%tsgr [~ 3] s.gen]]
[%smcl *]
?- q.gen
~ [%zpzp ~]