%**************************************************************************
%This function plots the temperature for each data set.
%
%Input:
%plt_file, plot file for results
%date_num, date of the K measurement
%t_ave, average undulator temperature (C)
%input_name, legend for plot
%
%Zachary Wolf, 12/24/07, 4/7/09

function [] = pid_comp_plot_temp(plt_file, date_num, t_ave, input_name)

%Make the plot
figure;
hold all;
for ii = 1 : length(t_ave)
    x = date_num(ii);
    y = t_ave(ii);
    plot(x, y, '*');
end
datetick('x', 'mm/yy', 'keepticks');
title('Temperature For Each Data Set');
xlabel('Date');
ylabel('Temperature (C)');
legend(input_name', 'location', 'northwest');
grid on;
zoom on;
hold off;
util_print_fig(plt_file);

%Done
