At one step of my code I need to define an array of functions which I will later use.

Simplified version of it to highlight the problem:

restart:with(linalg):
procG:=proc(a,b) if a>b then a-b else 0 end if end proc:
F:=vector(2):
for i from 1 to 2 do F[i]:=x->i*procG(x,0) end;

In the actual code array is much bigger and the expression for each function is much more complicated so using the cycle is a real 'must'.

Instead of F[1...