function verifyCompatibleBrowser(){
    this.ver=navigator.appVersion
    this.dom=document.getElementById?1:0
    this.ie5=(this.ver.indexOf("MSIE 5")>-1 && this.dom)?1:0;
    this.ie4=(document.all && !this.dom)?1:0;
    this.ns5=(this.dom && parseInt(this.ver) >= 5) ?1:0;

    this.ns4=(document.layers && !this.dom)?1:0;
    this.bw=(this.ie5 || this.ie4 || this.ns4 || this.ns5)
    return this
}
bw=new verifyCompatibleBrowser()


var speed=50

var loop, timer

function ConstructObject(obj,nest){
    nest=(!nest) ? '':'document.'+nest+'.'
    this.el=bw.dom?document.getElementById(obj):bw.ie4?document.all[obj]:bw.ns4?eval(nest+'document.'+obj):0;
    this.css=bw.dom?document.getElementById(obj).style:bw.ie4?document.all[obj].style:bw.ns4?eval(nest+'document.'+obj):0;
    this.scrollWidth=bw.ns4?this.css.document.width:this.el.offsetWidth
    this.clipWidth=bw.ns4?this.css.clip.width:this.el.offsetWidth
    this.up=MoveAreaUp;this.down=MoveAreaDown;
    this.MoveArea=MoveArea; this.x; this.y;
    this.obj = obj + "Object"
    eval(this.obj + "=this")
    return this
}

function MoveArea(x,y){
    this.x=x;this.y=y
    this.css.top=this.y+'px'
    this.css.left=this.x+'px'
}

function MoveAreaDown(move){
	if(this.x>-this.scrollWidth+objContainer.clipWidth){
    this.MoveArea(this.x-move,0)
    if(loop) setTimeout(this.obj+".down("+move+")",speed)
	}
}
function MoveAreaUp(move){
	if(this.x<0){
    this.MoveArea(this.x-move,0)
    if(loop) setTimeout(this.obj+".up("+move+")",speed)
	}
}

function PerformScroll(speed){
	if(initialised){
		loop=true;
		if(speed>0) objScroller.down(speed)
		else objScroller.up(speed)
	}
}

function CeaseScroll(){
    loop=false
    if(timer) clearTimeout(timer)
}
var initialised;
function InitialiseScrollableArea(){
    objContainer=new ConstructObject('section3Container');
    objScroller=new ConstructObject('section3Content','section3Container');
    objScroller.MoveArea(0,0);
    objContainer.css.visibility='visible';
    //if(objScroller.scrollWidth>objContainer.scrollWidth);

    var numdivs = 0;

    for(myobject in objScroller.el.childNodes)
      if(/\d/.test(myobject))
        if(eval("objScroller.el.childNodes[" + myobject + "].nodeName.indexOf('DIV')") != -1)
          numdivs++;
    objScroller.css.width=(100 * numdivs) + 'px';

    initialised=true;
}

function ConstructObjectYYY(obj,nest){
    nest=(!nest) ? '':'document.'+nest+'.'
    this.el=bw.dom?document.getElementById(obj):bw.ie4?document.all[obj]:bw.ns4?eval(nest+'document.'+obj):0;
    this.css=bw.dom?document.getElementById(obj).style:bw.ie4?document.all[obj].style:bw.ns4?eval(nest+'document.'+obj):0;
    this.scrollHeight=bw.ns4?this.css.document.height:this.el.offsetHeight
    this.clipHeight=bw.ns4?this.css.clip.height:this.el.offsetHeight
    this.up=MoveAreaUp;this.down=MoveAreaDown;
    this.MoveArea=MoveArea; this.x; this.y;
    this.obj = obj + "Object"
    eval(this.obj + "=this")
    return this
}
function MoveAreaDownYYY(move){
	if(this.y>-this.scrollHeight+objContainer.clipHeight){
    this.MoveArea(0,this.y-move)
    if(loop) setTimeout(this.obj+".down("+move+")",speed)
	}
}
function MoveAreaUpYYY(move){
	if(this.y<0){
    this.MoveArea(0,this.y-move)
    if(loop) setTimeout(this.obj+".up("+move+")",speed)
	}
}


    // Special Needs Modified Function
    function unfoldList(theitem, foldTitle, unfoldTitle) {
      var localObject = document.getElementById(theitem);
      if((document.getElementById(theitem).className == 'fold')){
        localObject.className = 'unfold';
        localObject.title = unfoldTitle;
      } else {
        localObject.className = 'fold';
        localObject.title = foldTitle;
      }
    }

    document.write("<style type='text/css'>\n",
    "#content .toggleList li.fold .toggleListElement,\n",
    "#content .toggleList li.unfold ul li.fold .toggleListElement{\n",
    "  background: url('/web/common/en/all_regions/images/arrows/gen_gr_arrow_long_show.gif') no-repeat right center;\n",
    "}\n",
    "#content .toggleList li.fold .toggleListElement_fr,\n",
    "#content .toggleList li.unfold ul li.fold .toggleListElement_fr{\n",
    "  background: url('/web/common/fr/all_regions/images/buttons/gen_gr_arrow_long_show.gif') no-repeat right center;\n",
    "}\n",
    "#content .toggleList li.unfold .toggleListElement,\n",
    "#content .toggleList li.unfold ul li.unfold .toggleListElement {\n",
    "  background: url('/web/common/en/all_regions/images/buttons/gen_gr_arrow_long_hide.gif') no-repeat right center;\n",
    "}\n",
    "#content .toggleList li.unfold .toggleListElement_fr,\n",
    "#content .toggleList li.unfold ul li.unfold .toggleListElement_fr {\n",
    "  background: url('/web/common/fr/all_regions/images/buttons/gen_gr_arrow_long_hide.gif') no-repeat right center;\n",
    "}\n",
    "</style>");
