6 lines
115 B
Factor
6 lines
115 B
Factor
V{ 1 2 3 }
|
|
{
|
|
[ "The initial vector: " write . ]
|
|
[ [ 42 ] dip push ]
|
|
[ "Modified vector: " write . ]
|
|
} cleave
|