function?[gentimer]=xiashan（faTOL1TOL2rminN）
%TOL2為殘量精確度，TOL1為根的誤差限
df=diff（sym（f））;
x1=a;
time=0;
r=1;?%r為下山因子
if?abs（subs（fx1））????gen=x1;?return?
end
while?time????time=time+1;
????r=1;
????df1=subs（dfx1）;
????fx=subs（fx1）;
????if?df1==0
????????error
????end
????gen=x1-r*fx