VAX_FLOAT function performs one of two possible actions:
Determine, and optionally change, the default value for the VAX_FLOAT keyword to the OPEN procedures and the CALL_EXTERNAL function.
Determine if an open file unit has the VAX_FLOAT attribute set.
See the discussion of VAX floating-point conversion in
and the VAX_FLOAT keyword to
for more on the VAX floating-point conversion issue.
Result = VAX_FLOAT(
is used to change the default value of the VAX_FLOAT keyword to the OPEN procedures and the CALL_EXTERNAL function. A value of 0 (zero) makes the default for those keywords False. A non-zero value makes the default True. Specifying
in conjunction with the FILE_UNIT keyword will cause an error.
If the FILE_UNIT keyword is
specified, the value returned from VAX_FLOAT is the default value
any change is made. This is the case even if
is specified. This allows you to get the old setting and change it in a single operation.
Set this keyword equal to the logical file unit number (LUN) of an open file. VAX_FLOAT returns True (1) if the file was opened with the VAX_FLOAT attribute, or False (0) otherwise. Setting the FILE_UNIT keyword when the
argument is specified will cause an error.
To determine if the default VAX_FLOAT keyword value for OPEN and CALL_EXTERNAL is True or False:
default_vax_float = VAX_FLOAT()
To determine the current default value of the VAX_FLOAT keyword for OPEN and CALL_EXTERNAL and change it to True (1) in a single operation:
old_vax_float = VAX_FLOAT(1)
To determine if the file currently open on logical file unit 1 was opened with the VAX_FLOAT keyword set:
file_is_vax_float = VAX_FLOAT(FILE_UNIT=1)