The TPU$TRIGGER_ASYNC_ACTION routine allows applications using
    the DECTPU full callable interface to interrupt the DECTPU
    TPU$CONTROL loop at an asynchronous level.

    Format

      TPU$TRIGGER_ASYNC_ACTION  facility_index