% zakladni novokeynesiansky model

!transition_variables
  y_gap, i, pie, r, r_gap

!transition_shocks
  eps_y     % poptavkovy sok
  eps_pie   % nabidkovy sok
  eps_i     % monetarni sok
  
!parameters
  a1 = 0.8;    % param IS krivka
  a2 = 0.4;    
  b1 = 0.7;    % param PC krivka 
  b2 = 0.2;
  c1 = 0;      % param MP
  c2 = 1.5;
  c3 = 0.5;
  target = 2;
  r_tnd = 1;
  
!transition_equations       
  % IS krivka
    y_gap =  a1*y_gap{-1}  - a2*r_gap + eps_y;
  % Phillipsova krivka
    pie - target =  b1*(pie{-1} - target) + (1-b1)*(pie{+1} -  target) + b2*y_gap + eps_pie;
  % Taylorovo pravidlo
    i = c1*i{-1} + (1-c1)*(r_tnd + pie{+1} + c2*(pie{+1} - target) + c3*y_gap) + eps_i;
  % Fisher equation
    r = i - pie{+1};
  % Real interest rate gap identity
    r_gap = r - r_tnd;
    