Added asPMVector

Author: olekscode

src/Math-Core/Collection.extension.st

@@ -0,0 +1,11 @@
+Extension { #name : #Collection }
+
+{ #category : #'*Math-Core' }
+Collection >> asPMVector [
+	
+	| aVector index |
+	aVector := PMVector new: self size.
+	index := 0.
+	self do: [:each | aVector at: (index := index + 1) put: each].
+	^aVector
+]