text: #ifdef CLINK_CAPS
  #  define wallclock_ WALLCLOCK
  #  define nwallclock_ NWALLCLOCK
  #  define microsec_ MICROSEC
  #endif
  #ifdef CLINK_PLAIN
  #  define wallclock_ wallclock
  #  define nwallclock_ nwallclock
  #  define microsec_ microsec
  #endif
  
  #ifndef F90_TIMER
  
  #include <sys/time.h>
  #include <unistd.h>
  
  static int ncalls=0;
  
  /*
  void wallclock_( double *wallc ){
  
  #  ifdef NO_DETAILED_TIMINGS
  	*wallc = 0.0;
  #  else
  	struct timeval tv;
  	struct timezone tz;
  	long rsec;
  
  	gettimeofday( &tv, &tz );
  
  	rsec = tv.tv_sec - 959800000;
  	*wallc = (double)rsec + (double)(tv.tv_usec)/1000000.;
  	ncalls++;
  #  endif
  
  	return;
  
  }
  
  */
  
  void microsec_( int *ig ){
  
  	struct timeval tv;
  	struct timezone tz;
  
  	gettimeofday( &tv, &tz );
  	*ig = (int)tv.tv_usec;
  
  	return;
  
  }
  
  /*
  void nwallclock_( int *n ){  
  		/* provides the number of times wallclock was called */
  /*
  	*n = ncalls;
  	return;
  }
  */
  
  #endif
  