Previous | Contents | Index |
Returns the current status of processing activity in a parallel region.
Syntax:
INTERFACE INTEGER FUNCTION otsinparallel () !DEC$ ALIAS otsinparallel, '_OtsInParallel' END FUNCTION OtsInParallel END INTERFACE INTEGER result result = otsinparallel () |
Description:
The routine returns 1 if the program is currently running within a parallel region, otherwise it returns 0. )
Index | Contents |