// VO2max in functie van prestatie 3 km
km_tab = new Array(50);

// 3 km
km_tab[ 0] = 7*60 + 21;
km_tab[ 1] = 7*60 + 27;
km_tab[ 2] = 7*60 + 34;
km_tab[ 3] = 7*60 + 41;
km_tab[ 4] = 7*60 + 47;
km_tab[ 5] = 7*60 + 54;
km_tab[ 6] = 8*60 +  2;
km_tab[ 7] = 8*60 +  9;
km_tab[ 8] = 8*60 + 16;
km_tab[ 9] = 8*60 + 24;

km_tab[10] = 8*60 + 32;
km_tab[11] = 8*60 + 40;
km_tab[12] = 8*60 + 49;
km_tab[13] = 8*60 + 57;
km_tab[14] = 9*60 +  6;
km_tab[15] = 9*60 + 15;
km_tab[16] = 9*60 + 25;
km_tab[17] = 9*60 + 34;
km_tab[18] = 9*60 + 44;
km_tab[19] = 9*60 + 54;

km_tab[20] = 10*60 +  5;
km_tab[21] = 10*60 + 15;
km_tab[22] = 10*60 + 26;
km_tab[23] = 10*60 + 38;
km_tab[24] = 10*60 + 50;
km_tab[25] = 11*60 +  2;
km_tab[26] = 11*60 + 15;
km_tab[27] = 11*60 + 28;
km_tab[28] = 11*60 + 41;
km_tab[29] = 11*60 + 55;

km_tab[30] = 12*60 + 10;
km_tab[31] = 12*60 + 24;
km_tab[32] = 12*60 + 40;
km_tab[33] = 12*60 + 56;
km_tab[34] = 13*60 + 13;
km_tab[35] = 13*60 + 30;
km_tab[36] = 13*60 + 48;
km_tab[37] = 14*60 +  6;
km_tab[38] = 14*60 + 26;
km_tab[39] = 14*60 + 46;

km_tab[40] = 15*60 +  7;
km_tab[41] = 15*60 + 29;
km_tab[42] = 15*60 + 51;
km_tab[43] = 16*60 + 15;
km_tab[44] = 16*60 + 40;
km_tab[45] = 17*60 +  6;
km_tab[46] = 17*60 + 33;
km_tab[47] = 18*60 +  1;
km_tab[48] = 18*60 + 31;
km_tab[49] = 19*60 +  3;

// VO2max in functie van prestatie 5 km
km_tab5 = new Array(50);

km_tab5[ 0] = 12*60 + 39;
km_tab5[ 1] = 12*60 + 50;
km_tab5[ 2] = 13*60 + 02;
km_tab5[ 3] = 13*60 + 13;
km_tab5[ 4] = 13*60 + 25;
km_tab5[ 5] = 13*60 + 38;
km_tab5[ 6] = 13*60 + 50;
km_tab5[ 7] = 14*60 + 03;
km_tab5[ 8] = 14*60 + 17;
km_tab5[ 9] = 14*60 + 30;

km_tab5[10] = 14*60 + 44;
km_tab5[11] = 14*60 + 59;
km_tab5[12] = 15*60 + 13;
km_tab5[13] = 15*60 + 29;
km_tab5[14] = 15*60 + 44;
km_tab5[15] = 16*60 + 01;
km_tab5[16] = 16*60 + 17;
km_tab5[17] = 16*60 + 34;
km_tab5[18] = 16*60 + 52;
km_tab5[19] = 17*60 + 10;

km_tab5[20] = 17*60 + 29;
km_tab5[21] = 17*60 + 48;
km_tab5[22] = 18*60 + 08;
km_tab5[23] = 18*60 + 29;
km_tab5[24] = 18*60 + 50;
km_tab5[25] = 19*60 + 12;
km_tab5[26] = 19*60 + 35;
km_tab5[27] = 19*60 + 58;
km_tab5[28] = 20*60 + 22;
km_tab5[29] = 20*60 + 48;

km_tab5[30] = 21*60 + 14;
km_tab5[31] = 21*60 + 41;
km_tab5[32] = 22*60 + 09;
km_tab5[33] = 22*60 + 38;
km_tab5[34] = 23*60 + 09;
km_tab5[35] = 23*60 + 40;
km_tab5[36] = 24*60 + 13;
km_tab5[37] = 24*60 + 47;
km_tab5[38] = 25*60 + 22;
km_tab5[39] = 25*60 + 59;

km_tab5[40] = 26*60 + 38;
km_tab5[41] = 27*60 + 18;
km_tab5[42] = 28*60 + 01;
km_tab5[43] = 28*60 + 45;
km_tab5[44] = 29*60 + 31;
km_tab5[45] = 30*60 + 19;
km_tab5[46] = 31*60 + 10;
km_tab5[47] = 32*60 + 03;
km_tab5[48] = 33*60 + 00;
km_tab5[49] = 33*60 + 59;

