Intel® Fortran Libraries Reference
Intel® Fortran Libraries Reference Intel® Fortran Libraries Reference
2 Intel Fortran Libraries ReferenceCompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “GETIMAGE, GETIMAGE_W”, “GRSTATUS”, “IMAGESIZE, IMAGESIZE_W”Example! Build as a Graphics App.USE IFQWININTEGER(1), ALLOCATABLE :: buffer(:)INTEGER(2) status, xINTEGER(4) imsizestatus = SETCOLOR(INT2(4))! draw a circlestatus = ELLIPSE($GFILLINTERIOR,INT2(40),INT2(55), &INT2(70),INT2(85))imsize = IMAGESIZE (INT2(39),INT2(54),INT2(71), &INT2(86))ALLOCATE (buffer(imsize))CALL GETIMAGE(INT2(39),INT2(54),INT2(71),INT2(86),buffer)! copy a row of circles beneath itDO x = 5 , 395, 35CALL PUTIMAGE(x, INT2(90), buffer, $GPSET)END DODEALLOCATE(buffer)END&PXFGETPOSIX Subroutine: Gets the value stored in a component (or field) of a structure.Module: USE IFPOSIXSyntaxCALL PXFGET (jhandle, compname, value, ierror)CALL PXFGET (jhandle, compname, value, ilen, ierror) !when is STR2-260
Descriptions of the Library Routines 2A placeholder for one of the following values:Value Data Type Routine NameINT INTEGER(4) PXFINTGETREAL REAL(4) PXFREALGETLGCL LOGICAL(4) PXFLGCLGETSTR CHARACTER*(*) PXFSTRGETCHAR CHARACTER(1) PXFCHARGETDBL REAL(8) PXFDBLGETINT8 INTEGER(8) PXFINT8GETjhandle(Input) INTEGER(4) on IA-32 processors; INTEGER(8) on Intel Itanium processors. A handle ofa structure.compname(Input) Character. The name of the component (or field) of the structure to retrieve data from.value(Output) A variable, whose data type depends on the value of . See the table above for thedata types for each value; for example, if the value for is INT, the data type isINTEGER(4). Stores the value of the component (or field).ilen(Output) INTEGER(4). This argument can only be used when is STR (PXFSTRGET).Stores the length of the returned string.ierror(Output) INTEGER(4). The error status.If successful, ierror is set to zero; otherwise, an error code.The PXFGET subroutines retrieve the value from component (or field) compname of thestructure associated with handle jhandle into variable value.CompatibilityCONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIBSee Also: “PXFSET”ExampleSee the example in “PXFTIMES” (which demonstrates PXFINTGET and PXFINT8GET)2-261
- Page 262 and 263: 2 Intel Fortran Libraries Reference
- Page 264 and 265: 2 Intel Fortran Libraries Reference
- Page 266 and 267: 2 Intel Fortran Libraries Reference
- Page 268 and 269: 2 Intel Fortran Libraries Reference
- Page 270 and 271: 2 Intel Fortran Libraries Reference
- Page 272 and 273: 2 Intel Fortran Libraries Reference
- Page 274 and 275: 2 Intel Fortran Libraries Reference
- Page 276 and 277: 2 Intel Fortran Libraries Reference
- Page 278 and 279: 2 Intel Fortran Libraries Reference
- Page 280 and 281: 2 Intel Fortran Libraries Reference
- Page 282 and 283: 2 Intel Fortran Libraries Reference
- Page 284 and 285: 2 Intel Fortran Libraries Reference
- Page 286 and 287: 2 Intel Fortran Libraries Reference
- Page 288 and 289: 2 Intel Fortran Libraries Reference
- Page 290 and 291: 2 Intel Fortran Libraries Reference
- Page 292 and 293: 2 Intel Fortran Libraries Reference
- Page 294 and 295: 2 Intel Fortran Libraries Reference
- Page 296 and 297: 2 Intel Fortran Libraries Reference
- Page 298 and 299: 2 Intel Fortran Libraries Reference
- Page 300 and 301: 2 Intel Fortran Libraries Reference
- Page 302 and 303: 2 Intel Fortran Libraries Reference
- Page 304 and 305: 2 Intel Fortran Libraries Reference
- Page 306 and 307: 2 Intel Fortran Libraries Reference
- Page 308 and 309: 2 Intel Fortran Libraries Reference
- Page 310 and 311: 2 Intel Fortran Libraries Reference
- Page 314 and 315: 2 Intel Fortran Libraries Reference
- Page 316 and 317: 2 Intel Fortran Libraries Reference
- Page 318 and 319: 2 Intel Fortran Libraries Reference
- Page 320 and 321: 2 Intel Fortran Libraries Reference
- Page 322 and 323: 2 Intel Fortran Libraries Reference
- Page 324 and 325: 2 Intel Fortran Libraries Reference
- Page 326 and 327: 2 Intel Fortran Libraries Reference
- Page 328 and 329: 2 Intel Fortran Libraries Reference
- Page 330 and 331: 2 Intel Fortran Libraries Reference
- Page 332 and 333: 2 Intel Fortran Libraries Reference
- Page 334 and 335: 2 Intel Fortran Libraries Reference
- Page 336 and 337: 2 Intel Fortran Libraries Reference
- Page 338 and 339: 2 Intel Fortran Libraries Reference
- Page 340 and 341: 2 Intel Fortran Libraries Reference
- Page 342 and 343: 2 Intel Fortran Libraries Reference
- Page 344 and 345: 2 Intel Fortran Libraries Reference
- Page 346 and 347: 2 Intel Fortran Libraries Reference
- Page 348 and 349: 2 Intel Fortran Libraries Reference
- Page 350 and 351: 2 Intel Fortran Libraries Reference
- Page 352 and 353: 2 Intel Fortran Libraries Reference
- Page 354 and 355: 2 Intel Fortran Libraries Reference
- Page 356 and 357: 2 Intel Fortran Libraries Reference
- Page 358 and 359: 2 Intel Fortran Libraries Reference
- Page 360 and 361: 2 Intel Fortran Libraries Reference
2 Intel <strong>Fortran</strong> <strong>Libraries</strong> <strong>Reference</strong>CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “GETIMAGE, GETIMAGE_W”, “GRSTATUS”, “IMAGESIZE, IMAGESIZE_W”Example! Build as a Graphics App.USE IFQWININTEGER(1), ALLOCATABLE :: buffer(:)INTEGER(2) status, xINTEGER(4) imsizestatus = SETCOLOR(INT2(4))! draw a circlestatus = ELLIPSE($GFILLINTERIOR,INT2(40),INT2(55), &INT2(70),INT2(85))imsize = IMAGESIZE (INT2(39),INT2(54),INT2(71), &INT2(86))ALLOCATE (buffer(imsize))CALL GETIMAGE(INT2(39),INT2(54),INT2(71),INT2(86),buffer)! copy a row of circles beneath itDO x = 5 , 395, 35CALL PUTIMAGE(x, INT2(90), buffer, $GPSET)END DODEALLOCATE(buffer)END&PXFGETPOSIX Subroutine: Gets the value stored in a component (or field) of a structure.Module: USE IFPOSIXSyntaxCALL PXFGET (jhandle, compname, value, ierror)CALL PXFGET (jhandle, compname, value, ilen, ierror) !when is STR2-260