1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
|
/* Copyright INRIA */
/********************************************************
* Table of hard coded Scilab interface
* to add a new interface add a declaration and a new entry
* at the end of the Interfaces array
* The maximum number of interfaces is bound to DynInterfStart
* ( file ../sun/addinter.h )
********************************************************/
extern void /* 01 */ C2F(matlu)();
extern void /* 02 */ C2F(MatdsRC)();
extern void /* 03 */ C2F(matsvd)();
extern void /* 04 */ C2F(matqr)();
extern void /* 05 */ C2F(matio)();
extern void /* 06 */ C2F(matelm)();
extern void /* 07 */ C2F(matdes)();
extern void /* 08 */ C2F(matqz)();
extern void /* 09 */ C2F(matric)();
extern void /* 10 */ C2F(matnew)();
extern void /* 11 */ C2F(matopt)();
extern void /* 12 */ C2F(matode)();
extern void /* 13 */ C2F(matsys)();
extern void /* 14 */ C2F(matusr)();
extern void /* 15 */ C2F(metane)();
extern void /* 16 */ C2F(polelm)();
extern void /* 17 */ C2F(lstelm)();
extern void /* 18 */ C2F(sigelm)();
extern void /* 19 */ C2F(datatf)();
extern void /* 20 */ C2F(polaut)();
extern void /* 21 */ C2F(strelm)();
extern void /* 22 */ C2F(fmlelm)();
extern void /* 23 */ C2F(logelm)();
extern void /* 24 */ C2F(matus2)();
extern void /* 25 */ C2F(xawelm)();
extern void /* 26 */ C2F(matimp)();
extern void /* 27 */ C2F(spelm)();
extern void /* 28 */ C2F(intscicos)();
extern void /* 29 */ C2F(matodc)();
extern void /* 30 */ C2F(defint)();
extern void /* 31 */ C2F(feval)();
extern void /* 32 */ C2F(bva)();
extern void /* 33 */ C2F(comm)();
extern void /* 34 */ C2F(soundi)();
extern void /* 35 */ C2F(coselm)();
extern void /* 36 */ C2F(specfun)();
extern void /* 37 */ C2F(dcd)();
extern void /* 38 */ C2F(randlib)();
extern void /* 39 */ C2F(fraclab_interf)();
#ifdef WITH_TK
extern void /* 40 */ C2F(tksciInterf)();
#define TKINTERF C2F(tksciInterf)
#else
#define TKINTERF C2F(NoTksci)
#endif
extern void /* 41 */ C2F(lstelmi)();
#ifdef WITH_PVM
extern void /* 42 */ C2F(intpvm)();
#define PVMINTERF C2F(intpvm)
#else
#define PVMINTERF C2F(NoPvm)
#endif
static OpTab Interfaces[] ={
/* 01 */ C2F(matlu),
/* 02 */ C2F(MatdsRC),
/* 03 */ C2F(matsvd),
/* 04 */ C2F(matqr),
/* 05 */ C2F(matio),
/* 06 */ C2F(matelm),
/* 07 */ C2F(matdes),
/* 08 */ C2F(matqz),
/* 09 */ C2F(matric),
/* 10 */ C2F(matnew),
/* 11 */ C2F(matopt),
/* 12 */ C2F(matode),
/* 13 */ C2F(matsys),
/* 14 */ C2F(matusr),
/* 15 */ C2F(metane),
/* 16 */ C2F(polelm),
/* 17 */ C2F(lstelm),
/* 18 */ C2F(sigelm),
/* 19 */ C2F(datatf),
/* 20 */ C2F(polaut),
/* 21 */ C2F(strelm),
/* 22 */ C2F(fmlelm),
/* 23 */ C2F(logelm),
/* 24 */ C2F(matus2),
/* 25 */ C2F(xawelm),
/* 26 */ C2F(matimp),
/* 27 */ C2F(spelm),
/* 28 */ C2F(intscicos),
/* 29 */ C2F(matodc),
/* 30 */ C2F(defint),
/* 31 */ C2F(feval),
/* 32 */ C2F(bva),
/* 33 */ C2F(comm),
/* 34 */ C2F(soundi),
/* 35 */ C2F(coselm),
/* 36 */ C2F(specfun),
/* 37 */ C2F(dcd),
/* 38 */ C2F(randlib),
/* 39 */ C2F(fraclab_interf),
/* 40 */ TKINTERF,
/* 41 */ C2F(lstelmi),
/* 42 */ PVMINTERF,
};
|
