Question: Element-by-element vector division - code speedup ?

Hi all

Can anyone suggest ways of speeding up this code ?

div_vec := proc(a::Vector,b::Vector)
# procedure returns the element-byelement
# division of vector a by vector b
local i,c:
c:=Vector(Dimension(a)):
for i from 1 to Dimension(a) do
c[i]:= a[i]/b[i]:
end do:
return c:
end proc:
Thanks
LR
Please Wait...