use_acc Function

   PURE FUNCTION use_acc()
      LOGICAL :: use_acc

      IF (has_acc .AND. dbcsr_cfg%run_on_gpu%val) THEN
         use_acc = .TRUE.
      ELSE
         use_acc = .FALSE.
      END IF
   END FUNCTION use_acc