<!-- ////////////////////////////////////////
//*       JAVASCRIPT: GET FROM LIST       *//
//////////////////////////////- 9/22/2004 -->
		function GetInList (list, index, delim){
			var flag = false, curr = 0;
			var posStart = "", posStop = "";
			if(list.indexOf(delim) == -1) return list;
			for(x=0; x<list.length; x++){
				if( (list.substr(x, 1) == delim) || (flag && (x == (list.length - 1))) ){
					if(index > 0) curr++;
					if(flag){
						if(x == (list.length - 1))	posStop = x + 1;
						else
							posStop = x;
						break;
					}else{
						if(curr == index){ flag = true;
							if(curr == 0){ posStart = 0; posStop  = x; break; }else posStart = x + 1; }
					}
				}
			}
			if(!flag) return false;	else{ return list.substring(posStart, posStop);}
		}
		
		function getObj(n, d) { //v4.01
		  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
			d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
		  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
		  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
		  if(!x && d.getElementById) x=d.getElementById(n); return x;
		}
		
		function isFunction(a) {
			return typeof a == 'function';
		}
		function isObject(a) {
			return (a && typeof a == 'object') || isFunction(a);
		}
		function isArray(a) {
			return isObject(a) && a.constructor == Array;
		}
		
		function buildMenu() {
		document.write("<div id=snav><ul class=navlink>");
			for (i=0;i<lmArray.length;i++){
				if(lmArray[i] && !isArray(lmArray[i])){
					title = GetInList(lmArray[i],0,',');
					url = GetInList(lmArray[i],1,',');
					child = GetInList(lmArray[i],2,',');	
						menuBuilder(title,url,child,i);						
				}else if(lmArray[i] && isArray(lmArray[i])) {
					title = GetInList(lmArray[i][0],0,',');
					url = GetInList(lmArray[i][0],1,',');
					child = GetInList(lmArray[i][0],2,',');	
						menuBuilder(title,url,child,i);	
				}	
			}
			document.write("</ul></div>");
			
			<!-- /////////////////////////////////////////
			//*       LEFT-HAND MENU: SEARCH BOX       *//
			///////////////////////////////- 9/22/2004 -->	
				document.write('\
					<div class="searchbox">\
						<div class="boxtitle"><label for="searchtext">SEARCH WEATHERHEAD:</label></div>\
						<div class="dashedseparator"></div><form action="http://www.google.com/u/wsom" method="get" id="searchform" name="searchform"><input type=hidden name="hq" value="inurl:weatherhead.case.edu" /><input name="q" id="searchtext" type="text" /><input name="sa" id="searchsubmit" type="submit" value="SEARCH" /></form>\
					</div>\
					');				
						
			<!-- ////////////////////////////////////////////
			//*       LEFT-HAND MENU: RELATED LINKS       *//
			//////////////////////////////////- 9/22/2004 -->		
				if(relatedArray.length > 0){
					document.write('<div id="related">\
									<div class="boxtitle">RELATED SITES:</div>\
									<div class="dashedseparator"></div>\
									<ul class="navlink">');
					for (i=0;i<relatedArray.length;i++){
						if (relatedArray[i]){
							title = GetInList(relatedArray[i],0,',');
							url = GetInList(relatedArray[i],1,',');
							if(url=="x"){url="javascript: void(0)"};
							document.write("<li class=navlink><a href='"+url+"'>"+title+"</a></li>");
						}
					}
					document.write('</ul></div>');
				}			
		}
		
<!-- /////////////////////////////////////////////
//*       JAVASCRIPT: SHOW/HIDE SUBMENUS       *//
///////////////////////////////////- 9/22/2004 -->
		function showhideMe(mi,ig){
			if (getObj('menuItem'+mi).style.display=="block"){
				getObj('menuItem'+mi).style.display="none";
			}else{
				for (t=0;t<lastParent;t++){
					if (getObj('menuItem'+t)){
						getObj('menuItem'+t).style.display="none";
					}
				}
				getObj('menuItem'+mi).style.display="block";
			}			
		}
		
<!-- /////////////////////////////////////////////
//*       LEFT-HAND MENU: INTERNAL LINKS       *//
///////////////////////////////////- 9/22/2004 -->
		function menuBuilder(title,url,child,mi){
			if (!child){child=0};
			if (arguments.length > 4){loseLink=arguments[4];}else{loseLink=true;}
			if (url == "x"){url="javascript: void(0)"}	

			selectCheck = new RegExp(((url != "[title]")?url:"-")+"$");			
			isSelected = selectCheck.test(window.location.pathname) && mi > 0;			

			if (isArray(lmArray[mi])){
				for (a=0;a<lmArray[mi].length;a++){
					if (lmArray[mi][a] && !isSelected){
						selectCheck = new RegExp(lmArray[mi][a]+"$");
						isSelected = selectCheck.test(window.location.pathname);
					}
				}				
			}
			
			if (child==0){	
				if (isSelected){
					document.write('<div class="subnav" id="menuItemMain'+mi+'"><ul class=navlink>');
					if (!loseLink){
						document.write("<li class=navlink><p class=selected>"+title+"</p></li>");
					}else if(url == "[title]"){
						document.write('<div class="boxtitle">'+title+'</div>');
					}else{
						document.write("<li class=navlink><a href='"+url+"' "+((url=="javascript: void(0)")?"onclick=showhideMe("+mi+")":"")+">"+title+"</a></li>");
					}								
				}else{
					document.write('<div id="menuItemMain'+mi+'">');
					if (title == "-"){ 
						document.write('<div class="dashedseparator"></div>');
					}else if(url == "[title]"){
						document.write('<div class="boxtitle">'+title+'</div>');
					}else{
						document.write("<li class=navlink><a href='"+url+"' "+((url=="javascript: void(0)")?"onclick=showhideMe("+mi+")":"")+">"+title+"</a></li>");
					}					
				}
				document.write("<div id='menuItem"+mi+"' style='display:none'></div>")	
				document.write('</div>');
				lastParent=mi;
				if (isSelected){showhideMe(lastParent);}
			}else if (child ==1){
				if (isSelected){	
					getObj('menuItemMain'+lastParent).className="subnav";
					getObj('menuItem'+lastParent).innerHTML += ((!loseLink)?"<div style='margin: 0; padding: 0px 3px 0px 15px'><p class=selected>&gt;"+title+"</p></div>":"<div style='margin: 0; padding: 0px 3px 0px 15px'><a href='"+url+"'>&gt;"+title+"</a></div>");
					showhideMe(lastParent);
				}else{
					getObj('menuItem'+lastParent).innerHTML += "<div style='margin: 0; padding: 0px 3px 0px 15px'><a href='"+url+"'>&gt;"+title+"</a></div>";
				}
				
			}
		}
	

