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