using_threads - returns the current Use number set by the USE_THREADS subroutine
INTEGER FUNCTION USING_THREADS() INTEGER*8 FUNCTION USING_THREADS_64() F95 INTERFACE INTEGER FUNCTION USING_THREADS() INTEGER(8) FUNCTION USING_THREADS_64() C INTERFACE #include <sunperf.h> int using_threads(); long using_threads_64();
using_threads THREADS will return the current Use number from the USE_THREADS subroutine for the calling thread.