Vector math extension

[ldci]

Good job for new vector maths.
But
x: make vector! [1 2 3 4]
y: make vector! [2 3 4 5]
x + y
Script error: cannot use add: on #(vector!) value
May be such a function?

opsOnVectors: function [
	v1		[vector!]
	v2		[vector!]
	type 	[word!] ; char integer decimal
	bitSize	[integer!]
	op		[word!]
][
	case  [
		type = 'char 	[v: make vector! compose [integer! (bitSize) (v1/length)]]
		type = 'integer [v: make vector! compose [integer! (bitSize) (v1/length)]]
		type = 'decimal [v: make vector! compose [decimal! (bitSize) (v1/length)]]
	]
	case [
		op = '+ 	[repeat i v1/length [v/:i: v1/:i + v2/:I]]
		op = '- 	[repeat i v1/length [v/:i: v1/:i - v2/:I]]
		op = '* 	[repeat i v1/length [v/:i: v1/:i * v2/:I]]
		op = '/ 	[repeat i v1/length [v/:i: v1/:i / v2/:I]]
		op = '% 	[repeat i v1/length [v/:i: v1/:i % v2/:I]]
		op = 'and [repeat i v1/length [v/:i: v1/:i and v2/:I]]	
		op = 'or	[repeat i v1/length [v/:i: v1/:i or v2/:I]]
		op = 'xor	[repeat i v1/length [v/:i: v1/:i xor v2/:I]]
		op = '>>	[repeat i v1/length [v/:i: v1/:i >> v2/:I]]
		op = '<<	[repeat i v1/length [v/:i: v1/:i << v2/:I]]
	]
	v
]

[Oldes]

Yes... that is not yet implemented, because I have not decided how to handle vectors of different sizes.
What should be result of #(uint8! [1 2]) + #(uint8! [3 4 5])?

Also when I'm in it... should I keep current vector modification or instead always create a new vector when doing math operation?

[Oldes]

What should be result of: #(uint8! [1 2]) + #(uint32! [3 4])?

[ldci]

In Red, in case of different bit-sizes, the resulting vector will be using the highest bit-size. If a math operation is producing a result that does not fit the bit-size, the result is currently truncated to the bit-size (using a AND operation).

[ldci]

May be simpler to impose the same bit size for both vector :)

[Oldes]

Main question is, if always create a new vector (like Red does) or modify existing one in place like it is now?

[Oldes]

[Oldes]