[F90:]subroutine gEnqGinoState(gstate) type (GLIBSTATE), intent(out) :: gstate
Arguments
gstate.gino
GINO State
= 1,
GINO initialized
= 2,
Device nominated
= 3,
Device initialized and drawing units defined
= 4,
Picture started and drawing limits defined
= 5,
Segment open and drawing started
gstate.graf
GINOGRAF state
= 0,
Library not initialized
= 1,
Library initialized
gstate.surf
GINOSURF state
= 0,
Library not initialized
= 1,
Library initialized
gstate.menu
GINOMENU state
= 0,
Library not initialized
= 1,
Library initialized
Description
The routine gEnqGinoState() returns the state of GINO and its associated libraries.
The variable gstate.gino gives the state of GINO, in terms of device nomination and whether drawing has started. All GINO routines either require GINO to be in a particular state before operation or set GINO to a particular state after operation. These are classed as follows:
State Require GINO in State Move GINO to state 1 Set or enquire GINO Attribute Close driver 2 Device Qualification Device nomination or device enquiry 3 Set device attribute table Clear picture 4 Set Device attribute Close segment 5 Drawing Routine Open segment or drawing
Note that all drawing is placed in the dummy segment zero even if segments are not active. If segments are active the currently opened segment can be obtained through the routine gEnqOpenSeg().
The state of GINO's associated libraries can be obtained from the remaining three elements of the GLIBSTATE structure.
