/* --------------------------------------------------- 
     Uses the Arimaa "Scoring System" formula for the evaluation: 
  
   TotScore = MyScore - OppScore 
  
   Score = R + P*(C+1) 
  
   R = Points given for how far the players Rabbits have progressed. 
  The row to which each rabbit has progressed is cubed (i.e. 
  raised to the power of 3) and these values are summed up to 
  determine R.  The first row is 1 and the goal row is 8. 
   C = The number of Rabbits the player still has on the board. 
   P = Points given for the pieces the player still has on the board. 
  The value of each piece on the board is summed. 
  
   Value of each piece is: 
  
   1 - Rabbit 
   2 - Cat 
   3 - Dog 
   4 - Horse 
   5 - Camel 
   6 - Elephant 
  
    ---------------------------------------------------- */ 
  
 int  eval( position *p ) 
 { 
   int   i; 
   int   c; 
   int   tot[2] = { 0, 0 }; 
   u64   dom;    // bit board of dominant pieces. 
   u64   non;    // bb of non-dominant pieces 
  
   int sC; // the C value of the score 
   int sP; // the P value of the score 
   int sR; // you guessed it 
  
   for (c=0; c<2; c++)  // c = color, 0 or 1 
   { 
     int  e = c^1;  // enemy for convienence. 
  
 // calculate the P value of the score 
     sP = 0; 
     for (i=1; i<7; i++) // i loops over the types of pieces 1=rabbit .. 6=ele 
  sP += bit_count( p->bd[c][i] ) * i; 
  
 // calculate the C value of the score 
     sC = bit_count( p->bd[c][1] ) * 1; 
  
 // calculate the R value of the score 
     sR = 0; 
     for (i=0; i<8; i++) // i loops over the rows of the board 
  sR += bit_count( p->bd[c][1] & adv[i+1][c] ) * (i+1)*(i+1)*(i+1); 
  
     tot[c] = sR + sP*(sC+1); 
   } 
  
   if (p->ply & 1) 
     return(tot[1] - tot[0]); 
  
   return(tot[0] - tot[1]); 
 }