% Bloch Equation Simulation, Excercise C-2c
% -----------------------------------------
% 

fplot('abs(sesignal(600,100,x,4000,0))',[0,500],'b-');
hold on;
fplot('abs(sesignal(1000,150,x,4000,0))',[0,500],'r--');
fplot('abs(sesignal(600,100,x,4000,0))-abs(sesignal(1000,150,x,4000,0))',[0,500],'g-.');

grid on;
xlabel('TR (ms)');
ylabel('Signal');
title('Signals vs TR');
legend('Tissue A','Tissue B','A-B');
axis([0 500 -.2 1]);
hold off;