MASTER / END MASTER

  • SINGLE on master thread
  • However, no implied barrier on entry or exit
  • Illegal to branch in or out

!$OMP PARALLEL
     CALL S1
     !$OMP SINGLE
          CALL S2
     !$OMP END SINGLE

     CALL S3
$!OMP END PARALLEL