function Z=vecop1(F,X,Y)
% vecop1 - apply binary function to different sized arrays
%
% vecop1 ::
%    ([[D]],[[D]]->[[D]])  ~'some function requiring equal size args',
%    [[DX]]                ~'first arg of size DX',
%    [[DY]]                ~'second arg of size DY'
% -> [[DX]]                ~'result of size DX' :- all(DX>=DY).
%
% this is a slightly simpler version of vecop that assumes that the
% first argument is at least as big as the second in every dimension.
Z=feval(F,X,repmat_to(Y,size(X)));

