mkl_progress

Developer Reference for Intel® oneAPI Math Kernel Library for Fortran

Download PDF

ID 766686

Date 11/07/2023

Version

Public

A newer version of this document is available. Customers should click here to go to the newest version.

Visible to Intel only — GUID: GUID-E982C8B0-E96D-414B-B263-BABF455963F7

View Details

mkl_progress

Provides progress information.

Syntax

stopflag = mkl_progress( thread_process, step, stage )

Fortran Include Files/Modules

Include file: mkl.fi
Module (compiled): mkl_service.mod
Module (source): mkl_service.f90

Input Parameters

Name	Type	Description
thread_process	INTEGER*4	Indicates the number of thread or process the progress routine is called from: The thread number for non-cluster components linked with OpenMP threading layer Zero for non-cluster components linked with sequential threading layer The process number (MPI rank) for cluster components
step	INTEGER*4	The linear progress indicator that shows the amount of work done. Increases from 0 to the linear size of the problem during the computation.
stage	CHARACTER()	Message indicating the name of the routine or the name of the computation stage the progress routine is called from.

Description

The mkl_progress function is intended to track progress of a lengthy computation and/or interrupt the computation. By default this routine does nothing but the user application can redefine it to obtain the computation progress information. You can set it to perform certain operations during the routine computation, for instance, to print a progress indicator. A non-zero return value may be supplied by the redefined function to break the computation.

NOTE:

The user-defined mkl_progress function must be thread-safe.

Some Intel® oneAPI Math Kernel Library (oneMKL) functions from LAPACK, ScaLAPACK, DSS/PARDISO, and Parallel Direct Sparse Solver for Clusters regularly call themkl_progress function during the computation. Refer to the description of a specific function from those domains to see whether the function supports this feature or not.

If a LAPACK function returns info=-1002, the function was interrupted by mkl_progress. Because ScaLAPACK does not support interruption of the computation, Intel® oneAPI Math Kernel Library (oneMKL) ignores any value returned bymkl_progress.

While a user-supplied mkl_progress function usually redefines the default mkl_progress function automatically, some configurations require calling the mkl_set_progress function to replace the default mkl_progress function. Call mkl_set_progress to replace the default mkl_progress on Windows* in any of the following cases:

You are using the Single Dynamic Library (SDL) mkl_rt.lib.
You link dynamically with ScaLAPACK.

WARNING:

The mkl_progress function supports OpenMP*/TBB threading and sequential execution for specific routines.

Return Values

Name	Type	Description
stopflag	INTEGER	The stopping flag. A non-zero flag forces the routine to be interrupted. The zero flag is the default return value.

Example

The following example prints the progress information to the standard output device:

 integer function mkl_progress( thread_process, step, stage )
 integer*4 thread_process, step
 character*(*) stage
 print*,'Thread:',thread_process,',stage:',stage,',step:',step
 mkl_progress = 0
 return
 end

Parent topic: Miscellaneous

Select Your Language

Using Intel.com Search

Quick Links

Recent Searches

Advanced Search

Only search in

Developer Reference for Intel® oneAPI Math Kernel Library for Fortran

mkl_progress

Syntax

Fortran Include Files/Modules

Input Parameters

Description

Return Values

Example