function [ EBENE_NEU ] = Sortieren_Ebenen( EBENE )
%SORTIEREN_EBENEN Summary of this function goes here
%   Detailed explanation goes here

    X=EBENE(1,1);
    Y=EBENE(1,2);
    Z=EBENE(1,3);
    
    EBENE(1,:)=[];
    
    EBENE_NEU=[X Y Z];

    n=size(EBENE,1)
    while n>0
        
        Anz=size(EBENE,1);
        Min=50000000000;
        for i=1:Anz
            
            R=sqrt(((EBENE(i,1)-X)*(EBENE(i,1)-X))+(EBENE(i,2)-Y)*(EBENE(i,2)-Y));
            
            if R<Min
                Min=R;
                j=i;
            end
        end
        X=EBENE(j,1);
        Y=EBENE(j,2);
        Z=EBENE(j,3);
        EBENE(j,:)=[];
        EBENE_NEU=[EBENE_NEU; X Y Z];
        n=n-1;
    end
end

