function [D]=T2_H6(M)
%Elemente auf der Diagonalen einer quadratischen Matrix werden als Vektor zurueckgegeben
k=size(M,1)%Bestimmung der Spalten- bzw. Zeilenzahl (gleich bei Quadratmatrix)
D=[M(1:k+1:k*k)]%Erzeugen eines Vektors; Beginn mit der Zeile/Spalte 1, Abstand ist die Spaltenzahl plus 1, Durchzählen bis zum Endpunkt letzte Zeile, letzte Spalte