<!--
var strHTML     = "" // Main body of header HTML code;
var strBuckets  = "" // string built by looping through arBuckets()
var strTopLinks = "" // string built by looping through arHome or arIntra, etc...

var arBuckets              = new Array;
var arBucketLinks          = new Array;
var arHome                 = new Array;
var arHomeLinks            = new Array;
var arTheBook              = new Array;
var arTheBookLinks         = new Array;
var arArticles             = new Array;
var arArticlesLinks        = new Array;
var arOrder                = new Array;
var arOrderLinks           = new Array;
var arContact              = new Array;
var arContactLinks         = new Array;


arBuckets[1]      = "Home"
arBucketLinks[1]  = "/"
arBuckets[2]      = "The Book"
arBucketLinks[2]  = "/TheBook/"
arBuckets[3]      = "Articles"
arBucketLinks[3]  = "/Articles/"
arBuckets[4]      = "Order"
arBucketLinks[4]  = "/order/"
arBuckets[5]      = "Contact"
arBucketLinks[5]  = "/contact/"


arTheBook[1] = "Contents"
arTheBookLinks[1] = "/TheBook/"
arTheBook[2] = "Introduction"
arTheBookLinks[2] = "/TheBook/Intro/"
arTheBook[3] = "Chapter 1"
arTheBookLinks[3] = "/TheBook/Chapter1/"
arTheBook[4] = "Chapter 2"
arTheBookLinks[4] = "/TheBook/Chapter2/Dialogue1"
arTheBook[5] = "Chapter 3"
arTheBookLinks[5] = "/TheBook/Chapter3/"
arTheBook[6] = "Chapter 4"
arTheBookLinks[6] = "/TheBook/Chapter4/"
arTheBook[7] = "Chapter 5"
arTheBookLinks[7] = "/TheBook/Chapter5/"
arTheBook[8] = "Appendix A"
arTheBookLinks[8] = "/TheBook/AppendixA/"
arTheBook[9] = "Appendix B"
arTheBookLinks[9] = "/TheBook/AppendixB/"
arTheBook[10] = "Glossary"
arTheBookLinks[10] = "/TheBook/Glossary/"


// BucketNumber and TopLinkNumber are defined in individual pages
// BucketNumber defines which tab will be Blue
// TopLinkNumber defines which Top Link will be yellow (and which TopLink page we're currently on.
// The following script confirms that both variables are properly defined
// and if not, defines the BucketNumber as 1 (Home, usually)
if (BucketNumber>arBucketLinks.length || BucketNumber == 0) {BucketNumber = 1}

// The following script confirms that there are no illegal characters in the
// bucket names, since the bucket names are used to eval their respective arrays.
// Note that the replace() function won't work in browsers running less than Javascript 1.2,
// so for browsers older than version 4.0 we must manually change the bucket name
// to the value required to piece together the array name
// Example: arBuckets[4] = "e-Business", but the e-Business TopNav array name is "arInformation[]"
// because hyphens are not allowed. Therefore, for older browsers we must say:
// if (sAr=='e-Business') {sAr = 'eBusiness'} in order to make sure that "ar" + sAr = [the array name]
// and "ar" + sAr + "Links" = [the link array name]
var sAr = arBuckets[BucketNumber];
if (isNS || isIE) {
  if (sAr.indexOf(' ')) {sAr = sAr.replace(' ','')} // Replace an empty space
  if (sAr.indexOf('-')) {sAr = sAr.replace('-','')} // Replace a hyphen
  if (sAr.indexOf('\'')) {sAr = sAr.replace('\'','')} // Replace an apostrophe
} else {
  if (sAr=='e-Business') {sAr = 'eBusiness'}
}
var LinkArrayLength = eval('ar'+sAr+'.length');
if (TopLinkNumber>=LinkArrayLength) {TopLinkNumber = 0}

// If the highlighted tab is for Intranet, Extranet, or e-Business, the main colors
// of the page are red instead of blue. This would need to be changed if localizing
// and the site only has 2 buckets, for example, or if the site needs different buckets to be red
var isRed = false;	// All buckets are *NOT* red by default
//mpsout if (BucketNumber==2 || BucketNumber==3 || BucketNumber==4) {isRed = true}  // The specified buckets *ARE* red

