11 lines
178 B
Factor
11 lines
178 B
Factor
|
USE: math.matrices
|
||
|
|
IN: scratchpad 6 identity-matrix .
|
||
|
|
{
|
||
|
|
{ 1 0 0 0 0 0 }
|
||
|
|
{ 0 1 0 0 0 0 }
|
||
|
|
{ 0 0 1 0 0 0 }
|
||
|
|
{ 0 0 0 1 0 0 }
|
||
|
|
{ 0 0 0 0 1 0 }
|
||
|
|
{ 0 0 0 0 0 1 }
|
||
|
|
}
|