add_table_index

 ==============================================================
 ADD_TABLE_INDEX: Adds entries on top of experiments index

    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
 ==============================================================

0001 function add_table_index(fid)
0002 % ==============================================================
0003 % ADD_TABLE_INDEX: Adds entries on top of experiments index
0004 %
0005 %    GENERAL
0006 %
0007 %      add_table_index(fid)
0008 %
0009 %    INPUT/S
0010 %
0011 %      -
0012 %
0013 %    OUTPUT/S
0014 %
0015 %      -.
0016 %
0017 %    PENDING WORK
0018 %
0019 %      -
0020 %
0021 %    KNOWN BUG/S
0022 %
0023 %      -
0024 %
0025 %    COMMENT/S
0026 %
0027 %      -
0028 %
0029 %    RELATED FUNCTION/S
0030 %
0031 %
0032 %
0033 %    ABOUT
0034 %
0035 %      -Created:     April 27th , 2004
0036 %      -Last update: April 27th , 2004
0037 %      -Revision:    0.0.1
0038 %      -Author:      R. S. Schestowitz, University of Manchester
0039 % ==============================================================
0040 
0041 fprintf(fid, ['<H2>Experiments sub-index</H2>For all indices, confer the <A HREF="../../index.htm">primary index</A>.<BR><BR>']);
0042 
0043 if (strcmp(getenv('OS'), 'Linux')),
0044       fprintf(fid, ['\n<P><CENTER><TABLE WIDTH=100%% BORDER=BOX CELLPADDING=10 CELLSPACING=3 BACKGROUND="../../scbg.gif"><TD ALIGN=CENTER WIDTH=33%%><H3>Handle</H3></TD><TD ALIGN=CENTER WIDTH=33%%><H3>Completion Time</H3></TD><TD ALIGN=CENTER WIDTH=33%%>']);
0045       fprintf(fid, ['\n<H3>Description</H3></TD></TABLE></CENTER></P>']);     
0046       
0047 else
0048       fprintf(fid, ['\n<P><CENTER><TABLE WIDTH=100%% BORDER=BOX CELLPADDING=10 CELLSPACING=3 BACKGROUND="../../scbg.gif"><TD ALIGN=CENTER WIDTH=33%%><H3>Handle</H3></TD><TD ALIGN=CENTER WIDTH=33%%>']);
0049       fprintf(fid, ['\n<H3>Description</H3></TD></TABLE></CENTER></P>']);
0050 end