anchor.diff:          end if
   
           ! Set the start time
  -#ifdef COARRAY
  +#if defined(COARRAY_PROVIDE_CO_ROUTINES) || defined(COARRAY_USE_MPI_FOR_INTENSIVE_COMMS)
           timer%start(tname_index) = mpi_wtime()
   #elif defined(NOOPENMP)
           call cpu_time(timer%start(tname_index))
  
positive.code:         real(C_DOUBLE):: current_time
  
          ! Get the current time
  #ifdef COARRAY
          current_time = mpi_wtime()
  #elif defined(NOOPENMP)
          call cpu_time(current_time)
  
negative.code: module timer_mod
      !! Module to time parts of code, using the class timer_type
  
  #if defined(COARRAY_PROVIDE_CO_ROUTINES) || defined(COARRAY_USE_MPI_FOR_INTENSIVE_COMMS)
      ! Assumes that mpi is available
      use mpi, only: mpi_wtime
  #endif
  #ifndef NOOPENMP
  