I can not solve equations

[Takeshi Inao]

 I can not solve equations in m-file.

 The m-file is following.
 please help me.
 
 
 
 -------------------
 
 load -force tool
 yy=102;
 func1 = ["y(1)=",num2str(yy)];
 func2 =
 ["y(2)=(x(1)-",num2str(tool(i,2)),")2+(x(2)-(",num2str(tool(i,3)),"+",num2str(tool(i,1)),"/360*",num2str(deltaf),"))2"];

 function y = f( x )
 func1;
 func2;
 endfunction
 
 [x,info]=fsolve("f",[-3,13]);
 
 
 --------------
 error messages is following.
 
 error: function keyword invalid within a function body
 error: defining new function near line 23 of file `cut.m'
 parse error near line 23 of file /home/fidelio/.myoctave/newjuni2003/cut.m
 
 >>> function y = f( x )
 ^
 
 error: `cut' undefined near line 1 column 1
 error: evaluating _expression_ near line 1, column 1