5 lines
105 B
Factor
5 lines
105 B
Factor
"bloop" search [
|
|
get [
|
|
"abs" search [ execute( n -- n' ) ] when*
|
|
] [ 0 ] if*
|
|
] [ 0 ] if*
|