      function arriv(TA)
 %
 %  Stellt über der Zeitachse die ankommenden Kunden durch einen Pfeil
 %  dar
 %
 %   TA - Vektor mit den Ankunftszeiten
 %
 % J. Lunze
 %
 % 20.10.2004
 % für 2. Auflage: 20.5.2012
 % für 3. Auflage: 27.12.2016
 % 
 %
 for k=1:length(TA)
     plot([TA(k), TA(k)],[0.2 0.1],'k');
     hold on
     plot(TA(k), 0.1, 'kv');
 end