function eps_maker(filename)

%filename = input('please input your file name here: ');

k = findstr(filename,'.');
filename_trunc = filename(1:k-1);

A = imread(filename);

figure('Visible', 'off');
imshow(A);

print('-depsc', [filename_trunc, '.eps']);
close;

%input('press any key to continue');