<!--

//Smart Folding Menu tree- By Dynamic Drive (rewritten 03/03/02)
//For full source code and more DHTML scripts, visit http://www.dynamicdrive.com
//This credit MUST stay intact for use
//Modified by Jürgen Failenschmid 9-2003: use class instead of id, added foldleaf, added expand
//*** openImage and closedImage must be preloaded Image instances ***
//*** style classes foldheader, foldlist, foldleaf must be defined ***

var head="display:''"

var ns6=document.getElementById&&!document.all
var ie4=document.all&&navigator.userAgent.indexOf("Opera")==-1

function makeExpanded(list) {
	list.style.display=''
	// now look for preceding foldheader element
	var i = list.sourceIndex - 1
	while (i >= 0 && document.all[i].className!="foldheader") i--
	document.all[i].style.listStyleImage="url("+openImage.src+")"
}

function expand(depth) {
	var d
	var idName
	var i
	var uls
	var sublists
	if (ns6) uls = document.getElementsByTagName("UL")
	if (ie4) uls = document.all.tags("UL")
	for (d=1; d<=depth; d++) {
		idName = 'list' + d
		if (ns6){ 
			sublists = uls
			for (i=0;i<sublists.length;i++){
				if (sublists[i].id==idName){
					sublists[i].style.display=''
					sublists[i].previousSibling.previousSibling.style.listStyleImage="url("+openImage.src+")"
				}
			}
		}
		
		if (ie4){
			sublists = uls(idName)
			if (sublists != null) {
				if (sublists.length==undefined)
					makeExpanded(sublists)
				else
					for (i=0;i<sublists.length;i++)
						makeExpanded(sublists[i])
			}
		}
	
	}
}

function checkcontained(e){
	var iscontained=0
	cur=ns6? e.target : event.srcElement

	if (cur.className=="foldheader")
		iscontained=1
	else
		while (ns6&&cur.parentNode||(ie4&&cur.parentElement)){
			if (cur.className=="foldheader"||cur.className=="foldlist"||cur.className=="foldleaf"){
				iscontained=(cur.className=="foldheader")? 1 : 0
				break
			}
			cur=ns6? cur.parentNode : cur.parentElement
		}
	if (iscontained){ // clicked on header entry

		var foldercontent=ns6? cur.nextSibling.nextSibling : cur.all.tags("UL")[0]
		if (foldercontent.style.display=="none"){
			foldercontent.style.display=""
			cur.style.listStyleImage="url("+openImage.src+")"
		}
		else{
			foldercontent.style.display="none"
			cur.style.listStyleImage="url("+closedImage.src+")"
		}
	}

}

if (ie4||ns6)
	document.onclick=checkcontained

//-->