function pcalc()
N = 60;
a = zeros(N,1);

% Time consuming loop
tic
parfor (i = 1:N)
    a(i) = iFunctionTakesLongTime();
    % Other computations;
end
toc
%
plot(a);
figure(1)
end

function o = iFunctionTakesLongTime()
    o = max(abs(eig(rand(300))));
end
