| /dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
| H A D | sspgvd.c | 221 integer liwmin; in sspgvd_() local
284 liwmin = 1; in sspgvd_()
291 liwmin = *n * 5 + 3; in sspgvd_()
298 liwmin = 1; in sspgvd_()
303 iwork[1] = liwmin; in sspgvd_()
308 else if (*liwork < liwmin && ! lquery) in sspgvd_()
342 r__1 = (real) liwmin; in sspgvd_()
344 liwmin = max(r__1,r__2); in sspgvd_()
399 iwork[1] = liwmin; in sspgvd_()
|
| H A D | dspgvd.c | 224 integer liwmin; in dspgvd_() local
285 liwmin = 1; in dspgvd_()
292 liwmin = *n * 5 + 3; in dspgvd_()
299 liwmin = 1; in dspgvd_()
304 iwork[1] = liwmin; in dspgvd_()
309 else if (*liwork < liwmin && ! lquery) in dspgvd_()
343 d__1 = (doublereal) liwmin; in dspgvd_()
345 liwmin = (integer) max(d__1,d__2); in dspgvd_()
400 iwork[1] = liwmin; in dspgvd_()
|
| H A D | zhpgvd.c | 243 integer liwmin; in zhpgvd_() local
311 liwmin = 1; in zhpgvd_()
322 liwmin = *n * 5 + 3; in zhpgvd_()
328 liwmin = 1; in zhpgvd_()
334 iwork[1] = liwmin; in zhpgvd_()
343 else if (*liwork < liwmin && ! lquery) in zhpgvd_()
381 d__1 = (doublereal) liwmin; in zhpgvd_()
383 liwmin = (integer) max(d__1,d__2); in zhpgvd_()
440 iwork[1] = liwmin; in zhpgvd_()
|
| H A D | chpgvd.c | 248 integer liwmin, lrwmin; in chpgvd_() local
309 liwmin = 1; in chpgvd_()
320 liwmin = *n * 5 + 3; in chpgvd_()
326 liwmin = 1; in chpgvd_()
332 iwork[1] = liwmin; in chpgvd_()
341 else if (*liwork < liwmin && ! lquery) in chpgvd_()
379 r__1 = (real) liwmin; in chpgvd_()
381 liwmin = max(r__1,r__2); in chpgvd_()
438 iwork[1] = liwmin; in chpgvd_()
|
| H A D | sspevd.c | 200 integer indwrk, liwmin; in sspevd_() local
264 liwmin = 1; in sspevd_()
271 liwmin = *n * 5 + 3; in sspevd_()
278 liwmin = 1; in sspevd_()
282 iwork[1] = liwmin; in sspevd_()
288 else if (*liwork < liwmin && ! lquery) in sspevd_()
368 iwork[1] = liwmin; in sspevd_()
|
| H A D | dspevd.c | 204 integer indwrk, liwmin; in dspevd_() local
263 liwmin = 1; in dspevd_()
270 liwmin = *n * 5 + 3; in dspevd_()
277 liwmin = 1; in dspevd_()
281 iwork[1] = liwmin; in dspevd_()
287 else if (*liwork < liwmin && ! lquery) in dspevd_()
367 iwork[1] = liwmin; in dspevd_()
|
| H A D | sstevd.c | 179 integer liwmin; in sstevd_() local
218 liwmin = 1; in sstevd_()
225 liwmin = *n * 5 + 3; in sstevd_()
242 iwork[1] = liwmin; in sstevd_()
247 else if (*liwork < liwmin && ! lquery) in sstevd_()
318 iwork[1] = liwmin; in sstevd_()
|
| H A D | dstevd.c | 183 integer liwmin; in dstevd_() local
219 liwmin = 1; in dstevd_()
226 liwmin = *n * 5 + 3; in dstevd_()
243 iwork[1] = liwmin; in dstevd_()
248 else if (*liwork < liwmin && ! lquery) in dstevd_()
319 iwork[1] = liwmin; in dstevd_()
|
| H A D | dsbgvd.c | 239 integer indwrk, liwmin; in dsbgvd_() local
280 liwmin = 1; in dsbgvd_()
285 liwmin = *n * 5 + 3; in dsbgvd_()
292 liwmin = 1; in dsbgvd_()
330 iwork[1] = liwmin; in dsbgvd_()
335 else if (*liwork < liwmin && ! lquery) in dsbgvd_()
390 iwork[1] = liwmin; in dsbgvd_()
|
| H A D | ssbgvd.c | 240 integer indwrk, liwmin; in ssbgvd_() local
283 liwmin = 1; in ssbgvd_()
288 liwmin = *n * 5 + 3; in ssbgvd_()
295 liwmin = 1; in ssbgvd_()
333 iwork[1] = liwmin; in ssbgvd_()
338 else if (*liwork < liwmin && ! lquery) in ssbgvd_()
393 iwork[1] = liwmin; in ssbgvd_()
|
| H A D | zhpevd.c | 229 integer indrwk, indwrk, liwmin, lrwmin; in zhpevd_() local
291 liwmin = 1; in zhpevd_()
302 liwmin = *n * 5 + 3; in zhpevd_()
308 liwmin = 1; in zhpevd_()
314 iwork[1] = liwmin; in zhpevd_()
323 else if (*liwork < liwmin && ! lquery) in zhpevd_()
415 iwork[1] = liwmin; in zhpevd_()
|
| H A D | chpevd.c | 230 integer indrwk, indwrk, liwmin; in chpevd_() local
293 liwmin = 1; in chpevd_()
304 liwmin = *n * 5 + 3; in chpevd_()
310 liwmin = 1; in chpevd_()
316 iwork[1] = liwmin; in chpevd_()
325 else if (*liwork < liwmin && ! lquery) in chpevd_()
417 iwork[1] = liwmin; in chpevd_()
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
| H A D | zhpgvd.c | 33 static integer liwmin; in zhpgvd_() local
219 liwmin = 1; in zhpgvd_()
227 liwmin = *n * 5 + 3; in zhpgvd_()
231 liwmin = 1; in zhpgvd_()
248 } else if (*liwork < liwmin && ! lquery) { in zhpgvd_()
255 iwork[1] = liwmin; in zhpgvd_()
293 d__1 = (doublereal) liwmin, d__2 = (doublereal) iwork[1]; in zhpgvd_()
294 liwmin = (integer) max(d__1,d__2); in zhpgvd_()
344 iwork[1] = liwmin; in zhpgvd_()
|
| H A D | sspgvd.c | 36 static integer liwmin; in sspgvd_() local
206 liwmin = 1; in sspgvd_()
217 liwmin = *n * 5 + 3; in sspgvd_()
222 liwmin = 1; in sspgvd_()
239 } else if (*liwork < liwmin && ! lquery) { in sspgvd_()
245 iwork[1] = liwmin; in sspgvd_()
279 r__1 = (real) liwmin, r__2 = (real) iwork[1]; in sspgvd_()
280 liwmin = dmax(r__1,r__2); in sspgvd_()
329 iwork[1] = liwmin; in sspgvd_()
|
| H A D | dspgvd.c | 41 static integer liwmin; in dspgvd_() local
208 liwmin = 1; in dspgvd_()
219 liwmin = *n * 5 + 3; in dspgvd_()
224 liwmin = 1; in dspgvd_()
241 } else if (*liwork < liwmin && ! lquery) { in dspgvd_()
247 iwork[1] = liwmin; in dspgvd_()
281 d__1 = (doublereal) liwmin, d__2 = (doublereal) iwork[1]; in dspgvd_()
282 liwmin = (integer) max(d__1,d__2); in dspgvd_()
331 iwork[1] = liwmin; in dspgvd_()
|
| H A D | chpgvd.c | 39 static integer liwmin, lrwmin; in chpgvd_() local
216 liwmin = 1; in chpgvd_()
224 liwmin = *n * 5 + 3; in chpgvd_()
228 liwmin = 1; in chpgvd_()
245 } else if (*liwork < liwmin && ! lquery) { in chpgvd_()
252 iwork[1] = liwmin; in chpgvd_()
290 r__1 = (real) liwmin, r__2 = (real) iwork[1]; in chpgvd_()
291 liwmin = dmax(r__1,r__2); in chpgvd_()
341 iwork[1] = liwmin; in chpgvd_()
|
| H A D | sstevd.c | 37 static integer liwmin; in sstevd_() local
163 liwmin = 1; in sstevd_()
169 liwmin = *n * 5 + 3; in sstevd_()
180 } else if (*liwork < liwmin && ! lquery) { in sstevd_()
186 iwork[1] = liwmin; in sstevd_()
254 iwork[1] = liwmin; in sstevd_()
|
| H A D | dstevd.c | 44 static integer liwmin; in dstevd_() local
168 liwmin = 1; in dstevd_()
174 liwmin = *n * 5 + 3; in dstevd_()
185 } else if (*liwork < liwmin && ! lquery) { in dstevd_()
191 iwork[1] = liwmin; in dstevd_()
259 iwork[1] = liwmin; in dstevd_()
|
| H A D | dspevd.c | 47 static integer indwrk, liwmin; in dspevd_() local
190 liwmin = 1; in dspevd_()
194 liwmin = *n * 5 + 3; in dspevd_()
199 liwmin = 1; in dspevd_()
214 } else if (*liwork < liwmin && ! lquery) { in dspevd_()
220 iwork[1] = liwmin; in dspevd_()
301 iwork[1] = liwmin; in dspevd_()
|
| H A D | sspevd.c | 42 static integer indwrk, liwmin; in sspevd_() local
188 liwmin = 1; in sspevd_()
192 liwmin = *n * 5 + 3; in sspevd_()
197 liwmin = 1; in sspevd_()
212 } else if (*liwork < liwmin && ! lquery) { in sspevd_()
218 iwork[1] = liwmin; in sspevd_()
299 iwork[1] = liwmin; in sspevd_()
|
| H A D | ssygvd.c | 36 static integer liwmin; in ssygvd_() local
208 liwmin = 1; in ssygvd_()
211 liopt = liwmin; in ssygvd_()
214 liwmin = *n * 5 + 3; in ssygvd_()
219 liwmin = 1; in ssygvd_()
223 liopt = liwmin; in ssygvd_()
239 } else if (*liwork < liwmin && ! lquery) { in ssygvd_()
|
| H A D | dsygvd.c | 36 static integer liwmin; in dsygvd_() local
207 liwmin = 1; in dsygvd_()
210 liopt = liwmin; in dsygvd_()
213 liwmin = *n * 5 + 3; in dsygvd_()
218 liwmin = 1; in dsygvd_()
222 liopt = liwmin; in dsygvd_()
238 } else if (*liwork < liwmin && ! lquery) { in dsygvd_()
|
| H A D | dsbgvd.c | 45 static integer indwrk, liwmin; in dsbgvd_() local
218 liwmin = 1; in dsbgvd_()
222 liwmin = *n * 5 + 3; in dsbgvd_()
227 liwmin = 1; in dsbgvd_()
250 } else if (*liwork < liwmin && ! lquery) { in dsbgvd_()
256 iwork[1] = liwmin; in dsbgvd_()
314 iwork[1] = liwmin; in dsbgvd_()
|
| H A D | chegvd.c | 43 static integer liwmin, lrwmin; in chegvd_() local
221 liwmin = 1; in chegvd_()
224 liopt = liwmin; in chegvd_()
229 liwmin = *n * 5 + 3; in chegvd_()
233 liwmin = 1; in chegvd_()
237 liopt = liwmin; in chegvd_()
255 } else if (*liwork < liwmin && ! lquery) { in chegvd_()
|
| H A D | ssbgvd.c | 38 static integer indwrk, liwmin; in ssbgvd_() local
218 liwmin = 1; in ssbgvd_()
222 liwmin = *n * 5 + 3; in ssbgvd_()
227 liwmin = 1; in ssbgvd_()
250 } else if (*liwork < liwmin && ! lquery) { in ssbgvd_()
256 iwork[1] = liwmin; in ssbgvd_()
314 iwork[1] = liwmin; in ssbgvd_()
|