// Create the buckets HTML string
strBuckets = "<TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0><TR>\n"
var b,t,sColor
for (b=1;b<arBuckets.length;b++) {
  if ((b==BucketNumber && !isRed) || (b!=BucketNumber && isRed)) {sColor = "333399"}
  if ((b==BucketNumber && isRed) || (b!=BucketNumber && !isRed)) {sColor = "cc3300"}
  strBuckets += "<TD WIDTH=3>&nbsp;</TD><TD WIDTH=101 VALIGN=BOTTOM>\n" +
                "  <TABLE WIDTH=104 CELLPADDING=0 CELLSPACING=0 BORDER=0>\n" +
                "    <TR>\n" +
                "      <TD WIDTH=104 COLSPAN=3><IMG SRC='/global/images/tb_buckets_top_"+sColor+".gif' WIDTH=104 HEIGHT=6><BR></TD>\n" +
                "    </TR>\n" +
                "    <TR>\n" +
                "      <TD WIDTH=8><IMG SRC='/global/images/tb_buckets_left_"+sColor+".gif' WIDTH=8 HEIGHT=17><BR></TD>\n" +
                "      <TD WIDTH=86 ALIGN=CENTER BGCOLOR=#"+sColor+"><IMG SRC='/global/images/clear.gif' WIDTH=88 HEIGHT=1><BR><FONT FACE='Arial,Helvetica' SIZE=2 COLOR=#ffffff CLASS='buckettext'><A HREF='\n" + arBucketLinks[b] + "' CLASS='buckettext'>\n" + arBuckets[b] + "</A></FONT><BR></TD>\n" +
                "      <TD WIDTH=10><IMG SRC='/global/images/tb_buckets_right_"+sColor+".gif' WIDTH=10 HEIGHT=17><BR></TD>\n" +
                "    </TR>\n" +
                "  </TABLE>\n" +
                "</TD>\n"
}
strBuckets += "<TD WIDTH=10>&nbsp;</TD></TR></TABLE>\n"

// Create the TopLinks string
strTopLinks += "<TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0><TR><TD WIDTH=100% COLSPAN=2><IMG SRC='/global/images/clear.gif' WIDTH=1 HEIGHT=4><BR></TD></TR><TR><TD><IMG SRC='/global/images/clear.gif' WIDTH=1 HEIGHT=1></TD><TD><FONT FACE='Arial,Helvetica' SIZE=2 COLOR=#ffffff CLASS='topnavlinks'><nobr>"
var strArItem,strArLink;
for (t=1;t<LinkArrayLength;t++) {
  strArItem = eval('ar'+sAr+'['+t+']');
  strArLink = eval('ar'+sAr+'Links['+t+']');
  if (t == TopLinkNumber) {
    strTopLinks += " &nbsp;<A HREF='" + strArLink + "' CLASS='topnavlinksactive'>" + strArItem + "</A>&nbsp; "
  } else {
    strTopLinks += " &nbsp;<A HREF='" + strArLink + "' CLASS='topnavlinks'>" + strArItem + "</A>&nbsp; "
  }
  if (t<LinkArrayLength-1) {
    strTopLinks += " | "
  }
}
strTopLinks += "&nbsp;</nobr><BR></FONT></TD></TR><TR><TD WIDTH=100% COLSPAN=2><IMG SRC='/global/images/clear.gif' WIDTH=1 HEIGHT=4><BR></TD></TR></TABLE>"

if (isRed) {sColor="cc3300"} else {sColor="333399"}
strHTML =  "<TABLE WIDTH=100% CELLPADDING=0 CELLSPACING=0 BORDER=0 BGCOLOR=#ffffff>" +
           "  <TR BGCOLOR=#ffffff>" +
           "    <TD WIDTH=285 ROWSPAN=2 ALIGN=CENTER><B><BR><font face='Arial, Helvetica, sans-serif' size='5' color='#333399'>Understanding Reality</font></B><BR><br></TD>" +
           "    <TD ALIGN=RIGHT><B><font face='Arial, Helvetica, sans-serif' size='3' color='#333399'><BR>By Stefan Hlatky and Philip Booth&nbsp&nbsp&nbsp</font></B><BR></TD>" +
           "    <TD ALIGN=RIGHT><BR></TD>" +
           "  </TR>" +
           "  <TR BGCOLOR=#ffffff>" +
           "    <TD VALIGN=BOTTOM ALIGN=RIGHT>" + strBuckets + "</TD>" +
           "  </TR>" +
           "  <TR BGCOLOR=#"+sColor+">" +
           "    <TD COLSPAN=2 ALIGN=RIGHT>" + strTopLinks + "</TD>" +
           "  </TR>" +
           "</TABLE>"

document.write(strHTML)
//-->