PGI Fortranï - Servidor WWW del Cluster Ladon-Hidra

More documents

Recommendations

Info

8.8 DOACROSS ................................................................................................................. 2968.9 PARALLEL DO ........................................................................................................... 2978.10 SECTIONS ... END SECTIONS................................................................................... 2988.11 PARALLEL SECTIONS .............................................................................................. 2988.12 ORDERED ................................................................................................................... 2998.13 ATOMIC....................................................................................................................... 3008.14 FLUSH.......................................................................................................................... 3008.15 THREADPRIVATE ..................................................................................................... 3008.16 RUN-TIME LIBRARY ROUTINES...................................................................................... 3018.17 ENVIRONMENT VARIABLES ........................................................................................... 3039 HPF Directives .................................................................................................................... 3059.1 ADDING HPF DIRECTIVES TO PROGRAMS ..................................................................... 3059.2 HPF DIRECTIVE SUMMARY ........................................................................................... 306Appendix A HPF_LOCAL .................................................................................................. 317List of TablesTable 1-1: Order of Statements....................................................................................................... 14Table 1-2: Fortran Characters......................................................................................................... 15Table 1-3: C Language Character Escape Sequences..................................................................... 15Table 1-4: Fixed Format Record Positions and Fields.................................................................... 16Table 1-5: Fortran Operator Precedence......................................................................................... 21Table 1-6: Arithmetic Operators..................................................................................................... 23Table 2-1: Fortran Intrinsic Data Types......................................................................................... 32Table 2-2: Data Types Kind Parameters........................................................................................ 32Table 2-3: Data Type Extensions.................................................................................................... 33Table 2-4: Data Type Ranks .......................................................................................................... 34Table 2-5: Example of Real Constants .......................................................................................... 36Table 2-6: Double Precision Constants...........................................................................................36iv
Page 2: While every precaution has been tak
Page 9 and 10: PrefaceThis manual describes The Po
Page 11 and 12: Chapter 6, Fortran Intrinsics, list
Page 13 and 14: • Military Standard, FORTRAN, DOD
Page 15 and 16: 1.1.2 Free and Fixed SourceFortran
Page 17 and 18: Table 1-2: Fortran CharactersCharac
Page 19 and 20: 1.4.2 Fixed Format Label FieldThe l
Page 21 and 22: INCLUDE "MYFILE.DEF"Recursive inclu
Page 23 and 24: Table 1-5: Fortran Operator Precede
Page 25 and 26: Table 1-6: Arithmetic OperatorsOper
Page 27 and 28: In the following example, TEST will
Page 29 and 30: A=(P+Q)*(T/V)B=R**T**21.9.2 Logical
Page 31: 1.12 HPF DirectivesHPF directives i
Page 34 and 35: These examples require that the pro
Page 36 and 37: The data type of the result of an a
Page 38 and 39: where digits is the scaling factor,
Page 40 and 41: 2.2.8 Character ConstantsCharacter
Page 42 and 43: 2.4.1 An Array Declaration ElementA
Page 44 and 45: B'b 1 b 2 ...b n 'B"b 1 b 2 ...b n
Page 46 and 47: 2.7 Hollerith ConstantsThe form of
Page 48 and 49: 2.8.1 RecordsA record, a DEC extens
Page 50 and 51: [field_declaration]...[field_declar
Page 52 and 53: eferenced, the address to which it
Page 55 and 56:
3 Fortran StatementsThis chapter de
Page 57 and 58:
Non-character Format-specifier §If
Page 59 and 60:
For an ALLOCATABLE array, the array
Page 61 and 62:
• A statement label in the same p
Page 63 and 64:
nameclistis the symbolic name of a
Page 65 and 66:
See AlsoSELECT CASECHARACTER 90The
Page 67 and 68:
DescriptionA unit may be the subjec
Page 69 and 70:
machines. Note that this may also a
Page 71 and 72:
nameclistis the symbolic name of a
Page 73 and 74:
IF (B.EQ.5) EXITEND DOSee AlsoEXIT,
Page 75 and 76:
PRINT *, 'should be 1', ISDEALLOCAT
Page 77 and 78:
ExamplesDIMENSION ARRAY1(3:10), ARR
Page 79 and 80:
DOA(I)=A(I)+1IF (A(I).EQ.4) EXITEND
Page 81 and 82:
DOUBLE PRECISION 90The DOUBLE PRECI
Page 83 and 84:
M=2ELSE IF (I.LT.16) THENM=3END IFE
Page 85 and 86:
DescriptionThe END statement termin
Page 87 and 88:
TYPE=0END SELECTSyntax Extension -
Page 89 and 90:
COMPLEX*16CHARACTERIf the function
Page 91 and 92:
SyntaxEXIT [do-construct-name]Examp
Page 93 and 94:
First, compute the valid set of ind
Page 95 and 96:
Non-character Format-specifier §If
Page 97 and 98:
ExamplesFUNCTION FRED(A,B,C)REAL X.
Page 99 and 100:
GO TO 10070 X=A*B ! Come here if A
Page 101 and 102:
Exampleslogical-expressionstatement
Page 103 and 104:
INQUIRE 77An INQUIRE statement has
Page 105 and 106:
POSITION= pos_charpos_char is a cha
Page 107 and 108:
INTEGER variable is 4 bytes. With t
Page 109 and 110:
INTRINSIC 77An INTRINSIC statement
Page 111 and 112:
DescriptionLogical type declaration
Page 113 and 114:
SyntaxMODULE [name][specification-p
Page 115 and 116:
ExampleNULLIFY (PTR1)See AlsoALLOCA
Page 117 and 118:
DescriptionThe record length, RECL=
Page 119 and 120:
See AlsoINTENTOPTIONS § 77The OPTI
Page 121 and 122:
The PAUSE statement stops the progr
Page 123 and 124:
PRINT 77The PRINT statement is a da
Page 125 and 126:
SyntaxPROGRAM [name]...END [ PROGRA
Page 127 and 128:
In addition control-information is
Page 129 and 130:
Syntax ExtensionnREAL [*n] name [*n
Page 131 and 132:
SyntaxRECURSIVE [type-specification
Page 133 and 134:
REWIND 77The REWIND statement posit
Page 135 and 136:
CASE DEFAULTTYPE=0END SELECTSEQUENC
Page 137 and 138:
STRUCTURE /account/INTEGER typetagU
Page 139 and 140:
See AlsoALLOCATABLE, POINTERTHEN 77
Page 141 and 142:
MAPfield_declaration[field_declarat
Page 143 and 144:
SyntaxVOLATILE nitem [, nitem ...]n
Page 145 and 146:
ADVANCE=spec spec is a character ex
Page 147 and 148:
4 Fortran ArraysFortran arrays are
Page 149 and 150:
4.2.1 Explicit Shape ArraysExplicit
Page 151 and 152:
Note that NUMC is rank 1 and NUMB i
Page 153 and 154:
5 Input and Output FormattingInput,
Page 155 and 156:
In addition list may contain one of
Page 157 and 158:
SpecifierDescriptionPOSITION=pos Sp
Page 159 and 160:
where the items in iolist are eithe
Page 161 and 162:
5.5.2.1 A Format Control - Characte
Page 163 and 164:
For input the same conditions apply
Page 165 and 166:
5.5.2.11 Quote Format ControlQuote
Page 167 and 168:
produces:25.00 2500.00 2500.00 2500
Page 169 and 170:
On input from a file connected for
Page 171 and 172:
Commas may be used to separate the
Page 173 and 174:
5.7.3 Commas in External FieldUse o
Page 175 and 176:
6 Fortran IntrinsicsThis chapter li
Page 177 and 178:
GenericNameDBLEDCMPLXDIMFLOORPurpos
Page 179 and 180:
GenericNamePurposeNumberof ArgsMIN
Page 181 and 182:
GenericNamePurposeNumberof ArgsATAN
Page 183 and 184:
Generic Name Purpose Numberof ArgsS
Page 185 and 186:
GenericNameISHFTCLSHIFTNEQVNOTORRSH
Page 187 and 188:
GenericNameLEN_TRIMLGELGTLLELLTLOGI
Page 189 and 190:
GenericNamePurposeNumberof ArgsArgu
Page 191 and 192:
Generic Name Purpose Numberof ArgsU
Page 193 and 194:
Table 6-14: Fortran 90/95 String In
Page 195 and 196:
ArgumentThe argument I must be of t
Page 197 and 198:
AINT 77Truncate the supplied value
Page 199 and 200:
ANY 90Determine if any value in the
Page 201 and 202:
Return ValueThe real value represen
Page 203 and 204:
SynopsisCEILING(A [,KIND])ArgumentT
Page 205 and 206:
ArgumentThe argument X must be of t
Page 207 and 208:
CSHIFT 90Perform a circular shift o
Page 209 and 210:
DIGITS 90Returns the number of sign
Page 211 and 212:
EPSILON 90Return the smallest numbe
Page 213 and 214:
ArgumentThe argument X is a real nu
Page 215 and 216:
IBSET 77Set one bit to one.Synopsis
Page 217 and 218:
Return ValueThe function returns an
Page 219 and 220:
Return ValueThe return value is of
Page 221 and 222:
Return ValueThe result is an intege
Page 223 and 224:
Return ValueThe function returns a
Page 225 and 226:
ArgumentThe argument X is of type r
Page 227 and 228:
ArgumentsAny arguments after the fi
Page 229 and 230:
ArgumentsTSOURCE is the source that
Page 231 and 232:
Return ValueThe return value is a s
Page 233 and 234:
ArgumentsThe arguments M and N may
Page 235 and 236:
PRECISION 90Return the decimal prec
Page 237 and 238:
each element of the seed array are
Page 239 and 240:
Return ValueThe return value is an
Page 241 and 242:
SELECTED_REAL_KIND 90Returns a valu
Page 243 and 244:
SIN 77Return the value of the sine
Page 245 and 246:
ArgumentsThe argument SOURCE may be
Page 247 and 248:
TAND 77Return the tangent of the sp
Page 249 and 250:
Return ValueThe return value is the
Page 251 and 252:
Return ValueThe return value is an
Page 253 and 254:
IntrinsicPRODUCT_SCATTERPRODUCT_SUF
Page 255 and 256:
7 3F Functions and VAXSubroutinesTh
Page 257 and 258:
DescriptionThe access function if t
Page 259 and 260:
chdirChange default directory.Synop
Page 261 and 262:
Synopsisreal function etime(tarray)
Page 263 and 264:
Descriptionfork creates a copy of t
Page 265 and 266:
DescriptionReturn the system error
Page 267 and 268:
getgidGet group id.Synopsisinteger
Page 269 and 270:
Synopsissubroutine idate(im, id, iy
Page 271 and 272:
linkMake linkSynopsisinteger functi
Page 273 and 274:
Descriptionmclock returns the sum o
Page 275 and 276:
qsortQuick sort.Synopsissubroutine
Page 277 and 278:
Descriptionflminflmaxffracdflmindfl
Page 279 and 280:
The return value is the previous ac
Page 281 and 282:
Synopsisinteger function system(str
Page 283 and 284:
Descriptionwait causes its caller t
Page 285 and 286:
IARGCThe IARGC subroutine returns t
Page 287:
X = SECNDS(0.0)...... ! Code to be
Page 290 and 291:
the first clause. Clauses on direct
Page 292 and 293:
The DEFAULT clause lets you specify
Page 294 and 295:
MX = MAX(MX, LMX)!$OMP END CRITICAL
Page 296 and 297:
REDUCTION({operator | intrinsic } :
Page 298 and 299:
• When SCHEDULE (GUIDED, chunk) i
Page 300 and 301:
8.10 SECTIONS ... END SECTIONSThe O
Page 302 and 303:
• The ORDERED code block must be
Page 304 and 305:
integer function omp_get_num_procs(
Page 306 and 307:
MPSTKZ increases the size of the st
Page 308 and 309:
9.2 HPF Directive SummaryTable 9-1:
Page 310 and 311:
TypeSpecificationDefaultThe default
Page 312 and 313:
DISTRIBUTE - REDISTRIBUTEThe DISTRI
Page 314 and 315:
Syntax!HPF$ INHERIT dummy-argument-
Page 316 and 317:
SEQUENCEThe SEQUENCE directive allo
Page 319 and 320:
Appendix A HPF_LOCALThis appendix l
Page 321 and 322:
GLOBAL_ALIGNMENTThis has the same i
Page 323 and 324:
ArgumentsARRAY may be of any type.
Page 325 and 326:
DIM (optional) must be scalar and o
Page 327 and 328:
Return ValueThe value of LOCAL_LIND
Page 329:
PHYSICAL_TO_ABSTRACTSubroutine retu
Page 332 and 333:
ERR ...............................
Page 334 and 335:
ENDFUNCTION........................
Page 336 and 337:
%LOC ..............................
Page 338 and 339:
REPEAT ............................
Page 340 and 341:
GLOBAL_DISTRIBUTION ...............
Page 342 and 343:
INTRINSIC .........................
Page 344 and 345:
REAL...............................
Page 346 and 347:
PRIVATE............................
show all

PGI Fortranï - Servidor WWW del Cluster Ladon-Hidra

Create successful ePaper yourself

Delete template?

Save as template?

PGI Fortranï - Servidor WWW del Cluster Ladon-Hidra