3 IF (ACC_GET_NUM_DEVICES
(ACC_DEVICE_HOST
) .NE
. 1) CALL ABORT
4 CALL ACC_SET_DEVICE_TYPE
(ACC_DEVICE_HOST
)
5 IF (ACC_GET_DEVICE_TYPE
() .NE
. ACC_DEVICE_HOST
) CALL ABORT
6 CALL ACC_SET_DEVICE_NUM
(0, ACC_DEVICE_HOST
)
7 IF (ACC_GET_DEVICE_NUM
(ACC_DEVICE_HOST
) .NE
. 0) CALL ABORT
8 CALL ACC_SHUTDOWN
(ACC_DEVICE_HOST
)
10 CALL ACC_INIT
(ACC_DEVICE_HOST
)
11 CALL ACC_SHUTDOWN
(ACC_DEVICE_HOST
)