A = [0 1 0 0 0;  %Matrix des Gleichungssystems
     1 -4 1 0 0 ; 
     0 1 -4 1 0;
     0 0 1 -4 1;
     0 0 0 -1 1]
 
 for k = 1:nnod %Zusammenfassung zu einem Tensor
   A_tensor(:,:,k) = A;
 end

Y = reshape( A,1,25 ); %Erstellung des ersten Vektors 

 for k = 2:nnod
   Layer = A_tensor(:,:,k); %Jede Schicht einzeln aus dem Tensor holen
   Y = reshape( Layer,1,25 )+Y; %Vektor aufaddieren
 end

Y' %Zusammengefasster Tensor für den ode15s