H1001 wait-stmt is WAIT ( wait-spec-list ) H1002 wait-spec is UNIT = io-unit or ID = scalar-default-int-expr or ERR = label or IOSTAT = label