pkg/fizhi/fizhi_io_comms.h

C $Header:  $
C $Name:  $


C     FIZHI I/O flags

      COMMON /FIZHI_IO_VARS/
     &     fizhi_mdsio_read_pickup, 
     &     fizhi_mdsio_write_pickup, 
     &     fizhi_mnc_write_pickup, 
     &     fizhi_mnc_read_pickup


CEH3 ;;; Local Variables: ***
CEH3 ;;; mode:fortran ***
CEH3 ;;; End: ***
1	C $Header: $
2	C $Name: $
3
4
5	C FIZHI I/O flags
6
7	COMMON /FIZHI_IO_VARS/
8	& fizhi_mdsio_read_pickup,
9	& fizhi_mdsio_write_pickup,
10	& fizhi_mnc_write_pickup,
11	& fizhi_mnc_read_pickup
12
13
14
15	CEH3 ;;; Local Variables: ***
16	CEH3 ;;; mode:fortran ***
17	CEH3 ;;; End: ***