function n_matriz(n){
   this.length=n
   for(var j=0;j<=n;j++){
       this[j]=0
    }
    return this
  }
 function intro_pagina(anterior,actual,siguiente){
    this.anterior=anterior
    this.actual=actual
    this.siguiente=siguiente
    return this
 }


 index = new n_matriz(71)

 index[0]=new intro_pagina("../portada.htm","indice.htm","intro.htm")
 index[1]=new intro_pagina("indice.htm","intro.htm","pag1/pag1.htm")
 index[2]=new intro_pagina("../intro.htm","pag1.htm","pag1a.htm")
 index[3]=new intro_pagina("pag1.htm","pag1a.htm","pag1b.htm")
 index[4]=new intro_pagina("pag1a.htm","pag1b.htm","pag1c.htm")
 index[5]=new intro_pagina("pag1b.htm","pag1c.htm","../pag2/pag2.htm")
 index[6]=new intro_pagina("../pag1/pag1c.htm","pag2.htm","pag2a.htm")
 index[7]=new intro_pagina("pag2.htm","pag2a.htm","pag2b.htm")
 index[8]=new intro_pagina("pag2a.htm","pag2b.htm","pag2c.htm")
 index[9]=new intro_pagina("pag2b.htm","pag2c.htm","../pag3/pag3.htm")
 index[10]=new intro_pagina("../pag2/pag2c.htm","pag3.htm","pag3a.htm")
 index[11]=new intro_pagina("pag3.htm","pag3a.htm","pag3b.htm")
 index[12]=new intro_pagina("pag3a.htm","pag3b.htm","../pag4/pag4.htm")
 index[13]=new intro_pagina("../pag3/pag3b.htm","pag4.htm","pag4a.htm")
 index[14]=new intro_pagina("pag4.htm","pag4a.htm","pag4b.htm")
 index[15]=new intro_pagina("pag4a.htm","pag4b.htm","../pag5/pag5.htm")
 index[16]=new intro_pagina("../pag4/pag4b.htm","pag5.htm","pag5a.htm")
 index[17]=new intro_pagina("pag5.htm","pag5a.htm","pag5b.htm")
 index[18]=new intro_pagina("pag5a.htm","pag5b.htm","pag5c.htm")
 index[19]=new intro_pagina("pag5b.htm","pag5c.htm","../pag6/pag6.htm")
 index[20]=new intro_pagina("../pag5/pag5c.htm","pag6.htm","pag6a.htm")
 index[21]=new intro_pagina("pag6.htm","pag6a.htm","pag6b.htm")
 index[22]=new intro_pagina("pag6a.htm","pag6b.htm","pag6c.htm")
 index[23]=new intro_pagina("pag6b.htm","pag6c.htm","../pag7/pag7.htm")
 index[24]=new intro_pagina("../pag6/pag6c.htm","pag7.htm","pag7a.htm")
 index[25]=new intro_pagina("pag7.htm","pag7a.htm","pag7b.htm")
 index[26]=new intro_pagina("pag7a.htm","pag7b.htm","pag7c.htm")
 index[27]=new intro_pagina("pag7b.htm","pag7c.htm","pag7d.htm")
 index[28]=new intro_pagina("pag7c.htm","pag7d.htm","pag7e.htm")
 index[29]=new intro_pagina("pag7d.htm","pag7e.htm","pag7f.htm")
 index[30]=new intro_pagina("pag7e.htm","pag7f.htm","pag7g.htm")
 index[31]=new intro_pagina("pag7f.htm","pag7g.htm","../pag8/pag8.htm")
 index[32]=new intro_pagina("../pag7/pag7g.htm","pag8.htm","pag81.htm")
 index[33]=new intro_pagina("pag8.htm","pag81.htm","pag82.htm")
 index[34]=new intro_pagina("pag81.htm","pag82.htm","pag83.htm")
 index[35]=new intro_pagina("pag82.htm","pag83.htm","pag84.htm")
 index[36]=new intro_pagina("pag83.htm","pag84.htm","pag85.htm")
 index[37]=new intro_pagina("pag84.htm","pag85.htm","pag86.htm")
 index[38]=new intro_pagina("pag85.htm","pag86.htm","pag87.htm")
 index[39]=new intro_pagina("pag86.htm","pag87.htm","pag88.htm")
 index[40]=new intro_pagina("pag87.htm","pag88.htm","pag89.htm")
 index[41]=new intro_pagina("pag88.htm","pag89.htm","pag810.htm")
 index[42]=new intro_pagina("pag89.htm","pag810.htm","pag811.htm")
 index[43]=new intro_pagina("pag810.htm","pag811.htm","pag812.htm")
 index[44]=new intro_pagina("pag811.htm","pag812.htm","pag813.htm")
 index[45]=new intro_pagina("pag812.htm","pag813.htm","pag814.htm")
 index[46]=new intro_pagina("pag813.htm","pag814.htm","pag815.htm")
 index[47]=new intro_pagina("pag814.htm","pag815.htm","pag816.htm")
 index[48]=new intro_pagina("pag815.htm","pag816.htm","pag817.htm")
 index[49]=new intro_pagina("pag816.htm","pag817.htm","pag818.htm")
 index[50]=new intro_pagina("pag817.htm","pag818.htm","pag819.htm")
 index[51]=new intro_pagina("pag818.htm","pag819.htm","pag820.htm")
 index[52]=new intro_pagina("pag819.htm","pag820.htm","pag821.htm")
 index[53]=new intro_pagina("pag820.htm","pag821.htm","pag822.htm")
 index[54]=new intro_pagina("pag821.htm","pag822.htm","pag823.htm")
 index[55]=new intro_pagina("pag822.htm","pag823.htm","pag824.htm")
 index[56]=new intro_pagina("pag823.htm","pag824.htm","pag825.htm")
 index[57]=new intro_pagina("pag824.htm","pag825.htm","pag826.htm")
 index[58]=new intro_pagina("pag825.htm","pag826.htm","pag827.htm")
 index[59]=new intro_pagina("pag826.htm","pag827.htm","pag828.htm")
 index[60]=new intro_pagina("pag827.htm","pag828.htm","pag829.htm")
 index[61]=new intro_pagina("pag828.htm","pag829.htm","pag830.htm")
 index[62]=new intro_pagina("pag829.htm","pag830.htm","pag831.htm")
 index[63]=new intro_pagina("pag830.htm","pag831.htm","pag832.htm")
 index[64]=new intro_pagina("pag831.htm","pag832.htm","pag833.htm")
 index[65]=new intro_pagina("pag832.htm","pag833.htm","pag834.htm")
 index[66]=new intro_pagina("pag833.htm","pag834.htm","pag835.htm")
 index[67]=new intro_pagina("pag834.htm","pag835.htm","pag836.htm")
 index[68]=new intro_pagina("pag835.htm","pag836.htm","pag837.htm")
 index[69]=new intro_pagina("pag836.htm","pag837.htm","../bibliogr.htm")
 index[70]=new intro_pagina("pag8/pag837.htm","bibliogr.htm","indice.htm")

 

 function currentpage() {
        var URL = document.URL
        URL = URL.toLowerCase()
        for (var i=0; i <= index.length; i++ ) {
            if (URL.indexOf(index[i].actual,0)> 0) {
               break
            }
        }
        return i
 }
 function anterior(){
  var pag=currentpage()
  if (pag>0){
     document.location=index[pag].anterior
  }
  if (pag==0){
     parent.document.location=index[pag].anterior
  }
 }

 function siguiente(){
  var pag=currentpage()
  if (pag<=70){
     document.location=index[pag].siguiente
  }
 }

 function indice(){
  var pag=currentpage()
  if (pag>1 && pag<70){
    document.location="../indice.htm"
  }else
  {
	document.location="indice.htm"
  }
 }