PGI Fortranï - Servidor WWW del Cluster Ladon-Hidra

More documents

Recommendations

Info

While every precaution has been taken in the preparation of this document, The Portland Group,a wholly-owned subsidiary of STMicroelectronics, makes no warranty for the use of its productsand assumes no responsibility for any errors that may appear, or for damages resulting from theuse of the information contained herein. STMicroelectronics retains the right to make changes tothis information at any time, without notice. The software described in this document is distributedunder license from STMicroelectronics and may be used or copied only in accordance with theterms of the license agreement. No part of this document may be reproduced or transmitted in anyform or by any means, for any purpose other than the purchaser's personal use without the expresswritten permission of STMicroelectronics.Many of the designations used by manufacturers and sellers to distinguish their products areclaimed as trademarks. Where those designations appear in this manual, STMicroelectronics wasaware of a trademark claim. The designations have been printed in caps or initial caps. Thanks isgiven to the Parallel Tools Consortium and, in particular, to the High Performance DebuggingForum for their efforts.PGF90, PGF95, PGC++, Cluster Development Kit, CDK and The Portland Group are trademarksand PGI, PGHPF, PGF77, PGCC, PGPROF, and PGDBG are registered trademarks ofSTMicroelectronics, Inc. Other brands and names are the property of their respective owners.The use of STLport, a C++ Library, is licensed separately and license, distribution and copyrightnotice can be found in online documentation for a given release of the PGI compilers and tools.PGI Fortran ReferenceCopyright © 2005-2006, STMicroelectronics, Inc.All rights reserved.Printed in the United States of AmericaFirst Printing: Release 6.0, March, 2005Second Printing: Release 6.1, December, 2005Third Printing: Release 6.1-3, February, 2006Part Number: 2410-990-990-0297Technical support:Sales:Web:trs@pgroup.comsales@pgroup.comwww.pgroup.com
Page 6: 8.8 DOACROSS ......................
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

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

Delete template?

Save as template?

PGI Fortranï - Servidor WWW del Cluster Ladon-Hidra