1*
2* $Id$
3*
4      logical io_on
5      integer io_unit
6
7      common /util_io_data/
8     &                   io_on,
9     &                   io_unit
10
11