clear;
warning('off','all');
format long
bet    = 0.99; 
sig    = 1;
ome    = 0.75;
eeta   = 3;
del_x  = 50;
del_pi = 60;
gam    = (sig + eeta) * (1-ome) * (1-ome*bet) / ome;
istar  = 0;
zet    = 0.5; % Erinnerungsparameter
pphi   = 8; % Rationalit?tsparameter
noise  = 0.2; % White Noise Prozess 
alp_1= 1;
alp_2= 0.5;
alp_3= 0.1;

del0=[del_pi del_x];
options=optimset('Display','iter');
[delopt,minloss,exitflag,output]=fminsearch(@Dynamik_Grundmodell,del0,options)
%loss1=Dynamik_Grundmodell(del0);
%Plot_Grundmodell(res);
%fmin(res);