function dAdt=ode_warfarin(t,A,KDE,Emax,gamma,EDK50,mtt1,mtt2)

DR=KDE*A(1);

EFF=Emax*DR^gamma/(EDK50^gamma+DR^gamma);

dAdt=[-KDE*A(1)
       (1-EFF)*3/mtt1-A(2)*3/mtt1
       A(2)*3/mtt1-A(3)*3/mtt1
       A(3)*3/mtt1-A(4)*3/mtt1
       (1-EFF)*3/mtt2-A(5)*3/mtt2
       A(5)*3/mtt2-A(6)*3/mtt2
       A(6)*3/mtt2-A(7)*3/mtt2];