% Copyright (C) 2001 Michel Juillard
%
function y=ff1_(x)
global it_ exo_nbr ex_ xkmin_ ykmin_ fname_

n1 = size(x,1) - exo_nbr;
ex_(it_+xkmin_-ykmin_,:) = x(n1+1:end)';
fh = str2func([fname_ '_ff']);
y=feval(fh,x(1:n1));



