BLACS -- Basics

CALL BLACS_PINFO( IAM, NPROCS )

* If underlying system needs additional setup, do it now

IF( NPROCS.LT.1 ) THEN

IF( IAM.EQ.0 ) NPROCS = 4

CALL BLACS_SETUP( IAM, NPROCS )

END IF

* Get default system context

CALL BLACS_GET( 0, 0, ICTXT )

*

Previous slide

Next slide

Back to first slide

View graphic version