SETVIEWORG (W*S)

Graphics Subroutine: Moves the viewport-coordinate origin (0, 0) to the specified physical point.

Module

USE IFQWIN

CALL SETVIEWORG (x,y,s)

x, y

(Input) INTEGER(2). Physical coordinates of new viewport origin.

(Output) Derived type xycoord. Physical coordinates of the previous viewport origin. The derived type xycoordis defined in IFQWIN.F90 as follows:

 TYPE xycoord
   INTEGER(2) xcoord ! x-coordinate
   INTEGER(2) ycoord ! y-coordinate
 END TYPE xycoord

The xycoordtype variable s, defined in IFQWIN.F90, returns the physical coordinates of the previous viewport origin.

Example

 USE IFQWIN
 TYPE ( xycoord ) xy

 CALL SETVIEWORG(INT2(30), INT2(30), xy)

SETVIEWORG (W*S)

Module

Example

See Also