// VO2max in functie van prestatie 10 km
km_tab10 = new Array(50);

km_tab10[ 0] = 26*60 + 27;
km_tab10[ 1] = 26*60 + 51;
km_tab10[ 2] = 27*60 + 16;
km_tab10[ 3] = 27*60 + 41;
km_tab10[ 4] = 28*60 +  7;
km_tab10[ 5] = 28*60 + 34;
km_tab10[ 6] = 29*60 +  1;
km_tab10[ 7] = 29*60 + 30;
km_tab10[ 8] = 29*60 + 59;
km_tab10[ 9] = 30*60 + 29;

km_tab10[10] = 30*60 + 59;
km_tab10[11] = 31*60 + 31;
km_tab10[12] = 32*60 +  3;
km_tab10[13] = 32*60 + 37;
km_tab10[14] = 33*60 + 11;
km_tab10[15] = 33*60 + 47;
km_tab10[16] = 34*60 + 23;
km_tab10[17] = 35*60 +  1;
km_tab10[18] = 35*60 + 40;
km_tab10[19] = 36*60 + 20;

km_tab10[20] = 37*60 +  2;
km_tab10[21] = 37*60 + 44;
km_tab10[22] = 38*60 + 29;
km_tab10[23] = 39*60 + 15;
km_tab10[24] = 40*60 +  2;
km_tab10[25] = 40*60 + 51;
km_tab10[26] = 41*60 + 42;
km_tab10[27] = 42*60 + 35;
km_tab10[28] = 43*60 + 30;
km_tab10[29] = 44*60 + 26;

km_tab10[30] = 45*60 + 25;
km_tab10[31] = 46*60 + 27;
km_tab10[32] = 47*60 + 31;
km_tab10[33] = 48*60 + 36;
km_tab10[34] = 49*60 + 46;
km_tab10[35] = 50*60 + 58;
km_tab10[36] = 52*60 + 13;
km_tab10[37] = 53*60 + 32;
km_tab10[38] = 54*60 + 53;
km_tab10[39] = 56*60 + 19;

km_tab10[40] = 57*60 + 49;
km_tab10[41] = 59*60 + 23;
km_tab10[42] = 1 *3600 +  1*60 +  1;
km_tab10[43] = 1 *3600 +  2*60 + 45;
km_tab10[44] = 1 *3600 +  4*60 + 34;
km_tab10[45] = 1 *3600 +  6*60 + 28;
km_tab10[46] = 1 *3600 +  8*60 + 29;
km_tab10[47] = 1 *3600 + 10*60 + 37;
km_tab10[48] = 1 *3600 + 12*60 + 51;
km_tab10[49] = 1 *3600 + 15*60 + 14;

function dispnum(x) 
{
   x = Math.floor(x*10)/10; // 2 decimal places
   return(x);
}

function clear_vo2max()
{ // clears all the contents of the form
   
   document.data4.distance.value='';
   document.data4.time_hrs.value='';
   document.data4.time_min.value='';
   document.data4.time_sec.value='';
   document.data4.vo2max.value='';
}

function initialise_vo2max() 
{ // initialise the variables
   
   if (document.data4.distance.value == '') 
       document.data4.distance.value = 0;
   if (document.data4.time_hrs.value == '') 
       document.data4.time_hrs.value = 0;
   if (document.data4.time_min.value == '') 
       document.data4.time_min.value = 0;
   if (document.data4.time_sec.value == '') 
       document.data4.time_sec.value = 0;
   if (document.data4.vo2max.value == '') 
       document.data4.vo2max.value = 0;
}

function compute_vo2max() 
{ // the main routine
  
  initialise_vo2max();
  
  distance    = document.data4.distance.value;
  
  time_hrs    = parseFloat(document.data4.time_hrs.value);
  time_min    = parseFloat(document.data4.time_min.value);     
  time_sec    = parseFloat(document.data4.time_sec.value);     
  
  time_sec += time_hrs * 3600 + time_min * 60;
  
  vo2max = 36; // minimale VO2max 
  
  if (distance == 0)
  {  
     for (i = 1; i < 50; i++)
     {
       if (km_tab[i] > time_sec ) 
       {
          vo2max = 85 - (i - 1);
          break;
       }
     }
  }
  else if (distance == 1)
  {
     for (i = 1; i < 50; i++)
     {
        if (km_tab5[i] > time_sec ) 
        {
           vo2max = 85 - (i - 1);
           break;
        }
     }
  }
  else
  { 
     for (i = 1; i < 50; i++)
     { 
       if (km_tab10[i] > time_sec ) 
       {
          vo2max = 85 - (i - 1);
          break;
       }
     }
  }
  document.data4.vo2max.value = dispnum(vo2max);                                                                
}