%
% SIRdelay_dde23.m
%
% MATLAB vector field function for: SIRdelay
%
% This file was generated by the program VFGEN (Version:2.1.0)
% Generated on  3-Jun-2007 at 12:24
%
%
% The lags are: {tau}
%
function vf_ = SIRdelay_dde23(t,x_,Zlags_,p_)
    % State variables
    S          = x_(1);
    In         = x_(2);
    R          = x_(3);
    % Parameters
    alpha      = p_(1);
    tau        = p_(2);

    delayedS = Zlags_(1,1);
    delayedIn = Zlags_(2,1);
    vf_ = zeros(3,1);
    vf_(1) = -alpha*In*S;
    vf_(2) = (In*S-delayedS*delayedIn)*alpha;
    vf_(3) = delayedS*alpha*delayedIn;

