LAPACK  3.6.1
LAPACK: Linear Algebra PACKage
cblas_mangling_with_flags.h
Go to the documentation of this file.
1 #ifndef F77_HEADER_INCLUDED
2 #define F77_HEADER_INCLUDED
3 
4 #ifndef F77_GLOBAL
5 #if defined(F77_GLOBAL_PATTERN_LC) || defined(ADD_)
6 #define F77_GLOBAL(lcname,UCNAME) lcname##_
7 #elif defined(F77_GLOBAL_PATTERN_UC) || defined(UPPER)
8 #define F77_GLOBAL(lcname,UCNAME) UCNAME
9 #elif defined(F77_GLOBAL_PATTERN_MC) || defined(NOCHANGE)
10 #define F77_GLOBAL(lcname,UCNAME) lcname
11 #else
12 #define F77_GLOBAL(lcname,UCNAME) lcname##_
13 #endif
14 #endif
15 
16 #endif
17