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_showHideLayers() { //v6.0
  var i,p,v,obj,args=MM_showHideLayers.arguments;
  for (i=0; i<(args.length-2); i+=3) if ((obj=MM_findObj(args[i]))!=null) { v=args[i+2];
    if (obj.style) { obj=obj.style; v=(v=='show')?'visible':(v=='hide')?'hidden':v; }
    obj.visibility=v; }
}
function menu(opcion){
	switch (opcion){
		case "mAuthor": 
			MM_showHideLayers('mAuthor','','show','mExpectations','','hide','mBioeconomy','','hide','mArticles','','hide','mCollaborators','','hide','mBook','','hide','mBook1','','hide')
		break;
		case "mExpectations": 
			MM_showHideLayers('mAuthor','','hide','mExpectations','','show','mBioeconomy','','hide','mArticles','','hide','mCollaborators','','hide','mBook','','hide','mBook1','','hide')
		break;
		case "mBioeconomy": 
			MM_showHideLayers('mAuthor','','hide','mExpectations','','hide','mBioeconomy','','show','mArticles','','hide','mCollaborators','','hide','mBook','','hide','mBook1','','hide')
		break;
		case "mArticles": 
			MM_showHideLayers('mAuthor','','hide','mExpectations','','hide','mBioeconomy','','hide','mArticles','','show','mCollaborators','','hide','mBook','','hide','mBook1','','hide')
		break;
		case "mCollaborators": 
			MM_showHideLayers('mAuthor','','hide','mExpectations','','hide','mBioeconomy','','hide','mArticles','','hide','mCollaborators','','show','mBook','','hide','mBook1','','hide')
		break;
		case "mBook": 
			MM_showHideLayers('mAuthor','','hide','mExpectations','','hide','mBioeconomy','','hide','mArticles','','hide','mCollaborators','','hide','mBook','','show','mBook1','','hide')
		break;
		case "mBook1": 
			MM_showHideLayers('mAuthor','','hide','mExpectations','','hide','mBioeconomy','','hide','mArticles','','hide','mCollaborators','','hide','mBook','','hide','mBook1','','show')
		break;
		//default : alert("I\'m sure it was great");
	}
}
