%**************************************************************************
%This function plots the requested and actual field changes from the shims
%used to set the gap.
%
%Input:
%plt_file, plot file for results
%anal_name, name of the analysis
%pole_num_no_ends, pole number, no ends
%dbrel_no_ends_requested, dB/B requested, no ends
%dbrel_no_ends_actual, dB/B actual, no ends
%
%Zachary Wolf, 4/3/07

function [] = shim_effect_plot_setgap(plt_file, anal_name, pole_num_no_ends, dbrel_no_ends_requested, dbrel_no_ends_actual)

%Plot the reference field
figure;
hold on;
plot(pole_num_no_ends, dbrel_no_ends_requested, 'b-', 'linewidth', 1.);
plot(pole_num_no_ends, dbrel_no_ends_actual, 'r-', 'linewidth', 1.);
title(anal_name);
xlabel('Pole Number, No Ends');
ylabel('dB / B');
legend('Requested', 'Actual', 'location', 'northwest');
grid on;
zoom on;
hold off;
util_print_fig(plt_file);

%Done
