Комментарии к коду

Не могли бы вы помочь подписать комментарии к коду дабы я смог разобрать его Реализация кода MatLab с одной серверной очередью без ввода (с рисунком):

 total=0; busy=0;

%a=randi([0 8],1,8);

 a=[.4 1.6 2.1 3.8 4.0 5.6 5.8 7.2];

a_length=length(a);

arr=zeros(a_length);

%d=randi([0 9],1,5);

d=[2.4 3.1 3.3 4.9 8.6];

b=union(a,d);

l=length(b);

a_t=0;d_t=0;q=0;

axis([0 b(length(b))+1 0 length(a)]);


%Queue delay Time

figure(1);

title('Queue Delay Time');

for i=1:l-1

   a_m=ismember(a,b(i));

   d_m=ismember(d,b(i));

   if sum(a_m)>=1

       a_t=a_t+1;

   end

   if sum(d_m)>=1

       d_t=d_t+1;

   end

   dif=a_t-d_t;

   if dif>1

       rectangle('Position',[b(i) 0 b(i+1)-b(i) dif-1],'FaceColor',[0 .5 .5]);

       arr(dif)=arr(dif)+(b(i+1)-b(i));

   end

   if dif>0

       busy=busy+(b(i+1)-b(i));

   end

end


%Server Busy Time

b_t=0;

figure(2);

title('Server Busy Time');

axis([0 b(length(b))+1 0 length(a)]);

for i=1:l-1

   a_m=ismember(a,b(i));

   d_m=ismember(d,b(i));

   if sum(a_m)>=1

       b_t=b_t+1;

   end

   if sum(d_m)>=1

       b_t=b_t-1;

   end

   if b_t>0

       rectangle('Position',[b(i) 0 b(i+1)-b(i) 1],'FaceColor',[0 .5 .5]);

   end

end

for i=1:a_length
   
 total=total+arr(i)*(i-1);

end

disp(total);

disp(total/d(length(d)));

disp(busy);

disp(busy/d(length(d)));