# 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.
s | (Output) Derived type `xycoord`. Physical coordinates of the previous viewport origin. The derived type `xycoord`is defined in `IFQWIN.F90` as follows:
     TYPE xycoord
       INTEGER(2) xcoord ! x-coordinate
       INTEGER(2) ycoord ! y-coordinate
     END TYPE xycoord
The `xycoord`type 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)

Parent topic: Graphics Library Routines

## See Also

GETCURRENTPOSITION
GETPHYSCOORD
GETVIEWCOORD
GETWINDOWCOORD
GRSTATUS
SETCLIPRGN
SETVIEWPORT