/* f2c.h -- Standard Fortran to C header file */
/** barf [ba:rf] 2. "He suggested using FORTRAN, and everybody barfed."
- From The Shogakukan DICTIONARY OF NEW ENGLISH (Second edition) */
#ifndef F2C_INCLUDE
#define F2C_INCLUDE
typedef long int integer;
typedef unsigned long int uinteger;
typedef char *address;
typedef short int shortint;
typedef float real;
typedef double doublereal;
typedef struct { real r, i; } complex;
typedef struct { doublereal r, i; } doublecomplex;
typedef long int logical;
typedef short int shortlogical;
typedef char logical1;
typedef char integer1;
#ifdef INTEGER_STAR_8 /* Adjust for integer*8. */
typedef long long longint; /* system-dependent */
typedef unsigned long long ulongint; /* system-dependent */
#define qbit_clear(a,b) ((a) & ~((ulongint)1 << (b)))
#define qbit_set(a,b) ((a) | ((ulongint)1 << (b)))
#endif
#define TRUE_ (1)
#define FALSE_ (0)
/* Extern is for use with -E */
#ifndef Extern
#define Extern extern
#endif
/* I/O stuff */
#ifdef f2c_i2
/* for -i2 */
typedef short flag;
typedef short ftnlen;
typedef short ftnint;
#else
typedef long int flag;
typedef long int ftnlen;
typedef long int ftnint;
#endif
/*external read, write*/
typedef struct
{ flag cierr;
ftnint ciunit;
flag ciend;
char *cifmt;
ftnint cirec;
} cilist;
/*internal read, write*/
typedef struct
{ flag icierr;
char *iciunit;
flag iciend;
char *icifmt;
ftnint icirlen;
ftnint icirnum;
} icilist;
/*open*/
typedef struct
{ flag oerr;
ftnint ounit;
char *ofnm;
ftnlen ofnmlen;
char *osta;
char *oacc;
char *ofm;
ftnint orl;
char *oblnk;
} olist;
/*close*/
typedef struct
{ flag cerr;
ftnint cunit;
char *csta;
} cllist;
/*rewind, backspace, endfile*/
typedef struct
{ flag aerr;
ftnint aunit;
} alist;
/* inquire */
typedef struct
{ flag inerr;
ftnint inunit;
char *infile;
ftnlen infilen;
ftnint *inex; /*parameters in standard's order*/
ftnint *inopen;
ftnint *innum;
ftnint *innamed;
char *inname;
ftnlen innamlen;
char *inacc;
ftnlen inacclen;
char *inseq;
ftnlen inseqlen;
char *indir;
ftnlen indirlen;
char *infmt;
ftnlen infmtlen;
char *inform;
ftnint informlen;
char *inunf;
ftnlen inunflen;
ftnint *inrecl;
ftnint *innrec;
char *inblank;
ftnlen inblanklen;
} inlist;
#define VOID void
union Multitype { /* for multiple entry points */
integer1 g;
shortint h;
integer i;
/* longint j; */
real r;
doublereal d;
complex c;
doublecomplex z;
};
typedef union Multitype Multitype;
/*typedef long int Long;*/ /* No longer used; formerly in Namelist */
struct Vardesc { /* for Namelist */
char *name;
char *addr;
ftnlen *dims;
int type;
};
typedef struct Vardesc Vardesc;
struct Namelist {
char *name;
Vardesc **vars;
int nvars;
};
typedef struct Namelist Namelist;
#define abs(x) ((x) >= 0 ? (x) : -(x))
#define dabs(x) (doublereal)abs(x)
#define min(a,b) ((a) <= (b) ? (a) : (b))
#define max(a,b) ((a) >= (b) ? (a) : (b))
#define dmin(a,b) (doublereal)min(a,b)
#define dmax(a,b) (doublereal)max(a,b)
#define bit_test(a,b) ((a) >> (b) & 1)
#define bit_clear(a,b) ((a) & ~((uinteger)1 << (b)))
#define bit_set(a,b) ((a) | ((uinteger)1 << (b)))
/* procedure parameter types for -A and -C++ */
#define F2C_proc_par_types 1
#ifdef __cplusplus
typedef int /* Unknown procedure type */ (*U_fp)(...);
typedef shortint (*J_fp)(...);
typedef integer (*I_fp)(...);
typedef real (*R_fp)(...);
typedef doublereal (*D_fp)(...), (*E_fp)(...);
typedef /* Complex */ VOID (*C_fp)(...);
typedef /* Double Complex */ VOID (*Z_fp)(...);
typedef logical (*L_fp)(...);
typedef shortlogical (*K_fp)(...);
typedef /* Character */ VOID (*H_fp)(...);
typedef /* Subroutine */ int (*S_fp)(...);
#else
typedef int /* Unknown procedure type */ (*U_fp)();
typedef shortint (*J_fp)();
typedef integer (*I_fp)();
typedef real (*R_fp)();
typedef doublereal (*D_fp)(), (*E_fp)();
typedef /* Complex */ VOID (*C_fp)();
typedef /* Double Complex */ VOID (*Z_fp)();
typedef logical (*L_fp)();
typedef shortlogical (*K_fp)();
typedef /* Character */ VOID (*H_fp)();
typedef /* Subroutine */ int (*S_fp)();
#endif
/* E_fp is for real functions when -R is not specified */
typedef VOID C_f; /* complex function */
typedef VOID H_f; /* character function */
typedef VOID Z_f; /* double complex function */
typedef doublereal E_f; /* real function with -R not specified */
/* undef any lower-case symbols that your C compiler predefines, e.g.: */
#ifndef Skip_f2c_Undefs
#undef cray
#undef gcos
#undef mc68010
#undef mc68020
#undef mips
#undef pdp11
#undef sgi
#undef sparc
#undef sun
#undef sun2
#undef sun3
#undef sun4
#undef u370
#undef u3b
#undef u3b2
#undef u3b5
#undef unix
#undef vax
#endif
#endif
没有合适的资源?快使用搜索试试~ 我知道了~
CLAPACK_dll.rar_BLAS windo_clapack.lib_dgemm_ clapack_visual c
共1439个文件
h:1434个
dll:2个
lib:2个
1.该资源内容由用户上传,如若侵权请联系客服进行举报
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
版权申诉
0 下载量 201 浏览量
2022-07-15
15:56:15
上传
评论
收藏 1.85MB RAR 举报
温馨提示
Blas&Lapack Windows 完整DLL,lib以及header,下载即可使用
资源详情
资源评论
资源推荐
收起资源包目录
CLAPACK_dll.rar_BLAS windo_clapack.lib_dgemm_ clapack_visual c (1439个子文件)
lapack_win32.dll 3.6MB
blas_win32.dll 676KB
f2c.h 5KB
f2c.h 5KB
zggevx.h 592B
dggevx.h 573B
dlamch.h 545B
dlasd7.h 540B
zggesx.h 535B
dlasd6.h 530B
zlalsa.h 527B
dlalsa.h 520B
dggesx.h 516B
cggevx.h 508B
zhbgvx.h 504B
dtgsen.h 498B
ztgsen.h 498B
zlals0.h 495B
dlasda.h 492B
sggevx.h 489B
slamch.h 489B
dlals0.h 488B
zgbsvx.h 487B
zggsvp.h 486B
ztgsja.h 485B
zgtsvx.h 481B
cggesx.h 475B
zhegvx.h 474B
zlaed7.h 471B
dsbgvx.h 470B
dgbsvx.h 469B
zggsvd.h 467B
dtgsja.h 467B
zgeevx.h 463B
dlaed7.h 463B
dlasd2.h 462B
slasd7.h 462B
dgeevx.h 462B
zheevr.h 461B
zgesvx.h 457B
zhbevx.h 457B
sggesx.h 456B
ztgsyl.h 455B
clalsa.h 455B
dlaed8.h 453B
slasd6.h 452B
zgtrfs.h 450B
dgtsvx.h 448B
zgges.h 448B
slalsa.h 448B
dggsvp.h 446B
chbgvx.h 444B
dsygvx.h 443B
zlaed8.h 442B
dgesvx.h 439B
zpbsvx.h 439B
ctgsen.h 438B
dtgsy2.h 435B
clals0.h 435B
dtgsyl.h 434B
zhpgvx.h 432B
stgsen.h 432B
dggsvd.h 430B
claed7.h 429B
dgges.h 429B
slals0.h 428B
slaed7.h 427B
dlaebz.h 427B
dsbevx.h 426B
cggsvp.h 426B
zheevx.h 426B
ctgsja.h 425B
zhesvx.h 425B
zsysvx.h 425B
zhgeqz.h 424B
ztgsy2.h 424B
zposvx.h 422B
cgbsvx.h 421B
dpbsvx.h 421B
chegvx.h 420B
slasda.h 420B
dgtrfs.h 417B
dsyevr.h 416B
ssbgvx.h 416B
ztgsna.h 414B
cggsvd.h 413B
cheevr.h 413B
dgeesx.h 411B
zstegr.h 410B
sgbsvx.h 409B
zgbrfs.h 409B
slasd2.h 408B
dlasd3.h 408B
dstevr.h 407B
dsysvx.h 407B
dstegr.h 407B
stgsja.h 407B
dhgeqz.h 405B
zhsein.h 405B
slaed8.h 405B
共 1439 条
- 1
- 2
- 3
- 4
- 5
- 6
- 15
朱moyimi
- 粉丝: 61
- 资源: 1万+
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功
评论0