ULpGET/ULpSET(ULpSTX)

DCL:GRPH2:ULPACK : Logarithmic Coordinate Axis Routines: Explanation of Subroutines

4.3.4 ULpGET/ULpSET(ULpSTX)

1.

Function

Inquires/changes an internal variable used in the ULPACK subroutine package. (ULpSTX permits change with a runtime option.)

2.

Call

CALL ULpGET(CP,IPARA)
CALL ULpSET(CP,IPARA)
CALL ULpSTX(CP,IPARA)

3.

Explanation of Parameters

CP (C*8) The name of an internal variable.

IPARA (I) The value of an internal variable.

Below is a list of names that can be specified as CP.

'IXCHR' (I) The label for the X axis in the form of 2. 10ⁿ, and is the character number to be used in the position '. '. It is specified using the DCL character number (See the user's manual for "GRPH1.") The initial value is 195 (. ).

'IYCHR' (I) The label for the Y axis in the form of 2. 10ⁿ, and is the character number to be used in the position '. '. It is specified using the DCL character number (See the user's manual for "GRPH1.") The initial value is 195 (. ).

'IXTYPE' (I) Specifies the label format for the X axis. Specified using an integer value between 1 and 4. (The initial value is 1.) The meaning of the values are explained in the next page.

'IYTYPE' (I) Specifies the label format for the Y axis. Specified using an integer value between 1 and 4. (The initial value is 1.)
1: Exponent part placed on all labels.
  Examples: 1. 10³ 2. 10³ 5. 10³ 1. 10⁴
However, when the internal variable 'LCNTL' handled by SGLGET/SGLSET (See user's manual for "GRPH1") is .FALSE., then the . 10ⁿ is expressed as En.
2: The exponent part is not placed on labels for marks besides 10ⁿ.
     Examples: 10³ 2 5 10⁴
3: All labels are characterized using the subroutine CHVAL (See section on FMTLIB in the user's manual for "MISC1.")
     Examples: 1000 2000 5000 10000
4: The subroutine CHVAL is used only for labels on 10ⁿ marks. Other marks will be labeled as when 2 is specified.
     Examples: 1000 2 5 10000

4.

Notes

(a)

The following subroutines are available for handling the internal variables.

ULPQNP(NCP) Counts the total number of internal variables (NCP).

ULPQID(CP,IDX) Determines the position (IDX) of the internal variable CP.

ULPQCP(IDX,CP) Inquires the name (CP) of the internal variable at position IDX.

ULPQVL(IDX,IPARA) Inquires the value (IPARA) of the internal variable at position IDX.

ULPSVL(IDX,IPARA) Changes the value (IPARA) of the internal variable at position IDX

(b)

ULpGET calls the above ULPQID to determine the position of an internal variable, and inquires its value using ULPQVL. ULpSET calls ULPQID to determine the position of an internal variable and changes its value using ULPSVL. Therefore, when the specified internal variable is not found, an error message is printed by ULPQID.

(c)

When 'IXTYPE'/'IYTYPE' is 3 or 4, the format delivered to CHVAL can be changed with ULXSFM/ULYSFM.

`CP`	`(C*8)`	The name of an internal variable.
`IPARA`	`(I)`	The value of an internal variable.

`'IXCHR'`	`(I)`	The label for the X axis in the form of 2. 10ⁿ, and is the character number to be used in the position '. '. It is specified using the DCL character number (See the user's manual for "GRPH1.") The initial value is 195 (. ).
`'IYCHR'`	`(I)`	The label for the Y axis in the form of 2. 10ⁿ, and is the character number to be used in the position '. '. It is specified using the DCL character number (See the user's manual for "GRPH1.") The initial value is 195 (. ).
`'IXTYPE'`	`(I)`	Specifies the label format for the X axis. Specified using an integer value between 1 and 4. (The initial value is 1.) The meaning of the values are explained in the next page.
`'IYTYPE'`	`(I)`	Specifies the label format for the Y axis. Specified using an integer value between 1 and 4. (The initial value is 1.) 1: Exponent part placed on all labels. Examples: 1. 10³ 2. 10³ 5. 10³ 1. 10⁴ However, when the internal variable `'LCNTL'` handled by `SGLGET/SGLSET` (See user's manual for "GRPH1") is `.FALSE.`, then the . 10ⁿ is expressed as En. 2: The exponent part is not placed on labels for marks besides 10ⁿ. Examples: 10³ 2 5 10⁴ 3: All labels are characterized using the subroutine `CHVAL` (See section on FMTLIB in the user's manual for "MISC1.") Examples: 1000 2000 5000 10000 4: The subroutine `CHVAL` is used only for labels on 10ⁿ marks. Other marks will be labeled as when 2 is specified. Examples: 1000 2 5 10000

`ULPQNP(NCP)`	Counts the total number of internal variables `(NCP)`.
`ULPQID(CP,IDX)`	Determines the position `(IDX)` of the internal variable `CP`.
`ULPQCP(IDX,CP)`	Inquires the name `(CP)` of the internal variable at position `IDX`.
`ULPQVL(IDX,IPARA)`	Inquires the value `(IPARA)` of the internal variable at position `IDX`.
`ULPSVL(IDX,IPARA)`	Changes the value `(IPARA)` of the internal variable at position `IDX`