skew-matrix4 ( theta -- matrix )
Vocabulary
math.matrices
Definition
USING:
locals
math.functions
;
IN:
math.matrices
::
skew-matrix4
( theta -- matrix )
theta
tan
:>
zf
{
{
1.0 0.0 0.0 0.0
}
{
0.0 1.0 0.0 0.0
}
{
0.0 zf 1.0 0.0
}
{
0.0 0.0 0.0 1.0
}
}
;