12.07.2015 Views

PGI Fortran - Servidor WWW del Cluster Ladon-Hidra

PGI Fortran - Servidor WWW del Cluster Ladon-Hidra

PGI Fortran - Servidor WWW del Cluster Ladon-Hidra

SHOW MORE
SHOW LESS
  • No tags were found...

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

• The ORDERED code block must be a structured block. It is illegal to branch into orout of the block.• A given iteration of a loop with a DO directive cannot execute the same ORDEREDdirective more than once, and cannot execute more than one ORDERED directive.8.13 ATOMICThe OpenMP ATOMIC directive uses following syntax:!$OMP ATOMICThe ATOMIC directive is semantically equivalent to enclosing the following single statement in aCRITICAL...END CRITICAL directive pair. The statement must have one of the followingforms:x = x operator exprx = expr operator xx = intrinsic (x, expr)x = intrinsic (expr, x)where x is a scalar variable of intrinsic type, expr is a scalar expression that does not reference x,intrinsic is one of MAX, MIN, IAND, IOR, or IEOR, and operator is one of +, *, -, /, .AND.,.OR., .EQV., or .NEQV..8.14 FLUSHThe OpenMP FLUSH directive uses the following syntax:!$OMP FLUSH [(list)]The FLUSH directive ensures that all processor-visible data items, or only those specified in listwhen it’s present, are written back to memory at the point at which the directive appears.8.15 THREADPRIVATEThe OpenMP THREADPRIVATE directive uses the following syntax:!$OMP THREADPRIVATE ( [ /common_block1/ [, /common_block2/] …])where common_blockn is the name of a common block to be made private to each thread butglobal within the thread. This directive must appear in the declarations section of a program unitafter the declaration of any common blocks listed. On entry to a parallel region, data in aTHREADPRIVATE common block is undefined unless COPYIN is specified on the PARALLEL300 Chapter 8

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!