diff --git a/src/foo.m b/src/foo.m
index c1c6e8593005c3e58be08007c8841d6bae2963aa..b7d127550731dc762154a19d90de8018e7ff7bce 100644
--- a/src/foo.m
+++ b/src/foo.m
@@ -13,11 +13,8 @@ ylabel('y')
 
 tic
 for i=1:length(y)
-  a = zeros(2,length(x));
-  for j=1:length(x)
-    a(:,j) = [ X(i,j); Y(i,j) ];
-  end
-  f(i,:) = duneevaluate(a);
+  in = [ X(i,:); Y(i,:) ];
+  f(i,:) = duneevaluate(in);
 end
 clear X Y;
 toc