mirror of https://github.com/rusefi/bldc.git
8 lines
147 B
Common Lisp
8 lines
147 B
Common Lisp
|
|
||
|
(def v (list-to-vector '(1.0 2.0 3.0 4.0)))
|
||
|
|
||
|
(and (= (vproj v 0) 1.0)
|
||
|
(= (vproj v 1) 2.0)
|
||
|
(= (vproj v 2) 3.0)
|
||
|
(= (vproj v 3) 4.0))
|