%**************************************************************************
%This function initializes the plot file.  It writes a title page.
%
%Input:
%plt_file, plot file for results
%compare_name, name of the comparison
%input_file, name of the input files
%
%Zachary Wolf, 12/24/07

function [] = cmm_comp_plot_init(plt_file, compare_name, input_file)

%Make a title page for the plots
axes('position', [0, 0, 1, 1], 'visible', 'off');

y_pos = .85;
text(.1, y_pos, 'SLAC Magnetic Measurements', 'FontSize', 12);
y_pos = y_pos - .03;
text(.1, y_pos, 'CMM Analysis Comparison', 'FontSize', 12);
y_pos = y_pos - .06;
text(.1, y_pos, 'Title: ', 'FontSize', 12);
y_pos = y_pos - .03;
text(.1, y_pos, compare_name, 'FontSize', 12);
y_pos = y_pos - .06;
text(.1, y_pos, 'Input Files:', 'FontSize', 12);
[r, c] = size(input_file);
for ii = 1 : c
    y_pos = y_pos - .03;
    print_file = strrep(input_file{:, ii}, '\', '\\');
    print_file = strrep(print_file, '_', '\_');
    text(.1, y_pos, [int2str(ii),') ', print_file], 'FontSize', 12);
end

%Plot the title page
util_print_fig_init(plt_file);

%Done
