{
  window.status = 'Red Científica Peruana';
  top.document.title = 'Red Científica Peruana';
  b1 = new Image(); b1.src = "images/b1.gif";
  b1p = new Image(); b1p.src = "images/b1p.gif";
  b2 = new Image(); b2.src = "images/b2.gif";
  b2p = new Image(); b2p.src = "images/b2p.gif";
  b3 = new Image(); b3.src = "images/b3.gif";
  b3p = new Image(); b3p.src = "images/b3p.gif";
  cas = new Image(); cas.src = "images/cas.gif";
  casp = new Image(); casp.src = "images/casp.gif";
  sob = new Image(); sob.src = "images/sob.gif";
  sobp = new Image(); sobp.src = "images/sobp.gif";

  ing4 = new Image(); ing4.src = "images/ing4.gif";
  ing4p = new Image(); ing4p.src = "images/ing4p.gif";
  ing3 = new Image(); ing3.src = "images/ing3.gif";
  ing3p = new Image(); ing3p.src = "images/ing3p.gif";
  ing2 = new Image(); ing2.src = "images/ing2.gif";
  ing2p = new Image(); ing2p.src = "images/ing2p.gif";
  ing = new Image(); ing.src = "images/ing.gif";
  ingp = new Image(); ingp.src = "images/ingp.gif";

  ingre = new Image(); ingre.src = "images/ingre.gif";
  ingrep = new Image(); ingrep.src = "images/ingrep.gif";

  bpro = new Image(); bpro.src = "images/bpro.gif";
  bprop = new Image(); bprop.src = "images/bprop.gif";
  bdes = new Image(); bdes.src = "images/bdes.gif";
  bdesp = new Image(); bdesp.src = "images/bdesp.gif";
  bcom = new Image(); bcom.src = "images/bcom.gif";
  bcomp = new Image(); bcomp.src = "images/bcomp.gif";
  bpe = new Image(); bpe.src = "images/bpe.gif";
  bpep = new Image(); bpep.src = "images/bpep.gif";


}

function CambiaImg(imgid,imgnew)
{
  if(navigator.appVersion.substring(0,1)>=3)
  {
    document.images[imgid].src=eval(imgnew+".src");
  }
}

function write_it(indice) {
  statmsg = new Array("Red Científica Peruana", "página principal", "contáctenos", "mapa del site", "enviar", "borrar");
  window.status=statmsg[indice];
}

function AmpliaImg(imgid) {
  ventana = window.open("img.php?imgid="+imgid,"ventana","width=775, height=690, screenX=50, screenY=50");
  ventana.focus();
}