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.

Exampleslogical-expressionstatementis evaluated and if it is true the statement is executed. If it is false,the statement is not executed and control is passed to the nextexecutable statement.can be an assignment statement, a CALL statement or a GOTOstatement.IF(N .LE. 2) GOTO 27IF(HIGH .GT. 1000.0 .OR. HIGH .LT. 0.0) HIGH=1000.0IMPLICIT 77The IMPLICIT statement redefines the implied data type of symbolic names from their initialletter. Without the use of the IMPLICIT statement all names that begin with the lettersI,J,K,L,M or N are assumed to be of type integer and all names beginning with any other lettersare assumed to be real.SyntaxIMPLICIT spec (a[,a]...) [,spec (a[,a]...)]IMPLICIT NONEspecais a data type specifier.DescriptionIMPLICIT statements must not be labeled.is an alphabetic specification expressed either as a or a1-a2, specifyingan alphabetically ordered range of letters.Symbol names may begin with a dollar sign ($) or underscore (_) character, both of which are oftype REAL by default. In an IMPLICIT statement, these characters may be used in the samemanner as other characters, but they cannot be used in a range specification.The IMPLICIT NONE statement specifies that all symbolic names must be explicitly declared,otherwise an error is reported. If IMPLICT NONE is used, no other IMPLICIT can be present.ExamplesIMPLICIT REAL (L,N)IMPLICIT INTEGER (S,W-Z)IMPLICIT INTEGER (A-D,$,_)Fortran Statements 99

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

Saved successfully!

Ooh no, something went wrong!