function add_html_headers(fid)
% ADD_HTML_HEADERS: Adds some header and body data to experiments HTML
%
%    GENERAL
%
%      add_table_index(fid)
%
%    INPUT/S
%
%      -
%           
%    OUTPUT/S
%
%      -.
%
%    PENDING WORK
%
%      -
%
%    KNOWN BUG/S
%
%      -
%
%    COMMENT/S
%
%      -
%
%    RELATED FUNCTION/S
%
%      
%
%    ABOUT
%
%      -Created:     April 27th , 2004
%      -Last update: April 27th , 2004
%      -Revision:    0.0.1
%      -Author:      R. S. Schestowitz, University of Manchester
% ==============================================================

fprintf(fid, ['<HTML><HEAD><TITLE>AART Experiments</TITLE>\n']);
fprintf(fid, ['<link rel="stylesheet" href="../../exp.css" type="text/css">\n']);
fprintf(fid, ['</head>\n']);
fprintf(fid, ['<BODY background="../../fg.gif">\n']);
fprintf(fid, ['<A NAME="top" HREF="../../index.htm">Index</A>\n']);
fprintf(fid, ['<table align=center height=120 width=100%% cellspacing=0> \n']);
fprintf(fid, ['<td background="../../middle.gif"align=center valign=center> \n']);
fprintf(fid, ['<H1>AART Experiments</H1>\n']);
fprintf(fid, ['</td>\n']);
fprintf(fid, ['</table>\n']);
fprintf(fid, ['<HR SIZE=5>\n']);
fprintf(fid, ['<B>This page is automatically generated</B>\n']);
fprintf(fid, ['<BR>\n']);
fprintf(fid, ['<B>Person responsible for this page is Roy Schestowitz</B>\n']);
fprintf(fid, ['<HR SIZE=5>\n']);
fprintf(fid, ['<BR>\n']);
