% plot RCs

    t = [10 30 60];        % t in micro secs
    titleStr = 'RC Voltage Falloff Levels at Sampled Times';
    
    t = t*1e-6;

    RC = linspace(0, 30e-6, 2^10);
    for i=1:3
        v(i,:) = 5*exp(-t(i)./RC);
    end
    
    % Plot results of LCRs and ADFs
    % Initialise new figure window to be 3/4 the size of the screen
	set(0,'Units','Pixels');
	scr = get(0,'ScreenSize');
	handle = figure('Position',[scr(3)/10 scr(4)/10 4*scr(3)/5 4*scr(4)/5],...
        'Units','centimeters');
    
    plot(RC*1e+6, v, 'LineWidth',2);
    title(titleStr, 'FontWeight', 'bold', 'FontSize', 10);
    xlabel('\tau (RC)');
    ylabel('Voltage (V)');
    grid on;
    legLabel1 = strcat('t = ', num2str(t(1)*1e+6),'\mus');
    legLabel2 = strcat('t = ', num2str(t(2)*1e+6),'\mus');
    legLabel3 = strcat('t = ', num2str(t(3)*1e+6),'\mus');
    legend(legLabel1, legLabel2, legLabel3,1);