Intel® Fortran Libraries Reference
Intel® Fortran Libraries Reference Intel® Fortran Libraries Reference
2 Intel Fortran Libraries ReferenceSyntaxCALL PXFWRITE (ifildes, buf, nbyte, nwritten, ierror)ifildes(Input) INTEGER(4). The file descriptor to be written to.buf(Input) Character. The buffer that contains the data to write into the file.nbyte(Input) INTEGER(4). The number of bytes to write.nwritten(Output) INTEGER(4). The returned number of bytes written.ierror(Output) INTEGER(4). The error status.If successful, ierror is set to zero; otherwise, an error code.The PXFWRITE subroutine writes nbyte bytes from the storage buf into a file specified by filedescriptor ifildes. The subroutine returns the total number of bytes read into nwritten. If no erroroccurs, the value of nwritten will equal the value of nbyte.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIBSee Also: “PXFREAD”QRANSETPortability Subroutine: Sets the seed for a sequence of pseudo-random numbers.Module: USE IFPORTSyntaxCALL QRANSET (rseed)rseed(Input) INTEGER(4). The reset value for the seed.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB2-362
Descriptions of the Library Routines 2QSORTPortability Subroutine: Performs a quick sort on an array of rank one.Module: USE IFPORTSyntaxCALL QSORT (array, len, isize, compar)array(Input) Any type. One-dimensional array to be sorted.If the data type does not conform to one of the predefined interfaces for QSORT, you may have tocreate a new interface (see the Note below).len(Input) INTEGER(4) on IA-32 processors; INTEGER(8) on Intel Itanium processors. Number ofelements in array.isize(Input) INTEGER(4) on IA-32 processors; INTEGER(8) on Intel Itanium processors. Size, inbytes, of a single element of array is:• 4 if array is of type REAL(4)• 8 if array is of type REAL(8) or complex• 16 if array is of type COMPLEX(8)compar(Input) INTEGER(2). Name of a user-defined ordering function that determines sort order. Thetype declaration of compar takes the form:INTEGER(2) FUNCTION compar (arg1, arg2)where arg1 and arg2 have the same type as array (above). Once you have created an orderingscheme, implement your sorting function so that it returns the following:• Negative if arg1 should precede arg2• Zero if arg1 is equivalent to arg2• Positive if arg1 should follow arg2Dummy argument compar must be declared as external.In place of an INTEGER kind, you can specify the constant SIZEOF_SIZE_T, defined inIFPORT.F90, for argument len or isize. Use of this constant ensures correct compilation.2-363
- Page 364 and 365: 2 Intel Fortran Libraries Reference
- Page 366 and 367: 2 Intel Fortran Libraries Reference
- Page 368 and 369: 2 Intel Fortran Libraries Reference
- Page 370 and 371: 2 Intel Fortran Libraries Reference
- Page 372 and 373: 2 Intel Fortran Libraries Reference
- Page 374 and 375: 2 Intel Fortran Libraries Reference
- Page 376 and 377: 2 Intel Fortran Libraries Reference
- Page 378 and 379: 2 Intel Fortran Libraries Reference
- Page 380 and 381: 2 Intel Fortran Libraries Reference
- Page 382 and 383: 2 Intel Fortran Libraries Reference
- Page 384 and 385: 2 Intel Fortran Libraries Reference
- Page 386 and 387: 2 Intel Fortran Libraries Reference
- Page 388 and 389: 2 Intel Fortran Libraries Reference
- Page 390 and 391: 2 Intel Fortran Libraries Reference
- Page 392 and 393: 2 Intel Fortran Libraries Reference
- Page 394 and 395: 2 Intel Fortran Libraries Reference
- Page 396 and 397: 2 Intel Fortran Libraries Reference
- Page 398 and 399: 2 Intel Fortran Libraries Reference
- Page 400 and 401: 2 Intel Fortran Libraries Reference
- Page 402 and 403: 2 Intel Fortran Libraries Reference
- Page 404 and 405: 2 Intel Fortran Libraries Reference
- Page 406 and 407: 2 Intel Fortran Libraries Reference
- Page 408 and 409: 2 Intel Fortran Libraries Reference
- Page 410 and 411: 2 Intel Fortran Libraries Reference
- Page 412 and 413: 2 Intel Fortran Libraries Reference
- Page 416 and 417: 2 Intel Fortran Libraries Reference
- Page 418 and 419: 2 Intel Fortran Libraries Reference
- Page 420 and 421: 2 Intel Fortran Libraries Reference
- Page 422 and 423: 2 Intel Fortran Libraries Reference
- Page 424 and 425: 2 Intel Fortran Libraries Reference
- Page 426 and 427: 2 Intel Fortran Libraries Reference
- Page 428 and 429: 2 Intel Fortran Libraries Reference
- Page 430 and 431: 2 Intel Fortran Libraries Reference
- Page 432 and 433: 2 Intel Fortran Libraries Reference
- Page 434 and 435: 2 Intel Fortran Libraries Reference
- Page 436 and 437: 2 Intel Fortran Libraries Reference
- Page 438 and 439: 2 Intel Fortran Libraries Reference
- Page 440 and 441: 2 Intel Fortran Libraries Reference
- Page 442 and 443: 2 Intel Fortran Libraries Reference
- Page 444 and 445: 2 Intel Fortran Libraries Reference
- Page 446 and 447: 2 Intel Fortran Libraries Reference
- Page 448 and 449: 2 Intel Fortran Libraries Reference
- Page 450 and 451: 2 Intel Fortran Libraries Reference
- Page 452 and 453: 2 Intel Fortran Libraries Reference
- Page 454 and 455: 2 Intel Fortran Libraries Reference
- Page 456 and 457: 2 Intel Fortran Libraries Reference
- Page 458 and 459: 2 Intel Fortran Libraries Reference
- Page 460 and 461: 2 Intel Fortran Libraries Reference
- Page 462 and 463: 2 Intel Fortran Libraries Reference
2 Intel <strong>Fortran</strong> <strong>Libraries</strong> <strong>Reference</strong>SyntaxCALL PXFWRITE (ifildes, buf, nbyte, nwritten, ierror)ifildes(Input) INTEGER(4). The file descriptor to be written to.buf(Input) Character. The buffer that contains the data to write into the file.nbyte(Input) INTEGER(4). The number of bytes to write.nwritten(Output) INTEGER(4). The returned number of bytes written.ierror(Output) INTEGER(4). The error status.If successful, ierror is set to zero; otherwise, an error code.The PXFWRITE subroutine writes nbyte bytes from the storage buf into a file specified by filedescriptor ifildes. The subroutine returns the total number of bytes read into nwritten. If no erroroccurs, the value of nwritten will equal the value of nbyte.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIBSee Also: “PXFREAD”QRANSETPortability Subroutine: Sets the seed for a sequence of pseudo-random numbers.Module: USE IFPORTSyntaxCALL QRANSET (rseed)rseed(Input) INTEGER(4). The reset value for the seed.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB2-362