
265Homogeneous Reactors
end ;
if count ~= 0
xs = xs/count ;
n = n+1 ;
ys_vec(n) = xs ;
ys = xs ;
end ;
end ;
for jn = 1:(2*(n-1)+1)
if rem(jn,2) == 1 % jn is odd
x_val = ys_vec((jn+1)/2) ;
x3(jn) = x_val ;
y3(jn) = x_val ;
else % jn is even
x_val = ys_vec((jn/2) + 1) ;
y_val = ys_vec(jn/2) ;
x3(jn) = x_val ;
y3(jn) = y_val ;
end ;
end ;
% DISPLAY RESULTS
%_________________________________________________________________
% graph
plot(x1,y1,′-r′,x2,y2,′-b′,x3,y3,′-c′) ;
xlabel(′Xai′) ;
ylabel(′Xai-1′) ;
% display
fprintf(′---------------------------------------------------------- \n’);
fprintf(′NUMBER OF CSTRS IN SERIES \n′) ;
fprintf(′ \n′) ;
fprintf(′Space ...