You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
::quartets-find( ... quot: ( max arr -- 'max ) -- ... )
100 [0..b] [
:> a
100 a - [0..b] [
:> b
100 a b + - [0..b] [
:> c
100 a b c + + - :> d
a b c d 4array
quot call( max arr -- max' )
] each
] each
] each ; inline
But gives an error, related to the stack call(, this works:
::quartets-find( ... quot: ( max arr -- 'max ) -- ... )
100 [0..b] [
:> a
100 a - [0..b] [
:> b
100 a b + - [0..b] [
:> c
100 a b c + + - :> d
a b c d 4array
quot call
] each
] each
] each ; inline
The text was updated successfully, but these errors were encountered:
Reported on Discord, this should work maybe:
But gives an error, related to the stack
call(
, this works:The text was updated successfully, but these errors were encountered: