Equilibrium index: Difference between revisions

Content added Content deleted
(→‎{{header|Quackery}}: improved efficiency)
Line 2,433: Line 2,433:
[ over i^ peek = if
[ over i^ peek = if
[ dip [ i^ join ] ] ]
[ dip [ i^ join ] ] ]
drop ] is equilibria ( --> [ )
drop ] is equilibria ( [ --> [ )


' [ -7 1 5 2 -4 3 0 ] equilibria echo</syntaxhighlight>
' [ -7 1 5 2 -4 3 0 ] equilibria echo</syntaxhighlight>