# IEEE_SET_STATUS

Intrinsic Module Subroutine (Generic): Restores the state of the floating-point environment. This is an impure subroutine.

## Module

USE, INTRINSIC :: IEEE_EXCEPTIONS

CALL IEEE_SET_STATUS (status_value)

status_value | (Input) Must be scalar and of type TYPE (IEEE_STATUS_TYPE). Its value must be set in a previous invocation of IEEE_GET_STATUS.

## Example

Consider the following:

    USE, INTRINSIC :: IEEE_EXCEPTIONS ! Can also use IEEE_ARITHMETIC
    TYPE (IEEE_STATUS_TYPE) STATUS
    ...
    CALL IEEE_GET_STATUS (STATUS) ! Stores the floating-point status
    CALL IEEE_SET_FLAG (IEEE_ALL,.FALSE.) ! Sets all flags to be quiet
    ...
    CALL IEEE_SET_STATUS (STATUS) ! Restores the floating-point status

Parent topic: H to I