File: Cbt.h

package info (click to toggle)
blacs-mpi 1.1-31
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 2,328 kB
  • sloc: fortran: 14,968; ansic: 12,353; makefile: 596; sh: 1
file content (19 lines) | stat: -rw-r--r-- 252 bytes parent folder | download | duplicates (17) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
#define ADD_     0
#define NOCHANGE 1
#define UPCASE   2

#ifdef UpCase
#define F77_CALL_C UPCASE
#endif

#ifdef NoChange
#define F77_CALL_C NOCHANGE
#endif

#ifdef Add_
#define F77_CALL_C ADD_
#endif

#ifndef F77_CALL_C
#define F77_CALL_C ADD_
#endif