function maus2=T9_A2b_markus(maus)
%% Funktion zum löschen von Mäusen aus der Kartei
maus_gestorben=input('Geben Sie die Nummer der Ohrmarke der toten Maus ein um sie aus der Datei zu loeschen: ','s'); %Eingabe der Nummer der Ohrmarke

[N,n]=size(maus); % klein 'n' = Anzahl der Spalten/Tiere

pos=1;
tot=0;
while pos<=n & tot==0       %solange pos kleiner als n ist und noch keine Maus gelöscht wurde soll die Schleife durchlaufen 
    if isequal(maus_gestorben,maus(pos).ohrmarke) %Wenn die eingegebene Nummer gleich der Nummer aus Datei maus(pos).ohrmarke ist:        
        maus(pos)=[];       %löschen der Maus an Position pos der Datei Maus
        tot=1;              %tot wird gleich 1 gesetzt um ein erneutes Durchlaufen der while-Schleife zu verhindern,
                            %da die tote Maus nun aus der Datei gelöscht ist und die Aufgabe erledigt erledigt ist.
    end
    pos=pos+1;              %Falls der Nutzer eine Nummer eingeben würde die nicht existiert, so würde die Schleife ewig laufen. 
                            %Deshalb soll bei jedem Durchlauf pos um +1
                            %erhöht werden. So ist nach n Durchläufen pos=n und die Schleife beginnt nicht noch einmal
end

maus2=maus;

%Hier wird die neue Tabelle maus2 mit der alten Tabelle maus verglichen.
[N2,n2]=size(maus2);        
if n==n2                %falls die Anzahl der Spalten von maus und maus2 gleich ist, so wurde keine Maus aus der Datei gelöscht.
    falsche_eingabe=input('Die Angegebene Nummer existiert nicht. Moechten sie die Nummer erneut eingeben? (j/n)','s');
    if isequal(falsche_eingabe,'j'); %Falls der Nutzer erneut eine Nummer eingeben möchte so soll das Programm nochmals durchlaufen:
       maus2=T9_A2b_markus(maus);
    
    else
    disp('Der Vorgang wurde vom Benutzer beendet.'); %falls der Nutzer dies nicht möchte, ist das Programm nun beendet
    end
end

%if ~(isequal(maus2,maus))
 %   maus2
%end