% slide.m 
% create a slider 
% drag = the handle of the slider
% vector = m-file containing the callback action
% 990901 /stig 

disp(You must define a 2x2 matrix A!!) 
figure(1)
clf
drag = uicontrol(...
          'Style',      'slider', ...
          'Position',   [20 320 100 20], ...
          'SliderStep', [0.001 0.01], ...       % small step, big step
          'Callback',   'vector');



