clear                     % Clear variables
close all                 % Close figures
% Enter function
fn = @(x) x.^2;
%fn = @(x) exp(x);

t = -2: 0.05: 2;

subplot(1,2,1)              % Left plot
axis( [-2,2, -2,2] )        % Domain window
axis square;
set(gca,'FontSize',12)
xlabel('\itx','FontSize',12)
ylabel('\ity','FontSize',12,'Rotation',0)
hold on

% Domain Lines
plot((1)*i+t,'k')           % Horizontal
plot((1)+i*t,'b--')         % Vertical

subplot(1,2,2)              % Right plot 
axis( [-4,4, -4,4] )        % Range window
axis square; 
set(gca,'FontSize',12)
xlabel('u','FontSize',12)
ylabel('\itv','FontSize',12,'Rotation',0)
hold on

% Image Curves
plot(fn((1)*i+t),'k')
plot(fn((1)+i*t),'b--')
hold off