4,577
edits
No edit summary |
|||
Line 102: | Line 102: | ||
<source lang=apl> | <source lang=apl> | ||
Sqrt ← * | Sqrt ← *∘0.5 ⍝ Square root | ||
Norm ← Sqrt+.×⍨ ⍝ Magnitude (norm) of numeric vector in Euclidean space | Norm ← Sqrt+.×⍨ ⍝ Magnitude (norm) of numeric vector in Euclidean space | ||
Unit ← ÷∘Norm⍨ ⍝ Unit vector in direction of vector ⍵ | Unit ← ÷∘Norm⍨ ⍝ Unit vector in direction of vector ⍵ |