LAPACK 3.11.0
LAPACK: Linear Algebra PACKage
cblas_mangling.h
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