%**************************************************************************
%This function plots the phase.
%
%Input:
%plt_file, plot file for results
%z, position along the undulator (m)
%phase, phase relative to cell entrance (rad)
%
%Zachary Wolf, 12/27/05, 6/30/10

function [] = phase_plot_phase(plt_file, z, phase)

%Initialize
figure;
hold on;

%Plot the phase
plot(z, phase, 'linewidth', 2.);

%Labels
title('Phase Relative To Cell Entrance');
ylabel('Phase (rad)');
xlabel('Z (m)');

%Finalize
grid on;
zoom on;
hold off;

%Print
util_print_fig(plt_file);

%Done
