/******************************************************************************
 * This is an example to show how to use low level function PAPI_get_virt_cyc *
 * and PAPI_get_virt_usec.                                                    *
 ******************************************************************************/

#include <stdio.h>
#include <stdlib.h>
#include "papi.h" /* This needs to be included every time you use PAPI */

int i;
double tmp;

int your_slow_code()
{

   for(i=1; i<200000; i++)
   {
      tmp= (tmp+i)/2;
   }
   return 0;
}

int main()
{
   long long s,s1, e, e1;
   int retval;


   /****************************************************************************
   *  This part initializes the library and compares the version number of the *
   * header file, to the version of the library, if these don't match then it  *
   * is likely that PAPI won't work correctly.If there is an error, retval     *
   * keeps track of the version number.                                        *
   ****************************************************************************/

   if((retval = PAPI_library_init(PAPI_VER_CURRENT)) != PAPI_VER_CURRENT )
   {
      printf("Library initialization error! \n");
      exit(1);
   }
        
   /* Here you get initial cycles and time */
   /* No error checking is done here because this function call is always 
      successful */

   s = PAPI_get_virt_cyc();

   your_slow_code();
  
   /*Here you get final cycles and time    */
   e = PAPI_get_virt_cyc();

   s1= PAPI_get_virt_usec();

   your_slow_code();

   e1= PAPI_get_virt_usec();

   printf("Virtual cycles  : %lld\nVirtual time(ms): %lld\n",e-s,e1-s1);

   /* clean up */
   PAPI_shutdown();

   exit(0);
}