1 ! Include file to define variables
for Fortran to C
interface(s
)
2 ! Robert Grumbine
16 March
1998
3 INTEGER
,PARAMETER:: BACIO_OPENR
=1 ! Open file
for read only
4 INTEGER
,PARAMETER:: BACIO_OPENW
=2 ! Open file
for write only
5 INTEGER
,PARAMETER:: BACIO_OPENRW
=4 ! Open file
for read
or write
6 INTEGER
,PARAMETER:: BACIO_CLOSE
=8 ! Close file
7 INTEGER
,PARAMETER:: BACIO_READ
=16 ! Read from the file
8 INTEGER
,PARAMETER:: BACIO_WRITE
=32 ! Write to the file
9 INTEGER
,PARAMETER:: BACIO_NOSEEK
=64 ! Start I
/O from previous spot
10 INTEGER
,PARAMETER:: BACIO_OPENWT
=128 ! Open
for write only with truncation
11 INTEGER
,PARAMETER:: BACIO_OPENWA
=256 ! Open
for write only with append
