Merge remote-tracking branch 'origin/release-v4.6.1'
[WRF.git] / external / io_grib2 / bacio-1.3 / clib.h
blob554ef9b8e52a41558c5c1f3ef81248fc2db6bd66
1 /* Include file to define variables for Fortran to C interface(s) */
2 /* Robert Grumbine 16 March 1998 */
3 /* NOSEEK added 25 March 1998 */
4 /* CRAY compatibility added 20 April 1998 */
6 /* The following line should be either undef or define VERBOSE */
7 /* The latter gives noisy debugging output, while the former */
8 /* relies solely on the return codes */
9 #undef VERBOSE
11 /* Declare the system type, supported options are: */
12 /* LINUX, SGI, HP, CRAY90, IBM4, IBM8, LINUXF90 */
13 #define IBM4
16 #include <stdlib.h>
18 /* Do not change things below here yourself */
20 /* IO-related (bacio.c, banio.c) */
21 #define BAOPEN_RONLY 1
22 #define BAOPEN_WONLY 2
23 #define BAOPEN_RW 4
24 #define BACLOSE 8
25 #define BAREAD 16
26 #define BAWRITE 32
27 #define NOSEEK 64
28 #define BAOPEN_WONLY_TRUNC 128
29 #define BAOPEN_WONLY_APPEND 256
31 #ifndef CRAY
32 # ifdef NOUNDERSCORE
33 # define BACIO bacio
34 # else
35 # ifdef F2CSTYLE
36 # define BACIO bacio__
37 # define BANIO banio__
38 # else
39 # define BACIO bacio_
40 # define BANIO banio_
41 # endif
42 # endif
43 #endif