<!--

// =============================================================
// Copyright (c) GreenFacts asbl 2002-2005. All rights reserved.
// =============================================================
// Kindly contact GreenFacts for permission to use or reproduce these javascript functions.

// ADJUSTABLE PARAMETERS
// =====================
var deltaWidth = 12;
var deltaHeightTools = 51;
var deltaHeightFull = 144;
var bottomBorder = 28;
var overlap = 6;
var toolsIntWidth = 326;

// MAIN WINDOW
//============
var toolsExtWidth = toolsIntWidth + deltaWidth;
var mainExtWidth = screen.width - toolsExtWidth + overlap;
var mainExtHeight = screen.height - bottomBorder;

// TOOLS POPUP
//============
var toolsExtHeight = 290;
var toolsX = screen.width - toolsExtWidth;
var toolsY = 0;

if(screen.width < 1000) 
   var toolsX = toolsX - deltaWidth - 4, toolsIntHeight = toolsExtHeight - deltaHeightTools, toolsY = screen.height - toolsExtHeight - bottomBorder;
   else var toolsIntHeight = mainExtHeight - deltaHeightTools;       

if (document.all);                               //Explorer
    else var mainExtHeight = mainExtHeight - 7; //Netscape
 
var toolsframe = "toolbar=no,location=no,status=yes,menubar=no,scrollbars=yes,resizable=yes,";
var toolspos = "left="+toolsX+",top="+toolsY+",screenX="+toolsX+",screenY="+toolsY+",width="+toolsIntWidth+",height="+toolsIntHeight;
var toolsdef = toolsframe+toolspos;


// EXWEB POPUP
//============
var exwebX = 0;
var exwebY = 110;
var gfigY = 50; 
 
var exwebIntWidth = mainExtWidth - deltaWidth;
var exwebIntHeight = mainExtHeight - exwebY - deltaHeightFull - 35;
var gfigHeight = mainExtHeight - gfigY - gfigY;

if (document.all);                                //Explorer
   else var exwebIntHeight = exwebIntHeight + 48; //Netscape

if(screen.width < 1000)
  var exwebpos = "";
    else
  var exwebpos = "left="+exwebX+",top="+exwebY+",width="+exwebIntWidth+",height="+exwebIntHeight;

if(screen.width < 1000)
  var gfigpos = "";
    else
  var gfigpos = "left="+exwebX+",top="+gfigY+",width="+exwebIntWidth+",height="+gfigHeight;

var exwebframe = "toolbar=yes,location=yes,status=yes,menubar=yes,scrollbars=yes,resizable=yes,";
var gfedef = exwebframe+exwebpos;
var gfignobar = "toolbar=no,location=no,status=no,menubar=no,scrollbars=yes,resizable=yes,";
var gfigdef = gfignobar+gfigpos;

function fe(){// Focus ExWeb window (= gfe)
eee = window.open("","gfe",gfedef);
eee.focus();
}

function fg(){// Focus GreenFacts.org window (= gf)
iii = window.open("","gf",exwebdef);
iii.focus();
}

function fi(){// Focus IntWeb window (= gfi)
iii = window.open("","gfi",gfedef);
iii.focus();
}

function fig(){// Focus figure window (= gfig)
iii = window.open("","gfig",gfigdef);
iii.focus();
}

function ft(){// Focus Tools window (= gft)
if(screen.width > 999)
window.moveTo(0,0), window.resizeTo(mainExtWidth,mainExtHeight);
    else	;
ttt = window.open("","gft",toolsdef);
ttt.focus();
}

function ltf(filename){// Load file in Tools window (= gft) and Focus it
if(screen.width > 999)
window.moveTo(0,0), window.resizeTo(mainExtWidth,mainExtHeight);
    else;
ttt = window.open(filename,"gft",toolsdef);
ttt.focus();
}



// FUNCTIONS PRELOAD IMAGES + ROllOVER

function MM_callJS(jsStr) { //v2.0
  return eval(jsStr);
}
function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(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 MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}