<rotation> ( theta -- transform )


Vocabulary
math.affine-transforms

Inputs
thetaan object


Outputs
transforman object


Definition
USING: arrays kernel math math.functions ;

IN: math.affine-transforms

: <rotation> ( theta -- transform )
[ cos ] [ sin ] bi [ 2array ] [ neg swap 2array ] 2bi
{ 0.0 0.0 } <affine-transform> ;