function lab07_pelda2_matlab2015
% elsorendu, egyvaltozos differencialegynelet megoldasa,
% egy egyszeru aramkorben egy kapacitas toltoaramanak viselkedese
% 2015. 04. 17.

    format long;
    
    V0 = 2; % V
    R = 1E3; % Ohm
    C = 5E-4; % Farad
    tau = R*C;

    % a diffegyenlet megadasa anonim fv.-kent
    F = @(t,y) -1/tau*y;
    % megoldas a [0 1] intervallumon, V0/R kezdeti ertekre
    [t_rc y_rc] = ode45(F, [0 1], V0/R);

    figure;
    hold on;
    plot(t_rc, y_rc, 'LineWidth',2);

    % analitikus megoldas
    t=0:0.001:1;
    I=V0/R*exp(-t/tau);
    plot(t, I, 'r--', 'LineWidth',2);

    title('Kondenzator kisulese', 'FontSize', 14);
    xlabel('t', 'FontSize', 12, 'FontWeight', 'bold');
    ylabel('i(t) [A]', 'FontSize', 12, 'FontWeight', 'bold');
    legend('ode45','analitikus');

end