function v = Regelgesetz(x)

Ts = evalin('base', 'Ts');
% v = evalin('base', 'v');
x= Ts\x;
assignin('base', 'x', x);
v0 = 0.5;
options=optimset('MaxIter',400,'Display','iter','MaxFunEvals',300,'TolFun',1e-8,'TolX',1e-6);%'Display','final'
[v] = fsolve(@myfun,v0,options);
% [v,fval] = fminbnd(@myfun,v0,1,options)
% [v] = fminsearchbnd(@myfun,v0,1,options);
% [v,fval] = fmincon(@myfun,v0,[],[],[],[],0.1,1,[],options);
% [v,fval] = fminunc(@myfun,v0,options)
if v>1
    v=1;
end
assignin('base', 'v', v);