arpack.h
Go to the documentation of this file.
1 // LIC// ====================================================================
2 // LIC// This file forms part of oomph-lib, the object-oriented,
3 // LIC// multi-physics finite-element library, available
4 // LIC// at http://www.oomph-lib.org.
5 // LIC//
6 // LIC// Copyright (C) 2006-2023 Matthias Heil and Andrew Hazel
7 // LIC//
8 // LIC// This library is free software; you can redistribute it and/or
9 // LIC// modify it under the terms of the GNU Lesser General Public
10 // LIC// License as published by the Free Software Foundation; either
11 // LIC// version 2.1 of the License, or (at your option) any later version.
12 // LIC//
13 // LIC// This library is distributed in the hope that it will be useful,
14 // LIC// but WITHOUT ANY WARRANTY; without even the implied warranty of
15 // LIC// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 // LIC// Lesser General Public License for more details.
17 // LIC//
18 // LIC// You should have received a copy of the GNU Lesser General Public
19 // LIC// License along with this library; if not, write to the Free Software
20 // LIC// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
21 // LIC// 02110-1301 USA.
22 // LIC//
23 // LIC// The authors may be contacted at oomph-lib@maths.man.ac.uk.
24 // LIC//
25 // LIC//====================================================================
26 /*cfortran.,h headers for the ARPACK routines*/
27 
28 PROTOCCALLSFSUB16(DNAUPD,
29  dnaupd,
30  PINT,
31  PSTRING,
32  INT,
33  PSTRING,
34  INT,
35  PDOUBLE,
36  DOUBLEV,
37  INT,
38  DOUBLEVV,
39  INT,
40  INTV,
41  INTV,
42  DOUBLEV,
43  DOUBLEV,
44  INT,
45  PINT)
46 #define DNAUPD(IDO, \
47  BMAT, \
48  N, \
49  WHICH, \
50  NEV, \
51  TOL, \
52  RESID, \
53  NCV, \
54  V, \
55  LDV, \
56  IPARAM, \
57  IPNTR, \
58  WORKD, \
59  WORKL, \
60  LWORKL, \
61  INFO) \
62  CCALLSFSUB16(DNAUPD, \
63  dnaupd, \
64  PINT, \
65  PSTRING, \
66  INT, \
67  PSTRING, \
68  INT, \
69  PDOUBLE, \
70  DOUBLEV, \
71  INT, \
72  DOUBLEVV, \
73  INT, \
74  INTV, \
75  INTV, \
76  DOUBLEV, \
77  DOUBLEV, \
78  INT, \
79  PINT, \
80  IDO, \
81  BMAT, \
82  N, \
83  WHICH, \
84  NEV, \
85  TOL, \
86  RESID, \
87  NCV, \
88  V, \
89  LDV, \
90  IPARAM, \
91  IPNTR, \
92  WORKD, \
93  WORKL, \
94  LWORKL, \
95  INFO)
96 
97 PROTOCCALLSFSUB25(DNEUPD,
98  dneupd,
99  LOGICAL,
100  PSTRING,
101  LOGICALV,
102  DOUBLEV,
103  DOUBLEV,
104  DOUBLEVV,
105  INT,
106  DOUBLE,
107  DOUBLE,
108  DOUBLEV,
109  PSTRING,
110  INT,
111  PSTRING,
112  INT,
113  DOUBLE,
114  DOUBLEV,
115  INT,
116  DOUBLEVV,
117  INT,
118  INTV,
119  INTV,
120  DOUBLEV,
121  DOUBLEV,
122  INT,
123  PINT)
124 
125 #define DNEUPD(RVEC, \
126  HOWMNY, \
127  SELECT, \
128  DR, \
129  DI, \
130  Z, \
131  LDZ, \
132  SIGMAR, \
133  SIGMAI, \
134  WORKEV, \
135  BMAT, \
136  N, \
137  WHICH, \
138  NEV, \
139  TOL, \
140  RESID, \
141  NCV, \
142  V, \
143  LDV, \
144  IPARAM, \
145  IPNTR, \
146  WORKD, \
147  WORKL, \
148  LWORKL, \
149  INFO) \
150  CCALLSFSUB25(DNEUPD, \
151  dneupd, \
152  LOGICAL, \
153  PSTRING, \
154  LOGICALV, \
155  DOUBLEV, \
156  DOUBLEV, \
157  DOUBLEVV, \
158  INT, \
159  DOUBLE, \
160  DOUBLE, \
161  DOUBLEV, \
162  PSTRING, \
163  INT, \
164  PSTRING, \
165  INT, \
166  DOUBLE, \
167  DOUBLEV, \
168  INT, \
169  DOUBLEVV, \
170  INT, \
171  INTV, \
172  INTV, \
173  DOUBLEV, \
174  DOUBLEV, \
175  INT, \
176  PINT, \
177  RVEC, \
178  HOWMNY, \
179  SELECT, \
180  DR, \
181  DI, \
182  Z, \
183  LDZ, \
184  SIGMAR, \
185  SIGMAI, \
186  WORKEV, \
187  BMAT, \
188  N, \
189  WHICH, \
190  NEV, \
191  TOL, \
192  RESID, \
193  NCV, \
194  V, \
195  LDV, \
196  IPARAM, \
197  IPNTR, \
198  WORKD, \
199  WORKL, \
200  LWORKL, \
201  INFO)
DOUBLEVV
DOUBLEVV
Definition: arpack.h:104
PROTOCCALLSFSUB16
PROTOCCALLSFSUB16(DNAUPD, dnaupd, PINT, PSTRING, INT, PSTRING, INT, PDOUBLE, DOUBLEV, INT, DOUBLEVV, INT, INTV, INTV, DOUBLEV, DOUBLEV, INT, PINT) PROTOCCALLSFSUB25(DNEUPD
dneupd
dneupd
Definition: arpack.h:98
LOGICALV
LOGICALV
Definition: arpack.h:101
INT
INT
Definition: arpack.h:105
DOUBLE
DOUBLE
Definition: arpack.h:106
PSTRING
PSTRING
Definition: arpack.h:100
INTV
INTV
Definition: arpack.h:118
LOGICAL
LOGICAL
Definition: arpack.h:99
DOUBLEV
DOUBLEV
Definition: arpack.h:102
PINT
PINT
Definition: frontal.h:31