%**************************************************************************
%This function plots the x position of the upper pole.
%
%Input:
%plt_file, plot file for results
%pole num, pole number
%x_upper, x position of the upper pole (m)
%
%Zachary Wolf, 9/12/07

function [] = cmm_plot_x_upper(plt_file, pole_num, x_upper)

%Plot the data
figure;
plot(pole_num, x_upper * 1000, 'linewidth', 2.);
title('X Position Of The Upper Pole');
ylabel('X Position (mm)');
xlabel('Pole Number');
grid on;
zoom on;

%Write the figures to the plot file
util_print_fig(plt_file);

%Done
