eesupp/inc/EEIO.h

C $Header: /u/gcmpack/MITgcm/eesupp/inc/EEIO.h,v 1.5 2001/09/21 03:54:35 cnh Exp $
C $Name:  $

#ifdef USE_EEIO
CBOP
C     !ROUTINE: EEIO.h
C     !INTERFACE:
C     include "EEIO.h"
C
C     !DESCRIPTION:
C     *==========================================================*
C     | EEIO.h                                                    
C     *==========================================================*
C     | Support data structures for the MITgcm UV "execution      
C     | environment" IO code.                                     
C     *==========================================================*
CEOP

C--   COMMON /EEIO_R/ IO supporting real arrays
C     tmpXY_R8 - XY Real*8 IO buffer.
C     tmpXY_R4 - XY Real*4 IO buffer.
      COMMON /EESUPP_IO_R/ IO_tmpXY_R8, IO_tmpXY_R4
      Real*8 IO_tmpXY_R8(Nx,Ny)
      Real*4 IO_tmpXY_R4(Nx,Ny)

#endif
1	jmc	1.6	C $Header: /u/gcmpack/MITgcm/eesupp/inc/EEIO.h,v 1.5 2001/09/21 03:54:35 cnh Exp $
2	cnh	1.5	C $Name: $
3	adcroft	1.3
4			#ifdef USE_EEIO
5	cnh	1.5	CBOP
6			C !ROUTINE: EEIO.h
7			C !INTERFACE:
8			C include "EEIO.h"
9			C
10			C !DESCRIPTION:
11			C ==========================================================
12			C \| EEIO.h
13			C ==========================================================
14			C \| Support data structures for the MITgcm UV "execution
15			C \| environment" IO code.
16			C ==========================================================
17			CEOP
18	cnh	1.1
19			C-- COMMON /EEIO_R/ IO supporting real arrays
20			C tmpXY_R8 - XY Real*8 IO buffer.
21			C tmpXY_R4 - XY Real*4 IO buffer.
22			COMMON /EESUPP_IO_R/ IO_tmpXY_R8, IO_tmpXY_R4
23	adcroft	1.3	Real*8 IO_tmpXY_R8(Nx,Ny)
24			Real*4 IO_tmpXY_R4(Nx,Ny)
25	cnh	1.1
26	adcroft	1.3	#endif