Previous: iopopf Up: ../plot79_i.html Next: ioppop
C-fpp- =================================================================
C-fpp- fpp -- C version 1.0.3 [27-Feb-1991]
C-fpp- Date: Wed Feb 27 18:08:51 1991
C-fpp- Directory: /u/beebe/plot79/utility
C-fpp- User: Nelson H. F. Beebe <beebe@osiris.usi.utah.edu>
C-fpp- Macro: _OS_UNIX=1
C-fpp- Macro: _AIX=1
C-fpp- Macro: _IBM_RS_6000=1
C-fpp- Macro: _BIG_ENDIAN=1
C-fpp- =================================================================
INTEGER FUNCTION IOPOPN (UNIT,FNAME,LENFNM,MODEOP)
C$ (Open File)
C$ Open a named file for FORTRAN formatted processing. The
C$ arguments are:
C$
C$ UNIT............FORTRAN unit number to be used.
C$ FNAME(*)........A1-format file name specification.
C$ LENFNM..........Number of characters in FNAME(*).
C$ MODEOP..........Open mode. 1 = READ, 2 = WRITE, 3 =
C$ READWRITE, 4 = APPEND, 10*n+1 = DIRECT
C$ ACCESS read with record length n, 10*n+2
C$ DIRECT ACCESS write with record length n,
C$ 10*n+3 DIRECT ACCESS read/write with record
C$ length n.
C$
C$ The unit number, UNIT, is returned as a function value if
C$ the open was successful, and otherwise -1 is returned. A
C$ portable version of this routine should simply return the
C$ value -1, indicating that open by explicit file name is not
C$ supported.
C$ (27-SEP-84)