Intel® Fortran Libraries Reference

Descriptions of the Library Routines 2x, y(Input) INTEGER(2). Physical coordinates of new viewport origin.t(Output) Derived type xycoord. Physical coordinates of the previous viewport origin. Thederived type xycoord is defined in IFQWIN.F90 as follows:TYPE xycoordINTEGER(2) xcoord ! x-coordinateINTEGER(2) ycoord ! y-coordinateEND TYPE xycoordThe xycoord type variable t, defined in IFQWIN.F90, returns the physical coordinates of theprevious viewport origin.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “GETCURRENTPOSITION, GETCURRENTPOSITION_W”, “GETPHYSCOORD”,“GETVIEWCOORD, GETVIEWCOORD_W”, “GETWINDOWCOORD”, “GRSTATUS”,“SETCLIPRGN”, “SETVIEWPORT”ExampleUSE IFQWINTYPE (xycoord) xyCALL SETVIEWORG(INT2(30), INT2(30), xy)SETVIEWPORTGraphics Subroutine: Redefines the graphics viewport by defining a clipping region in the samemanner as SETCLIPRGN and then setting the viewport-coordinate origin to the upper-left cornerof the region. This subroutine is only available on Windows* systems.Module: USE IFQWINSyntaxCALL SETVIEWPORT (x1, y1, x2, y2)x1, y1(Input) INTEGER(2). Physical coordinates for upper-left corner of viewport.x2, y2(Input) INTEGER(2). Physical coordinates for lower-right corner of viewport.2-429