%
%  this routine compares the predicted response with the real response
%
figure;
hold on
plot(time,x1,'-','Linewidth',1);
plot(m_time,m_y,':','Linewidth',4);
grid; 
legend('Measured','Predicted');
axis([0 Tf min(min(x1),min(m_y)) max(max(x1),max(m_y))]);
xlabel('Time (sec)');
ylabel('Displacement (cm)');
hold off