unmaintained/gml/geometry/geometry.factor

   1 ! Copyright (C) 2010 Slava Pestov.
   2 USING: arrays kernel math.matrices math.vectors.simd.cords
   3 math.trig gml.runtime ;
   4 IN: gml.geometry
   5
   6 GML: rot_vec ( v n alpha -- v )
   7     ! Inefficient!
   8     deg>rad rotation-matrix4 swap >array m.v >double-4 ;