fc_setFrame_circle(activ, plot_coords, timeFrame, circular_plot_axes)

function []  = fc_setFrame_circle(activ, plot_coords, timeFrame, circular_plot_axes)

% Called when the current animation frame is changed by the slider or the
% editbox. The activ nodes (1s in activ matrix) at that timeFrame are
% plotted on circular_plot_axes using plot_coords

axes(circular_plot_axes);
hold on;
[noOfTimeSteps, noOfNodes_withRemovals] = size(activ);

if timeFrame > noOfTimeSteps
    errordlg(['Error with animation - time frame ' timeFrame ' not found in activ matrix'])
    return;
end

for nodeCounter = 1: noOfNodes_withRemovals
    if activ(timeFrame, nodeCounter) == 0
        plot(plot_coords(nodeCounter,1), plot_coords(nodeCounter,2), 'r.', 'markerSize', 20);
    else
        plot(plot_coords(nodeCounter,1), plot_coords(nodeCounter,2),'g.', 'markerSize', 20);
    end
end

hold off

return