10 lines
178 B
Factor
10 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 }
|
|
}
|