diff --git a/matlab/kordpert/dr1_k_order.m b/matlab/kordpert/dr1_k_order.m
index 1adf9c426..826c9e602 100644
--- a/matlab/kordpert/dr1_k_order.m
+++ b/matlab/kordpert/dr1_k_order.m
@@ -173,7 +173,7 @@ function [dr,info,M_,options_,oo_] = dr1(dr,task,M_,options_,oo_)
  %                      end
                    elseif s0 < nspred+nExog & s1 < nExog% nspred+nExog%+1
                        for j=1:g_2rows
-                           ghuu(j,(s0-nspred)*nExog+s1-nExog+1) = 2*g_2(j,i);
+                           ghuu(j,(s0-nspred)*nExog+s1+1) = 2*g_2(j,i);
                        end
                    else
                        for j=1:g_2rows