lapack_sys/
lib.rs

1//! Bindings to [LAPACK] \(Fortran).
2//!
3//! The usage of the package is explained [here][usage].
4//!
5//! [lapack]: https://en.wikipedia.org/wiki/LAPACK
6//! [usage]: https://blas-lapack-rs.github.io/usage
7
8#![allow(non_camel_case_types)]
9#![no_std]
10
11extern crate libc;
12
13use libc::{c_char, c_double, c_float, c_int};
14
15/// A complex number with 64-bit parts.
16#[allow(bad_style)]
17pub type c_double_complex = [libc::c_double; 2];
18
19/// A complex number with 32-bit parts.
20#[allow(bad_style)]
21pub type c_float_complex = [libc::c_float; 2];
22
23pub type lapack_complex_double = c_double_complex;
24pub type lapack_complex_float = c_float_complex;
25pub type lapack_int = c_int;
26pub type lapack_logical = lapack_int;
27
28pub type LAPACK_S_SELECT2 = Option<extern "C" fn(*const c_float, *const c_float) -> lapack_logical>;
29pub type LAPACK_S_SELECT3 = Option<
30    extern "C" fn(*const c_float, *const c_float, *const c_float)
31        -> lapack_logical,
32>;
33
34pub type LAPACK_D_SELECT2 = Option<
35    extern "C" fn(*const c_double, *const c_double) -> lapack_logical,
36>;
37pub type LAPACK_D_SELECT3 = Option<
38    extern "C" fn(*const c_double, *const c_double, *const c_double)
39        -> lapack_logical,
40>;
41
42pub type LAPACK_C_SELECT1 = Option<extern "C" fn(*const lapack_complex_float) -> lapack_logical>;
43pub type LAPACK_C_SELECT2 = Option<
44    extern "C" fn(*const lapack_complex_float, *const lapack_complex_float)
45        -> lapack_logical,
46>;
47
48pub type LAPACK_Z_SELECT1 = Option<extern "C" fn(*const lapack_complex_double) -> lapack_logical>;
49pub type LAPACK_Z_SELECT2 = Option<
50    extern "C" fn(*const lapack_complex_double, *const lapack_complex_double)
51        -> lapack_logical,
52>;
53
54extern "C" {
55    pub fn sgetrf_(
56        m: *const lapack_int,
57        n: *const lapack_int,
58        a: *mut c_float,
59        lda: *const lapack_int,
60        ipiv: *mut lapack_int,
61        info: *mut lapack_int,
62    );
63    pub fn dgetrf_(
64        m: *const lapack_int,
65        n: *const lapack_int,
66        a: *mut c_double,
67        lda: *const lapack_int,
68        ipiv: *mut lapack_int,
69        info: *mut lapack_int,
70    );
71    pub fn cgetrf_(
72        m: *const lapack_int,
73        n: *const lapack_int,
74        a: *mut lapack_complex_float,
75        lda: *const lapack_int,
76        ipiv: *mut lapack_int,
77        info: *mut lapack_int,
78    );
79    pub fn zgetrf_(
80        m: *const lapack_int,
81        n: *const lapack_int,
82        a: *mut lapack_complex_double,
83        lda: *const lapack_int,
84        ipiv: *mut lapack_int,
85        info: *mut lapack_int,
86    );
87
88    pub fn sgetrf2_(
89        m: *const lapack_int,
90        n: *const lapack_int,
91        a: *mut c_float,
92        lda: *const lapack_int,
93        ipiv: *mut lapack_int,
94        info: *mut lapack_int,
95    );
96    pub fn dgetrf2_(
97        m: *const lapack_int,
98        n: *const lapack_int,
99        a: *mut c_double,
100        lda: *const lapack_int,
101        ipiv: *mut lapack_int,
102        info: *mut lapack_int,
103    );
104    pub fn cgetrf2_(
105        m: *const lapack_int,
106        n: *const lapack_int,
107        a: *mut lapack_complex_float,
108        lda: *const lapack_int,
109        ipiv: *mut lapack_int,
110        info: *mut lapack_int,
111    );
112    pub fn zgetrf2_(
113        m: *const lapack_int,
114        n: *const lapack_int,
115        a: *mut lapack_complex_double,
116        lda: *const lapack_int,
117        ipiv: *mut lapack_int,
118        info: *mut lapack_int,
119    );
120
121    pub fn sgbtrf_(
122        m: *const lapack_int,
123        n: *const lapack_int,
124        kl: *const lapack_int,
125        ku: *const lapack_int,
126        ab: *mut c_float,
127        ldab: *const lapack_int,
128        ipiv: *mut lapack_int,
129        info: *mut lapack_int,
130    );
131    pub fn dgbtrf_(
132        m: *const lapack_int,
133        n: *const lapack_int,
134        kl: *const lapack_int,
135        ku: *const lapack_int,
136        ab: *mut c_double,
137        ldab: *const lapack_int,
138        ipiv: *mut lapack_int,
139        info: *mut lapack_int,
140    );
141    pub fn cgbtrf_(
142        m: *const lapack_int,
143        n: *const lapack_int,
144        kl: *const lapack_int,
145        ku: *const lapack_int,
146        ab: *mut lapack_complex_float,
147        ldab: *const lapack_int,
148        ipiv: *mut lapack_int,
149        info: *mut lapack_int,
150    );
151    pub fn zgbtrf_(
152        m: *const lapack_int,
153        n: *const lapack_int,
154        kl: *const lapack_int,
155        ku: *const lapack_int,
156        ab: *mut lapack_complex_double,
157        ldab: *const lapack_int,
158        ipiv: *mut lapack_int,
159        info: *mut lapack_int,
160    );
161
162    pub fn sgttrf_(
163        n: *const lapack_int,
164        dl: *mut c_float,
165        d: *mut c_float,
166        du: *mut c_float,
167        du2: *mut c_float,
168        ipiv: *mut lapack_int,
169        info: *mut lapack_int,
170    );
171    pub fn dgttrf_(
172        n: *const lapack_int,
173        dl: *mut c_double,
174        d: *mut c_double,
175        du: *mut c_double,
176        du2: *mut c_double,
177        ipiv: *mut lapack_int,
178        info: *mut lapack_int,
179    );
180    pub fn cgttrf_(
181        n: *const lapack_int,
182        dl: *mut lapack_complex_float,
183        d: *mut lapack_complex_float,
184        du: *mut lapack_complex_float,
185        du2: *mut lapack_complex_float,
186        ipiv: *mut lapack_int,
187        info: *mut lapack_int,
188    );
189    pub fn zgttrf_(
190        n: *const lapack_int,
191        dl: *mut lapack_complex_double,
192        d: *mut lapack_complex_double,
193        du: *mut lapack_complex_double,
194        du2: *mut lapack_complex_double,
195        ipiv: *mut lapack_int,
196        info: *mut lapack_int,
197    );
198
199    pub fn spotrf2_(
200        uplo: *const c_char,
201        n: *const lapack_int,
202        a: *mut c_float,
203        lda: *const lapack_int,
204        info: *mut lapack_int,
205    );
206    pub fn dpotrf2_(
207        uplo: *const c_char,
208        n: *const lapack_int,
209        a: *mut c_double,
210        lda: *const lapack_int,
211        info: *mut lapack_int,
212    );
213    pub fn cpotrf2_(
214        uplo: *const c_char,
215        n: *const lapack_int,
216        a: *mut lapack_complex_float,
217        lda: *const lapack_int,
218        info: *mut lapack_int,
219    );
220    pub fn zpotrf2_(
221        uplo: *const c_char,
222        n: *const lapack_int,
223        a: *mut lapack_complex_double,
224        lda: *const lapack_int,
225        info: *mut lapack_int,
226    );
227
228    pub fn spotrf_(
229        uplo: *const c_char,
230        n: *const lapack_int,
231        a: *mut c_float,
232        lda: *const lapack_int,
233        info: *mut lapack_int,
234    );
235    pub fn dpotrf_(
236        uplo: *const c_char,
237        n: *const lapack_int,
238        a: *mut c_double,
239        lda: *const lapack_int,
240        info: *mut lapack_int,
241    );
242    pub fn cpotrf_(
243        uplo: *const c_char,
244        n: *const lapack_int,
245        a: *mut lapack_complex_float,
246        lda: *const lapack_int,
247        info: *mut lapack_int,
248    );
249    pub fn zpotrf_(
250        uplo: *const c_char,
251        n: *const lapack_int,
252        a: *mut lapack_complex_double,
253        lda: *const lapack_int,
254        info: *mut lapack_int,
255    );
256
257    pub fn dpstrf_(
258        uplo: *const c_char,
259        n: *const lapack_int,
260        a: *mut c_double,
261        lda: *const lapack_int,
262        piv: *mut lapack_int,
263        rank: *mut lapack_int,
264        tol: *const c_double,
265        work: *mut c_double,
266        info: *mut lapack_int,
267    );
268    pub fn spstrf_(
269        uplo: *const c_char,
270        n: *const lapack_int,
271        a: *mut c_float,
272        lda: *const lapack_int,
273        piv: *mut lapack_int,
274        rank: *mut lapack_int,
275        tol: *const c_float,
276        work: *mut c_float,
277        info: *mut lapack_int,
278    );
279    pub fn zpstrf_(
280        uplo: *const c_char,
281        n: *const lapack_int,
282        a: *mut lapack_complex_double,
283        lda: *const lapack_int,
284        piv: *mut lapack_int,
285        rank: *mut lapack_int,
286        tol: *const c_double,
287        work: *mut c_double,
288        info: *mut lapack_int,
289    );
290    pub fn cpstrf_(
291        uplo: *const c_char,
292        n: *const lapack_int,
293        a: *mut lapack_complex_float,
294        lda: *const lapack_int,
295        piv: *mut lapack_int,
296        rank: *mut lapack_int,
297        tol: *const c_float,
298        work: *mut c_float,
299        info: *mut lapack_int,
300    );
301
302    pub fn dpftrf_(
303        transr: *const c_char,
304        uplo: *const c_char,
305        n: *const lapack_int,
306        a: *mut c_double,
307        info: *mut lapack_int,
308    );
309    pub fn spftrf_(
310        transr: *const c_char,
311        uplo: *const c_char,
312        n: *const lapack_int,
313        a: *mut c_float,
314        info: *mut lapack_int,
315    );
316    pub fn zpftrf_(
317        transr: *const c_char,
318        uplo: *const c_char,
319        n: *const lapack_int,
320        a: *mut lapack_complex_double,
321        info: *mut lapack_int,
322    );
323    pub fn cpftrf_(
324        transr: *const c_char,
325        uplo: *const c_char,
326        n: *const lapack_int,
327        a: *mut lapack_complex_float,
328        info: *mut lapack_int,
329    );
330
331    pub fn spptrf_(
332        uplo: *const c_char,
333        n: *const lapack_int,
334        ap: *mut c_float,
335        info: *mut lapack_int,
336    );
337    pub fn dpptrf_(
338        uplo: *const c_char,
339        n: *const lapack_int,
340        ap: *mut c_double,
341        info: *mut lapack_int,
342    );
343    pub fn cpptrf_(
344        uplo: *const c_char,
345        n: *const lapack_int,
346        ap: *mut lapack_complex_float,
347        info: *mut lapack_int,
348    );
349    pub fn zpptrf_(
350        uplo: *const c_char,
351        n: *const lapack_int,
352        ap: *mut lapack_complex_double,
353        info: *mut lapack_int,
354    );
355
356    pub fn spbtrf_(
357        uplo: *const c_char,
358        n: *const lapack_int,
359        kd: *const lapack_int,
360        ab: *mut c_float,
361        ldab: *const lapack_int,
362        info: *mut lapack_int,
363    );
364    pub fn dpbtrf_(
365        uplo: *const c_char,
366        n: *const lapack_int,
367        kd: *const lapack_int,
368        ab: *mut c_double,
369        ldab: *const lapack_int,
370        info: *mut lapack_int,
371    );
372    pub fn cpbtrf_(
373        uplo: *const c_char,
374        n: *const lapack_int,
375        kd: *const lapack_int,
376        ab: *mut lapack_complex_float,
377        ldab: *const lapack_int,
378        info: *mut lapack_int,
379    );
380    pub fn zpbtrf_(
381        uplo: *const c_char,
382        n: *const lapack_int,
383        kd: *const lapack_int,
384        ab: *mut lapack_complex_double,
385        ldab: *const lapack_int,
386        info: *mut lapack_int,
387    );
388
389    pub fn spttrf_(n: *const lapack_int, d: *mut c_float, e: *mut c_float, info: *mut lapack_int);
390    pub fn dpttrf_(n: *const lapack_int, d: *mut c_double, e: *mut c_double, info: *mut lapack_int);
391    pub fn cpttrf_(
392        n: *const lapack_int,
393        d: *mut c_float,
394        e: *mut lapack_complex_float,
395        info: *mut lapack_int,
396    );
397    pub fn zpttrf_(
398        n: *const lapack_int,
399        d: *mut c_double,
400        e: *mut lapack_complex_double,
401        info: *mut lapack_int,
402    );
403
404    pub fn ssytrf_(
405        uplo: *const c_char,
406        n: *const lapack_int,
407        a: *mut c_float,
408        lda: *const lapack_int,
409        ipiv: *mut lapack_int,
410        work: *mut c_float,
411        lwork: *const lapack_int,
412        info: *mut lapack_int,
413    );
414    pub fn dsytrf_(
415        uplo: *const c_char,
416        n: *const lapack_int,
417        a: *mut c_double,
418        lda: *const lapack_int,
419        ipiv: *mut lapack_int,
420        work: *mut c_double,
421        lwork: *const lapack_int,
422        info: *mut lapack_int,
423    );
424    pub fn csytrf_(
425        uplo: *const c_char,
426        n: *const lapack_int,
427        a: *mut lapack_complex_float,
428        lda: *const lapack_int,
429        ipiv: *mut lapack_int,
430        work: *mut lapack_complex_float,
431        lwork: *const lapack_int,
432        info: *mut lapack_int,
433    );
434    pub fn zsytrf_(
435        uplo: *const c_char,
436        n: *const lapack_int,
437        a: *mut lapack_complex_double,
438        lda: *const lapack_int,
439        ipiv: *mut lapack_int,
440        work: *mut lapack_complex_double,
441        lwork: *const lapack_int,
442        info: *mut lapack_int,
443    );
444
445    pub fn chetrf_(
446        uplo: *const c_char,
447        n: *const lapack_int,
448        a: *mut lapack_complex_float,
449        lda: *const lapack_int,
450        ipiv: *mut lapack_int,
451        work: *mut lapack_complex_float,
452        lwork: *const lapack_int,
453        info: *mut lapack_int,
454    );
455    pub fn zhetrf_(
456        uplo: *const c_char,
457        n: *const lapack_int,
458        a: *mut lapack_complex_double,
459        lda: *const lapack_int,
460        ipiv: *mut lapack_int,
461        work: *mut lapack_complex_double,
462        lwork: *const lapack_int,
463        info: *mut lapack_int,
464    );
465
466    pub fn ssptrf_(
467        uplo: *const c_char,
468        n: *const lapack_int,
469        ap: *mut c_float,
470        ipiv: *mut lapack_int,
471        info: *mut lapack_int,
472    );
473    pub fn dsptrf_(
474        uplo: *const c_char,
475        n: *const lapack_int,
476        ap: *mut c_double,
477        ipiv: *mut lapack_int,
478        info: *mut lapack_int,
479    );
480    pub fn csptrf_(
481        uplo: *const c_char,
482        n: *const lapack_int,
483        ap: *mut lapack_complex_float,
484        ipiv: *mut lapack_int,
485        info: *mut lapack_int,
486    );
487    pub fn zsptrf_(
488        uplo: *const c_char,
489        n: *const lapack_int,
490        ap: *mut lapack_complex_double,
491        ipiv: *mut lapack_int,
492        info: *mut lapack_int,
493    );
494
495    pub fn chptrf_(
496        uplo: *const c_char,
497        n: *const lapack_int,
498        ap: *mut lapack_complex_float,
499        ipiv: *mut lapack_int,
500        info: *mut lapack_int,
501    );
502    pub fn zhptrf_(
503        uplo: *const c_char,
504        n: *const lapack_int,
505        ap: *mut lapack_complex_double,
506        ipiv: *mut lapack_int,
507        info: *mut lapack_int,
508    );
509
510    pub fn sgetrs_(
511        trans: *const c_char,
512        n: *const lapack_int,
513        nrhs: *const lapack_int,
514        a: *const c_float,
515        lda: *const lapack_int,
516        ipiv: *const lapack_int,
517        b: *mut c_float,
518        ldb: *const lapack_int,
519        info: *mut lapack_int,
520    );
521    pub fn dgetrs_(
522        trans: *const c_char,
523        n: *const lapack_int,
524        nrhs: *const lapack_int,
525        a: *const c_double,
526        lda: *const lapack_int,
527        ipiv: *const lapack_int,
528        b: *mut c_double,
529        ldb: *const lapack_int,
530        info: *mut lapack_int,
531    );
532    pub fn cgetrs_(
533        trans: *const c_char,
534        n: *const lapack_int,
535        nrhs: *const lapack_int,
536        a: *const lapack_complex_float,
537        lda: *const lapack_int,
538        ipiv: *const lapack_int,
539        b: *mut lapack_complex_float,
540        ldb: *const lapack_int,
541        info: *mut lapack_int,
542    );
543    pub fn zgetrs_(
544        trans: *const c_char,
545        n: *const lapack_int,
546        nrhs: *const lapack_int,
547        a: *const lapack_complex_double,
548        lda: *const lapack_int,
549        ipiv: *const lapack_int,
550        b: *mut lapack_complex_double,
551        ldb: *const lapack_int,
552        info: *mut lapack_int,
553    );
554
555    pub fn sgbtrs_(
556        trans: *const c_char,
557        n: *const lapack_int,
558        kl: *const lapack_int,
559        ku: *const lapack_int,
560        nrhs: *const lapack_int,
561        ab: *const c_float,
562        ldab: *const lapack_int,
563        ipiv: *const lapack_int,
564        b: *mut c_float,
565        ldb: *const lapack_int,
566        info: *mut lapack_int,
567    );
568    pub fn dgbtrs_(
569        trans: *const c_char,
570        n: *const lapack_int,
571        kl: *const lapack_int,
572        ku: *const lapack_int,
573        nrhs: *const lapack_int,
574        ab: *const c_double,
575        ldab: *const lapack_int,
576        ipiv: *const lapack_int,
577        b: *mut c_double,
578        ldb: *const lapack_int,
579        info: *mut lapack_int,
580    );
581    pub fn cgbtrs_(
582        trans: *const c_char,
583        n: *const lapack_int,
584        kl: *const lapack_int,
585        ku: *const lapack_int,
586        nrhs: *const lapack_int,
587        ab: *const lapack_complex_float,
588        ldab: *const lapack_int,
589        ipiv: *const lapack_int,
590        b: *mut lapack_complex_float,
591        ldb: *const lapack_int,
592        info: *mut lapack_int,
593    );
594    pub fn zgbtrs_(
595        trans: *const c_char,
596        n: *const lapack_int,
597        kl: *const lapack_int,
598        ku: *const lapack_int,
599        nrhs: *const lapack_int,
600        ab: *const lapack_complex_double,
601        ldab: *const lapack_int,
602        ipiv: *const lapack_int,
603        b: *mut lapack_complex_double,
604        ldb: *const lapack_int,
605        info: *mut lapack_int,
606    );
607
608    pub fn sgttrs_(
609        trans: *const c_char,
610        n: *const lapack_int,
611        nrhs: *const lapack_int,
612        dl: *const c_float,
613        d: *const c_float,
614        du: *const c_float,
615        du2: *const c_float,
616        ipiv: *const lapack_int,
617        b: *mut c_float,
618        ldb: *const lapack_int,
619        info: *mut lapack_int,
620    );
621    pub fn dgttrs_(
622        trans: *const c_char,
623        n: *const lapack_int,
624        nrhs: *const lapack_int,
625        dl: *const c_double,
626        d: *const c_double,
627        du: *const c_double,
628        du2: *const c_double,
629        ipiv: *const lapack_int,
630        b: *mut c_double,
631        ldb: *const lapack_int,
632        info: *mut lapack_int,
633    );
634    pub fn cgttrs_(
635        trans: *const c_char,
636        n: *const lapack_int,
637        nrhs: *const lapack_int,
638        dl: *const lapack_complex_float,
639        d: *const lapack_complex_float,
640        du: *const lapack_complex_float,
641        du2: *const lapack_complex_float,
642        ipiv: *const lapack_int,
643        b: *mut lapack_complex_float,
644        ldb: *const lapack_int,
645        info: *mut lapack_int,
646    );
647    pub fn zgttrs_(
648        trans: *const c_char,
649        n: *const lapack_int,
650        nrhs: *const lapack_int,
651        dl: *const lapack_complex_double,
652        d: *const lapack_complex_double,
653        du: *const lapack_complex_double,
654        du2: *const lapack_complex_double,
655        ipiv: *const lapack_int,
656        b: *mut lapack_complex_double,
657        ldb: *const lapack_int,
658        info: *mut lapack_int,
659    );
660
661    pub fn spotrs_(
662        uplo: *const c_char,
663        n: *const lapack_int,
664        nrhs: *const lapack_int,
665        a: *const c_float,
666        lda: *const lapack_int,
667        b: *mut c_float,
668        ldb: *const lapack_int,
669        info: *mut lapack_int,
670    );
671    pub fn dpotrs_(
672        uplo: *const c_char,
673        n: *const lapack_int,
674        nrhs: *const lapack_int,
675        a: *const c_double,
676        lda: *const lapack_int,
677        b: *mut c_double,
678        ldb: *const lapack_int,
679        info: *mut lapack_int,
680    );
681    pub fn cpotrs_(
682        uplo: *const c_char,
683        n: *const lapack_int,
684        nrhs: *const lapack_int,
685        a: *const lapack_complex_float,
686        lda: *const lapack_int,
687        b: *mut lapack_complex_float,
688        ldb: *const lapack_int,
689        info: *mut lapack_int,
690    );
691    pub fn zpotrs_(
692        uplo: *const c_char,
693        n: *const lapack_int,
694        nrhs: *const lapack_int,
695        a: *const lapack_complex_double,
696        lda: *const lapack_int,
697        b: *mut lapack_complex_double,
698        ldb: *const lapack_int,
699        info: *mut lapack_int,
700    );
701
702    pub fn dpftrs_(
703        transr: *const c_char,
704        uplo: *const c_char,
705        n: *const lapack_int,
706        nrhs: *const lapack_int,
707        a: *const c_double,
708        b: *mut c_double,
709        ldb: *const lapack_int,
710        info: *mut lapack_int,
711    );
712    pub fn spftrs_(
713        transr: *const c_char,
714        uplo: *const c_char,
715        n: *const lapack_int,
716        nrhs: *const lapack_int,
717        a: *const c_float,
718        b: *mut c_float,
719        ldb: *const lapack_int,
720        info: *mut lapack_int,
721    );
722    pub fn zpftrs_(
723        transr: *const c_char,
724        uplo: *const c_char,
725        n: *const lapack_int,
726        nrhs: *const lapack_int,
727        a: *const lapack_complex_double,
728        b: *mut lapack_complex_double,
729        ldb: *const lapack_int,
730        info: *mut lapack_int,
731    );
732    pub fn cpftrs_(
733        transr: *const c_char,
734        uplo: *const c_char,
735        n: *const lapack_int,
736        nrhs: *const lapack_int,
737        a: *const lapack_complex_float,
738        b: *mut lapack_complex_float,
739        ldb: *const lapack_int,
740        info: *mut lapack_int,
741    );
742
743    pub fn spptrs_(
744        uplo: *const c_char,
745        n: *const lapack_int,
746        nrhs: *const lapack_int,
747        ap: *const c_float,
748        b: *mut c_float,
749        ldb: *const lapack_int,
750        info: *mut lapack_int,
751    );
752    pub fn dpptrs_(
753        uplo: *const c_char,
754        n: *const lapack_int,
755        nrhs: *const lapack_int,
756        ap: *const c_double,
757        b: *mut c_double,
758        ldb: *const lapack_int,
759        info: *mut lapack_int,
760    );
761    pub fn cpptrs_(
762        uplo: *const c_char,
763        n: *const lapack_int,
764        nrhs: *const lapack_int,
765        ap: *const lapack_complex_float,
766        b: *mut lapack_complex_float,
767        ldb: *const lapack_int,
768        info: *mut lapack_int,
769    );
770    pub fn zpptrs_(
771        uplo: *const c_char,
772        n: *const lapack_int,
773        nrhs: *const lapack_int,
774        ap: *const lapack_complex_double,
775        b: *mut lapack_complex_double,
776        ldb: *const lapack_int,
777        info: *mut lapack_int,
778    );
779
780    pub fn spbtrs_(
781        uplo: *const c_char,
782        n: *const lapack_int,
783        kd: *const lapack_int,
784        nrhs: *const lapack_int,
785        ab: *const c_float,
786        ldab: *const lapack_int,
787        b: *mut c_float,
788        ldb: *const lapack_int,
789        info: *mut lapack_int,
790    );
791    pub fn dpbtrs_(
792        uplo: *const c_char,
793        n: *const lapack_int,
794        kd: *const lapack_int,
795        nrhs: *const lapack_int,
796        ab: *const c_double,
797        ldab: *const lapack_int,
798        b: *mut c_double,
799        ldb: *const lapack_int,
800        info: *mut lapack_int,
801    );
802    pub fn cpbtrs_(
803        uplo: *const c_char,
804        n: *const lapack_int,
805        kd: *const lapack_int,
806        nrhs: *const lapack_int,
807        ab: *const lapack_complex_float,
808        ldab: *const lapack_int,
809        b: *mut lapack_complex_float,
810        ldb: *const lapack_int,
811        info: *mut lapack_int,
812    );
813    pub fn zpbtrs_(
814        uplo: *const c_char,
815        n: *const lapack_int,
816        kd: *const lapack_int,
817        nrhs: *const lapack_int,
818        ab: *const lapack_complex_double,
819        ldab: *const lapack_int,
820        b: *mut lapack_complex_double,
821        ldb: *const lapack_int,
822        info: *mut lapack_int,
823    );
824
825    pub fn spttrs_(
826        n: *const lapack_int,
827        nrhs: *const lapack_int,
828        d: *const c_float,
829        e: *const c_float,
830        b: *mut c_float,
831        ldb: *const lapack_int,
832        info: *mut lapack_int,
833    );
834    pub fn dpttrs_(
835        n: *const lapack_int,
836        nrhs: *const lapack_int,
837        d: *const c_double,
838        e: *const c_double,
839        b: *mut c_double,
840        ldb: *const lapack_int,
841        info: *mut lapack_int,
842    );
843    pub fn cpttrs_(
844        uplo: *const c_char,
845        n: *const lapack_int,
846        nrhs: *const lapack_int,
847        d: *const c_float,
848        e: *const lapack_complex_float,
849        b: *mut lapack_complex_float,
850        ldb: *const lapack_int,
851        info: *mut lapack_int,
852    );
853    pub fn zpttrs_(
854        uplo: *const c_char,
855        n: *const lapack_int,
856        nrhs: *const lapack_int,
857        d: *const c_double,
858        e: *const lapack_complex_double,
859        b: *mut lapack_complex_double,
860        ldb: *const lapack_int,
861        info: *mut lapack_int,
862    );
863
864    pub fn ssytrs_(
865        uplo: *const c_char,
866        n: *const lapack_int,
867        nrhs: *const lapack_int,
868        a: *const c_float,
869        lda: *const lapack_int,
870        ipiv: *const lapack_int,
871        b: *mut c_float,
872        ldb: *const lapack_int,
873        info: *mut lapack_int,
874    );
875    pub fn dsytrs_(
876        uplo: *const c_char,
877        n: *const lapack_int,
878        nrhs: *const lapack_int,
879        a: *const c_double,
880        lda: *const lapack_int,
881        ipiv: *const lapack_int,
882        b: *mut c_double,
883        ldb: *const lapack_int,
884        info: *mut lapack_int,
885    );
886    pub fn csytrs_(
887        uplo: *const c_char,
888        n: *const lapack_int,
889        nrhs: *const lapack_int,
890        a: *const lapack_complex_float,
891        lda: *const lapack_int,
892        ipiv: *const lapack_int,
893        b: *mut lapack_complex_float,
894        ldb: *const lapack_int,
895        info: *mut lapack_int,
896    );
897    pub fn zsytrs_(
898        uplo: *const c_char,
899        n: *const lapack_int,
900        nrhs: *const lapack_int,
901        a: *const lapack_complex_double,
902        lda: *const lapack_int,
903        ipiv: *const lapack_int,
904        b: *mut lapack_complex_double,
905        ldb: *const lapack_int,
906        info: *mut lapack_int,
907    );
908
909    pub fn chetrs_(
910        uplo: *const c_char,
911        n: *const lapack_int,
912        nrhs: *const lapack_int,
913        a: *const lapack_complex_float,
914        lda: *const lapack_int,
915        ipiv: *const lapack_int,
916        b: *mut lapack_complex_float,
917        ldb: *const lapack_int,
918        info: *mut lapack_int,
919    );
920    pub fn zhetrs_(
921        uplo: *const c_char,
922        n: *const lapack_int,
923        nrhs: *const lapack_int,
924        a: *const lapack_complex_double,
925        lda: *const lapack_int,
926        ipiv: *const lapack_int,
927        b: *mut lapack_complex_double,
928        ldb: *const lapack_int,
929        info: *mut lapack_int,
930    );
931
932    pub fn ssptrs_(
933        uplo: *const c_char,
934        n: *const lapack_int,
935        nrhs: *const lapack_int,
936        ap: *const c_float,
937        ipiv: *const lapack_int,
938        b: *mut c_float,
939        ldb: *const lapack_int,
940        info: *mut lapack_int,
941    );
942    pub fn dsptrs_(
943        uplo: *const c_char,
944        n: *const lapack_int,
945        nrhs: *const lapack_int,
946        ap: *const c_double,
947        ipiv: *const lapack_int,
948        b: *mut c_double,
949        ldb: *const lapack_int,
950        info: *mut lapack_int,
951    );
952    pub fn csptrs_(
953        uplo: *const c_char,
954        n: *const lapack_int,
955        nrhs: *const lapack_int,
956        ap: *const lapack_complex_float,
957        ipiv: *const lapack_int,
958        b: *mut lapack_complex_float,
959        ldb: *const lapack_int,
960        info: *mut lapack_int,
961    );
962    pub fn zsptrs_(
963        uplo: *const c_char,
964        n: *const lapack_int,
965        nrhs: *const lapack_int,
966        ap: *const lapack_complex_double,
967        ipiv: *const lapack_int,
968        b: *mut lapack_complex_double,
969        ldb: *const lapack_int,
970        info: *mut lapack_int,
971    );
972
973    pub fn chptrs_(
974        uplo: *const c_char,
975        n: *const lapack_int,
976        nrhs: *const lapack_int,
977        ap: *const lapack_complex_float,
978        ipiv: *const lapack_int,
979        b: *mut lapack_complex_float,
980        ldb: *const lapack_int,
981        info: *mut lapack_int,
982    );
983    pub fn zhptrs_(
984        uplo: *const c_char,
985        n: *const lapack_int,
986        nrhs: *const lapack_int,
987        ap: *const lapack_complex_double,
988        ipiv: *const lapack_int,
989        b: *mut lapack_complex_double,
990        ldb: *const lapack_int,
991        info: *mut lapack_int,
992    );
993
994    pub fn strtrs_(
995        uplo: *const c_char,
996        trans: *const c_char,
997        diag: *const c_char,
998        n: *const lapack_int,
999        nrhs: *const lapack_int,
1000        a: *const c_float,
1001        lda: *const lapack_int,
1002        b: *mut c_float,
1003        ldb: *const lapack_int,
1004        info: *mut lapack_int,
1005    );
1006    pub fn dtrtrs_(
1007        uplo: *const c_char,
1008        trans: *const c_char,
1009        diag: *const c_char,
1010        n: *const lapack_int,
1011        nrhs: *const lapack_int,
1012        a: *const c_double,
1013        lda: *const lapack_int,
1014        b: *mut c_double,
1015        ldb: *const lapack_int,
1016        info: *mut lapack_int,
1017    );
1018    pub fn ctrtrs_(
1019        uplo: *const c_char,
1020        trans: *const c_char,
1021        diag: *const c_char,
1022        n: *const lapack_int,
1023        nrhs: *const lapack_int,
1024        a: *const lapack_complex_float,
1025        lda: *const lapack_int,
1026        b: *mut lapack_complex_float,
1027        ldb: *const lapack_int,
1028        info: *mut lapack_int,
1029    );
1030    pub fn ztrtrs_(
1031        uplo: *const c_char,
1032        trans: *const c_char,
1033        diag: *const c_char,
1034        n: *const lapack_int,
1035        nrhs: *const lapack_int,
1036        a: *const lapack_complex_double,
1037        lda: *const lapack_int,
1038        b: *mut lapack_complex_double,
1039        ldb: *const lapack_int,
1040        info: *mut lapack_int,
1041    );
1042
1043    pub fn stptrs_(
1044        uplo: *const c_char,
1045        trans: *const c_char,
1046        diag: *const c_char,
1047        n: *const lapack_int,
1048        nrhs: *const lapack_int,
1049        ap: *const c_float,
1050        b: *mut c_float,
1051        ldb: *const lapack_int,
1052        info: *mut lapack_int,
1053    );
1054    pub fn dtptrs_(
1055        uplo: *const c_char,
1056        trans: *const c_char,
1057        diag: *const c_char,
1058        n: *const lapack_int,
1059        nrhs: *const lapack_int,
1060        ap: *const c_double,
1061        b: *mut c_double,
1062        ldb: *const lapack_int,
1063        info: *mut lapack_int,
1064    );
1065    pub fn ctptrs_(
1066        uplo: *const c_char,
1067        trans: *const c_char,
1068        diag: *const c_char,
1069        n: *const lapack_int,
1070        nrhs: *const lapack_int,
1071        ap: *const lapack_complex_float,
1072        b: *mut lapack_complex_float,
1073        ldb: *const lapack_int,
1074        info: *mut lapack_int,
1075    );
1076    pub fn ztptrs_(
1077        uplo: *const c_char,
1078        trans: *const c_char,
1079        diag: *const c_char,
1080        n: *const lapack_int,
1081        nrhs: *const lapack_int,
1082        ap: *const lapack_complex_double,
1083        b: *mut lapack_complex_double,
1084        ldb: *const lapack_int,
1085        info: *mut lapack_int,
1086    );
1087
1088    pub fn stbtrs_(
1089        uplo: *const c_char,
1090        trans: *const c_char,
1091        diag: *const c_char,
1092        n: *const lapack_int,
1093        kd: *const lapack_int,
1094        nrhs: *const lapack_int,
1095        ab: *const c_float,
1096        ldab: *const lapack_int,
1097        b: *mut c_float,
1098        ldb: *const lapack_int,
1099        info: *mut lapack_int,
1100    );
1101    pub fn dtbtrs_(
1102        uplo: *const c_char,
1103        trans: *const c_char,
1104        diag: *const c_char,
1105        n: *const lapack_int,
1106        kd: *const lapack_int,
1107        nrhs: *const lapack_int,
1108        ab: *const c_double,
1109        ldab: *const lapack_int,
1110        b: *mut c_double,
1111        ldb: *const lapack_int,
1112        info: *mut lapack_int,
1113    );
1114    pub fn ctbtrs_(
1115        uplo: *const c_char,
1116        trans: *const c_char,
1117        diag: *const c_char,
1118        n: *const lapack_int,
1119        kd: *const lapack_int,
1120        nrhs: *const lapack_int,
1121        ab: *const lapack_complex_float,
1122        ldab: *const lapack_int,
1123        b: *mut lapack_complex_float,
1124        ldb: *const lapack_int,
1125        info: *mut lapack_int,
1126    );
1127    pub fn ztbtrs_(
1128        uplo: *const c_char,
1129        trans: *const c_char,
1130        diag: *const c_char,
1131        n: *const lapack_int,
1132        kd: *const lapack_int,
1133        nrhs: *const lapack_int,
1134        ab: *const lapack_complex_double,
1135        ldab: *const lapack_int,
1136        b: *mut lapack_complex_double,
1137        ldb: *const lapack_int,
1138        info: *mut lapack_int,
1139    );
1140
1141    pub fn sgecon_(
1142        norm: *const c_char,
1143        n: *const lapack_int,
1144        a: *const c_float,
1145        lda: *const lapack_int,
1146        anorm: *const c_float,
1147        rcond: *mut c_float,
1148        work: *mut c_float,
1149        iwork: *mut lapack_int,
1150        info: *mut lapack_int,
1151    );
1152    pub fn dgecon_(
1153        norm: *const c_char,
1154        n: *const lapack_int,
1155        a: *const c_double,
1156        lda: *const lapack_int,
1157        anorm: *const c_double,
1158        rcond: *mut c_double,
1159        work: *mut c_double,
1160        iwork: *mut lapack_int,
1161        info: *mut lapack_int,
1162    );
1163    pub fn cgecon_(
1164        norm: *const c_char,
1165        n: *const lapack_int,
1166        a: *const lapack_complex_float,
1167        lda: *const lapack_int,
1168        anorm: *const c_float,
1169        rcond: *mut c_float,
1170        work: *mut lapack_complex_float,
1171        rwork: *mut c_float,
1172        info: *mut lapack_int,
1173    );
1174    pub fn zgecon_(
1175        norm: *const c_char,
1176        n: *const lapack_int,
1177        a: *const lapack_complex_double,
1178        lda: *const lapack_int,
1179        anorm: *const c_double,
1180        rcond: *mut c_double,
1181        work: *mut lapack_complex_double,
1182        rwork: *mut c_double,
1183        info: *mut lapack_int,
1184    );
1185
1186    pub fn sgbcon_(
1187        norm: *const c_char,
1188        n: *const lapack_int,
1189        kl: *const lapack_int,
1190        ku: *const lapack_int,
1191        ab: *const c_float,
1192        ldab: *const lapack_int,
1193        ipiv: *const lapack_int,
1194        anorm: *const c_float,
1195        rcond: *mut c_float,
1196        work: *mut c_float,
1197        iwork: *mut lapack_int,
1198        info: *mut lapack_int,
1199    );
1200    pub fn dgbcon_(
1201        norm: *const c_char,
1202        n: *const lapack_int,
1203        kl: *const lapack_int,
1204        ku: *const lapack_int,
1205        ab: *const c_double,
1206        ldab: *const lapack_int,
1207        ipiv: *const lapack_int,
1208        anorm: *const c_double,
1209        rcond: *mut c_double,
1210        work: *mut c_double,
1211        iwork: *mut lapack_int,
1212        info: *mut lapack_int,
1213    );
1214    pub fn cgbcon_(
1215        norm: *const c_char,
1216        n: *const lapack_int,
1217        kl: *const lapack_int,
1218        ku: *const lapack_int,
1219        ab: *const lapack_complex_float,
1220        ldab: *const lapack_int,
1221        ipiv: *const lapack_int,
1222        anorm: *const c_float,
1223        rcond: *mut c_float,
1224        work: *mut lapack_complex_float,
1225        rwork: *mut c_float,
1226        info: *mut lapack_int,
1227    );
1228    pub fn zgbcon_(
1229        norm: *const c_char,
1230        n: *const lapack_int,
1231        kl: *const lapack_int,
1232        ku: *const lapack_int,
1233        ab: *const lapack_complex_double,
1234        ldab: *const lapack_int,
1235        ipiv: *const lapack_int,
1236        anorm: *const c_double,
1237        rcond: *mut c_double,
1238        work: *mut lapack_complex_double,
1239        rwork: *mut c_double,
1240        info: *mut lapack_int,
1241    );
1242
1243    pub fn sgtcon_(
1244        norm: *const c_char,
1245        n: *const lapack_int,
1246        dl: *const c_float,
1247        d: *const c_float,
1248        du: *const c_float,
1249        du2: *const c_float,
1250        ipiv: *const lapack_int,
1251        anorm: *const c_float,
1252        rcond: *mut c_float,
1253        work: *mut c_float,
1254        iwork: *mut lapack_int,
1255        info: *mut lapack_int,
1256    );
1257    pub fn dgtcon_(
1258        norm: *const c_char,
1259        n: *const lapack_int,
1260        dl: *const c_double,
1261        d: *const c_double,
1262        du: *const c_double,
1263        du2: *const c_double,
1264        ipiv: *const lapack_int,
1265        anorm: *const c_double,
1266        rcond: *mut c_double,
1267        work: *mut c_double,
1268        iwork: *mut lapack_int,
1269        info: *mut lapack_int,
1270    );
1271    pub fn cgtcon_(
1272        norm: *const c_char,
1273        n: *const lapack_int,
1274        dl: *const lapack_complex_float,
1275        d: *const lapack_complex_float,
1276        du: *const lapack_complex_float,
1277        du2: *const lapack_complex_float,
1278        ipiv: *const lapack_int,
1279        anorm: *const c_float,
1280        rcond: *mut c_float,
1281        work: *mut lapack_complex_float,
1282        info: *mut lapack_int,
1283    );
1284    pub fn zgtcon_(
1285        norm: *const c_char,
1286        n: *const lapack_int,
1287        dl: *const lapack_complex_double,
1288        d: *const lapack_complex_double,
1289        du: *const lapack_complex_double,
1290        du2: *const lapack_complex_double,
1291        ipiv: *const lapack_int,
1292        anorm: *const c_double,
1293        rcond: *mut c_double,
1294        work: *mut lapack_complex_double,
1295        info: *mut lapack_int,
1296    );
1297
1298    pub fn spocon_(
1299        uplo: *const c_char,
1300        n: *const lapack_int,
1301        a: *const c_float,
1302        lda: *const lapack_int,
1303        anorm: *const c_float,
1304        rcond: *mut c_float,
1305        work: *mut c_float,
1306        iwork: *mut lapack_int,
1307        info: *mut lapack_int,
1308    );
1309    pub fn dpocon_(
1310        uplo: *const c_char,
1311        n: *const lapack_int,
1312        a: *const c_double,
1313        lda: *const lapack_int,
1314        anorm: *const c_double,
1315        rcond: *mut c_double,
1316        work: *mut c_double,
1317        iwork: *mut lapack_int,
1318        info: *mut lapack_int,
1319    );
1320    pub fn cpocon_(
1321        uplo: *const c_char,
1322        n: *const lapack_int,
1323        a: *const lapack_complex_float,
1324        lda: *const lapack_int,
1325        anorm: *const c_float,
1326        rcond: *mut c_float,
1327        work: *mut lapack_complex_float,
1328        rwork: *mut c_float,
1329        info: *mut lapack_int,
1330    );
1331    pub fn zpocon_(
1332        uplo: *const c_char,
1333        n: *const lapack_int,
1334        a: *const lapack_complex_double,
1335        lda: *const lapack_int,
1336        anorm: *const c_double,
1337        rcond: *mut c_double,
1338        work: *mut lapack_complex_double,
1339        rwork: *mut c_double,
1340        info: *mut lapack_int,
1341    );
1342
1343    pub fn sppcon_(
1344        uplo: *const c_char,
1345        n: *const lapack_int,
1346        ap: *const c_float,
1347        anorm: *const c_float,
1348        rcond: *mut c_float,
1349        work: *mut c_float,
1350        iwork: *mut lapack_int,
1351        info: *mut lapack_int,
1352    );
1353    pub fn dppcon_(
1354        uplo: *const c_char,
1355        n: *const lapack_int,
1356        ap: *const c_double,
1357        anorm: *const c_double,
1358        rcond: *mut c_double,
1359        work: *mut c_double,
1360        iwork: *mut lapack_int,
1361        info: *mut lapack_int,
1362    );
1363    pub fn cppcon_(
1364        uplo: *const c_char,
1365        n: *const lapack_int,
1366        ap: *const lapack_complex_float,
1367        anorm: *const c_float,
1368        rcond: *mut c_float,
1369        work: *mut lapack_complex_float,
1370        rwork: *mut c_float,
1371        info: *mut lapack_int,
1372    );
1373    pub fn zppcon_(
1374        uplo: *const c_char,
1375        n: *const lapack_int,
1376        ap: *const lapack_complex_double,
1377        anorm: *const c_double,
1378        rcond: *mut c_double,
1379        work: *mut lapack_complex_double,
1380        rwork: *mut c_double,
1381        info: *mut lapack_int,
1382    );
1383
1384    pub fn spbcon_(
1385        uplo: *const c_char,
1386        n: *const lapack_int,
1387        kd: *const lapack_int,
1388        ab: *const c_float,
1389        ldab: *const lapack_int,
1390        anorm: *const c_float,
1391        rcond: *mut c_float,
1392        work: *mut c_float,
1393        iwork: *mut lapack_int,
1394        info: *mut lapack_int,
1395    );
1396    pub fn dpbcon_(
1397        uplo: *const c_char,
1398        n: *const lapack_int,
1399        kd: *const lapack_int,
1400        ab: *const c_double,
1401        ldab: *const lapack_int,
1402        anorm: *const c_double,
1403        rcond: *mut c_double,
1404        work: *mut c_double,
1405        iwork: *mut lapack_int,
1406        info: *mut lapack_int,
1407    );
1408    pub fn cpbcon_(
1409        uplo: *const c_char,
1410        n: *const lapack_int,
1411        kd: *const lapack_int,
1412        ab: *const lapack_complex_float,
1413        ldab: *const lapack_int,
1414        anorm: *const c_float,
1415        rcond: *mut c_float,
1416        work: *mut lapack_complex_float,
1417        rwork: *mut c_float,
1418        info: *mut lapack_int,
1419    );
1420    pub fn zpbcon_(
1421        uplo: *const c_char,
1422        n: *const lapack_int,
1423        kd: *const lapack_int,
1424        ab: *const lapack_complex_double,
1425        ldab: *const lapack_int,
1426        anorm: *const c_double,
1427        rcond: *mut c_double,
1428        work: *mut lapack_complex_double,
1429        rwork: *mut c_double,
1430        info: *mut lapack_int,
1431    );
1432
1433    pub fn sptcon_(
1434        n: *const lapack_int,
1435        d: *const c_float,
1436        e: *const c_float,
1437        anorm: *const c_float,
1438        rcond: *mut c_float,
1439        work: *mut c_float,
1440        info: *mut lapack_int,
1441    );
1442    pub fn dptcon_(
1443        n: *const lapack_int,
1444        d: *const c_double,
1445        e: *const c_double,
1446        anorm: *const c_double,
1447        rcond: *mut c_double,
1448        work: *mut c_double,
1449        info: *mut lapack_int,
1450    );
1451    pub fn cptcon_(
1452        n: *const lapack_int,
1453        d: *const c_float,
1454        e: *const lapack_complex_float,
1455        anorm: *const c_float,
1456        rcond: *mut c_float,
1457        work: *mut c_float,
1458        info: *mut lapack_int,
1459    );
1460    pub fn zptcon_(
1461        n: *const lapack_int,
1462        d: *const c_double,
1463        e: *const lapack_complex_double,
1464        anorm: *const c_double,
1465        rcond: *mut c_double,
1466        work: *mut c_double,
1467        info: *mut lapack_int,
1468    );
1469
1470    pub fn ssycon_(
1471        uplo: *const c_char,
1472        n: *const lapack_int,
1473        a: *const c_float,
1474        lda: *const lapack_int,
1475        ipiv: *const lapack_int,
1476        anorm: *const c_float,
1477        rcond: *mut c_float,
1478        work: *mut c_float,
1479        iwork: *mut lapack_int,
1480        info: *mut lapack_int,
1481    );
1482    pub fn dsycon_(
1483        uplo: *const c_char,
1484        n: *const lapack_int,
1485        a: *const c_double,
1486        lda: *const lapack_int,
1487        ipiv: *const lapack_int,
1488        anorm: *const c_double,
1489        rcond: *mut c_double,
1490        work: *mut c_double,
1491        iwork: *mut lapack_int,
1492        info: *mut lapack_int,
1493    );
1494    pub fn csycon_(
1495        uplo: *const c_char,
1496        n: *const lapack_int,
1497        a: *const lapack_complex_float,
1498        lda: *const lapack_int,
1499        ipiv: *const lapack_int,
1500        anorm: *const c_float,
1501        rcond: *mut c_float,
1502        work: *mut lapack_complex_float,
1503        info: *mut lapack_int,
1504    );
1505    pub fn zsycon_(
1506        uplo: *const c_char,
1507        n: *const lapack_int,
1508        a: *const lapack_complex_double,
1509        lda: *const lapack_int,
1510        ipiv: *const lapack_int,
1511        anorm: *const c_double,
1512        rcond: *mut c_double,
1513        work: *mut lapack_complex_double,
1514        info: *mut lapack_int,
1515    );
1516
1517    pub fn checon_(
1518        uplo: *const c_char,
1519        n: *const lapack_int,
1520        a: *const lapack_complex_float,
1521        lda: *const lapack_int,
1522        ipiv: *const lapack_int,
1523        anorm: *const c_float,
1524        rcond: *mut c_float,
1525        work: *mut lapack_complex_float,
1526        info: *mut lapack_int,
1527    );
1528    pub fn zhecon_(
1529        uplo: *const c_char,
1530        n: *const lapack_int,
1531        a: *const lapack_complex_double,
1532        lda: *const lapack_int,
1533        ipiv: *const lapack_int,
1534        anorm: *const c_double,
1535        rcond: *mut c_double,
1536        work: *mut lapack_complex_double,
1537        info: *mut lapack_int,
1538    );
1539
1540    pub fn sspcon_(
1541        uplo: *const c_char,
1542        n: *const lapack_int,
1543        ap: *const c_float,
1544        ipiv: *const lapack_int,
1545        anorm: *const c_float,
1546        rcond: *mut c_float,
1547        work: *mut c_float,
1548        iwork: *mut lapack_int,
1549        info: *mut lapack_int,
1550    );
1551    pub fn dspcon_(
1552        uplo: *const c_char,
1553        n: *const lapack_int,
1554        ap: *const c_double,
1555        ipiv: *const lapack_int,
1556        anorm: *const c_double,
1557        rcond: *mut c_double,
1558        work: *mut c_double,
1559        iwork: *mut lapack_int,
1560        info: *mut lapack_int,
1561    );
1562    pub fn cspcon_(
1563        uplo: *const c_char,
1564        n: *const lapack_int,
1565        ap: *const lapack_complex_float,
1566        ipiv: *const lapack_int,
1567        anorm: *const c_float,
1568        rcond: *mut c_float,
1569        work: *mut lapack_complex_float,
1570        info: *mut lapack_int,
1571    );
1572    pub fn zspcon_(
1573        uplo: *const c_char,
1574        n: *const lapack_int,
1575        ap: *const lapack_complex_double,
1576        ipiv: *const lapack_int,
1577        anorm: *const c_double,
1578        rcond: *mut c_double,
1579        work: *mut lapack_complex_double,
1580        info: *mut lapack_int,
1581    );
1582
1583    pub fn chpcon_(
1584        uplo: *const c_char,
1585        n: *const lapack_int,
1586        ap: *const lapack_complex_float,
1587        ipiv: *const lapack_int,
1588        anorm: *const c_float,
1589        rcond: *mut c_float,
1590        work: *mut lapack_complex_float,
1591        info: *mut lapack_int,
1592    );
1593    pub fn zhpcon_(
1594        uplo: *const c_char,
1595        n: *const lapack_int,
1596        ap: *const lapack_complex_double,
1597        ipiv: *const lapack_int,
1598        anorm: *const c_double,
1599        rcond: *mut c_double,
1600        work: *mut lapack_complex_double,
1601        info: *mut lapack_int,
1602    );
1603
1604    pub fn strcon_(
1605        norm: *const c_char,
1606        uplo: *const c_char,
1607        diag: *const c_char,
1608        n: *const lapack_int,
1609        a: *const c_float,
1610        lda: *const lapack_int,
1611        rcond: *mut c_float,
1612        work: *mut c_float,
1613        iwork: *mut lapack_int,
1614        info: *mut lapack_int,
1615    );
1616    pub fn dtrcon_(
1617        norm: *const c_char,
1618        uplo: *const c_char,
1619        diag: *const c_char,
1620        n: *const lapack_int,
1621        a: *const c_double,
1622        lda: *const lapack_int,
1623        rcond: *mut c_double,
1624        work: *mut c_double,
1625        iwork: *mut lapack_int,
1626        info: *mut lapack_int,
1627    );
1628    pub fn ctrcon_(
1629        norm: *const c_char,
1630        uplo: *const c_char,
1631        diag: *const c_char,
1632        n: *const lapack_int,
1633        a: *const lapack_complex_float,
1634        lda: *const lapack_int,
1635        rcond: *mut c_float,
1636        work: *mut lapack_complex_float,
1637        rwork: *mut c_float,
1638        info: *mut lapack_int,
1639    );
1640    pub fn ztrcon_(
1641        norm: *const c_char,
1642        uplo: *const c_char,
1643        diag: *const c_char,
1644        n: *const lapack_int,
1645        a: *const lapack_complex_double,
1646        lda: *const lapack_int,
1647        rcond: *mut c_double,
1648        work: *mut lapack_complex_double,
1649        rwork: *mut c_double,
1650        info: *mut lapack_int,
1651    );
1652
1653    pub fn stpcon_(
1654        norm: *const c_char,
1655        uplo: *const c_char,
1656        diag: *const c_char,
1657        n: *const lapack_int,
1658        ap: *const c_float,
1659        rcond: *mut c_float,
1660        work: *mut c_float,
1661        iwork: *mut lapack_int,
1662        info: *mut lapack_int,
1663    );
1664    pub fn dtpcon_(
1665        norm: *const c_char,
1666        uplo: *const c_char,
1667        diag: *const c_char,
1668        n: *const lapack_int,
1669        ap: *const c_double,
1670        rcond: *mut c_double,
1671        work: *mut c_double,
1672        iwork: *mut lapack_int,
1673        info: *mut lapack_int,
1674    );
1675    pub fn ctpcon_(
1676        norm: *const c_char,
1677        uplo: *const c_char,
1678        diag: *const c_char,
1679        n: *const lapack_int,
1680        ap: *const lapack_complex_float,
1681        rcond: *mut c_float,
1682        work: *mut lapack_complex_float,
1683        rwork: *mut c_float,
1684        info: *mut lapack_int,
1685    );
1686    pub fn ztpcon_(
1687        norm: *const c_char,
1688        uplo: *const c_char,
1689        diag: *const c_char,
1690        n: *const lapack_int,
1691        ap: *const lapack_complex_double,
1692        rcond: *mut c_double,
1693        work: *mut lapack_complex_double,
1694        rwork: *mut c_double,
1695        info: *mut lapack_int,
1696    );
1697
1698    pub fn stbcon_(
1699        norm: *const c_char,
1700        uplo: *const c_char,
1701        diag: *const c_char,
1702        n: *const lapack_int,
1703        kd: *const lapack_int,
1704        ab: *const c_float,
1705        ldab: *const lapack_int,
1706        rcond: *mut c_float,
1707        work: *mut c_float,
1708        iwork: *mut lapack_int,
1709        info: *mut lapack_int,
1710    );
1711    pub fn dtbcon_(
1712        norm: *const c_char,
1713        uplo: *const c_char,
1714        diag: *const c_char,
1715        n: *const lapack_int,
1716        kd: *const lapack_int,
1717        ab: *const c_double,
1718        ldab: *const lapack_int,
1719        rcond: *mut c_double,
1720        work: *mut c_double,
1721        iwork: *mut lapack_int,
1722        info: *mut lapack_int,
1723    );
1724    pub fn ctbcon_(
1725        norm: *const c_char,
1726        uplo: *const c_char,
1727        diag: *const c_char,
1728        n: *const lapack_int,
1729        kd: *const lapack_int,
1730        ab: *const lapack_complex_float,
1731        ldab: *const lapack_int,
1732        rcond: *mut c_float,
1733        work: *mut lapack_complex_float,
1734        rwork: *mut c_float,
1735        info: *mut lapack_int,
1736    );
1737    pub fn ztbcon_(
1738        norm: *const c_char,
1739        uplo: *const c_char,
1740        diag: *const c_char,
1741        n: *const lapack_int,
1742        kd: *const lapack_int,
1743        ab: *const lapack_complex_double,
1744        ldab: *const lapack_int,
1745        rcond: *mut c_double,
1746        work: *mut lapack_complex_double,
1747        rwork: *mut c_double,
1748        info: *mut lapack_int,
1749    );
1750
1751    pub fn sgerfs_(
1752        trans: *const c_char,
1753        n: *const lapack_int,
1754        nrhs: *const lapack_int,
1755        a: *const c_float,
1756        lda: *const lapack_int,
1757        af: *const c_float,
1758        ldaf: *const lapack_int,
1759        ipiv: *const lapack_int,
1760        b: *const c_float,
1761        ldb: *const lapack_int,
1762        x: *mut c_float,
1763        ldx: *const lapack_int,
1764        ferr: *mut c_float,
1765        berr: *mut c_float,
1766        work: *mut c_float,
1767        iwork: *mut lapack_int,
1768        info: *mut lapack_int,
1769    );
1770    pub fn dgerfs_(
1771        trans: *const c_char,
1772        n: *const lapack_int,
1773        nrhs: *const lapack_int,
1774        a: *const c_double,
1775        lda: *const lapack_int,
1776        af: *const c_double,
1777        ldaf: *const lapack_int,
1778        ipiv: *const lapack_int,
1779        b: *const c_double,
1780        ldb: *const lapack_int,
1781        x: *mut c_double,
1782        ldx: *const lapack_int,
1783        ferr: *mut c_double,
1784        berr: *mut c_double,
1785        work: *mut c_double,
1786        iwork: *mut lapack_int,
1787        info: *mut lapack_int,
1788    );
1789    pub fn cgerfs_(
1790        trans: *const c_char,
1791        n: *const lapack_int,
1792        nrhs: *const lapack_int,
1793        a: *const lapack_complex_float,
1794        lda: *const lapack_int,
1795        af: *const lapack_complex_float,
1796        ldaf: *const lapack_int,
1797        ipiv: *const lapack_int,
1798        b: *const lapack_complex_float,
1799        ldb: *const lapack_int,
1800        x: *mut lapack_complex_float,
1801        ldx: *const lapack_int,
1802        ferr: *mut c_float,
1803        berr: *mut c_float,
1804        work: *mut lapack_complex_float,
1805        rwork: *mut c_float,
1806        info: *mut lapack_int,
1807    );
1808    pub fn zgerfs_(
1809        trans: *const c_char,
1810        n: *const lapack_int,
1811        nrhs: *const lapack_int,
1812        a: *const lapack_complex_double,
1813        lda: *const lapack_int,
1814        af: *const lapack_complex_double,
1815        ldaf: *const lapack_int,
1816        ipiv: *const lapack_int,
1817        b: *const lapack_complex_double,
1818        ldb: *const lapack_int,
1819        x: *mut lapack_complex_double,
1820        ldx: *const lapack_int,
1821        ferr: *mut c_double,
1822        berr: *mut c_double,
1823        work: *mut lapack_complex_double,
1824        rwork: *mut c_double,
1825        info: *mut lapack_int,
1826    );
1827
1828    pub fn dgerfsx_(
1829        trans: *const c_char,
1830        equed: *const c_char,
1831        n: *const lapack_int,
1832        nrhs: *const lapack_int,
1833        a: *const c_double,
1834        lda: *const lapack_int,
1835        af: *const c_double,
1836        ldaf: *const lapack_int,
1837        ipiv: *const lapack_int,
1838        r: *const c_double,
1839        c: *const c_double,
1840        b: *const c_double,
1841        ldb: *const lapack_int,
1842        x: *mut c_double,
1843        ldx: *const lapack_int,
1844        rcond: *mut c_double,
1845        berr: *mut c_double,
1846        n_err_bnds: *const lapack_int,
1847        err_bnds_norm: *mut c_double,
1848        err_bnds_comp: *mut c_double,
1849        nparams: *const lapack_int,
1850        params: *mut c_double,
1851        work: *mut c_double,
1852        iwork: *mut lapack_int,
1853        info: *mut lapack_int,
1854    );
1855    pub fn sgerfsx_(
1856        trans: *const c_char,
1857        equed: *const c_char,
1858        n: *const lapack_int,
1859        nrhs: *const lapack_int,
1860        a: *const c_float,
1861        lda: *const lapack_int,
1862        af: *const c_float,
1863        ldaf: *const lapack_int,
1864        ipiv: *const lapack_int,
1865        r: *const c_float,
1866        c: *const c_float,
1867        b: *const c_float,
1868        ldb: *const lapack_int,
1869        x: *mut c_float,
1870        ldx: *const lapack_int,
1871        rcond: *mut c_float,
1872        berr: *mut c_float,
1873        n_err_bnds: *const lapack_int,
1874        err_bnds_norm: *mut c_float,
1875        err_bnds_comp: *mut c_float,
1876        nparams: *const lapack_int,
1877        params: *mut c_float,
1878        work: *mut c_float,
1879        iwork: *mut lapack_int,
1880        info: *mut lapack_int,
1881    );
1882    pub fn zgerfsx_(
1883        trans: *const c_char,
1884        equed: *const c_char,
1885        n: *const lapack_int,
1886        nrhs: *const lapack_int,
1887        a: *const lapack_complex_double,
1888        lda: *const lapack_int,
1889        af: *const lapack_complex_double,
1890        ldaf: *const lapack_int,
1891        ipiv: *const lapack_int,
1892        r: *const c_double,
1893        c: *const c_double,
1894        b: *const lapack_complex_double,
1895        ldb: *const lapack_int,
1896        x: *mut lapack_complex_double,
1897        ldx: *const lapack_int,
1898        rcond: *mut c_double,
1899        berr: *mut c_double,
1900        n_err_bnds: *const lapack_int,
1901        err_bnds_norm: *mut c_double,
1902        err_bnds_comp: *mut c_double,
1903        nparams: *const lapack_int,
1904        params: *mut c_double,
1905        work: *mut lapack_complex_double,
1906        rwork: *mut c_double,
1907        info: *mut lapack_int,
1908    );
1909    pub fn cgerfsx_(
1910        trans: *const c_char,
1911        equed: *const c_char,
1912        n: *const lapack_int,
1913        nrhs: *const lapack_int,
1914        a: *const lapack_complex_float,
1915        lda: *const lapack_int,
1916        af: *const lapack_complex_float,
1917        ldaf: *const lapack_int,
1918        ipiv: *const lapack_int,
1919        r: *const c_float,
1920        c: *const c_float,
1921        b: *const lapack_complex_float,
1922        ldb: *const lapack_int,
1923        x: *mut lapack_complex_float,
1924        ldx: *const lapack_int,
1925        rcond: *mut c_float,
1926        berr: *mut c_float,
1927        n_err_bnds: *const lapack_int,
1928        err_bnds_norm: *mut c_float,
1929        err_bnds_comp: *mut c_float,
1930        nparams: *const lapack_int,
1931        params: *mut c_float,
1932        work: *mut lapack_complex_float,
1933        rwork: *mut c_float,
1934        info: *mut lapack_int,
1935    );
1936
1937    pub fn sgbrfs_(
1938        trans: *const c_char,
1939        n: *const lapack_int,
1940        kl: *const lapack_int,
1941        ku: *const lapack_int,
1942        nrhs: *const lapack_int,
1943        ab: *const c_float,
1944        ldab: *const lapack_int,
1945        afb: *const c_float,
1946        ldafb: *const lapack_int,
1947        ipiv: *const lapack_int,
1948        b: *const c_float,
1949        ldb: *const lapack_int,
1950        x: *mut c_float,
1951        ldx: *const lapack_int,
1952        ferr: *mut c_float,
1953        berr: *mut c_float,
1954        work: *mut c_float,
1955        iwork: *mut lapack_int,
1956        info: *mut lapack_int,
1957    );
1958    pub fn dgbrfs_(
1959        trans: *const c_char,
1960        n: *const lapack_int,
1961        kl: *const lapack_int,
1962        ku: *const lapack_int,
1963        nrhs: *const lapack_int,
1964        ab: *const c_double,
1965        ldab: *const lapack_int,
1966        afb: *const c_double,
1967        ldafb: *const lapack_int,
1968        ipiv: *const lapack_int,
1969        b: *const c_double,
1970        ldb: *const lapack_int,
1971        x: *mut c_double,
1972        ldx: *const lapack_int,
1973        ferr: *mut c_double,
1974        berr: *mut c_double,
1975        work: *mut c_double,
1976        iwork: *mut lapack_int,
1977        info: *mut lapack_int,
1978    );
1979    pub fn cgbrfs_(
1980        trans: *const c_char,
1981        n: *const lapack_int,
1982        kl: *const lapack_int,
1983        ku: *const lapack_int,
1984        nrhs: *const lapack_int,
1985        ab: *const lapack_complex_float,
1986        ldab: *const lapack_int,
1987        afb: *const lapack_complex_float,
1988        ldafb: *const lapack_int,
1989        ipiv: *const lapack_int,
1990        b: *const lapack_complex_float,
1991        ldb: *const lapack_int,
1992        x: *mut lapack_complex_float,
1993        ldx: *const lapack_int,
1994        ferr: *mut c_float,
1995        berr: *mut c_float,
1996        work: *mut lapack_complex_float,
1997        rwork: *mut c_float,
1998        info: *mut lapack_int,
1999    );
2000    pub fn zgbrfs_(
2001        trans: *const c_char,
2002        n: *const lapack_int,
2003        kl: *const lapack_int,
2004        ku: *const lapack_int,
2005        nrhs: *const lapack_int,
2006        ab: *const lapack_complex_double,
2007        ldab: *const lapack_int,
2008        afb: *const lapack_complex_double,
2009        ldafb: *const lapack_int,
2010        ipiv: *const lapack_int,
2011        b: *const lapack_complex_double,
2012        ldb: *const lapack_int,
2013        x: *mut lapack_complex_double,
2014        ldx: *const lapack_int,
2015        ferr: *mut c_double,
2016        berr: *mut c_double,
2017        work: *mut lapack_complex_double,
2018        rwork: *mut c_double,
2019        info: *mut lapack_int,
2020    );
2021
2022    pub fn dgbrfsx_(
2023        trans: *const c_char,
2024        equed: *const c_char,
2025        n: *const lapack_int,
2026        kl: *const lapack_int,
2027        ku: *const lapack_int,
2028        nrhs: *const lapack_int,
2029        ab: *const c_double,
2030        ldab: *const lapack_int,
2031        afb: *const c_double,
2032        ldafb: *const lapack_int,
2033        ipiv: *const lapack_int,
2034        r: *const c_double,
2035        c: *const c_double,
2036        b: *const c_double,
2037        ldb: *const lapack_int,
2038        x: *mut c_double,
2039        ldx: *const lapack_int,
2040        rcond: *mut c_double,
2041        berr: *mut c_double,
2042        n_err_bnds: *const lapack_int,
2043        err_bnds_norm: *mut c_double,
2044        err_bnds_comp: *mut c_double,
2045        nparams: *const lapack_int,
2046        params: *mut c_double,
2047        work: *mut c_double,
2048        iwork: *mut lapack_int,
2049        info: *mut lapack_int,
2050    );
2051    pub fn sgbrfsx_(
2052        trans: *const c_char,
2053        equed: *const c_char,
2054        n: *const lapack_int,
2055        kl: *const lapack_int,
2056        ku: *const lapack_int,
2057        nrhs: *const lapack_int,
2058        ab: *const c_float,
2059        ldab: *const lapack_int,
2060        afb: *const c_float,
2061        ldafb: *const lapack_int,
2062        ipiv: *const lapack_int,
2063        r: *const c_float,
2064        c: *const c_float,
2065        b: *const c_float,
2066        ldb: *const lapack_int,
2067        x: *mut c_float,
2068        ldx: *const lapack_int,
2069        rcond: *mut c_float,
2070        berr: *mut c_float,
2071        n_err_bnds: *const lapack_int,
2072        err_bnds_norm: *mut c_float,
2073        err_bnds_comp: *mut c_float,
2074        nparams: *const lapack_int,
2075        params: *mut c_float,
2076        work: *mut c_float,
2077        iwork: *mut lapack_int,
2078        info: *mut lapack_int,
2079    );
2080    pub fn zgbrfsx_(
2081        trans: *const c_char,
2082        equed: *const c_char,
2083        n: *const lapack_int,
2084        kl: *const lapack_int,
2085        ku: *const lapack_int,
2086        nrhs: *const lapack_int,
2087        ab: *const lapack_complex_double,
2088        ldab: *const lapack_int,
2089        afb: *const lapack_complex_double,
2090        ldafb: *const lapack_int,
2091        ipiv: *const lapack_int,
2092        r: *const c_double,
2093        c: *const c_double,
2094        b: *const lapack_complex_double,
2095        ldb: *const lapack_int,
2096        x: *mut lapack_complex_double,
2097        ldx: *const lapack_int,
2098        rcond: *mut c_double,
2099        berr: *mut c_double,
2100        n_err_bnds: *const lapack_int,
2101        err_bnds_norm: *mut c_double,
2102        err_bnds_comp: *mut c_double,
2103        nparams: *const lapack_int,
2104        params: *mut c_double,
2105        work: *mut lapack_complex_double,
2106        rwork: *mut c_double,
2107        info: *mut lapack_int,
2108    );
2109    pub fn cgbrfsx_(
2110        trans: *const c_char,
2111        equed: *const c_char,
2112        n: *const lapack_int,
2113        kl: *const lapack_int,
2114        ku: *const lapack_int,
2115        nrhs: *const lapack_int,
2116        ab: *const lapack_complex_float,
2117        ldab: *const lapack_int,
2118        afb: *const lapack_complex_float,
2119        ldafb: *const lapack_int,
2120        ipiv: *const lapack_int,
2121        r: *const c_float,
2122        c: *const c_float,
2123        b: *const lapack_complex_float,
2124        ldb: *const lapack_int,
2125        x: *mut lapack_complex_float,
2126        ldx: *const lapack_int,
2127        rcond: *mut c_float,
2128        berr: *mut c_float,
2129        n_err_bnds: *const lapack_int,
2130        err_bnds_norm: *mut c_float,
2131        err_bnds_comp: *mut c_float,
2132        nparams: *const lapack_int,
2133        params: *mut c_float,
2134        work: *mut lapack_complex_float,
2135        rwork: *mut c_float,
2136        info: *mut lapack_int,
2137    );
2138
2139    pub fn sgtrfs_(
2140        trans: *const c_char,
2141        n: *const lapack_int,
2142        nrhs: *const lapack_int,
2143        dl: *const c_float,
2144        d: *const c_float,
2145        du: *const c_float,
2146        dlf: *const c_float,
2147        df: *const c_float,
2148        duf: *const c_float,
2149        du2: *const c_float,
2150        ipiv: *const lapack_int,
2151        b: *const c_float,
2152        ldb: *const lapack_int,
2153        x: *mut c_float,
2154        ldx: *const lapack_int,
2155        ferr: *mut c_float,
2156        berr: *mut c_float,
2157        work: *mut c_float,
2158        iwork: *mut lapack_int,
2159        info: *mut lapack_int,
2160    );
2161    pub fn dgtrfs_(
2162        trans: *const c_char,
2163        n: *const lapack_int,
2164        nrhs: *const lapack_int,
2165        dl: *const c_double,
2166        d: *const c_double,
2167        du: *const c_double,
2168        dlf: *const c_double,
2169        df: *const c_double,
2170        duf: *const c_double,
2171        du2: *const c_double,
2172        ipiv: *const lapack_int,
2173        b: *const c_double,
2174        ldb: *const lapack_int,
2175        x: *mut c_double,
2176        ldx: *const lapack_int,
2177        ferr: *mut c_double,
2178        berr: *mut c_double,
2179        work: *mut c_double,
2180        iwork: *mut lapack_int,
2181        info: *mut lapack_int,
2182    );
2183    pub fn cgtrfs_(
2184        trans: *const c_char,
2185        n: *const lapack_int,
2186        nrhs: *const lapack_int,
2187        dl: *const lapack_complex_float,
2188        d: *const lapack_complex_float,
2189        du: *const lapack_complex_float,
2190        dlf: *const lapack_complex_float,
2191        df: *const lapack_complex_float,
2192        duf: *const lapack_complex_float,
2193        du2: *const lapack_complex_float,
2194        ipiv: *const lapack_int,
2195        b: *const lapack_complex_float,
2196        ldb: *const lapack_int,
2197        x: *mut lapack_complex_float,
2198        ldx: *const lapack_int,
2199        ferr: *mut c_float,
2200        berr: *mut c_float,
2201        work: *mut lapack_complex_float,
2202        rwork: *mut c_float,
2203        info: *mut lapack_int,
2204    );
2205    pub fn zgtrfs_(
2206        trans: *const c_char,
2207        n: *const lapack_int,
2208        nrhs: *const lapack_int,
2209        dl: *const lapack_complex_double,
2210        d: *const lapack_complex_double,
2211        du: *const lapack_complex_double,
2212        dlf: *const lapack_complex_double,
2213        df: *const lapack_complex_double,
2214        duf: *const lapack_complex_double,
2215        du2: *const lapack_complex_double,
2216        ipiv: *const lapack_int,
2217        b: *const lapack_complex_double,
2218        ldb: *const lapack_int,
2219        x: *mut lapack_complex_double,
2220        ldx: *const lapack_int,
2221        ferr: *mut c_double,
2222        berr: *mut c_double,
2223        work: *mut lapack_complex_double,
2224        rwork: *mut c_double,
2225        info: *mut lapack_int,
2226    );
2227
2228    pub fn sporfs_(
2229        uplo: *const c_char,
2230        n: *const lapack_int,
2231        nrhs: *const lapack_int,
2232        a: *const c_float,
2233        lda: *const lapack_int,
2234        af: *const c_float,
2235        ldaf: *const lapack_int,
2236        b: *const c_float,
2237        ldb: *const lapack_int,
2238        x: *mut c_float,
2239        ldx: *const lapack_int,
2240        ferr: *mut c_float,
2241        berr: *mut c_float,
2242        work: *mut c_float,
2243        iwork: *mut lapack_int,
2244        info: *mut lapack_int,
2245    );
2246    pub fn dporfs_(
2247        uplo: *const c_char,
2248        n: *const lapack_int,
2249        nrhs: *const lapack_int,
2250        a: *const c_double,
2251        lda: *const lapack_int,
2252        af: *const c_double,
2253        ldaf: *const lapack_int,
2254        b: *const c_double,
2255        ldb: *const lapack_int,
2256        x: *mut c_double,
2257        ldx: *const lapack_int,
2258        ferr: *mut c_double,
2259        berr: *mut c_double,
2260        work: *mut c_double,
2261        iwork: *mut lapack_int,
2262        info: *mut lapack_int,
2263    );
2264    pub fn cporfs_(
2265        uplo: *const c_char,
2266        n: *const lapack_int,
2267        nrhs: *const lapack_int,
2268        a: *const lapack_complex_float,
2269        lda: *const lapack_int,
2270        af: *const lapack_complex_float,
2271        ldaf: *const lapack_int,
2272        b: *const lapack_complex_float,
2273        ldb: *const lapack_int,
2274        x: *mut lapack_complex_float,
2275        ldx: *const lapack_int,
2276        ferr: *mut c_float,
2277        berr: *mut c_float,
2278        work: *mut lapack_complex_float,
2279        rwork: *mut c_float,
2280        info: *mut lapack_int,
2281    );
2282    pub fn zporfs_(
2283        uplo: *const c_char,
2284        n: *const lapack_int,
2285        nrhs: *const lapack_int,
2286        a: *const lapack_complex_double,
2287        lda: *const lapack_int,
2288        af: *const lapack_complex_double,
2289        ldaf: *const lapack_int,
2290        b: *const lapack_complex_double,
2291        ldb: *const lapack_int,
2292        x: *mut lapack_complex_double,
2293        ldx: *const lapack_int,
2294        ferr: *mut c_double,
2295        berr: *mut c_double,
2296        work: *mut lapack_complex_double,
2297        rwork: *mut c_double,
2298        info: *mut lapack_int,
2299    );
2300
2301    pub fn dporfsx_(
2302        uplo: *const c_char,
2303        equed: *const c_char,
2304        n: *const lapack_int,
2305        nrhs: *const lapack_int,
2306        a: *const c_double,
2307        lda: *const lapack_int,
2308        af: *const c_double,
2309        ldaf: *const lapack_int,
2310        s: *const c_double,
2311        b: *const c_double,
2312        ldb: *const lapack_int,
2313        x: *mut c_double,
2314        ldx: *const lapack_int,
2315        rcond: *mut c_double,
2316        berr: *mut c_double,
2317        n_err_bnds: *const lapack_int,
2318        err_bnds_norm: *mut c_double,
2319        err_bnds_comp: *mut c_double,
2320        nparams: *const lapack_int,
2321        params: *mut c_double,
2322        work: *mut c_double,
2323        iwork: *mut lapack_int,
2324        info: *mut lapack_int,
2325    );
2326    pub fn sporfsx_(
2327        uplo: *const c_char,
2328        equed: *const c_char,
2329        n: *const lapack_int,
2330        nrhs: *const lapack_int,
2331        a: *const c_float,
2332        lda: *const lapack_int,
2333        af: *const c_float,
2334        ldaf: *const lapack_int,
2335        s: *const c_float,
2336        b: *const c_float,
2337        ldb: *const lapack_int,
2338        x: *mut c_float,
2339        ldx: *const lapack_int,
2340        rcond: *mut c_float,
2341        berr: *mut c_float,
2342        n_err_bnds: *const lapack_int,
2343        err_bnds_norm: *mut c_float,
2344        err_bnds_comp: *mut c_float,
2345        nparams: *const lapack_int,
2346        params: *mut c_float,
2347        work: *mut c_float,
2348        iwork: *mut lapack_int,
2349        info: *mut lapack_int,
2350    );
2351    pub fn zporfsx_(
2352        uplo: *const c_char,
2353        equed: *const c_char,
2354        n: *const lapack_int,
2355        nrhs: *const lapack_int,
2356        a: *const lapack_complex_double,
2357        lda: *const lapack_int,
2358        af: *const lapack_complex_double,
2359        ldaf: *const lapack_int,
2360        s: *const c_double,
2361        b: *const lapack_complex_double,
2362        ldb: *const lapack_int,
2363        x: *mut lapack_complex_double,
2364        ldx: *const lapack_int,
2365        rcond: *mut c_double,
2366        berr: *mut c_double,
2367        n_err_bnds: *const lapack_int,
2368        err_bnds_norm: *mut c_double,
2369        err_bnds_comp: *mut c_double,
2370        nparams: *const lapack_int,
2371        params: *mut c_double,
2372        work: *mut lapack_complex_double,
2373        rwork: *mut c_double,
2374        info: *mut lapack_int,
2375    );
2376    pub fn cporfsx_(
2377        uplo: *const c_char,
2378        equed: *const c_char,
2379        n: *const lapack_int,
2380        nrhs: *const lapack_int,
2381        a: *const lapack_complex_float,
2382        lda: *const lapack_int,
2383        af: *const lapack_complex_float,
2384        ldaf: *const lapack_int,
2385        s: *const c_float,
2386        b: *const lapack_complex_float,
2387        ldb: *const lapack_int,
2388        x: *mut lapack_complex_float,
2389        ldx: *const lapack_int,
2390        rcond: *mut c_float,
2391        berr: *mut c_float,
2392        n_err_bnds: *const lapack_int,
2393        err_bnds_norm: *mut c_float,
2394        err_bnds_comp: *mut c_float,
2395        nparams: *const lapack_int,
2396        params: *mut c_float,
2397        work: *mut lapack_complex_float,
2398        rwork: *mut c_float,
2399        info: *mut lapack_int,
2400    );
2401
2402    pub fn spprfs_(
2403        uplo: *const c_char,
2404        n: *const lapack_int,
2405        nrhs: *const lapack_int,
2406        ap: *const c_float,
2407        afp: *const c_float,
2408        b: *const c_float,
2409        ldb: *const lapack_int,
2410        x: *mut c_float,
2411        ldx: *const lapack_int,
2412        ferr: *mut c_float,
2413        berr: *mut c_float,
2414        work: *mut c_float,
2415        iwork: *mut lapack_int,
2416        info: *mut lapack_int,
2417    );
2418    pub fn dpprfs_(
2419        uplo: *const c_char,
2420        n: *const lapack_int,
2421        nrhs: *const lapack_int,
2422        ap: *const c_double,
2423        afp: *const c_double,
2424        b: *const c_double,
2425        ldb: *const lapack_int,
2426        x: *mut c_double,
2427        ldx: *const lapack_int,
2428        ferr: *mut c_double,
2429        berr: *mut c_double,
2430        work: *mut c_double,
2431        iwork: *mut lapack_int,
2432        info: *mut lapack_int,
2433    );
2434    pub fn cpprfs_(
2435        uplo: *const c_char,
2436        n: *const lapack_int,
2437        nrhs: *const lapack_int,
2438        ap: *const lapack_complex_float,
2439        afp: *const lapack_complex_float,
2440        b: *const lapack_complex_float,
2441        ldb: *const lapack_int,
2442        x: *mut lapack_complex_float,
2443        ldx: *const lapack_int,
2444        ferr: *mut c_float,
2445        berr: *mut c_float,
2446        work: *mut lapack_complex_float,
2447        rwork: *mut c_float,
2448        info: *mut lapack_int,
2449    );
2450    pub fn zpprfs_(
2451        uplo: *const c_char,
2452        n: *const lapack_int,
2453        nrhs: *const lapack_int,
2454        ap: *const lapack_complex_double,
2455        afp: *const lapack_complex_double,
2456        b: *const lapack_complex_double,
2457        ldb: *const lapack_int,
2458        x: *mut lapack_complex_double,
2459        ldx: *const lapack_int,
2460        ferr: *mut c_double,
2461        berr: *mut c_double,
2462        work: *mut lapack_complex_double,
2463        rwork: *mut c_double,
2464        info: *mut lapack_int,
2465    );
2466
2467    pub fn spbrfs_(
2468        uplo: *const c_char,
2469        n: *const lapack_int,
2470        kd: *const lapack_int,
2471        nrhs: *const lapack_int,
2472        ab: *const c_float,
2473        ldab: *const lapack_int,
2474        afb: *const c_float,
2475        ldafb: *const lapack_int,
2476        b: *const c_float,
2477        ldb: *const lapack_int,
2478        x: *mut c_float,
2479        ldx: *const lapack_int,
2480        ferr: *mut c_float,
2481        berr: *mut c_float,
2482        work: *mut c_float,
2483        iwork: *mut lapack_int,
2484        info: *mut lapack_int,
2485    );
2486    pub fn dpbrfs_(
2487        uplo: *const c_char,
2488        n: *const lapack_int,
2489        kd: *const lapack_int,
2490        nrhs: *const lapack_int,
2491        ab: *const c_double,
2492        ldab: *const lapack_int,
2493        afb: *const c_double,
2494        ldafb: *const lapack_int,
2495        b: *const c_double,
2496        ldb: *const lapack_int,
2497        x: *mut c_double,
2498        ldx: *const lapack_int,
2499        ferr: *mut c_double,
2500        berr: *mut c_double,
2501        work: *mut c_double,
2502        iwork: *mut lapack_int,
2503        info: *mut lapack_int,
2504    );
2505    pub fn cpbrfs_(
2506        uplo: *const c_char,
2507        n: *const lapack_int,
2508        kd: *const lapack_int,
2509        nrhs: *const lapack_int,
2510        ab: *const lapack_complex_float,
2511        ldab: *const lapack_int,
2512        afb: *const lapack_complex_float,
2513        ldafb: *const lapack_int,
2514        b: *const lapack_complex_float,
2515        ldb: *const lapack_int,
2516        x: *mut lapack_complex_float,
2517        ldx: *const lapack_int,
2518        ferr: *mut c_float,
2519        berr: *mut c_float,
2520        work: *mut lapack_complex_float,
2521        rwork: *mut c_float,
2522        info: *mut lapack_int,
2523    );
2524    pub fn zpbrfs_(
2525        uplo: *const c_char,
2526        n: *const lapack_int,
2527        kd: *const lapack_int,
2528        nrhs: *const lapack_int,
2529        ab: *const lapack_complex_double,
2530        ldab: *const lapack_int,
2531        afb: *const lapack_complex_double,
2532        ldafb: *const lapack_int,
2533        b: *const lapack_complex_double,
2534        ldb: *const lapack_int,
2535        x: *mut lapack_complex_double,
2536        ldx: *const lapack_int,
2537        ferr: *mut c_double,
2538        berr: *mut c_double,
2539        work: *mut lapack_complex_double,
2540        rwork: *mut c_double,
2541        info: *mut lapack_int,
2542    );
2543
2544    pub fn sptrfs_(
2545        n: *const lapack_int,
2546        nrhs: *const lapack_int,
2547        d: *const c_float,
2548        e: *const c_float,
2549        df: *const c_float,
2550        ef: *const c_float,
2551        b: *const c_float,
2552        ldb: *const lapack_int,
2553        x: *mut c_float,
2554        ldx: *const lapack_int,
2555        ferr: *mut c_float,
2556        berr: *mut c_float,
2557        work: *mut c_float,
2558        info: *mut lapack_int,
2559    );
2560    pub fn dptrfs_(
2561        n: *const lapack_int,
2562        nrhs: *const lapack_int,
2563        d: *const c_double,
2564        e: *const c_double,
2565        df: *const c_double,
2566        ef: *const c_double,
2567        b: *const c_double,
2568        ldb: *const lapack_int,
2569        x: *mut c_double,
2570        ldx: *const lapack_int,
2571        ferr: *mut c_double,
2572        berr: *mut c_double,
2573        work: *mut c_double,
2574        info: *mut lapack_int,
2575    );
2576    pub fn cptrfs_(
2577        uplo: *const c_char,
2578        n: *const lapack_int,
2579        nrhs: *const lapack_int,
2580        d: *const c_float,
2581        e: *const lapack_complex_float,
2582        df: *const c_float,
2583        ef: *const lapack_complex_float,
2584        b: *const lapack_complex_float,
2585        ldb: *const lapack_int,
2586        x: *mut lapack_complex_float,
2587        ldx: *const lapack_int,
2588        ferr: *mut c_float,
2589        berr: *mut c_float,
2590        work: *mut lapack_complex_float,
2591        rwork: *mut c_float,
2592        info: *mut lapack_int,
2593    );
2594    pub fn zptrfs_(
2595        uplo: *const c_char,
2596        n: *const lapack_int,
2597        nrhs: *const lapack_int,
2598        d: *const c_double,
2599        e: *const lapack_complex_double,
2600        df: *const c_double,
2601        ef: *const lapack_complex_double,
2602        b: *const lapack_complex_double,
2603        ldb: *const lapack_int,
2604        x: *mut lapack_complex_double,
2605        ldx: *const lapack_int,
2606        ferr: *mut c_double,
2607        berr: *mut c_double,
2608        work: *mut lapack_complex_double,
2609        rwork: *mut c_double,
2610        info: *mut lapack_int,
2611    );
2612
2613    pub fn ssyrfs_(
2614        uplo: *const c_char,
2615        n: *const lapack_int,
2616        nrhs: *const lapack_int,
2617        a: *const c_float,
2618        lda: *const lapack_int,
2619        af: *const c_float,
2620        ldaf: *const lapack_int,
2621        ipiv: *const lapack_int,
2622        b: *const c_float,
2623        ldb: *const lapack_int,
2624        x: *mut c_float,
2625        ldx: *const lapack_int,
2626        ferr: *mut c_float,
2627        berr: *mut c_float,
2628        work: *mut c_float,
2629        iwork: *mut lapack_int,
2630        info: *mut lapack_int,
2631    );
2632    pub fn dsyrfs_(
2633        uplo: *const c_char,
2634        n: *const lapack_int,
2635        nrhs: *const lapack_int,
2636        a: *const c_double,
2637        lda: *const lapack_int,
2638        af: *const c_double,
2639        ldaf: *const lapack_int,
2640        ipiv: *const lapack_int,
2641        b: *const c_double,
2642        ldb: *const lapack_int,
2643        x: *mut c_double,
2644        ldx: *const lapack_int,
2645        ferr: *mut c_double,
2646        berr: *mut c_double,
2647        work: *mut c_double,
2648        iwork: *mut lapack_int,
2649        info: *mut lapack_int,
2650    );
2651    pub fn csyrfs_(
2652        uplo: *const c_char,
2653        n: *const lapack_int,
2654        nrhs: *const lapack_int,
2655        a: *const lapack_complex_float,
2656        lda: *const lapack_int,
2657        af: *const lapack_complex_float,
2658        ldaf: *const lapack_int,
2659        ipiv: *const lapack_int,
2660        b: *const lapack_complex_float,
2661        ldb: *const lapack_int,
2662        x: *mut lapack_complex_float,
2663        ldx: *const lapack_int,
2664        ferr: *mut c_float,
2665        berr: *mut c_float,
2666        work: *mut lapack_complex_float,
2667        rwork: *mut c_float,
2668        info: *mut lapack_int,
2669    );
2670    pub fn zsyrfs_(
2671        uplo: *const c_char,
2672        n: *const lapack_int,
2673        nrhs: *const lapack_int,
2674        a: *const lapack_complex_double,
2675        lda: *const lapack_int,
2676        af: *const lapack_complex_double,
2677        ldaf: *const lapack_int,
2678        ipiv: *const lapack_int,
2679        b: *const lapack_complex_double,
2680        ldb: *const lapack_int,
2681        x: *mut lapack_complex_double,
2682        ldx: *const lapack_int,
2683        ferr: *mut c_double,
2684        berr: *mut c_double,
2685        work: *mut lapack_complex_double,
2686        rwork: *mut c_double,
2687        info: *mut lapack_int,
2688    );
2689
2690    pub fn dsyrfsx_(
2691        uplo: *const c_char,
2692        equed: *const c_char,
2693        n: *const lapack_int,
2694        nrhs: *const lapack_int,
2695        a: *const c_double,
2696        lda: *const lapack_int,
2697        af: *const c_double,
2698        ldaf: *const lapack_int,
2699        ipiv: *const lapack_int,
2700        s: *const c_double,
2701        b: *const c_double,
2702        ldb: *const lapack_int,
2703        x: *mut c_double,
2704        ldx: *const lapack_int,
2705        rcond: *mut c_double,
2706        berr: *mut c_double,
2707        n_err_bnds: *const lapack_int,
2708        err_bnds_norm: *mut c_double,
2709        err_bnds_comp: *mut c_double,
2710        nparams: *const lapack_int,
2711        params: *mut c_double,
2712        work: *mut c_double,
2713        iwork: *mut lapack_int,
2714        info: *mut lapack_int,
2715    );
2716    pub fn ssyrfsx_(
2717        uplo: *const c_char,
2718        equed: *const c_char,
2719        n: *const lapack_int,
2720        nrhs: *const lapack_int,
2721        a: *const c_float,
2722        lda: *const lapack_int,
2723        af: *const c_float,
2724        ldaf: *const lapack_int,
2725        ipiv: *const lapack_int,
2726        s: *const c_float,
2727        b: *const c_float,
2728        ldb: *const lapack_int,
2729        x: *mut c_float,
2730        ldx: *const lapack_int,
2731        rcond: *mut c_float,
2732        berr: *mut c_float,
2733        n_err_bnds: *const lapack_int,
2734        err_bnds_norm: *mut c_float,
2735        err_bnds_comp: *mut c_float,
2736        nparams: *const lapack_int,
2737        params: *mut c_float,
2738        work: *mut c_float,
2739        iwork: *mut lapack_int,
2740        info: *mut lapack_int,
2741    );
2742    pub fn zsyrfsx_(
2743        uplo: *const c_char,
2744        equed: *const c_char,
2745        n: *const lapack_int,
2746        nrhs: *const lapack_int,
2747        a: *const lapack_complex_double,
2748        lda: *const lapack_int,
2749        af: *const lapack_complex_double,
2750        ldaf: *const lapack_int,
2751        ipiv: *const lapack_int,
2752        s: *const c_double,
2753        b: *const lapack_complex_double,
2754        ldb: *const lapack_int,
2755        x: *mut lapack_complex_double,
2756        ldx: *const lapack_int,
2757        rcond: *mut c_double,
2758        berr: *mut c_double,
2759        n_err_bnds: *const lapack_int,
2760        err_bnds_norm: *mut c_double,
2761        err_bnds_comp: *mut c_double,
2762        nparams: *const lapack_int,
2763        params: *mut c_double,
2764        work: *mut lapack_complex_double,
2765        rwork: *mut c_double,
2766        info: *mut lapack_int,
2767    );
2768    pub fn csyrfsx_(
2769        uplo: *const c_char,
2770        equed: *const c_char,
2771        n: *const lapack_int,
2772        nrhs: *const lapack_int,
2773        a: *const lapack_complex_float,
2774        lda: *const lapack_int,
2775        af: *const lapack_complex_float,
2776        ldaf: *const lapack_int,
2777        ipiv: *const lapack_int,
2778        s: *const c_float,
2779        b: *const lapack_complex_float,
2780        ldb: *const lapack_int,
2781        x: *mut lapack_complex_float,
2782        ldx: *const lapack_int,
2783        rcond: *mut c_float,
2784        berr: *mut c_float,
2785        n_err_bnds: *const lapack_int,
2786        err_bnds_norm: *mut c_float,
2787        err_bnds_comp: *mut c_float,
2788        nparams: *const lapack_int,
2789        params: *mut c_float,
2790        work: *mut lapack_complex_float,
2791        rwork: *mut c_float,
2792        info: *mut lapack_int,
2793    );
2794
2795    pub fn cherfs_(
2796        uplo: *const c_char,
2797        n: *const lapack_int,
2798        nrhs: *const lapack_int,
2799        a: *const lapack_complex_float,
2800        lda: *const lapack_int,
2801        af: *const lapack_complex_float,
2802        ldaf: *const lapack_int,
2803        ipiv: *const lapack_int,
2804        b: *const lapack_complex_float,
2805        ldb: *const lapack_int,
2806        x: *mut lapack_complex_float,
2807        ldx: *const lapack_int,
2808        ferr: *mut c_float,
2809        berr: *mut c_float,
2810        work: *mut lapack_complex_float,
2811        rwork: *mut c_float,
2812        info: *mut lapack_int,
2813    );
2814    pub fn zherfs_(
2815        uplo: *const c_char,
2816        n: *const lapack_int,
2817        nrhs: *const lapack_int,
2818        a: *const lapack_complex_double,
2819        lda: *const lapack_int,
2820        af: *const lapack_complex_double,
2821        ldaf: *const lapack_int,
2822        ipiv: *const lapack_int,
2823        b: *const lapack_complex_double,
2824        ldb: *const lapack_int,
2825        x: *mut lapack_complex_double,
2826        ldx: *const lapack_int,
2827        ferr: *mut c_double,
2828        berr: *mut c_double,
2829        work: *mut lapack_complex_double,
2830        rwork: *mut c_double,
2831        info: *mut lapack_int,
2832    );
2833
2834    pub fn zherfsx_(
2835        uplo: *const c_char,
2836        equed: *const c_char,
2837        n: *const lapack_int,
2838        nrhs: *const lapack_int,
2839        a: *const lapack_complex_double,
2840        lda: *const lapack_int,
2841        af: *const lapack_complex_double,
2842        ldaf: *const lapack_int,
2843        ipiv: *const lapack_int,
2844        s: *const c_double,
2845        b: *const lapack_complex_double,
2846        ldb: *const lapack_int,
2847        x: *mut lapack_complex_double,
2848        ldx: *const lapack_int,
2849        rcond: *mut c_double,
2850        berr: *mut c_double,
2851        n_err_bnds: *const lapack_int,
2852        err_bnds_norm: *mut c_double,
2853        err_bnds_comp: *mut c_double,
2854        nparams: *const lapack_int,
2855        params: *mut c_double,
2856        work: *mut lapack_complex_double,
2857        rwork: *mut c_double,
2858        info: *mut lapack_int,
2859    );
2860    pub fn cherfsx_(
2861        uplo: *const c_char,
2862        equed: *const c_char,
2863        n: *const lapack_int,
2864        nrhs: *const lapack_int,
2865        a: *const lapack_complex_float,
2866        lda: *const lapack_int,
2867        af: *const lapack_complex_float,
2868        ldaf: *const lapack_int,
2869        ipiv: *const lapack_int,
2870        s: *const c_float,
2871        b: *const lapack_complex_float,
2872        ldb: *const lapack_int,
2873        x: *mut lapack_complex_float,
2874        ldx: *const lapack_int,
2875        rcond: *mut c_float,
2876        berr: *mut c_float,
2877        n_err_bnds: *const lapack_int,
2878        err_bnds_norm: *mut c_float,
2879        err_bnds_comp: *mut c_float,
2880        nparams: *const lapack_int,
2881        params: *mut c_float,
2882        work: *mut lapack_complex_float,
2883        rwork: *mut c_float,
2884        info: *mut lapack_int,
2885    );
2886
2887    pub fn ssprfs_(
2888        uplo: *const c_char,
2889        n: *const lapack_int,
2890        nrhs: *const lapack_int,
2891        ap: *const c_float,
2892        afp: *const c_float,
2893        ipiv: *const lapack_int,
2894        b: *const c_float,
2895        ldb: *const lapack_int,
2896        x: *mut c_float,
2897        ldx: *const lapack_int,
2898        ferr: *mut c_float,
2899        berr: *mut c_float,
2900        work: *mut c_float,
2901        iwork: *mut lapack_int,
2902        info: *mut lapack_int,
2903    );
2904    pub fn dsprfs_(
2905        uplo: *const c_char,
2906        n: *const lapack_int,
2907        nrhs: *const lapack_int,
2908        ap: *const c_double,
2909        afp: *const c_double,
2910        ipiv: *const lapack_int,
2911        b: *const c_double,
2912        ldb: *const lapack_int,
2913        x: *mut c_double,
2914        ldx: *const lapack_int,
2915        ferr: *mut c_double,
2916        berr: *mut c_double,
2917        work: *mut c_double,
2918        iwork: *mut lapack_int,
2919        info: *mut lapack_int,
2920    );
2921    pub fn csprfs_(
2922        uplo: *const c_char,
2923        n: *const lapack_int,
2924        nrhs: *const lapack_int,
2925        ap: *const lapack_complex_float,
2926        afp: *const lapack_complex_float,
2927        ipiv: *const lapack_int,
2928        b: *const lapack_complex_float,
2929        ldb: *const lapack_int,
2930        x: *mut lapack_complex_float,
2931        ldx: *const lapack_int,
2932        ferr: *mut c_float,
2933        berr: *mut c_float,
2934        work: *mut lapack_complex_float,
2935        rwork: *mut c_float,
2936        info: *mut lapack_int,
2937    );
2938    pub fn zsprfs_(
2939        uplo: *const c_char,
2940        n: *const lapack_int,
2941        nrhs: *const lapack_int,
2942        ap: *const lapack_complex_double,
2943        afp: *const lapack_complex_double,
2944        ipiv: *const lapack_int,
2945        b: *const lapack_complex_double,
2946        ldb: *const lapack_int,
2947        x: *mut lapack_complex_double,
2948        ldx: *const lapack_int,
2949        ferr: *mut c_double,
2950        berr: *mut c_double,
2951        work: *mut lapack_complex_double,
2952        rwork: *mut c_double,
2953        info: *mut lapack_int,
2954    );
2955
2956    pub fn chprfs_(
2957        uplo: *const c_char,
2958        n: *const lapack_int,
2959        nrhs: *const lapack_int,
2960        ap: *const lapack_complex_float,
2961        afp: *const lapack_complex_float,
2962        ipiv: *const lapack_int,
2963        b: *const lapack_complex_float,
2964        ldb: *const lapack_int,
2965        x: *mut lapack_complex_float,
2966        ldx: *const lapack_int,
2967        ferr: *mut c_float,
2968        berr: *mut c_float,
2969        work: *mut lapack_complex_float,
2970        rwork: *mut c_float,
2971        info: *mut lapack_int,
2972    );
2973    pub fn zhprfs_(
2974        uplo: *const c_char,
2975        n: *const lapack_int,
2976        nrhs: *const lapack_int,
2977        ap: *const lapack_complex_double,
2978        afp: *const lapack_complex_double,
2979        ipiv: *const lapack_int,
2980        b: *const lapack_complex_double,
2981        ldb: *const lapack_int,
2982        x: *mut lapack_complex_double,
2983        ldx: *const lapack_int,
2984        ferr: *mut c_double,
2985        berr: *mut c_double,
2986        work: *mut lapack_complex_double,
2987        rwork: *mut c_double,
2988        info: *mut lapack_int,
2989    );
2990
2991    pub fn strrfs_(
2992        uplo: *const c_char,
2993        trans: *const c_char,
2994        diag: *const c_char,
2995        n: *const lapack_int,
2996        nrhs: *const lapack_int,
2997        a: *const c_float,
2998        lda: *const lapack_int,
2999        b: *const c_float,
3000        ldb: *const lapack_int,
3001        x: *const c_float,
3002        ldx: *const lapack_int,
3003        ferr: *mut c_float,
3004        berr: *mut c_float,
3005        work: *mut c_float,
3006        iwork: *mut lapack_int,
3007        info: *mut lapack_int,
3008    );
3009    pub fn dtrrfs_(
3010        uplo: *const c_char,
3011        trans: *const c_char,
3012        diag: *const c_char,
3013        n: *const lapack_int,
3014        nrhs: *const lapack_int,
3015        a: *const c_double,
3016        lda: *const lapack_int,
3017        b: *const c_double,
3018        ldb: *const lapack_int,
3019        x: *const c_double,
3020        ldx: *const lapack_int,
3021        ferr: *mut c_double,
3022        berr: *mut c_double,
3023        work: *mut c_double,
3024        iwork: *mut lapack_int,
3025        info: *mut lapack_int,
3026    );
3027    pub fn ctrrfs_(
3028        uplo: *const c_char,
3029        trans: *const c_char,
3030        diag: *const c_char,
3031        n: *const lapack_int,
3032        nrhs: *const lapack_int,
3033        a: *const lapack_complex_float,
3034        lda: *const lapack_int,
3035        b: *const lapack_complex_float,
3036        ldb: *const lapack_int,
3037        x: *const lapack_complex_float,
3038        ldx: *const lapack_int,
3039        ferr: *mut c_float,
3040        berr: *mut c_float,
3041        work: *mut lapack_complex_float,
3042        rwork: *mut c_float,
3043        info: *mut lapack_int,
3044    );
3045    pub fn ztrrfs_(
3046        uplo: *const c_char,
3047        trans: *const c_char,
3048        diag: *const c_char,
3049        n: *const lapack_int,
3050        nrhs: *const lapack_int,
3051        a: *const lapack_complex_double,
3052        lda: *const lapack_int,
3053        b: *const lapack_complex_double,
3054        ldb: *const lapack_int,
3055        x: *const lapack_complex_double,
3056        ldx: *const lapack_int,
3057        ferr: *mut c_double,
3058        berr: *mut c_double,
3059        work: *mut lapack_complex_double,
3060        rwork: *mut c_double,
3061        info: *mut lapack_int,
3062    );
3063
3064    pub fn stprfs_(
3065        uplo: *const c_char,
3066        trans: *const c_char,
3067        diag: *const c_char,
3068        n: *const lapack_int,
3069        nrhs: *const lapack_int,
3070        ap: *const c_float,
3071        b: *const c_float,
3072        ldb: *const lapack_int,
3073        x: *const c_float,
3074        ldx: *const lapack_int,
3075        ferr: *mut c_float,
3076        berr: *mut c_float,
3077        work: *mut c_float,
3078        iwork: *mut lapack_int,
3079        info: *mut lapack_int,
3080    );
3081    pub fn dtprfs_(
3082        uplo: *const c_char,
3083        trans: *const c_char,
3084        diag: *const c_char,
3085        n: *const lapack_int,
3086        nrhs: *const lapack_int,
3087        ap: *const c_double,
3088        b: *const c_double,
3089        ldb: *const lapack_int,
3090        x: *const c_double,
3091        ldx: *const lapack_int,
3092        ferr: *mut c_double,
3093        berr: *mut c_double,
3094        work: *mut c_double,
3095        iwork: *mut lapack_int,
3096        info: *mut lapack_int,
3097    );
3098    pub fn ctprfs_(
3099        uplo: *const c_char,
3100        trans: *const c_char,
3101        diag: *const c_char,
3102        n: *const lapack_int,
3103        nrhs: *const lapack_int,
3104        ap: *const lapack_complex_float,
3105        b: *const lapack_complex_float,
3106        ldb: *const lapack_int,
3107        x: *const lapack_complex_float,
3108        ldx: *const lapack_int,
3109        ferr: *mut c_float,
3110        berr: *mut c_float,
3111        work: *mut lapack_complex_float,
3112        rwork: *mut c_float,
3113        info: *mut lapack_int,
3114    );
3115    pub fn ztprfs_(
3116        uplo: *const c_char,
3117        trans: *const c_char,
3118        diag: *const c_char,
3119        n: *const lapack_int,
3120        nrhs: *const lapack_int,
3121        ap: *const lapack_complex_double,
3122        b: *const lapack_complex_double,
3123        ldb: *const lapack_int,
3124        x: *const lapack_complex_double,
3125        ldx: *const lapack_int,
3126        ferr: *mut c_double,
3127        berr: *mut c_double,
3128        work: *mut lapack_complex_double,
3129        rwork: *mut c_double,
3130        info: *mut lapack_int,
3131    );
3132
3133    pub fn stbrfs_(
3134        uplo: *const c_char,
3135        trans: *const c_char,
3136        diag: *const c_char,
3137        n: *const lapack_int,
3138        kd: *const lapack_int,
3139        nrhs: *const lapack_int,
3140        ab: *const c_float,
3141        ldab: *const lapack_int,
3142        b: *const c_float,
3143        ldb: *const lapack_int,
3144        x: *const c_float,
3145        ldx: *const lapack_int,
3146        ferr: *mut c_float,
3147        berr: *mut c_float,
3148        work: *mut c_float,
3149        iwork: *mut lapack_int,
3150        info: *mut lapack_int,
3151    );
3152    pub fn dtbrfs_(
3153        uplo: *const c_char,
3154        trans: *const c_char,
3155        diag: *const c_char,
3156        n: *const lapack_int,
3157        kd: *const lapack_int,
3158        nrhs: *const lapack_int,
3159        ab: *const c_double,
3160        ldab: *const lapack_int,
3161        b: *const c_double,
3162        ldb: *const lapack_int,
3163        x: *const c_double,
3164        ldx: *const lapack_int,
3165        ferr: *mut c_double,
3166        berr: *mut c_double,
3167        work: *mut c_double,
3168        iwork: *mut lapack_int,
3169        info: *mut lapack_int,
3170    );
3171    pub fn ctbrfs_(
3172        uplo: *const c_char,
3173        trans: *const c_char,
3174        diag: *const c_char,
3175        n: *const lapack_int,
3176        kd: *const lapack_int,
3177        nrhs: *const lapack_int,
3178        ab: *const lapack_complex_float,
3179        ldab: *const lapack_int,
3180        b: *const lapack_complex_float,
3181        ldb: *const lapack_int,
3182        x: *const lapack_complex_float,
3183        ldx: *const lapack_int,
3184        ferr: *mut c_float,
3185        berr: *mut c_float,
3186        work: *mut lapack_complex_float,
3187        rwork: *mut c_float,
3188        info: *mut lapack_int,
3189    );
3190    pub fn ztbrfs_(
3191        uplo: *const c_char,
3192        trans: *const c_char,
3193        diag: *const c_char,
3194        n: *const lapack_int,
3195        kd: *const lapack_int,
3196        nrhs: *const lapack_int,
3197        ab: *const lapack_complex_double,
3198        ldab: *const lapack_int,
3199        b: *const lapack_complex_double,
3200        ldb: *const lapack_int,
3201        x: *const lapack_complex_double,
3202        ldx: *const lapack_int,
3203        ferr: *mut c_double,
3204        berr: *mut c_double,
3205        work: *mut lapack_complex_double,
3206        rwork: *mut c_double,
3207        info: *mut lapack_int,
3208    );
3209
3210    pub fn sgetri_(
3211        n: *const lapack_int,
3212        a: *mut c_float,
3213        lda: *const lapack_int,
3214        ipiv: *const lapack_int,
3215        work: *mut c_float,
3216        lwork: *const lapack_int,
3217        info: *mut lapack_int,
3218    );
3219    pub fn dgetri_(
3220        n: *const lapack_int,
3221        a: *mut c_double,
3222        lda: *const lapack_int,
3223        ipiv: *const lapack_int,
3224        work: *mut c_double,
3225        lwork: *const lapack_int,
3226        info: *mut lapack_int,
3227    );
3228    pub fn cgetri_(
3229        n: *const lapack_int,
3230        a: *mut lapack_complex_float,
3231        lda: *const lapack_int,
3232        ipiv: *const lapack_int,
3233        work: *mut lapack_complex_float,
3234        lwork: *const lapack_int,
3235        info: *mut lapack_int,
3236    );
3237    pub fn zgetri_(
3238        n: *const lapack_int,
3239        a: *mut lapack_complex_double,
3240        lda: *const lapack_int,
3241        ipiv: *const lapack_int,
3242        work: *mut lapack_complex_double,
3243        lwork: *const lapack_int,
3244        info: *mut lapack_int,
3245    );
3246
3247    pub fn spotri_(
3248        uplo: *const c_char,
3249        n: *const lapack_int,
3250        a: *mut c_float,
3251        lda: *const lapack_int,
3252        info: *mut lapack_int,
3253    );
3254    pub fn dpotri_(
3255        uplo: *const c_char,
3256        n: *const lapack_int,
3257        a: *mut c_double,
3258        lda: *const lapack_int,
3259        info: *mut lapack_int,
3260    );
3261    pub fn cpotri_(
3262        uplo: *const c_char,
3263        n: *const lapack_int,
3264        a: *mut lapack_complex_float,
3265        lda: *const lapack_int,
3266        info: *mut lapack_int,
3267    );
3268    pub fn zpotri_(
3269        uplo: *const c_char,
3270        n: *const lapack_int,
3271        a: *mut lapack_complex_double,
3272        lda: *const lapack_int,
3273        info: *mut lapack_int,
3274    );
3275
3276    pub fn dpftri_(
3277        transr: *const c_char,
3278        uplo: *const c_char,
3279        n: *const lapack_int,
3280        a: *mut c_double,
3281        info: *mut lapack_int,
3282    );
3283    pub fn spftri_(
3284        transr: *const c_char,
3285        uplo: *const c_char,
3286        n: *const lapack_int,
3287        a: *mut c_float,
3288        info: *mut lapack_int,
3289    );
3290    pub fn zpftri_(
3291        transr: *const c_char,
3292        uplo: *const c_char,
3293        n: *const lapack_int,
3294        a: *mut lapack_complex_double,
3295        info: *mut lapack_int,
3296    );
3297    pub fn cpftri_(
3298        transr: *const c_char,
3299        uplo: *const c_char,
3300        n: *const lapack_int,
3301        a: *mut lapack_complex_float,
3302        info: *mut lapack_int,
3303    );
3304
3305    pub fn spptri_(
3306        uplo: *const c_char,
3307        n: *const lapack_int,
3308        ap: *mut c_float,
3309        info: *mut lapack_int,
3310    );
3311    pub fn dpptri_(
3312        uplo: *const c_char,
3313        n: *const lapack_int,
3314        ap: *mut c_double,
3315        info: *mut lapack_int,
3316    );
3317    pub fn cpptri_(
3318        uplo: *const c_char,
3319        n: *const lapack_int,
3320        ap: *mut lapack_complex_float,
3321        info: *mut lapack_int,
3322    );
3323    pub fn zpptri_(
3324        uplo: *const c_char,
3325        n: *const lapack_int,
3326        ap: *mut lapack_complex_double,
3327        info: *mut lapack_int,
3328    );
3329
3330    pub fn ssytri_(
3331        uplo: *const c_char,
3332        n: *const lapack_int,
3333        a: *mut c_float,
3334        lda: *const lapack_int,
3335        ipiv: *const lapack_int,
3336        work: *mut c_float,
3337        info: *mut lapack_int,
3338    );
3339    pub fn dsytri_(
3340        uplo: *const c_char,
3341        n: *const lapack_int,
3342        a: *mut c_double,
3343        lda: *const lapack_int,
3344        ipiv: *const lapack_int,
3345        work: *mut c_double,
3346        info: *mut lapack_int,
3347    );
3348    pub fn csytri_(
3349        uplo: *const c_char,
3350        n: *const lapack_int,
3351        a: *mut lapack_complex_float,
3352        lda: *const lapack_int,
3353        ipiv: *const lapack_int,
3354        work: *mut lapack_complex_float,
3355        info: *mut lapack_int,
3356    );
3357    pub fn zsytri_(
3358        uplo: *const c_char,
3359        n: *const lapack_int,
3360        a: *mut lapack_complex_double,
3361        lda: *const lapack_int,
3362        ipiv: *const lapack_int,
3363        work: *mut lapack_complex_double,
3364        info: *mut lapack_int,
3365    );
3366
3367    pub fn chetri_(
3368        uplo: *const c_char,
3369        n: *const lapack_int,
3370        a: *mut lapack_complex_float,
3371        lda: *const lapack_int,
3372        ipiv: *const lapack_int,
3373        work: *mut lapack_complex_float,
3374        info: *mut lapack_int,
3375    );
3376    pub fn zhetri_(
3377        uplo: *const c_char,
3378        n: *const lapack_int,
3379        a: *mut lapack_complex_double,
3380        lda: *const lapack_int,
3381        ipiv: *const lapack_int,
3382        work: *mut lapack_complex_double,
3383        info: *mut lapack_int,
3384    );
3385
3386    pub fn ssptri_(
3387        uplo: *const c_char,
3388        n: *const lapack_int,
3389        ap: *mut c_float,
3390        ipiv: *const lapack_int,
3391        work: *mut c_float,
3392        info: *mut lapack_int,
3393    );
3394    pub fn dsptri_(
3395        uplo: *const c_char,
3396        n: *const lapack_int,
3397        ap: *mut c_double,
3398        ipiv: *const lapack_int,
3399        work: *mut c_double,
3400        info: *mut lapack_int,
3401    );
3402    pub fn csptri_(
3403        uplo: *const c_char,
3404        n: *const lapack_int,
3405        ap: *mut lapack_complex_float,
3406        ipiv: *const lapack_int,
3407        work: *mut lapack_complex_float,
3408        info: *mut lapack_int,
3409    );
3410    pub fn zsptri_(
3411        uplo: *const c_char,
3412        n: *const lapack_int,
3413        ap: *mut lapack_complex_double,
3414        ipiv: *const lapack_int,
3415        work: *mut lapack_complex_double,
3416        info: *mut lapack_int,
3417    );
3418
3419    pub fn chptri_(
3420        uplo: *const c_char,
3421        n: *const lapack_int,
3422        ap: *mut lapack_complex_float,
3423        ipiv: *const lapack_int,
3424        work: *mut lapack_complex_float,
3425        info: *mut lapack_int,
3426    );
3427    pub fn zhptri_(
3428        uplo: *const c_char,
3429        n: *const lapack_int,
3430        ap: *mut lapack_complex_double,
3431        ipiv: *const lapack_int,
3432        work: *mut lapack_complex_double,
3433        info: *mut lapack_int,
3434    );
3435
3436    pub fn strtri_(
3437        uplo: *const c_char,
3438        diag: *const c_char,
3439        n: *const lapack_int,
3440        a: *mut c_float,
3441        lda: *const lapack_int,
3442        info: *mut lapack_int,
3443    );
3444    pub fn dtrtri_(
3445        uplo: *const c_char,
3446        diag: *const c_char,
3447        n: *const lapack_int,
3448        a: *mut c_double,
3449        lda: *const lapack_int,
3450        info: *mut lapack_int,
3451    );
3452    pub fn ctrtri_(
3453        uplo: *const c_char,
3454        diag: *const c_char,
3455        n: *const lapack_int,
3456        a: *mut lapack_complex_float,
3457        lda: *const lapack_int,
3458        info: *mut lapack_int,
3459    );
3460    pub fn ztrtri_(
3461        uplo: *const c_char,
3462        diag: *const c_char,
3463        n: *const lapack_int,
3464        a: *mut lapack_complex_double,
3465        lda: *const lapack_int,
3466        info: *mut lapack_int,
3467    );
3468
3469    pub fn dtftri_(
3470        transr: *const c_char,
3471        uplo: *const c_char,
3472        diag: *const c_char,
3473        n: *const lapack_int,
3474        a: *mut c_double,
3475        info: *mut lapack_int,
3476    );
3477    pub fn stftri_(
3478        transr: *const c_char,
3479        uplo: *const c_char,
3480        diag: *const c_char,
3481        n: *const lapack_int,
3482        a: *mut c_float,
3483        info: *mut lapack_int,
3484    );
3485    pub fn ztftri_(
3486        transr: *const c_char,
3487        uplo: *const c_char,
3488        diag: *const c_char,
3489        n: *const lapack_int,
3490        a: *mut lapack_complex_double,
3491        info: *mut lapack_int,
3492    );
3493    pub fn ctftri_(
3494        transr: *const c_char,
3495        uplo: *const c_char,
3496        diag: *const c_char,
3497        n: *const lapack_int,
3498        a: *mut lapack_complex_float,
3499        info: *mut lapack_int,
3500    );
3501
3502    pub fn stptri_(
3503        uplo: *const c_char,
3504        diag: *const c_char,
3505        n: *const lapack_int,
3506        ap: *mut c_float,
3507        info: *mut lapack_int,
3508    );
3509    pub fn dtptri_(
3510        uplo: *const c_char,
3511        diag: *const c_char,
3512        n: *const lapack_int,
3513        ap: *mut c_double,
3514        info: *mut lapack_int,
3515    );
3516    pub fn ctptri_(
3517        uplo: *const c_char,
3518        diag: *const c_char,
3519        n: *const lapack_int,
3520        ap: *mut lapack_complex_float,
3521        info: *mut lapack_int,
3522    );
3523    pub fn ztptri_(
3524        uplo: *const c_char,
3525        diag: *const c_char,
3526        n: *const lapack_int,
3527        ap: *mut lapack_complex_double,
3528        info: *mut lapack_int,
3529    );
3530
3531    pub fn sgeequ_(
3532        m: *const lapack_int,
3533        n: *const lapack_int,
3534        a: *const c_float,
3535        lda: *const lapack_int,
3536        r: *mut c_float,
3537        c: *mut c_float,
3538        rowcnd: *mut c_float,
3539        colcnd: *mut c_float,
3540        amax: *mut c_float,
3541        info: *mut lapack_int,
3542    );
3543    pub fn dgeequ_(
3544        m: *const lapack_int,
3545        n: *const lapack_int,
3546        a: *const c_double,
3547        lda: *const lapack_int,
3548        r: *mut c_double,
3549        c: *mut c_double,
3550        rowcnd: *mut c_double,
3551        colcnd: *mut c_double,
3552        amax: *mut c_double,
3553        info: *mut lapack_int,
3554    );
3555    pub fn cgeequ_(
3556        m: *const lapack_int,
3557        n: *const lapack_int,
3558        a: *const lapack_complex_float,
3559        lda: *const lapack_int,
3560        r: *mut c_float,
3561        c: *mut c_float,
3562        rowcnd: *mut c_float,
3563        colcnd: *mut c_float,
3564        amax: *mut c_float,
3565        info: *mut lapack_int,
3566    );
3567    pub fn zgeequ_(
3568        m: *const lapack_int,
3569        n: *const lapack_int,
3570        a: *const lapack_complex_double,
3571        lda: *const lapack_int,
3572        r: *mut c_double,
3573        c: *mut c_double,
3574        rowcnd: *mut c_double,
3575        colcnd: *mut c_double,
3576        amax: *mut c_double,
3577        info: *mut lapack_int,
3578    );
3579
3580    pub fn dgeequb_(
3581        m: *const lapack_int,
3582        n: *const lapack_int,
3583        a: *const c_double,
3584        lda: *const lapack_int,
3585        r: *mut c_double,
3586        c: *mut c_double,
3587        rowcnd: *mut c_double,
3588        colcnd: *mut c_double,
3589        amax: *mut c_double,
3590        info: *mut lapack_int,
3591    );
3592    pub fn sgeequb_(
3593        m: *const lapack_int,
3594        n: *const lapack_int,
3595        a: *const c_float,
3596        lda: *const lapack_int,
3597        r: *mut c_float,
3598        c: *mut c_float,
3599        rowcnd: *mut c_float,
3600        colcnd: *mut c_float,
3601        amax: *mut c_float,
3602        info: *mut lapack_int,
3603    );
3604    pub fn zgeequb_(
3605        m: *const lapack_int,
3606        n: *const lapack_int,
3607        a: *const lapack_complex_double,
3608        lda: *const lapack_int,
3609        r: *mut c_double,
3610        c: *mut c_double,
3611        rowcnd: *mut c_double,
3612        colcnd: *mut c_double,
3613        amax: *mut c_double,
3614        info: *mut lapack_int,
3615    );
3616    pub fn cgeequb_(
3617        m: *const lapack_int,
3618        n: *const lapack_int,
3619        a: *const lapack_complex_float,
3620        lda: *const lapack_int,
3621        r: *mut c_float,
3622        c: *mut c_float,
3623        rowcnd: *mut c_float,
3624        colcnd: *mut c_float,
3625        amax: *mut c_float,
3626        info: *mut lapack_int,
3627    );
3628
3629    pub fn sgbequ_(
3630        m: *const lapack_int,
3631        n: *const lapack_int,
3632        kl: *const lapack_int,
3633        ku: *const lapack_int,
3634        ab: *const c_float,
3635        ldab: *const lapack_int,
3636        r: *mut c_float,
3637        c: *mut c_float,
3638        rowcnd: *mut c_float,
3639        colcnd: *mut c_float,
3640        amax: *mut c_float,
3641        info: *mut lapack_int,
3642    );
3643    pub fn dgbequ_(
3644        m: *const lapack_int,
3645        n: *const lapack_int,
3646        kl: *const lapack_int,
3647        ku: *const lapack_int,
3648        ab: *const c_double,
3649        ldab: *const lapack_int,
3650        r: *mut c_double,
3651        c: *mut c_double,
3652        rowcnd: *mut c_double,
3653        colcnd: *mut c_double,
3654        amax: *mut c_double,
3655        info: *mut lapack_int,
3656    );
3657    pub fn cgbequ_(
3658        m: *const lapack_int,
3659        n: *const lapack_int,
3660        kl: *const lapack_int,
3661        ku: *const lapack_int,
3662        ab: *const lapack_complex_float,
3663        ldab: *const lapack_int,
3664        r: *mut c_float,
3665        c: *mut c_float,
3666        rowcnd: *mut c_float,
3667        colcnd: *mut c_float,
3668        amax: *mut c_float,
3669        info: *mut lapack_int,
3670    );
3671    pub fn zgbequ_(
3672        m: *const lapack_int,
3673        n: *const lapack_int,
3674        kl: *const lapack_int,
3675        ku: *const lapack_int,
3676        ab: *const lapack_complex_double,
3677        ldab: *const lapack_int,
3678        r: *mut c_double,
3679        c: *mut c_double,
3680        rowcnd: *mut c_double,
3681        colcnd: *mut c_double,
3682        amax: *mut c_double,
3683        info: *mut lapack_int,
3684    );
3685
3686    pub fn dgbequb_(
3687        m: *const lapack_int,
3688        n: *const lapack_int,
3689        kl: *const lapack_int,
3690        ku: *const lapack_int,
3691        ab: *const c_double,
3692        ldab: *const lapack_int,
3693        r: *mut c_double,
3694        c: *mut c_double,
3695        rowcnd: *mut c_double,
3696        colcnd: *mut c_double,
3697        amax: *mut c_double,
3698        info: *mut lapack_int,
3699    );
3700    pub fn sgbequb_(
3701        m: *const lapack_int,
3702        n: *const lapack_int,
3703        kl: *const lapack_int,
3704        ku: *const lapack_int,
3705        ab: *const c_float,
3706        ldab: *const lapack_int,
3707        r: *mut c_float,
3708        c: *mut c_float,
3709        rowcnd: *mut c_float,
3710        colcnd: *mut c_float,
3711        amax: *mut c_float,
3712        info: *mut lapack_int,
3713    );
3714    pub fn zgbequb_(
3715        m: *const lapack_int,
3716        n: *const lapack_int,
3717        kl: *const lapack_int,
3718        ku: *const lapack_int,
3719        ab: *const lapack_complex_double,
3720        ldab: *const lapack_int,
3721        r: *mut c_double,
3722        c: *mut c_double,
3723        rowcnd: *mut c_double,
3724        colcnd: *mut c_double,
3725        amax: *mut c_double,
3726        info: *mut lapack_int,
3727    );
3728    pub fn cgbequb_(
3729        m: *const lapack_int,
3730        n: *const lapack_int,
3731        kl: *const lapack_int,
3732        ku: *const lapack_int,
3733        ab: *const lapack_complex_float,
3734        ldab: *const lapack_int,
3735        r: *mut c_float,
3736        c: *mut c_float,
3737        rowcnd: *mut c_float,
3738        colcnd: *mut c_float,
3739        amax: *mut c_float,
3740        info: *mut lapack_int,
3741    );
3742
3743    pub fn spoequ_(
3744        n: *const lapack_int,
3745        a: *const c_float,
3746        lda: *const lapack_int,
3747        s: *mut c_float,
3748        scond: *mut c_float,
3749        amax: *mut c_float,
3750        info: *mut lapack_int,
3751    );
3752    pub fn dpoequ_(
3753        n: *const lapack_int,
3754        a: *const c_double,
3755        lda: *const lapack_int,
3756        s: *mut c_double,
3757        scond: *mut c_double,
3758        amax: *mut c_double,
3759        info: *mut lapack_int,
3760    );
3761    pub fn cpoequ_(
3762        n: *const lapack_int,
3763        a: *const lapack_complex_float,
3764        lda: *const lapack_int,
3765        s: *mut c_float,
3766        scond: *mut c_float,
3767        amax: *mut c_float,
3768        info: *mut lapack_int,
3769    );
3770    pub fn zpoequ_(
3771        n: *const lapack_int,
3772        a: *const lapack_complex_double,
3773        lda: *const lapack_int,
3774        s: *mut c_double,
3775        scond: *mut c_double,
3776        amax: *mut c_double,
3777        info: *mut lapack_int,
3778    );
3779
3780    pub fn dpoequb_(
3781        n: *const lapack_int,
3782        a: *const c_double,
3783        lda: *const lapack_int,
3784        s: *mut c_double,
3785        scond: *mut c_double,
3786        amax: *mut c_double,
3787        info: *mut lapack_int,
3788    );
3789    pub fn spoequb_(
3790        n: *const lapack_int,
3791        a: *const c_float,
3792        lda: *const lapack_int,
3793        s: *mut c_float,
3794        scond: *mut c_float,
3795        amax: *mut c_float,
3796        info: *mut lapack_int,
3797    );
3798    pub fn zpoequb_(
3799        n: *const lapack_int,
3800        a: *const lapack_complex_double,
3801        lda: *const lapack_int,
3802        s: *mut c_double,
3803        scond: *mut c_double,
3804        amax: *mut c_double,
3805        info: *mut lapack_int,
3806    );
3807    pub fn cpoequb_(
3808        n: *const lapack_int,
3809        a: *const lapack_complex_float,
3810        lda: *const lapack_int,
3811        s: *mut c_float,
3812        scond: *mut c_float,
3813        amax: *mut c_float,
3814        info: *mut lapack_int,
3815    );
3816
3817    pub fn sppequ_(
3818        uplo: *const c_char,
3819        n: *const lapack_int,
3820        ap: *const c_float,
3821        s: *mut c_float,
3822        scond: *mut c_float,
3823        amax: *mut c_float,
3824        info: *mut lapack_int,
3825    );
3826    pub fn dppequ_(
3827        uplo: *const c_char,
3828        n: *const lapack_int,
3829        ap: *const c_double,
3830        s: *mut c_double,
3831        scond: *mut c_double,
3832        amax: *mut c_double,
3833        info: *mut lapack_int,
3834    );
3835    pub fn cppequ_(
3836        uplo: *const c_char,
3837        n: *const lapack_int,
3838        ap: *const lapack_complex_float,
3839        s: *mut c_float,
3840        scond: *mut c_float,
3841        amax: *mut c_float,
3842        info: *mut lapack_int,
3843    );
3844    pub fn zppequ_(
3845        uplo: *const c_char,
3846        n: *const lapack_int,
3847        ap: *const lapack_complex_double,
3848        s: *mut c_double,
3849        scond: *mut c_double,
3850        amax: *mut c_double,
3851        info: *mut lapack_int,
3852    );
3853
3854    pub fn spbequ_(
3855        uplo: *const c_char,
3856        n: *const lapack_int,
3857        kd: *const lapack_int,
3858        ab: *const c_float,
3859        ldab: *const lapack_int,
3860        s: *mut c_float,
3861        scond: *mut c_float,
3862        amax: *mut c_float,
3863        info: *mut lapack_int,
3864    );
3865    pub fn dpbequ_(
3866        uplo: *const c_char,
3867        n: *const lapack_int,
3868        kd: *const lapack_int,
3869        ab: *const c_double,
3870        ldab: *const lapack_int,
3871        s: *mut c_double,
3872        scond: *mut c_double,
3873        amax: *mut c_double,
3874        info: *mut lapack_int,
3875    );
3876    pub fn cpbequ_(
3877        uplo: *const c_char,
3878        n: *const lapack_int,
3879        kd: *const lapack_int,
3880        ab: *const lapack_complex_float,
3881        ldab: *const lapack_int,
3882        s: *mut c_float,
3883        scond: *mut c_float,
3884        amax: *mut c_float,
3885        info: *mut lapack_int,
3886    );
3887    pub fn zpbequ_(
3888        uplo: *const c_char,
3889        n: *const lapack_int,
3890        kd: *const lapack_int,
3891        ab: *const lapack_complex_double,
3892        ldab: *const lapack_int,
3893        s: *mut c_double,
3894        scond: *mut c_double,
3895        amax: *mut c_double,
3896        info: *mut lapack_int,
3897    );
3898
3899    pub fn dsyequb_(
3900        uplo: *const c_char,
3901        n: *const lapack_int,
3902        a: *const c_double,
3903        lda: *const lapack_int,
3904        s: *mut c_double,
3905        scond: *mut c_double,
3906        amax: *mut c_double,
3907        work: *mut c_double,
3908        info: *mut lapack_int,
3909    );
3910    pub fn ssyequb_(
3911        uplo: *const c_char,
3912        n: *const lapack_int,
3913        a: *const c_float,
3914        lda: *const lapack_int,
3915        s: *mut c_float,
3916        scond: *mut c_float,
3917        amax: *mut c_float,
3918        work: *mut c_float,
3919        info: *mut lapack_int,
3920    );
3921    pub fn zsyequb_(
3922        uplo: *const c_char,
3923        n: *const lapack_int,
3924        a: *const lapack_complex_double,
3925        lda: *const lapack_int,
3926        s: *mut c_double,
3927        scond: *mut c_double,
3928        amax: *mut c_double,
3929        work: *mut lapack_complex_double,
3930        info: *mut lapack_int,
3931    );
3932    pub fn csyequb_(
3933        uplo: *const c_char,
3934        n: *const lapack_int,
3935        a: *const lapack_complex_float,
3936        lda: *const lapack_int,
3937        s: *mut c_float,
3938        scond: *mut c_float,
3939        amax: *mut c_float,
3940        work: *mut lapack_complex_float,
3941        info: *mut lapack_int,
3942    );
3943
3944    pub fn zheequb_(
3945        uplo: *const c_char,
3946        n: *const lapack_int,
3947        a: *const lapack_complex_double,
3948        lda: *const lapack_int,
3949        s: *mut c_double,
3950        scond: *mut c_double,
3951        amax: *mut c_double,
3952        work: *mut lapack_complex_double,
3953        info: *mut lapack_int,
3954    );
3955    pub fn cheequb_(
3956        uplo: *const c_char,
3957        n: *const lapack_int,
3958        a: *const lapack_complex_float,
3959        lda: *const lapack_int,
3960        s: *mut c_float,
3961        scond: *mut c_float,
3962        amax: *mut c_float,
3963        work: *mut lapack_complex_float,
3964        info: *mut lapack_int,
3965    );
3966
3967    pub fn sgesv_(
3968        n: *const lapack_int,
3969        nrhs: *const lapack_int,
3970        a: *mut c_float,
3971        lda: *const lapack_int,
3972        ipiv: *mut lapack_int,
3973        b: *mut c_float,
3974        ldb: *const lapack_int,
3975        info: *mut lapack_int,
3976    );
3977    pub fn dgesv_(
3978        n: *const lapack_int,
3979        nrhs: *const lapack_int,
3980        a: *mut c_double,
3981        lda: *const lapack_int,
3982        ipiv: *mut lapack_int,
3983        b: *mut c_double,
3984        ldb: *const lapack_int,
3985        info: *mut lapack_int,
3986    );
3987    pub fn cgesv_(
3988        n: *const lapack_int,
3989        nrhs: *const lapack_int,
3990        a: *mut lapack_complex_float,
3991        lda: *const lapack_int,
3992        ipiv: *mut lapack_int,
3993        b: *mut lapack_complex_float,
3994        ldb: *const lapack_int,
3995        info: *mut lapack_int,
3996    );
3997    pub fn zgesv_(
3998        n: *const lapack_int,
3999        nrhs: *const lapack_int,
4000        a: *mut lapack_complex_double,
4001        lda: *const lapack_int,
4002        ipiv: *mut lapack_int,
4003        b: *mut lapack_complex_double,
4004        ldb: *const lapack_int,
4005        info: *mut lapack_int,
4006    );
4007
4008    pub fn dsgesv_(
4009        n: *const lapack_int,
4010        nrhs: *const lapack_int,
4011        a: *mut c_double,
4012        lda: *const lapack_int,
4013        ipiv: *mut lapack_int,
4014        b: *const c_double,
4015        ldb: *const lapack_int,
4016        x: *mut c_double,
4017        ldx: *const lapack_int,
4018        work: *mut c_double,
4019        swork: *mut c_float,
4020        iter: *mut lapack_int,
4021        info: *mut lapack_int,
4022    );
4023    pub fn zcgesv_(
4024        n: *const lapack_int,
4025        nrhs: *const lapack_int,
4026        a: *mut lapack_complex_double,
4027        lda: *const lapack_int,
4028        ipiv: *mut lapack_int,
4029        b: *const lapack_complex_double,
4030        ldb: *const lapack_int,
4031        x: *mut lapack_complex_double,
4032        ldx: *const lapack_int,
4033        work: *mut lapack_complex_double,
4034        swork: *mut lapack_complex_float,
4035        rwork: *mut c_double,
4036        iter: *mut lapack_int,
4037        info: *mut lapack_int,
4038    );
4039
4040    pub fn sgesvx_(
4041        fact: *const c_char,
4042        trans: *const c_char,
4043        n: *const lapack_int,
4044        nrhs: *const lapack_int,
4045        a: *mut c_float,
4046        lda: *const lapack_int,
4047        af: *mut c_float,
4048        ldaf: *const lapack_int,
4049        ipiv: *mut lapack_int,
4050        equed: *mut c_char,
4051        r: *mut c_float,
4052        c: *mut c_float,
4053        b: *mut c_float,
4054        ldb: *const lapack_int,
4055        x: *mut c_float,
4056        ldx: *const lapack_int,
4057        rcond: *mut c_float,
4058        ferr: *mut c_float,
4059        berr: *mut c_float,
4060        work: *mut c_float,
4061        iwork: *mut lapack_int,
4062        info: *mut lapack_int,
4063    );
4064    pub fn dgesvx_(
4065        fact: *const c_char,
4066        trans: *const c_char,
4067        n: *const lapack_int,
4068        nrhs: *const lapack_int,
4069        a: *mut c_double,
4070        lda: *const lapack_int,
4071        af: *mut c_double,
4072        ldaf: *const lapack_int,
4073        ipiv: *mut lapack_int,
4074        equed: *mut c_char,
4075        r: *mut c_double,
4076        c: *mut c_double,
4077        b: *mut c_double,
4078        ldb: *const lapack_int,
4079        x: *mut c_double,
4080        ldx: *const lapack_int,
4081        rcond: *mut c_double,
4082        ferr: *mut c_double,
4083        berr: *mut c_double,
4084        work: *mut c_double,
4085        iwork: *mut lapack_int,
4086        info: *mut lapack_int,
4087    );
4088    pub fn cgesvx_(
4089        fact: *const c_char,
4090        trans: *const c_char,
4091        n: *const lapack_int,
4092        nrhs: *const lapack_int,
4093        a: *mut lapack_complex_float,
4094        lda: *const lapack_int,
4095        af: *mut lapack_complex_float,
4096        ldaf: *const lapack_int,
4097        ipiv: *mut lapack_int,
4098        equed: *mut c_char,
4099        r: *mut c_float,
4100        c: *mut c_float,
4101        b: *mut lapack_complex_float,
4102        ldb: *const lapack_int,
4103        x: *mut lapack_complex_float,
4104        ldx: *const lapack_int,
4105        rcond: *mut c_float,
4106        ferr: *mut c_float,
4107        berr: *mut c_float,
4108        work: *mut lapack_complex_float,
4109        rwork: *mut c_float,
4110        info: *mut lapack_int,
4111    );
4112    pub fn zgesvx_(
4113        fact: *const c_char,
4114        trans: *const c_char,
4115        n: *const lapack_int,
4116        nrhs: *const lapack_int,
4117        a: *mut lapack_complex_double,
4118        lda: *const lapack_int,
4119        af: *mut lapack_complex_double,
4120        ldaf: *const lapack_int,
4121        ipiv: *mut lapack_int,
4122        equed: *mut c_char,
4123        r: *mut c_double,
4124        c: *mut c_double,
4125        b: *mut lapack_complex_double,
4126        ldb: *const lapack_int,
4127        x: *mut lapack_complex_double,
4128        ldx: *const lapack_int,
4129        rcond: *mut c_double,
4130        ferr: *mut c_double,
4131        berr: *mut c_double,
4132        work: *mut lapack_complex_double,
4133        rwork: *mut c_double,
4134        info: *mut lapack_int,
4135    );
4136
4137    pub fn dgesvxx_(
4138        fact: *const c_char,
4139        trans: *const c_char,
4140        n: *const lapack_int,
4141        nrhs: *const lapack_int,
4142        a: *mut c_double,
4143        lda: *const lapack_int,
4144        af: *mut c_double,
4145        ldaf: *const lapack_int,
4146        ipiv: *mut lapack_int,
4147        equed: *mut c_char,
4148        r: *mut c_double,
4149        c: *mut c_double,
4150        b: *mut c_double,
4151        ldb: *const lapack_int,
4152        x: *mut c_double,
4153        ldx: *const lapack_int,
4154        rcond: *mut c_double,
4155        rpvgrw: *mut c_double,
4156        berr: *mut c_double,
4157        n_err_bnds: *const lapack_int,
4158        err_bnds_norm: *mut c_double,
4159        err_bnds_comp: *mut c_double,
4160        nparams: *const lapack_int,
4161        params: *mut c_double,
4162        work: *mut c_double,
4163        iwork: *mut lapack_int,
4164        info: *mut lapack_int,
4165    );
4166    pub fn sgesvxx_(
4167        fact: *const c_char,
4168        trans: *const c_char,
4169        n: *const lapack_int,
4170        nrhs: *const lapack_int,
4171        a: *mut c_float,
4172        lda: *const lapack_int,
4173        af: *mut c_float,
4174        ldaf: *const lapack_int,
4175        ipiv: *mut lapack_int,
4176        equed: *mut c_char,
4177        r: *mut c_float,
4178        c: *mut c_float,
4179        b: *mut c_float,
4180        ldb: *const lapack_int,
4181        x: *mut c_float,
4182        ldx: *const lapack_int,
4183        rcond: *mut c_float,
4184        rpvgrw: *mut c_float,
4185        berr: *mut c_float,
4186        n_err_bnds: *const lapack_int,
4187        err_bnds_norm: *mut c_float,
4188        err_bnds_comp: *mut c_float,
4189        nparams: *const lapack_int,
4190        params: *mut c_float,
4191        work: *mut c_float,
4192        iwork: *mut lapack_int,
4193        info: *mut lapack_int,
4194    );
4195    pub fn zgesvxx_(
4196        fact: *const c_char,
4197        trans: *const c_char,
4198        n: *const lapack_int,
4199        nrhs: *const lapack_int,
4200        a: *mut lapack_complex_double,
4201        lda: *const lapack_int,
4202        af: *mut lapack_complex_double,
4203        ldaf: *const lapack_int,
4204        ipiv: *mut lapack_int,
4205        equed: *mut c_char,
4206        r: *mut c_double,
4207        c: *mut c_double,
4208        b: *mut lapack_complex_double,
4209        ldb: *const lapack_int,
4210        x: *mut lapack_complex_double,
4211        ldx: *const lapack_int,
4212        rcond: *mut c_double,
4213        rpvgrw: *mut c_double,
4214        berr: *mut c_double,
4215        n_err_bnds: *const lapack_int,
4216        err_bnds_norm: *mut c_double,
4217        err_bnds_comp: *mut c_double,
4218        nparams: *const lapack_int,
4219        params: *mut c_double,
4220        work: *mut lapack_complex_double,
4221        rwork: *mut c_double,
4222        info: *mut lapack_int,
4223    );
4224    pub fn cgesvxx_(
4225        fact: *const c_char,
4226        trans: *const c_char,
4227        n: *const lapack_int,
4228        nrhs: *const lapack_int,
4229        a: *mut lapack_complex_float,
4230        lda: *const lapack_int,
4231        af: *mut lapack_complex_float,
4232        ldaf: *const lapack_int,
4233        ipiv: *mut lapack_int,
4234        equed: *mut c_char,
4235        r: *mut c_float,
4236        c: *mut c_float,
4237        b: *mut lapack_complex_float,
4238        ldb: *const lapack_int,
4239        x: *mut lapack_complex_float,
4240        ldx: *const lapack_int,
4241        rcond: *mut c_float,
4242        rpvgrw: *mut c_float,
4243        berr: *mut c_float,
4244        n_err_bnds: *const lapack_int,
4245        err_bnds_norm: *mut c_float,
4246        err_bnds_comp: *mut c_float,
4247        nparams: *const lapack_int,
4248        params: *mut c_float,
4249        work: *mut lapack_complex_float,
4250        rwork: *mut c_float,
4251        info: *mut lapack_int,
4252    );
4253
4254    pub fn sgbsv_(
4255        n: *const lapack_int,
4256        kl: *const lapack_int,
4257        ku: *const lapack_int,
4258        nrhs: *const lapack_int,
4259        ab: *mut c_float,
4260        ldab: *const lapack_int,
4261        ipiv: *mut lapack_int,
4262        b: *mut c_float,
4263        ldb: *const lapack_int,
4264        info: *mut lapack_int,
4265    );
4266    pub fn dgbsv_(
4267        n: *const lapack_int,
4268        kl: *const lapack_int,
4269        ku: *const lapack_int,
4270        nrhs: *const lapack_int,
4271        ab: *mut c_double,
4272        ldab: *const lapack_int,
4273        ipiv: *mut lapack_int,
4274        b: *mut c_double,
4275        ldb: *const lapack_int,
4276        info: *mut lapack_int,
4277    );
4278    pub fn cgbsv_(
4279        n: *const lapack_int,
4280        kl: *const lapack_int,
4281        ku: *const lapack_int,
4282        nrhs: *const lapack_int,
4283        ab: *mut lapack_complex_float,
4284        ldab: *const lapack_int,
4285        ipiv: *mut lapack_int,
4286        b: *mut lapack_complex_float,
4287        ldb: *const lapack_int,
4288        info: *mut lapack_int,
4289    );
4290    pub fn zgbsv_(
4291        n: *const lapack_int,
4292        kl: *const lapack_int,
4293        ku: *const lapack_int,
4294        nrhs: *const lapack_int,
4295        ab: *mut lapack_complex_double,
4296        ldab: *const lapack_int,
4297        ipiv: *mut lapack_int,
4298        b: *mut lapack_complex_double,
4299        ldb: *const lapack_int,
4300        info: *mut lapack_int,
4301    );
4302
4303    pub fn sgbsvx_(
4304        fact: *const c_char,
4305        trans: *const c_char,
4306        n: *const lapack_int,
4307        kl: *const lapack_int,
4308        ku: *const lapack_int,
4309        nrhs: *const lapack_int,
4310        ab: *mut c_float,
4311        ldab: *const lapack_int,
4312        afb: *mut c_float,
4313        ldafb: *const lapack_int,
4314        ipiv: *mut lapack_int,
4315        equed: *mut c_char,
4316        r: *mut c_float,
4317        c: *mut c_float,
4318        b: *mut c_float,
4319        ldb: *const lapack_int,
4320        x: *mut c_float,
4321        ldx: *const lapack_int,
4322        rcond: *mut c_float,
4323        ferr: *mut c_float,
4324        berr: *mut c_float,
4325        work: *mut c_float,
4326        iwork: *mut lapack_int,
4327        info: *mut lapack_int,
4328    );
4329    pub fn dgbsvx_(
4330        fact: *const c_char,
4331        trans: *const c_char,
4332        n: *const lapack_int,
4333        kl: *const lapack_int,
4334        ku: *const lapack_int,
4335        nrhs: *const lapack_int,
4336        ab: *mut c_double,
4337        ldab: *const lapack_int,
4338        afb: *mut c_double,
4339        ldafb: *const lapack_int,
4340        ipiv: *mut lapack_int,
4341        equed: *mut c_char,
4342        r: *mut c_double,
4343        c: *mut c_double,
4344        b: *mut c_double,
4345        ldb: *const lapack_int,
4346        x: *mut c_double,
4347        ldx: *const lapack_int,
4348        rcond: *mut c_double,
4349        ferr: *mut c_double,
4350        berr: *mut c_double,
4351        work: *mut c_double,
4352        iwork: *mut lapack_int,
4353        info: *mut lapack_int,
4354    );
4355    pub fn cgbsvx_(
4356        fact: *const c_char,
4357        trans: *const c_char,
4358        n: *const lapack_int,
4359        kl: *const lapack_int,
4360        ku: *const lapack_int,
4361        nrhs: *const lapack_int,
4362        ab: *mut lapack_complex_float,
4363        ldab: *const lapack_int,
4364        afb: *mut lapack_complex_float,
4365        ldafb: *const lapack_int,
4366        ipiv: *mut lapack_int,
4367        equed: *mut c_char,
4368        r: *mut c_float,
4369        c: *mut c_float,
4370        b: *mut lapack_complex_float,
4371        ldb: *const lapack_int,
4372        x: *mut lapack_complex_float,
4373        ldx: *const lapack_int,
4374        rcond: *mut c_float,
4375        ferr: *mut c_float,
4376        berr: *mut c_float,
4377        work: *mut lapack_complex_float,
4378        rwork: *mut c_float,
4379        info: *mut lapack_int,
4380    );
4381    pub fn zgbsvx_(
4382        fact: *const c_char,
4383        trans: *const c_char,
4384        n: *const lapack_int,
4385        kl: *const lapack_int,
4386        ku: *const lapack_int,
4387        nrhs: *const lapack_int,
4388        ab: *mut lapack_complex_double,
4389        ldab: *const lapack_int,
4390        afb: *mut lapack_complex_double,
4391        ldafb: *const lapack_int,
4392        ipiv: *mut lapack_int,
4393        equed: *mut c_char,
4394        r: *mut c_double,
4395        c: *mut c_double,
4396        b: *mut lapack_complex_double,
4397        ldb: *const lapack_int,
4398        x: *mut lapack_complex_double,
4399        ldx: *const lapack_int,
4400        rcond: *mut c_double,
4401        ferr: *mut c_double,
4402        berr: *mut c_double,
4403        work: *mut lapack_complex_double,
4404        rwork: *mut c_double,
4405        info: *mut lapack_int,
4406    );
4407
4408    pub fn dgbsvxx_(
4409        fact: *const c_char,
4410        trans: *const c_char,
4411        n: *const lapack_int,
4412        kl: *const lapack_int,
4413        ku: *const lapack_int,
4414        nrhs: *const lapack_int,
4415        ab: *mut c_double,
4416        ldab: *const lapack_int,
4417        afb: *mut c_double,
4418        ldafb: *const lapack_int,
4419        ipiv: *mut lapack_int,
4420        equed: *mut c_char,
4421        r: *mut c_double,
4422        c: *mut c_double,
4423        b: *mut c_double,
4424        ldb: *const lapack_int,
4425        x: *mut c_double,
4426        ldx: *const lapack_int,
4427        rcond: *mut c_double,
4428        rpvgrw: *mut c_double,
4429        berr: *mut c_double,
4430        n_err_bnds: *const lapack_int,
4431        err_bnds_norm: *mut c_double,
4432        err_bnds_comp: *mut c_double,
4433        nparams: *const lapack_int,
4434        params: *mut c_double,
4435        work: *mut c_double,
4436        iwork: *mut lapack_int,
4437        info: *mut lapack_int,
4438    );
4439    pub fn sgbsvxx_(
4440        fact: *const c_char,
4441        trans: *const c_char,
4442        n: *const lapack_int,
4443        kl: *const lapack_int,
4444        ku: *const lapack_int,
4445        nrhs: *const lapack_int,
4446        ab: *mut c_float,
4447        ldab: *const lapack_int,
4448        afb: *mut c_float,
4449        ldafb: *const lapack_int,
4450        ipiv: *mut lapack_int,
4451        equed: *mut c_char,
4452        r: *mut c_float,
4453        c: *mut c_float,
4454        b: *mut c_float,
4455        ldb: *const lapack_int,
4456        x: *mut c_float,
4457        ldx: *const lapack_int,
4458        rcond: *mut c_float,
4459        rpvgrw: *mut c_float,
4460        berr: *mut c_float,
4461        n_err_bnds: *const lapack_int,
4462        err_bnds_norm: *mut c_float,
4463        err_bnds_comp: *mut c_float,
4464        nparams: *const lapack_int,
4465        params: *mut c_float,
4466        work: *mut c_float,
4467        iwork: *mut lapack_int,
4468        info: *mut lapack_int,
4469    );
4470    pub fn zgbsvxx_(
4471        fact: *const c_char,
4472        trans: *const c_char,
4473        n: *const lapack_int,
4474        kl: *const lapack_int,
4475        ku: *const lapack_int,
4476        nrhs: *const lapack_int,
4477        ab: *mut lapack_complex_double,
4478        ldab: *const lapack_int,
4479        afb: *mut lapack_complex_double,
4480        ldafb: *const lapack_int,
4481        ipiv: *mut lapack_int,
4482        equed: *mut c_char,
4483        r: *mut c_double,
4484        c: *mut c_double,
4485        b: *mut lapack_complex_double,
4486        ldb: *const lapack_int,
4487        x: *mut lapack_complex_double,
4488        ldx: *const lapack_int,
4489        rcond: *mut c_double,
4490        rpvgrw: *mut c_double,
4491        berr: *mut c_double,
4492        n_err_bnds: *const lapack_int,
4493        err_bnds_norm: *mut c_double,
4494        err_bnds_comp: *mut c_double,
4495        nparams: *const lapack_int,
4496        params: *mut c_double,
4497        work: *mut lapack_complex_double,
4498        rwork: *mut c_double,
4499        info: *mut lapack_int,
4500    );
4501    pub fn cgbsvxx_(
4502        fact: *const c_char,
4503        trans: *const c_char,
4504        n: *const lapack_int,
4505        kl: *const lapack_int,
4506        ku: *const lapack_int,
4507        nrhs: *const lapack_int,
4508        ab: *mut lapack_complex_float,
4509        ldab: *const lapack_int,
4510        afb: *mut lapack_complex_float,
4511        ldafb: *const lapack_int,
4512        ipiv: *mut lapack_int,
4513        equed: *mut c_char,
4514        r: *mut c_float,
4515        c: *mut c_float,
4516        b: *mut lapack_complex_float,
4517        ldb: *const lapack_int,
4518        x: *mut lapack_complex_float,
4519        ldx: *const lapack_int,
4520        rcond: *mut c_float,
4521        rpvgrw: *mut c_float,
4522        berr: *mut c_float,
4523        n_err_bnds: *const lapack_int,
4524        err_bnds_norm: *mut c_float,
4525        err_bnds_comp: *mut c_float,
4526        nparams: *const lapack_int,
4527        params: *mut c_float,
4528        work: *mut lapack_complex_float,
4529        rwork: *mut c_float,
4530        info: *mut lapack_int,
4531    );
4532
4533    pub fn sgtsv_(
4534        n: *const lapack_int,
4535        nrhs: *const lapack_int,
4536        dl: *mut c_float,
4537        d: *mut c_float,
4538        du: *mut c_float,
4539        b: *mut c_float,
4540        ldb: *const lapack_int,
4541        info: *mut lapack_int,
4542    );
4543    pub fn dgtsv_(
4544        n: *const lapack_int,
4545        nrhs: *const lapack_int,
4546        dl: *mut c_double,
4547        d: *mut c_double,
4548        du: *mut c_double,
4549        b: *mut c_double,
4550        ldb: *const lapack_int,
4551        info: *mut lapack_int,
4552    );
4553    pub fn cgtsv_(
4554        n: *const lapack_int,
4555        nrhs: *const lapack_int,
4556        dl: *mut lapack_complex_float,
4557        d: *mut lapack_complex_float,
4558        du: *mut lapack_complex_float,
4559        b: *mut lapack_complex_float,
4560        ldb: *const lapack_int,
4561        info: *mut lapack_int,
4562    );
4563    pub fn zgtsv_(
4564        n: *const lapack_int,
4565        nrhs: *const lapack_int,
4566        dl: *mut lapack_complex_double,
4567        d: *mut lapack_complex_double,
4568        du: *mut lapack_complex_double,
4569        b: *mut lapack_complex_double,
4570        ldb: *const lapack_int,
4571        info: *mut lapack_int,
4572    );
4573
4574    pub fn sgtsvx_(
4575        fact: *const c_char,
4576        trans: *const c_char,
4577        n: *const lapack_int,
4578        nrhs: *const lapack_int,
4579        dl: *const c_float,
4580        d: *const c_float,
4581        du: *const c_float,
4582        dlf: *mut c_float,
4583        df: *mut c_float,
4584        duf: *mut c_float,
4585        du2: *mut c_float,
4586        ipiv: *mut lapack_int,
4587        b: *const c_float,
4588        ldb: *const lapack_int,
4589        x: *mut c_float,
4590        ldx: *const lapack_int,
4591        rcond: *mut c_float,
4592        ferr: *mut c_float,
4593        berr: *mut c_float,
4594        work: *mut c_float,
4595        iwork: *mut lapack_int,
4596        info: *mut lapack_int,
4597    );
4598    pub fn dgtsvx_(
4599        fact: *const c_char,
4600        trans: *const c_char,
4601        n: *const lapack_int,
4602        nrhs: *const lapack_int,
4603        dl: *const c_double,
4604        d: *const c_double,
4605        du: *const c_double,
4606        dlf: *mut c_double,
4607        df: *mut c_double,
4608        duf: *mut c_double,
4609        du2: *mut c_double,
4610        ipiv: *mut lapack_int,
4611        b: *const c_double,
4612        ldb: *const lapack_int,
4613        x: *mut c_double,
4614        ldx: *const lapack_int,
4615        rcond: *mut c_double,
4616        ferr: *mut c_double,
4617        berr: *mut c_double,
4618        work: *mut c_double,
4619        iwork: *mut lapack_int,
4620        info: *mut lapack_int,
4621    );
4622    pub fn cgtsvx_(
4623        fact: *const c_char,
4624        trans: *const c_char,
4625        n: *const lapack_int,
4626        nrhs: *const lapack_int,
4627        dl: *const lapack_complex_float,
4628        d: *const lapack_complex_float,
4629        du: *const lapack_complex_float,
4630        dlf: *mut lapack_complex_float,
4631        df: *mut lapack_complex_float,
4632        duf: *mut lapack_complex_float,
4633        du2: *mut lapack_complex_float,
4634        ipiv: *mut lapack_int,
4635        b: *const lapack_complex_float,
4636        ldb: *const lapack_int,
4637        x: *mut lapack_complex_float,
4638        ldx: *const lapack_int,
4639        rcond: *mut c_float,
4640        ferr: *mut c_float,
4641        berr: *mut c_float,
4642        work: *mut lapack_complex_float,
4643        rwork: *mut c_float,
4644        info: *mut lapack_int,
4645    );
4646    pub fn zgtsvx_(
4647        fact: *const c_char,
4648        trans: *const c_char,
4649        n: *const lapack_int,
4650        nrhs: *const lapack_int,
4651        dl: *const lapack_complex_double,
4652        d: *const lapack_complex_double,
4653        du: *const lapack_complex_double,
4654        dlf: *mut lapack_complex_double,
4655        df: *mut lapack_complex_double,
4656        duf: *mut lapack_complex_double,
4657        du2: *mut lapack_complex_double,
4658        ipiv: *mut lapack_int,
4659        b: *const lapack_complex_double,
4660        ldb: *const lapack_int,
4661        x: *mut lapack_complex_double,
4662        ldx: *const lapack_int,
4663        rcond: *mut c_double,
4664        ferr: *mut c_double,
4665        berr: *mut c_double,
4666        work: *mut lapack_complex_double,
4667        rwork: *mut c_double,
4668        info: *mut lapack_int,
4669    );
4670
4671    pub fn sposv_(
4672        uplo: *const c_char,
4673        n: *const lapack_int,
4674        nrhs: *const lapack_int,
4675        a: *mut c_float,
4676        lda: *const lapack_int,
4677        b: *mut c_float,
4678        ldb: *const lapack_int,
4679        info: *mut lapack_int,
4680    );
4681    pub fn dposv_(
4682        uplo: *const c_char,
4683        n: *const lapack_int,
4684        nrhs: *const lapack_int,
4685        a: *mut c_double,
4686        lda: *const lapack_int,
4687        b: *mut c_double,
4688        ldb: *const lapack_int,
4689        info: *mut lapack_int,
4690    );
4691    pub fn cposv_(
4692        uplo: *const c_char,
4693        n: *const lapack_int,
4694        nrhs: *const lapack_int,
4695        a: *mut lapack_complex_float,
4696        lda: *const lapack_int,
4697        b: *mut lapack_complex_float,
4698        ldb: *const lapack_int,
4699        info: *mut lapack_int,
4700    );
4701    pub fn zposv_(
4702        uplo: *const c_char,
4703        n: *const lapack_int,
4704        nrhs: *const lapack_int,
4705        a: *mut lapack_complex_double,
4706        lda: *const lapack_int,
4707        b: *mut lapack_complex_double,
4708        ldb: *const lapack_int,
4709        info: *mut lapack_int,
4710    );
4711
4712    pub fn dsposv_(
4713        uplo: *const c_char,
4714        n: *const lapack_int,
4715        nrhs: *const lapack_int,
4716        a: *mut c_double,
4717        lda: *const lapack_int,
4718        b: *const c_double,
4719        ldb: *const lapack_int,
4720        x: *mut c_double,
4721        ldx: *const lapack_int,
4722        work: *mut c_double,
4723        swork: *mut c_float,
4724        iter: *mut lapack_int,
4725        info: *mut lapack_int,
4726    );
4727    pub fn zcposv_(
4728        uplo: *const c_char,
4729        n: *const lapack_int,
4730        nrhs: *const lapack_int,
4731        a: *mut lapack_complex_double,
4732        lda: *const lapack_int,
4733        b: *const lapack_complex_double,
4734        ldb: *const lapack_int,
4735        x: *mut lapack_complex_double,
4736        ldx: *const lapack_int,
4737        work: *mut lapack_complex_double,
4738        swork: *mut lapack_complex_float,
4739        rwork: *mut c_double,
4740        iter: *mut lapack_int,
4741        info: *mut lapack_int,
4742    );
4743
4744    pub fn sposvx_(
4745        fact: *const c_char,
4746        uplo: *const c_char,
4747        n: *const lapack_int,
4748        nrhs: *const lapack_int,
4749        a: *mut c_float,
4750        lda: *const lapack_int,
4751        af: *mut c_float,
4752        ldaf: *const lapack_int,
4753        equed: *mut c_char,
4754        s: *mut c_float,
4755        b: *mut c_float,
4756        ldb: *const lapack_int,
4757        x: *mut c_float,
4758        ldx: *const lapack_int,
4759        rcond: *mut c_float,
4760        ferr: *mut c_float,
4761        berr: *mut c_float,
4762        work: *mut c_float,
4763        iwork: *mut lapack_int,
4764        info: *mut lapack_int,
4765    );
4766    pub fn dposvx_(
4767        fact: *const c_char,
4768        uplo: *const c_char,
4769        n: *const lapack_int,
4770        nrhs: *const lapack_int,
4771        a: *mut c_double,
4772        lda: *const lapack_int,
4773        af: *mut c_double,
4774        ldaf: *const lapack_int,
4775        equed: *mut c_char,
4776        s: *mut c_double,
4777        b: *mut c_double,
4778        ldb: *const lapack_int,
4779        x: *mut c_double,
4780        ldx: *const lapack_int,
4781        rcond: *mut c_double,
4782        ferr: *mut c_double,
4783        berr: *mut c_double,
4784        work: *mut c_double,
4785        iwork: *mut lapack_int,
4786        info: *mut lapack_int,
4787    );
4788    pub fn cposvx_(
4789        fact: *const c_char,
4790        uplo: *const c_char,
4791        n: *const lapack_int,
4792        nrhs: *const lapack_int,
4793        a: *mut lapack_complex_float,
4794        lda: *const lapack_int,
4795        af: *mut lapack_complex_float,
4796        ldaf: *const lapack_int,
4797        equed: *mut c_char,
4798        s: *mut c_float,
4799        b: *mut lapack_complex_float,
4800        ldb: *const lapack_int,
4801        x: *mut lapack_complex_float,
4802        ldx: *const lapack_int,
4803        rcond: *mut c_float,
4804        ferr: *mut c_float,
4805        berr: *mut c_float,
4806        work: *mut lapack_complex_float,
4807        rwork: *mut c_float,
4808        info: *mut lapack_int,
4809    );
4810    pub fn zposvx_(
4811        fact: *const c_char,
4812        uplo: *const c_char,
4813        n: *const lapack_int,
4814        nrhs: *const lapack_int,
4815        a: *mut lapack_complex_double,
4816        lda: *const lapack_int,
4817        af: *mut lapack_complex_double,
4818        ldaf: *const lapack_int,
4819        equed: *mut c_char,
4820        s: *mut c_double,
4821        b: *mut lapack_complex_double,
4822        ldb: *const lapack_int,
4823        x: *mut lapack_complex_double,
4824        ldx: *const lapack_int,
4825        rcond: *mut c_double,
4826        ferr: *mut c_double,
4827        berr: *mut c_double,
4828        work: *mut lapack_complex_double,
4829        rwork: *mut c_double,
4830        info: *mut lapack_int,
4831    );
4832
4833    pub fn dposvxx_(
4834        fact: *const c_char,
4835        uplo: *const c_char,
4836        n: *const lapack_int,
4837        nrhs: *const lapack_int,
4838        a: *mut c_double,
4839        lda: *const lapack_int,
4840        af: *mut c_double,
4841        ldaf: *const lapack_int,
4842        equed: *mut c_char,
4843        s: *mut c_double,
4844        b: *mut c_double,
4845        ldb: *const lapack_int,
4846        x: *mut c_double,
4847        ldx: *const lapack_int,
4848        rcond: *mut c_double,
4849        rpvgrw: *mut c_double,
4850        berr: *mut c_double,
4851        n_err_bnds: *const lapack_int,
4852        err_bnds_norm: *mut c_double,
4853        err_bnds_comp: *mut c_double,
4854        nparams: *const lapack_int,
4855        params: *mut c_double,
4856        work: *mut c_double,
4857        iwork: *mut lapack_int,
4858        info: *mut lapack_int,
4859    );
4860    pub fn sposvxx_(
4861        fact: *const c_char,
4862        uplo: *const c_char,
4863        n: *const lapack_int,
4864        nrhs: *const lapack_int,
4865        a: *mut c_float,
4866        lda: *const lapack_int,
4867        af: *mut c_float,
4868        ldaf: *const lapack_int,
4869        equed: *mut c_char,
4870        s: *mut c_float,
4871        b: *mut c_float,
4872        ldb: *const lapack_int,
4873        x: *mut c_float,
4874        ldx: *const lapack_int,
4875        rcond: *mut c_float,
4876        rpvgrw: *mut c_float,
4877        berr: *mut c_float,
4878        n_err_bnds: *const lapack_int,
4879        err_bnds_norm: *mut c_float,
4880        err_bnds_comp: *mut c_float,
4881        nparams: *const lapack_int,
4882        params: *mut c_float,
4883        work: *mut c_float,
4884        iwork: *mut lapack_int,
4885        info: *mut lapack_int,
4886    );
4887    pub fn zposvxx_(
4888        fact: *const c_char,
4889        uplo: *const c_char,
4890        n: *const lapack_int,
4891        nrhs: *const lapack_int,
4892        a: *mut lapack_complex_double,
4893        lda: *const lapack_int,
4894        af: *mut lapack_complex_double,
4895        ldaf: *const lapack_int,
4896        equed: *mut c_char,
4897        s: *mut c_double,
4898        b: *mut lapack_complex_double,
4899        ldb: *const lapack_int,
4900        x: *mut lapack_complex_double,
4901        ldx: *const lapack_int,
4902        rcond: *mut c_double,
4903        rpvgrw: *mut c_double,
4904        berr: *mut c_double,
4905        n_err_bnds: *const lapack_int,
4906        err_bnds_norm: *mut c_double,
4907        err_bnds_comp: *mut c_double,
4908        nparams: *const lapack_int,
4909        params: *mut c_double,
4910        work: *mut lapack_complex_double,
4911        rwork: *mut c_double,
4912        info: *mut lapack_int,
4913    );
4914    pub fn cposvxx_(
4915        fact: *const c_char,
4916        uplo: *const c_char,
4917        n: *const lapack_int,
4918        nrhs: *const lapack_int,
4919        a: *mut lapack_complex_float,
4920        lda: *const lapack_int,
4921        af: *mut lapack_complex_float,
4922        ldaf: *const lapack_int,
4923        equed: *mut c_char,
4924        s: *mut c_float,
4925        b: *mut lapack_complex_float,
4926        ldb: *const lapack_int,
4927        x: *mut lapack_complex_float,
4928        ldx: *const lapack_int,
4929        rcond: *mut c_float,
4930        rpvgrw: *mut c_float,
4931        berr: *mut c_float,
4932        n_err_bnds: *const lapack_int,
4933        err_bnds_norm: *mut c_float,
4934        err_bnds_comp: *mut c_float,
4935        nparams: *const lapack_int,
4936        params: *mut c_float,
4937        work: *mut lapack_complex_float,
4938        rwork: *mut c_float,
4939        info: *mut lapack_int,
4940    );
4941
4942    pub fn sppsv_(
4943        uplo: *const c_char,
4944        n: *const lapack_int,
4945        nrhs: *const lapack_int,
4946        ap: *mut c_float,
4947        b: *mut c_float,
4948        ldb: *const lapack_int,
4949        info: *mut lapack_int,
4950    );
4951    pub fn dppsv_(
4952        uplo: *const c_char,
4953        n: *const lapack_int,
4954        nrhs: *const lapack_int,
4955        ap: *mut c_double,
4956        b: *mut c_double,
4957        ldb: *const lapack_int,
4958        info: *mut lapack_int,
4959    );
4960    pub fn cppsv_(
4961        uplo: *const c_char,
4962        n: *const lapack_int,
4963        nrhs: *const lapack_int,
4964        ap: *mut lapack_complex_float,
4965        b: *mut lapack_complex_float,
4966        ldb: *const lapack_int,
4967        info: *mut lapack_int,
4968    );
4969    pub fn zppsv_(
4970        uplo: *const c_char,
4971        n: *const lapack_int,
4972        nrhs: *const lapack_int,
4973        ap: *mut lapack_complex_double,
4974        b: *mut lapack_complex_double,
4975        ldb: *const lapack_int,
4976        info: *mut lapack_int,
4977    );
4978
4979    pub fn sppsvx_(
4980        fact: *const c_char,
4981        uplo: *const c_char,
4982        n: *const lapack_int,
4983        nrhs: *const lapack_int,
4984        ap: *mut c_float,
4985        afp: *mut c_float,
4986        equed: *mut c_char,
4987        s: *mut c_float,
4988        b: *mut c_float,
4989        ldb: *const lapack_int,
4990        x: *mut c_float,
4991        ldx: *const lapack_int,
4992        rcond: *mut c_float,
4993        ferr: *mut c_float,
4994        berr: *mut c_float,
4995        work: *mut c_float,
4996        iwork: *mut lapack_int,
4997        info: *mut lapack_int,
4998    );
4999    pub fn dppsvx_(
5000        fact: *const c_char,
5001        uplo: *const c_char,
5002        n: *const lapack_int,
5003        nrhs: *const lapack_int,
5004        ap: *mut c_double,
5005        afp: *mut c_double,
5006        equed: *mut c_char,
5007        s: *mut c_double,
5008        b: *mut c_double,
5009        ldb: *const lapack_int,
5010        x: *mut c_double,
5011        ldx: *const lapack_int,
5012        rcond: *mut c_double,
5013        ferr: *mut c_double,
5014        berr: *mut c_double,
5015        work: *mut c_double,
5016        iwork: *mut lapack_int,
5017        info: *mut lapack_int,
5018    );
5019    pub fn cppsvx_(
5020        fact: *const c_char,
5021        uplo: *const c_char,
5022        n: *const lapack_int,
5023        nrhs: *const lapack_int,
5024        ap: *mut lapack_complex_float,
5025        afp: *mut lapack_complex_float,
5026        equed: *mut c_char,
5027        s: *mut c_float,
5028        b: *mut lapack_complex_float,
5029        ldb: *const lapack_int,
5030        x: *mut lapack_complex_float,
5031        ldx: *const lapack_int,
5032        rcond: *mut c_float,
5033        ferr: *mut c_float,
5034        berr: *mut c_float,
5035        work: *mut lapack_complex_float,
5036        rwork: *mut c_float,
5037        info: *mut lapack_int,
5038    );
5039    pub fn zppsvx_(
5040        fact: *const c_char,
5041        uplo: *const c_char,
5042        n: *const lapack_int,
5043        nrhs: *const lapack_int,
5044        ap: *mut lapack_complex_double,
5045        afp: *mut lapack_complex_double,
5046        equed: *mut c_char,
5047        s: *mut c_double,
5048        b: *mut lapack_complex_double,
5049        ldb: *const lapack_int,
5050        x: *mut lapack_complex_double,
5051        ldx: *const lapack_int,
5052        rcond: *mut c_double,
5053        ferr: *mut c_double,
5054        berr: *mut c_double,
5055        work: *mut lapack_complex_double,
5056        rwork: *mut c_double,
5057        info: *mut lapack_int,
5058    );
5059
5060    pub fn spbsv_(
5061        uplo: *const c_char,
5062        n: *const lapack_int,
5063        kd: *const lapack_int,
5064        nrhs: *const lapack_int,
5065        ab: *mut c_float,
5066        ldab: *const lapack_int,
5067        b: *mut c_float,
5068        ldb: *const lapack_int,
5069        info: *mut lapack_int,
5070    );
5071    pub fn dpbsv_(
5072        uplo: *const c_char,
5073        n: *const lapack_int,
5074        kd: *const lapack_int,
5075        nrhs: *const lapack_int,
5076        ab: *mut c_double,
5077        ldab: *const lapack_int,
5078        b: *mut c_double,
5079        ldb: *const lapack_int,
5080        info: *mut lapack_int,
5081    );
5082    pub fn cpbsv_(
5083        uplo: *const c_char,
5084        n: *const lapack_int,
5085        kd: *const lapack_int,
5086        nrhs: *const lapack_int,
5087        ab: *mut lapack_complex_float,
5088        ldab: *const lapack_int,
5089        b: *mut lapack_complex_float,
5090        ldb: *const lapack_int,
5091        info: *mut lapack_int,
5092    );
5093    pub fn zpbsv_(
5094        uplo: *const c_char,
5095        n: *const lapack_int,
5096        kd: *const lapack_int,
5097        nrhs: *const lapack_int,
5098        ab: *mut lapack_complex_double,
5099        ldab: *const lapack_int,
5100        b: *mut lapack_complex_double,
5101        ldb: *const lapack_int,
5102        info: *mut lapack_int,
5103    );
5104
5105    pub fn spbsvx_(
5106        fact: *const c_char,
5107        uplo: *const c_char,
5108        n: *const lapack_int,
5109        kd: *const lapack_int,
5110        nrhs: *const lapack_int,
5111        ab: *mut c_float,
5112        ldab: *const lapack_int,
5113        afb: *mut c_float,
5114        ldafb: *const lapack_int,
5115        equed: *mut c_char,
5116        s: *mut c_float,
5117        b: *mut c_float,
5118        ldb: *const lapack_int,
5119        x: *mut c_float,
5120        ldx: *const lapack_int,
5121        rcond: *mut c_float,
5122        ferr: *mut c_float,
5123        berr: *mut c_float,
5124        work: *mut c_float,
5125        iwork: *mut lapack_int,
5126        info: *mut lapack_int,
5127    );
5128    pub fn dpbsvx_(
5129        fact: *const c_char,
5130        uplo: *const c_char,
5131        n: *const lapack_int,
5132        kd: *const lapack_int,
5133        nrhs: *const lapack_int,
5134        ab: *mut c_double,
5135        ldab: *const lapack_int,
5136        afb: *mut c_double,
5137        ldafb: *const lapack_int,
5138        equed: *mut c_char,
5139        s: *mut c_double,
5140        b: *mut c_double,
5141        ldb: *const lapack_int,
5142        x: *mut c_double,
5143        ldx: *const lapack_int,
5144        rcond: *mut c_double,
5145        ferr: *mut c_double,
5146        berr: *mut c_double,
5147        work: *mut c_double,
5148        iwork: *mut lapack_int,
5149        info: *mut lapack_int,
5150    );
5151    pub fn cpbsvx_(
5152        fact: *const c_char,
5153        uplo: *const c_char,
5154        n: *const lapack_int,
5155        kd: *const lapack_int,
5156        nrhs: *const lapack_int,
5157        ab: *mut lapack_complex_float,
5158        ldab: *const lapack_int,
5159        afb: *mut lapack_complex_float,
5160        ldafb: *const lapack_int,
5161        equed: *mut c_char,
5162        s: *mut c_float,
5163        b: *mut lapack_complex_float,
5164        ldb: *const lapack_int,
5165        x: *mut lapack_complex_float,
5166        ldx: *const lapack_int,
5167        rcond: *mut c_float,
5168        ferr: *mut c_float,
5169        berr: *mut c_float,
5170        work: *mut lapack_complex_float,
5171        rwork: *mut c_float,
5172        info: *mut lapack_int,
5173    );
5174    pub fn zpbsvx_(
5175        fact: *const c_char,
5176        uplo: *const c_char,
5177        n: *const lapack_int,
5178        kd: *const lapack_int,
5179        nrhs: *const lapack_int,
5180        ab: *mut lapack_complex_double,
5181        ldab: *const lapack_int,
5182        afb: *mut lapack_complex_double,
5183        ldafb: *const lapack_int,
5184        equed: *mut c_char,
5185        s: *mut c_double,
5186        b: *mut lapack_complex_double,
5187        ldb: *const lapack_int,
5188        x: *mut lapack_complex_double,
5189        ldx: *const lapack_int,
5190        rcond: *mut c_double,
5191        ferr: *mut c_double,
5192        berr: *mut c_double,
5193        work: *mut lapack_complex_double,
5194        rwork: *mut c_double,
5195        info: *mut lapack_int,
5196    );
5197
5198    pub fn sptsv_(
5199        n: *const lapack_int,
5200        nrhs: *const lapack_int,
5201        d: *mut c_float,
5202        e: *mut c_float,
5203        b: *mut c_float,
5204        ldb: *const lapack_int,
5205        info: *mut lapack_int,
5206    );
5207    pub fn dptsv_(
5208        n: *const lapack_int,
5209        nrhs: *const lapack_int,
5210        d: *mut c_double,
5211        e: *mut c_double,
5212        b: *mut c_double,
5213        ldb: *const lapack_int,
5214        info: *mut lapack_int,
5215    );
5216    pub fn cptsv_(
5217        n: *const lapack_int,
5218        nrhs: *const lapack_int,
5219        d: *mut c_float,
5220        e: *mut lapack_complex_float,
5221        b: *mut lapack_complex_float,
5222        ldb: *const lapack_int,
5223        info: *mut lapack_int,
5224    );
5225    pub fn zptsv_(
5226        n: *const lapack_int,
5227        nrhs: *const lapack_int,
5228        d: *mut c_double,
5229        e: *mut lapack_complex_double,
5230        b: *mut lapack_complex_double,
5231        ldb: *const lapack_int,
5232        info: *mut lapack_int,
5233    );
5234
5235    pub fn sptsvx_(
5236        fact: *const c_char,
5237        n: *const lapack_int,
5238        nrhs: *const lapack_int,
5239        d: *const c_float,
5240        e: *const c_float,
5241        df: *mut c_float,
5242        ef: *mut c_float,
5243        b: *const c_float,
5244        ldb: *const lapack_int,
5245        x: *mut c_float,
5246        ldx: *const lapack_int,
5247        rcond: *mut c_float,
5248        ferr: *mut c_float,
5249        berr: *mut c_float,
5250        work: *mut c_float,
5251        info: *mut lapack_int,
5252    );
5253    pub fn dptsvx_(
5254        fact: *const c_char,
5255        n: *const lapack_int,
5256        nrhs: *const lapack_int,
5257        d: *const c_double,
5258        e: *const c_double,
5259        df: *mut c_double,
5260        ef: *mut c_double,
5261        b: *const c_double,
5262        ldb: *const lapack_int,
5263        x: *mut c_double,
5264        ldx: *const lapack_int,
5265        rcond: *mut c_double,
5266        ferr: *mut c_double,
5267        berr: *mut c_double,
5268        work: *mut c_double,
5269        info: *mut lapack_int,
5270    );
5271    pub fn cptsvx_(
5272        fact: *const c_char,
5273        n: *const lapack_int,
5274        nrhs: *const lapack_int,
5275        d: *const c_float,
5276        e: *const lapack_complex_float,
5277        df: *mut c_float,
5278        ef: *mut lapack_complex_float,
5279        b: *const lapack_complex_float,
5280        ldb: *const lapack_int,
5281        x: *mut lapack_complex_float,
5282        ldx: *const lapack_int,
5283        rcond: *mut c_float,
5284        ferr: *mut c_float,
5285        berr: *mut c_float,
5286        work: *mut lapack_complex_float,
5287        rwork: *mut c_float,
5288        info: *mut lapack_int,
5289    );
5290    pub fn zptsvx_(
5291        fact: *const c_char,
5292        n: *const lapack_int,
5293        nrhs: *const lapack_int,
5294        d: *const c_double,
5295        e: *const lapack_complex_double,
5296        df: *mut c_double,
5297        ef: *mut lapack_complex_double,
5298        b: *const lapack_complex_double,
5299        ldb: *const lapack_int,
5300        x: *mut lapack_complex_double,
5301        ldx: *const lapack_int,
5302        rcond: *mut c_double,
5303        ferr: *mut c_double,
5304        berr: *mut c_double,
5305        work: *mut lapack_complex_double,
5306        rwork: *mut c_double,
5307        info: *mut lapack_int,
5308    );
5309
5310    pub fn ssysv_(
5311        uplo: *const c_char,
5312        n: *const lapack_int,
5313        nrhs: *const lapack_int,
5314        a: *mut c_float,
5315        lda: *const lapack_int,
5316        ipiv: *mut lapack_int,
5317        b: *mut c_float,
5318        ldb: *const lapack_int,
5319        work: *mut c_float,
5320        lwork: *const lapack_int,
5321        info: *mut lapack_int,
5322    );
5323    pub fn dsysv_(
5324        uplo: *const c_char,
5325        n: *const lapack_int,
5326        nrhs: *const lapack_int,
5327        a: *mut c_double,
5328        lda: *const lapack_int,
5329        ipiv: *mut lapack_int,
5330        b: *mut c_double,
5331        ldb: *const lapack_int,
5332        work: *mut c_double,
5333        lwork: *const lapack_int,
5334        info: *mut lapack_int,
5335    );
5336    pub fn csysv_(
5337        uplo: *const c_char,
5338        n: *const lapack_int,
5339        nrhs: *const lapack_int,
5340        a: *mut lapack_complex_float,
5341        lda: *const lapack_int,
5342        ipiv: *mut lapack_int,
5343        b: *mut lapack_complex_float,
5344        ldb: *const lapack_int,
5345        work: *mut lapack_complex_float,
5346        lwork: *const lapack_int,
5347        info: *mut lapack_int,
5348    );
5349    pub fn zsysv_(
5350        uplo: *const c_char,
5351        n: *const lapack_int,
5352        nrhs: *const lapack_int,
5353        a: *mut lapack_complex_double,
5354        lda: *const lapack_int,
5355        ipiv: *mut lapack_int,
5356        b: *mut lapack_complex_double,
5357        ldb: *const lapack_int,
5358        work: *mut lapack_complex_double,
5359        lwork: *const lapack_int,
5360        info: *mut lapack_int,
5361    );
5362
5363    pub fn ssysvx_(
5364        fact: *const c_char,
5365        uplo: *const c_char,
5366        n: *const lapack_int,
5367        nrhs: *const lapack_int,
5368        a: *const c_float,
5369        lda: *const lapack_int,
5370        af: *mut c_float,
5371        ldaf: *const lapack_int,
5372        ipiv: *mut lapack_int,
5373        b: *const c_float,
5374        ldb: *const lapack_int,
5375        x: *mut c_float,
5376        ldx: *const lapack_int,
5377        rcond: *mut c_float,
5378        ferr: *mut c_float,
5379        berr: *mut c_float,
5380        work: *mut c_float,
5381        lwork: *const lapack_int,
5382        iwork: *mut lapack_int,
5383        info: *mut lapack_int,
5384    );
5385    pub fn dsysvx_(
5386        fact: *const c_char,
5387        uplo: *const c_char,
5388        n: *const lapack_int,
5389        nrhs: *const lapack_int,
5390        a: *const c_double,
5391        lda: *const lapack_int,
5392        af: *mut c_double,
5393        ldaf: *const lapack_int,
5394        ipiv: *mut lapack_int,
5395        b: *const c_double,
5396        ldb: *const lapack_int,
5397        x: *mut c_double,
5398        ldx: *const lapack_int,
5399        rcond: *mut c_double,
5400        ferr: *mut c_double,
5401        berr: *mut c_double,
5402        work: *mut c_double,
5403        lwork: *const lapack_int,
5404        iwork: *mut lapack_int,
5405        info: *mut lapack_int,
5406    );
5407    pub fn csysvx_(
5408        fact: *const c_char,
5409        uplo: *const c_char,
5410        n: *const lapack_int,
5411        nrhs: *const lapack_int,
5412        a: *const lapack_complex_float,
5413        lda: *const lapack_int,
5414        af: *mut lapack_complex_float,
5415        ldaf: *const lapack_int,
5416        ipiv: *mut lapack_int,
5417        b: *const lapack_complex_float,
5418        ldb: *const lapack_int,
5419        x: *mut lapack_complex_float,
5420        ldx: *const lapack_int,
5421        rcond: *mut c_float,
5422        ferr: *mut c_float,
5423        berr: *mut c_float,
5424        work: *mut lapack_complex_float,
5425        lwork: *const lapack_int,
5426        rwork: *mut c_float,
5427        info: *mut lapack_int,
5428    );
5429    pub fn zsysvx_(
5430        fact: *const c_char,
5431        uplo: *const c_char,
5432        n: *const lapack_int,
5433        nrhs: *const lapack_int,
5434        a: *const lapack_complex_double,
5435        lda: *const lapack_int,
5436        af: *mut lapack_complex_double,
5437        ldaf: *const lapack_int,
5438        ipiv: *mut lapack_int,
5439        b: *const lapack_complex_double,
5440        ldb: *const lapack_int,
5441        x: *mut lapack_complex_double,
5442        ldx: *const lapack_int,
5443        rcond: *mut c_double,
5444        ferr: *mut c_double,
5445        berr: *mut c_double,
5446        work: *mut lapack_complex_double,
5447        lwork: *const lapack_int,
5448        rwork: *mut c_double,
5449        info: *mut lapack_int,
5450    );
5451
5452    pub fn dsysvxx_(
5453        fact: *const c_char,
5454        uplo: *const c_char,
5455        n: *const lapack_int,
5456        nrhs: *const lapack_int,
5457        a: *mut c_double,
5458        lda: *const lapack_int,
5459        af: *mut c_double,
5460        ldaf: *const lapack_int,
5461        ipiv: *mut lapack_int,
5462        equed: *mut c_char,
5463        s: *mut c_double,
5464        b: *mut c_double,
5465        ldb: *const lapack_int,
5466        x: *mut c_double,
5467        ldx: *const lapack_int,
5468        rcond: *mut c_double,
5469        rpvgrw: *mut c_double,
5470        berr: *mut c_double,
5471        n_err_bnds: *const lapack_int,
5472        err_bnds_norm: *mut c_double,
5473        err_bnds_comp: *mut c_double,
5474        nparams: *const lapack_int,
5475        params: *mut c_double,
5476        work: *mut c_double,
5477        iwork: *mut lapack_int,
5478        info: *mut lapack_int,
5479    );
5480    pub fn ssysvxx_(
5481        fact: *const c_char,
5482        uplo: *const c_char,
5483        n: *const lapack_int,
5484        nrhs: *const lapack_int,
5485        a: *mut c_float,
5486        lda: *const lapack_int,
5487        af: *mut c_float,
5488        ldaf: *const lapack_int,
5489        ipiv: *mut lapack_int,
5490        equed: *mut c_char,
5491        s: *mut c_float,
5492        b: *mut c_float,
5493        ldb: *const lapack_int,
5494        x: *mut c_float,
5495        ldx: *const lapack_int,
5496        rcond: *mut c_float,
5497        rpvgrw: *mut c_float,
5498        berr: *mut c_float,
5499        n_err_bnds: *const lapack_int,
5500        err_bnds_norm: *mut c_float,
5501        err_bnds_comp: *mut c_float,
5502        nparams: *const lapack_int,
5503        params: *mut c_float,
5504        work: *mut c_float,
5505        iwork: *mut lapack_int,
5506        info: *mut lapack_int,
5507    );
5508    pub fn zsysvxx_(
5509        fact: *const c_char,
5510        uplo: *const c_char,
5511        n: *const lapack_int,
5512        nrhs: *const lapack_int,
5513        a: *mut lapack_complex_double,
5514        lda: *const lapack_int,
5515        af: *mut lapack_complex_double,
5516        ldaf: *const lapack_int,
5517        ipiv: *mut lapack_int,
5518        equed: *mut c_char,
5519        s: *mut c_double,
5520        b: *mut lapack_complex_double,
5521        ldb: *const lapack_int,
5522        x: *mut lapack_complex_double,
5523        ldx: *const lapack_int,
5524        rcond: *mut c_double,
5525        rpvgrw: *mut c_double,
5526        berr: *mut c_double,
5527        n_err_bnds: *const lapack_int,
5528        err_bnds_norm: *mut c_double,
5529        err_bnds_comp: *mut c_double,
5530        nparams: *const lapack_int,
5531        params: *mut c_double,
5532        work: *mut lapack_complex_double,
5533        rwork: *mut c_double,
5534        info: *mut lapack_int,
5535    );
5536    pub fn csysvxx_(
5537        fact: *const c_char,
5538        uplo: *const c_char,
5539        n: *const lapack_int,
5540        nrhs: *const lapack_int,
5541        a: *mut lapack_complex_float,
5542        lda: *const lapack_int,
5543        af: *mut lapack_complex_float,
5544        ldaf: *const lapack_int,
5545        ipiv: *mut lapack_int,
5546        equed: *mut c_char,
5547        s: *mut c_float,
5548        b: *mut lapack_complex_float,
5549        ldb: *const lapack_int,
5550        x: *mut lapack_complex_float,
5551        ldx: *const lapack_int,
5552        rcond: *mut c_float,
5553        rpvgrw: *mut c_float,
5554        berr: *mut c_float,
5555        n_err_bnds: *const lapack_int,
5556        err_bnds_norm: *mut c_float,
5557        err_bnds_comp: *mut c_float,
5558        nparams: *const lapack_int,
5559        params: *mut c_float,
5560        work: *mut lapack_complex_float,
5561        rwork: *mut c_float,
5562        info: *mut lapack_int,
5563    );
5564
5565    pub fn chesv_(
5566        uplo: *const c_char,
5567        n: *const lapack_int,
5568        nrhs: *const lapack_int,
5569        a: *mut lapack_complex_float,
5570        lda: *const lapack_int,
5571        ipiv: *mut lapack_int,
5572        b: *mut lapack_complex_float,
5573        ldb: *const lapack_int,
5574        work: *mut lapack_complex_float,
5575        lwork: *const lapack_int,
5576        info: *mut lapack_int,
5577    );
5578    pub fn zhesv_(
5579        uplo: *const c_char,
5580        n: *const lapack_int,
5581        nrhs: *const lapack_int,
5582        a: *mut lapack_complex_double,
5583        lda: *const lapack_int,
5584        ipiv: *mut lapack_int,
5585        b: *mut lapack_complex_double,
5586        ldb: *const lapack_int,
5587        work: *mut lapack_complex_double,
5588        lwork: *const lapack_int,
5589        info: *mut lapack_int,
5590    );
5591
5592    pub fn chesvx_(
5593        fact: *const c_char,
5594        uplo: *const c_char,
5595        n: *const lapack_int,
5596        nrhs: *const lapack_int,
5597        a: *const lapack_complex_float,
5598        lda: *const lapack_int,
5599        af: *mut lapack_complex_float,
5600        ldaf: *const lapack_int,
5601        ipiv: *mut lapack_int,
5602        b: *const lapack_complex_float,
5603        ldb: *const lapack_int,
5604        x: *mut lapack_complex_float,
5605        ldx: *const lapack_int,
5606        rcond: *mut c_float,
5607        ferr: *mut c_float,
5608        berr: *mut c_float,
5609        work: *mut lapack_complex_float,
5610        lwork: *const lapack_int,
5611        rwork: *mut c_float,
5612        info: *mut lapack_int,
5613    );
5614    pub fn zhesvx_(
5615        fact: *const c_char,
5616        uplo: *const c_char,
5617        n: *const lapack_int,
5618        nrhs: *const lapack_int,
5619        a: *const lapack_complex_double,
5620        lda: *const lapack_int,
5621        af: *mut lapack_complex_double,
5622        ldaf: *const lapack_int,
5623        ipiv: *mut lapack_int,
5624        b: *const lapack_complex_double,
5625        ldb: *const lapack_int,
5626        x: *mut lapack_complex_double,
5627        ldx: *const lapack_int,
5628        rcond: *mut c_double,
5629        ferr: *mut c_double,
5630        berr: *mut c_double,
5631        work: *mut lapack_complex_double,
5632        lwork: *const lapack_int,
5633        rwork: *mut c_double,
5634        info: *mut lapack_int,
5635    );
5636
5637    pub fn zhesvxx_(
5638        fact: *const c_char,
5639        uplo: *const c_char,
5640        n: *const lapack_int,
5641        nrhs: *const lapack_int,
5642        a: *mut lapack_complex_double,
5643        lda: *const lapack_int,
5644        af: *mut lapack_complex_double,
5645        ldaf: *const lapack_int,
5646        ipiv: *mut lapack_int,
5647        equed: *mut c_char,
5648        s: *mut c_double,
5649        b: *mut lapack_complex_double,
5650        ldb: *const lapack_int,
5651        x: *mut lapack_complex_double,
5652        ldx: *const lapack_int,
5653        rcond: *mut c_double,
5654        rpvgrw: *mut c_double,
5655        berr: *mut c_double,
5656        n_err_bnds: *const lapack_int,
5657        err_bnds_norm: *mut c_double,
5658        err_bnds_comp: *mut c_double,
5659        nparams: *const lapack_int,
5660        params: *mut c_double,
5661        work: *mut lapack_complex_double,
5662        rwork: *mut c_double,
5663        info: *mut lapack_int,
5664    );
5665    pub fn chesvxx_(
5666        fact: *const c_char,
5667        uplo: *const c_char,
5668        n: *const lapack_int,
5669        nrhs: *const lapack_int,
5670        a: *mut lapack_complex_float,
5671        lda: *const lapack_int,
5672        af: *mut lapack_complex_float,
5673        ldaf: *const lapack_int,
5674        ipiv: *mut lapack_int,
5675        equed: *mut c_char,
5676        s: *mut c_float,
5677        b: *mut lapack_complex_float,
5678        ldb: *const lapack_int,
5679        x: *mut lapack_complex_float,
5680        ldx: *const lapack_int,
5681        rcond: *mut c_float,
5682        rpvgrw: *mut c_float,
5683        berr: *mut c_float,
5684        n_err_bnds: *const lapack_int,
5685        err_bnds_norm: *mut c_float,
5686        err_bnds_comp: *mut c_float,
5687        nparams: *const lapack_int,
5688        params: *mut c_float,
5689        work: *mut lapack_complex_float,
5690        rwork: *mut c_float,
5691        info: *mut lapack_int,
5692    );
5693
5694    pub fn sspsv_(
5695        uplo: *const c_char,
5696        n: *const lapack_int,
5697        nrhs: *const lapack_int,
5698        ap: *mut c_float,
5699        ipiv: *mut lapack_int,
5700        b: *mut c_float,
5701        ldb: *const lapack_int,
5702        info: *mut lapack_int,
5703    );
5704    pub fn dspsv_(
5705        uplo: *const c_char,
5706        n: *const lapack_int,
5707        nrhs: *const lapack_int,
5708        ap: *mut c_double,
5709        ipiv: *mut lapack_int,
5710        b: *mut c_double,
5711        ldb: *const lapack_int,
5712        info: *mut lapack_int,
5713    );
5714    pub fn cspsv_(
5715        uplo: *const c_char,
5716        n: *const lapack_int,
5717        nrhs: *const lapack_int,
5718        ap: *mut lapack_complex_float,
5719        ipiv: *mut lapack_int,
5720        b: *mut lapack_complex_float,
5721        ldb: *const lapack_int,
5722        info: *mut lapack_int,
5723    );
5724    pub fn zspsv_(
5725        uplo: *const c_char,
5726        n: *const lapack_int,
5727        nrhs: *const lapack_int,
5728        ap: *mut lapack_complex_double,
5729        ipiv: *mut lapack_int,
5730        b: *mut lapack_complex_double,
5731        ldb: *const lapack_int,
5732        info: *mut lapack_int,
5733    );
5734
5735    pub fn sspsvx_(
5736        fact: *const c_char,
5737        uplo: *const c_char,
5738        n: *const lapack_int,
5739        nrhs: *const lapack_int,
5740        ap: *const c_float,
5741        afp: *mut c_float,
5742        ipiv: *mut lapack_int,
5743        b: *const c_float,
5744        ldb: *const lapack_int,
5745        x: *mut c_float,
5746        ldx: *const lapack_int,
5747        rcond: *mut c_float,
5748        ferr: *mut c_float,
5749        berr: *mut c_float,
5750        work: *mut c_float,
5751        iwork: *mut lapack_int,
5752        info: *mut lapack_int,
5753    );
5754    pub fn dspsvx_(
5755        fact: *const c_char,
5756        uplo: *const c_char,
5757        n: *const lapack_int,
5758        nrhs: *const lapack_int,
5759        ap: *const c_double,
5760        afp: *mut c_double,
5761        ipiv: *mut lapack_int,
5762        b: *const c_double,
5763        ldb: *const lapack_int,
5764        x: *mut c_double,
5765        ldx: *const lapack_int,
5766        rcond: *mut c_double,
5767        ferr: *mut c_double,
5768        berr: *mut c_double,
5769        work: *mut c_double,
5770        iwork: *mut lapack_int,
5771        info: *mut lapack_int,
5772    );
5773    pub fn cspsvx_(
5774        fact: *const c_char,
5775        uplo: *const c_char,
5776        n: *const lapack_int,
5777        nrhs: *const lapack_int,
5778        ap: *const lapack_complex_float,
5779        afp: *mut lapack_complex_float,
5780        ipiv: *mut lapack_int,
5781        b: *const lapack_complex_float,
5782        ldb: *const lapack_int,
5783        x: *mut lapack_complex_float,
5784        ldx: *const lapack_int,
5785        rcond: *mut c_float,
5786        ferr: *mut c_float,
5787        berr: *mut c_float,
5788        work: *mut lapack_complex_float,
5789        rwork: *mut c_float,
5790        info: *mut lapack_int,
5791    );
5792    pub fn zspsvx_(
5793        fact: *const c_char,
5794        uplo: *const c_char,
5795        n: *const lapack_int,
5796        nrhs: *const lapack_int,
5797        ap: *const lapack_complex_double,
5798        afp: *mut lapack_complex_double,
5799        ipiv: *mut lapack_int,
5800        b: *const lapack_complex_double,
5801        ldb: *const lapack_int,
5802        x: *mut lapack_complex_double,
5803        ldx: *const lapack_int,
5804        rcond: *mut c_double,
5805        ferr: *mut c_double,
5806        berr: *mut c_double,
5807        work: *mut lapack_complex_double,
5808        rwork: *mut c_double,
5809        info: *mut lapack_int,
5810    );
5811
5812    pub fn chpsv_(
5813        uplo: *const c_char,
5814        n: *const lapack_int,
5815        nrhs: *const lapack_int,
5816        ap: *mut lapack_complex_float,
5817        ipiv: *mut lapack_int,
5818        b: *mut lapack_complex_float,
5819        ldb: *const lapack_int,
5820        info: *mut lapack_int,
5821    );
5822    pub fn zhpsv_(
5823        uplo: *const c_char,
5824        n: *const lapack_int,
5825        nrhs: *const lapack_int,
5826        ap: *mut lapack_complex_double,
5827        ipiv: *mut lapack_int,
5828        b: *mut lapack_complex_double,
5829        ldb: *const lapack_int,
5830        info: *mut lapack_int,
5831    );
5832
5833    pub fn chpsvx_(
5834        fact: *const c_char,
5835        uplo: *const c_char,
5836        n: *const lapack_int,
5837        nrhs: *const lapack_int,
5838        ap: *const lapack_complex_float,
5839        afp: *mut lapack_complex_float,
5840        ipiv: *mut lapack_int,
5841        b: *const lapack_complex_float,
5842        ldb: *const lapack_int,
5843        x: *mut lapack_complex_float,
5844        ldx: *const lapack_int,
5845        rcond: *mut c_float,
5846        ferr: *mut c_float,
5847        berr: *mut c_float,
5848        work: *mut lapack_complex_float,
5849        rwork: *mut c_float,
5850        info: *mut lapack_int,
5851    );
5852    pub fn zhpsvx_(
5853        fact: *const c_char,
5854        uplo: *const c_char,
5855        n: *const lapack_int,
5856        nrhs: *const lapack_int,
5857        ap: *const lapack_complex_double,
5858        afp: *mut lapack_complex_double,
5859        ipiv: *mut lapack_int,
5860        b: *const lapack_complex_double,
5861        ldb: *const lapack_int,
5862        x: *mut lapack_complex_double,
5863        ldx: *const lapack_int,
5864        rcond: *mut c_double,
5865        ferr: *mut c_double,
5866        berr: *mut c_double,
5867        work: *mut lapack_complex_double,
5868        rwork: *mut c_double,
5869        info: *mut lapack_int,
5870    );
5871
5872    pub fn sgeqrf_(
5873        m: *const lapack_int,
5874        n: *const lapack_int,
5875        a: *mut c_float,
5876        lda: *const lapack_int,
5877        tau: *mut c_float,
5878        work: *mut c_float,
5879        lwork: *const lapack_int,
5880        info: *mut lapack_int,
5881    );
5882    pub fn dgeqrf_(
5883        m: *const lapack_int,
5884        n: *const lapack_int,
5885        a: *mut c_double,
5886        lda: *const lapack_int,
5887        tau: *mut c_double,
5888        work: *mut c_double,
5889        lwork: *const lapack_int,
5890        info: *mut lapack_int,
5891    );
5892    pub fn cgeqrf_(
5893        m: *const lapack_int,
5894        n: *const lapack_int,
5895        a: *mut lapack_complex_float,
5896        lda: *const lapack_int,
5897        tau: *mut lapack_complex_float,
5898        work: *mut lapack_complex_float,
5899        lwork: *const lapack_int,
5900        info: *mut lapack_int,
5901    );
5902    pub fn zgeqrf_(
5903        m: *const lapack_int,
5904        n: *const lapack_int,
5905        a: *mut lapack_complex_double,
5906        lda: *const lapack_int,
5907        tau: *mut lapack_complex_double,
5908        work: *mut lapack_complex_double,
5909        lwork: *const lapack_int,
5910        info: *mut lapack_int,
5911    );
5912
5913    pub fn sgeqpf_(
5914        m: *const lapack_int,
5915        n: *const lapack_int,
5916        a: *mut c_float,
5917        lda: *const lapack_int,
5918        jpvt: *mut lapack_int,
5919        tau: *mut c_float,
5920        work: *mut c_float,
5921        info: *mut lapack_int,
5922    );
5923    pub fn dgeqpf_(
5924        m: *const lapack_int,
5925        n: *const lapack_int,
5926        a: *mut c_double,
5927        lda: *const lapack_int,
5928        jpvt: *mut lapack_int,
5929        tau: *mut c_double,
5930        work: *mut c_double,
5931        info: *mut lapack_int,
5932    );
5933    pub fn cgeqpf_(
5934        m: *const lapack_int,
5935        n: *const lapack_int,
5936        a: *mut lapack_complex_float,
5937        lda: *const lapack_int,
5938        jpvt: *mut lapack_int,
5939        tau: *mut lapack_complex_float,
5940        work: *mut lapack_complex_float,
5941        rwork: *mut c_float,
5942        info: *mut lapack_int,
5943    );
5944    pub fn zgeqpf_(
5945        m: *const lapack_int,
5946        n: *const lapack_int,
5947        a: *mut lapack_complex_double,
5948        lda: *const lapack_int,
5949        jpvt: *mut lapack_int,
5950        tau: *mut lapack_complex_double,
5951        work: *mut lapack_complex_double,
5952        rwork: *mut c_double,
5953        info: *mut lapack_int,
5954    );
5955
5956    pub fn sgeqp3_(
5957        m: *const lapack_int,
5958        n: *const lapack_int,
5959        a: *mut c_float,
5960        lda: *const lapack_int,
5961        jpvt: *mut lapack_int,
5962        tau: *mut c_float,
5963        work: *mut c_float,
5964        lwork: *const lapack_int,
5965        info: *mut lapack_int,
5966    );
5967    pub fn dgeqp3_(
5968        m: *const lapack_int,
5969        n: *const lapack_int,
5970        a: *mut c_double,
5971        lda: *const lapack_int,
5972        jpvt: *mut lapack_int,
5973        tau: *mut c_double,
5974        work: *mut c_double,
5975        lwork: *const lapack_int,
5976        info: *mut lapack_int,
5977    );
5978    pub fn cgeqp3_(
5979        m: *const lapack_int,
5980        n: *const lapack_int,
5981        a: *mut lapack_complex_float,
5982        lda: *const lapack_int,
5983        jpvt: *mut lapack_int,
5984        tau: *mut lapack_complex_float,
5985        work: *mut lapack_complex_float,
5986        lwork: *const lapack_int,
5987        rwork: *mut c_float,
5988        info: *mut lapack_int,
5989    );
5990    pub fn zgeqp3_(
5991        m: *const lapack_int,
5992        n: *const lapack_int,
5993        a: *mut lapack_complex_double,
5994        lda: *const lapack_int,
5995        jpvt: *mut lapack_int,
5996        tau: *mut lapack_complex_double,
5997        work: *mut lapack_complex_double,
5998        lwork: *const lapack_int,
5999        rwork: *mut c_double,
6000        info: *mut lapack_int,
6001    );
6002
6003    pub fn sorgqr_(
6004        m: *const lapack_int,
6005        n: *const lapack_int,
6006        k: *const lapack_int,
6007        a: *mut c_float,
6008        lda: *const lapack_int,
6009        tau: *const c_float,
6010        work: *mut c_float,
6011        lwork: *const lapack_int,
6012        info: *mut lapack_int,
6013    );
6014    pub fn dorgqr_(
6015        m: *const lapack_int,
6016        n: *const lapack_int,
6017        k: *const lapack_int,
6018        a: *mut c_double,
6019        lda: *const lapack_int,
6020        tau: *const c_double,
6021        work: *mut c_double,
6022        lwork: *const lapack_int,
6023        info: *mut lapack_int,
6024    );
6025    pub fn sormqr_(
6026        side: *const c_char,
6027        trans: *const c_char,
6028        m: *const lapack_int,
6029        n: *const lapack_int,
6030        k: *const lapack_int,
6031        a: *const c_float,
6032        lda: *const lapack_int,
6033        tau: *const c_float,
6034        c: *mut c_float,
6035        ldc: *const lapack_int,
6036        work: *mut c_float,
6037        lwork: *const lapack_int,
6038        info: *mut lapack_int,
6039    );
6040    pub fn dormqr_(
6041        side: *const c_char,
6042        trans: *const c_char,
6043        m: *const lapack_int,
6044        n: *const lapack_int,
6045        k: *const lapack_int,
6046        a: *const c_double,
6047        lda: *const lapack_int,
6048        tau: *const c_double,
6049        c: *mut c_double,
6050        ldc: *const lapack_int,
6051        work: *mut c_double,
6052        lwork: *const lapack_int,
6053        info: *mut lapack_int,
6054    );
6055    pub fn cungqr_(
6056        m: *const lapack_int,
6057        n: *const lapack_int,
6058        k: *const lapack_int,
6059        a: *mut lapack_complex_float,
6060        lda: *const lapack_int,
6061        tau: *const lapack_complex_float,
6062        work: *mut lapack_complex_float,
6063        lwork: *const lapack_int,
6064        info: *mut lapack_int,
6065    );
6066    pub fn zungqr_(
6067        m: *const lapack_int,
6068        n: *const lapack_int,
6069        k: *const lapack_int,
6070        a: *mut lapack_complex_double,
6071        lda: *const lapack_int,
6072        tau: *const lapack_complex_double,
6073        work: *mut lapack_complex_double,
6074        lwork: *const lapack_int,
6075        info: *mut lapack_int,
6076    );
6077
6078    pub fn cunmqr_(
6079        side: *const c_char,
6080        trans: *const c_char,
6081        m: *const lapack_int,
6082        n: *const lapack_int,
6083        k: *const lapack_int,
6084        a: *const lapack_complex_float,
6085        lda: *const lapack_int,
6086        tau: *const lapack_complex_float,
6087        c: *mut lapack_complex_float,
6088        ldc: *const lapack_int,
6089        work: *mut lapack_complex_float,
6090        lwork: *const lapack_int,
6091        info: *mut lapack_int,
6092    );
6093    pub fn zunmqr_(
6094        side: *const c_char,
6095        trans: *const c_char,
6096        m: *const lapack_int,
6097        n: *const lapack_int,
6098        k: *const lapack_int,
6099        a: *const lapack_complex_double,
6100        lda: *const lapack_int,
6101        tau: *const lapack_complex_double,
6102        c: *mut lapack_complex_double,
6103        ldc: *const lapack_int,
6104        work: *mut lapack_complex_double,
6105        lwork: *const lapack_int,
6106        info: *mut lapack_int,
6107    );
6108
6109    pub fn sgelqf_(
6110        m: *const lapack_int,
6111        n: *const lapack_int,
6112        a: *mut c_float,
6113        lda: *const lapack_int,
6114        tau: *mut c_float,
6115        work: *mut c_float,
6116        lwork: *const lapack_int,
6117        info: *mut lapack_int,
6118    );
6119    pub fn dgelqf_(
6120        m: *const lapack_int,
6121        n: *const lapack_int,
6122        a: *mut c_double,
6123        lda: *const lapack_int,
6124        tau: *mut c_double,
6125        work: *mut c_double,
6126        lwork: *const lapack_int,
6127        info: *mut lapack_int,
6128    );
6129    pub fn cgelqf_(
6130        m: *const lapack_int,
6131        n: *const lapack_int,
6132        a: *mut lapack_complex_float,
6133        lda: *const lapack_int,
6134        tau: *mut lapack_complex_float,
6135        work: *mut lapack_complex_float,
6136        lwork: *const lapack_int,
6137        info: *mut lapack_int,
6138    );
6139    pub fn zgelqf_(
6140        m: *const lapack_int,
6141        n: *const lapack_int,
6142        a: *mut lapack_complex_double,
6143        lda: *const lapack_int,
6144        tau: *mut lapack_complex_double,
6145        work: *mut lapack_complex_double,
6146        lwork: *const lapack_int,
6147        info: *mut lapack_int,
6148    );
6149
6150    pub fn sorglq_(
6151        m: *const lapack_int,
6152        n: *const lapack_int,
6153        k: *const lapack_int,
6154        a: *mut c_float,
6155        lda: *const lapack_int,
6156        tau: *const c_float,
6157        work: *mut c_float,
6158        lwork: *const lapack_int,
6159        info: *mut lapack_int,
6160    );
6161    pub fn dorglq_(
6162        m: *const lapack_int,
6163        n: *const lapack_int,
6164        k: *const lapack_int,
6165        a: *mut c_double,
6166        lda: *const lapack_int,
6167        tau: *const c_double,
6168        work: *mut c_double,
6169        lwork: *const lapack_int,
6170        info: *mut lapack_int,
6171    );
6172    pub fn sormlq_(
6173        side: *const c_char,
6174        trans: *const c_char,
6175        m: *const lapack_int,
6176        n: *const lapack_int,
6177        k: *const lapack_int,
6178        a: *const c_float,
6179        lda: *const lapack_int,
6180        tau: *const c_float,
6181        c: *mut c_float,
6182        ldc: *const lapack_int,
6183        work: *mut c_float,
6184        lwork: *const lapack_int,
6185        info: *mut lapack_int,
6186    );
6187    pub fn dormlq_(
6188        side: *const c_char,
6189        trans: *const c_char,
6190        m: *const lapack_int,
6191        n: *const lapack_int,
6192        k: *const lapack_int,
6193        a: *const c_double,
6194        lda: *const lapack_int,
6195        tau: *const c_double,
6196        c: *mut c_double,
6197        ldc: *const lapack_int,
6198        work: *mut c_double,
6199        lwork: *const lapack_int,
6200        info: *mut lapack_int,
6201    );
6202    pub fn cunglq_(
6203        m: *const lapack_int,
6204        n: *const lapack_int,
6205        k: *const lapack_int,
6206        a: *mut lapack_complex_float,
6207        lda: *const lapack_int,
6208        tau: *const lapack_complex_float,
6209        work: *mut lapack_complex_float,
6210        lwork: *const lapack_int,
6211        info: *mut lapack_int,
6212    );
6213    pub fn zunglq_(
6214        m: *const lapack_int,
6215        n: *const lapack_int,
6216        k: *const lapack_int,
6217        a: *mut lapack_complex_double,
6218        lda: *const lapack_int,
6219        tau: *const lapack_complex_double,
6220        work: *mut lapack_complex_double,
6221        lwork: *const lapack_int,
6222        info: *mut lapack_int,
6223    );
6224
6225    pub fn cunmlq_(
6226        side: *const c_char,
6227        trans: *const c_char,
6228        m: *const lapack_int,
6229        n: *const lapack_int,
6230        k: *const lapack_int,
6231        a: *const lapack_complex_float,
6232        lda: *const lapack_int,
6233        tau: *const lapack_complex_float,
6234        c: *mut lapack_complex_float,
6235        ldc: *const lapack_int,
6236        work: *mut lapack_complex_float,
6237        lwork: *const lapack_int,
6238        info: *mut lapack_int,
6239    );
6240    pub fn zunmlq_(
6241        side: *const c_char,
6242        trans: *const c_char,
6243        m: *const lapack_int,
6244        n: *const lapack_int,
6245        k: *const lapack_int,
6246        a: *const lapack_complex_double,
6247        lda: *const lapack_int,
6248        tau: *const lapack_complex_double,
6249        c: *mut lapack_complex_double,
6250        ldc: *const lapack_int,
6251        work: *mut lapack_complex_double,
6252        lwork: *const lapack_int,
6253        info: *mut lapack_int,
6254    );
6255
6256    pub fn sgeqlf_(
6257        m: *const lapack_int,
6258        n: *const lapack_int,
6259        a: *mut c_float,
6260        lda: *const lapack_int,
6261        tau: *mut c_float,
6262        work: *mut c_float,
6263        lwork: *const lapack_int,
6264        info: *mut lapack_int,
6265    );
6266    pub fn dgeqlf_(
6267        m: *const lapack_int,
6268        n: *const lapack_int,
6269        a: *mut c_double,
6270        lda: *const lapack_int,
6271        tau: *mut c_double,
6272        work: *mut c_double,
6273        lwork: *const lapack_int,
6274        info: *mut lapack_int,
6275    );
6276    pub fn cgeqlf_(
6277        m: *const lapack_int,
6278        n: *const lapack_int,
6279        a: *mut lapack_complex_float,
6280        lda: *const lapack_int,
6281        tau: *mut lapack_complex_float,
6282        work: *mut lapack_complex_float,
6283        lwork: *const lapack_int,
6284        info: *mut lapack_int,
6285    );
6286    pub fn zgeqlf_(
6287        m: *const lapack_int,
6288        n: *const lapack_int,
6289        a: *mut lapack_complex_double,
6290        lda: *const lapack_int,
6291        tau: *mut lapack_complex_double,
6292        work: *mut lapack_complex_double,
6293        lwork: *const lapack_int,
6294        info: *mut lapack_int,
6295    );
6296
6297    pub fn sorgql_(
6298        m: *const lapack_int,
6299        n: *const lapack_int,
6300        k: *const lapack_int,
6301        a: *mut c_float,
6302        lda: *const lapack_int,
6303        tau: *const c_float,
6304        work: *mut c_float,
6305        lwork: *const lapack_int,
6306        info: *mut lapack_int,
6307    );
6308    pub fn dorgql_(
6309        m: *const lapack_int,
6310        n: *const lapack_int,
6311        k: *const lapack_int,
6312        a: *mut c_double,
6313        lda: *const lapack_int,
6314        tau: *const c_double,
6315        work: *mut c_double,
6316        lwork: *const lapack_int,
6317        info: *mut lapack_int,
6318    );
6319    pub fn cungql_(
6320        m: *const lapack_int,
6321        n: *const lapack_int,
6322        k: *const lapack_int,
6323        a: *mut lapack_complex_float,
6324        lda: *const lapack_int,
6325        tau: *const lapack_complex_float,
6326        work: *mut lapack_complex_float,
6327        lwork: *const lapack_int,
6328        info: *mut lapack_int,
6329    );
6330    pub fn zungql_(
6331        m: *const lapack_int,
6332        n: *const lapack_int,
6333        k: *const lapack_int,
6334        a: *mut lapack_complex_double,
6335        lda: *const lapack_int,
6336        tau: *const lapack_complex_double,
6337        work: *mut lapack_complex_double,
6338        lwork: *const lapack_int,
6339        info: *mut lapack_int,
6340    );
6341
6342    pub fn sormql_(
6343        side: *const c_char,
6344        trans: *const c_char,
6345        m: *const lapack_int,
6346        n: *const lapack_int,
6347        k: *const lapack_int,
6348        a: *const c_float,
6349        lda: *const lapack_int,
6350        tau: *const c_float,
6351        c: *mut c_float,
6352        ldc: *const lapack_int,
6353        work: *mut c_float,
6354        lwork: *const lapack_int,
6355        info: *mut lapack_int,
6356    );
6357    pub fn dormql_(
6358        side: *const c_char,
6359        trans: *const c_char,
6360        m: *const lapack_int,
6361        n: *const lapack_int,
6362        k: *const lapack_int,
6363        a: *const c_double,
6364        lda: *const lapack_int,
6365        tau: *const c_double,
6366        c: *mut c_double,
6367        ldc: *const lapack_int,
6368        work: *mut c_double,
6369        lwork: *const lapack_int,
6370        info: *mut lapack_int,
6371    );
6372    pub fn cunmql_(
6373        side: *const c_char,
6374        trans: *const c_char,
6375        m: *const lapack_int,
6376        n: *const lapack_int,
6377        k: *const lapack_int,
6378        a: *const lapack_complex_float,
6379        lda: *const lapack_int,
6380        tau: *const lapack_complex_float,
6381        c: *mut lapack_complex_float,
6382        ldc: *const lapack_int,
6383        work: *mut lapack_complex_float,
6384        lwork: *const lapack_int,
6385        info: *mut lapack_int,
6386    );
6387    pub fn zunmql_(
6388        side: *const c_char,
6389        trans: *const c_char,
6390        m: *const lapack_int,
6391        n: *const lapack_int,
6392        k: *const lapack_int,
6393        a: *const lapack_complex_double,
6394        lda: *const lapack_int,
6395        tau: *const lapack_complex_double,
6396        c: *mut lapack_complex_double,
6397        ldc: *const lapack_int,
6398        work: *mut lapack_complex_double,
6399        lwork: *const lapack_int,
6400        info: *mut lapack_int,
6401    );
6402
6403    pub fn sgerqf_(
6404        m: *const lapack_int,
6405        n: *const lapack_int,
6406        a: *mut c_float,
6407        lda: *const lapack_int,
6408        tau: *mut c_float,
6409        work: *mut c_float,
6410        lwork: *const lapack_int,
6411        info: *mut lapack_int,
6412    );
6413    pub fn dgerqf_(
6414        m: *const lapack_int,
6415        n: *const lapack_int,
6416        a: *mut c_double,
6417        lda: *const lapack_int,
6418        tau: *mut c_double,
6419        work: *mut c_double,
6420        lwork: *const lapack_int,
6421        info: *mut lapack_int,
6422    );
6423    pub fn cgerqf_(
6424        m: *const lapack_int,
6425        n: *const lapack_int,
6426        a: *mut lapack_complex_float,
6427        lda: *const lapack_int,
6428        tau: *mut lapack_complex_float,
6429        work: *mut lapack_complex_float,
6430        lwork: *const lapack_int,
6431        info: *mut lapack_int,
6432    );
6433    pub fn zgerqf_(
6434        m: *const lapack_int,
6435        n: *const lapack_int,
6436        a: *mut lapack_complex_double,
6437        lda: *const lapack_int,
6438        tau: *mut lapack_complex_double,
6439        work: *mut lapack_complex_double,
6440        lwork: *const lapack_int,
6441        info: *mut lapack_int,
6442    );
6443
6444    pub fn sorgrq_(
6445        m: *const lapack_int,
6446        n: *const lapack_int,
6447        k: *const lapack_int,
6448        a: *mut c_float,
6449        lda: *const lapack_int,
6450        tau: *const c_float,
6451        work: *mut c_float,
6452        lwork: *const lapack_int,
6453        info: *mut lapack_int,
6454    );
6455    pub fn dorgrq_(
6456        m: *const lapack_int,
6457        n: *const lapack_int,
6458        k: *const lapack_int,
6459        a: *mut c_double,
6460        lda: *const lapack_int,
6461        tau: *const c_double,
6462        work: *mut c_double,
6463        lwork: *const lapack_int,
6464        info: *mut lapack_int,
6465    );
6466    pub fn cungrq_(
6467        m: *const lapack_int,
6468        n: *const lapack_int,
6469        k: *const lapack_int,
6470        a: *mut lapack_complex_float,
6471        lda: *const lapack_int,
6472        tau: *const lapack_complex_float,
6473        work: *mut lapack_complex_float,
6474        lwork: *const lapack_int,
6475        info: *mut lapack_int,
6476    );
6477    pub fn zungrq_(
6478        m: *const lapack_int,
6479        n: *const lapack_int,
6480        k: *const lapack_int,
6481        a: *mut lapack_complex_double,
6482        lda: *const lapack_int,
6483        tau: *const lapack_complex_double,
6484        work: *mut lapack_complex_double,
6485        lwork: *const lapack_int,
6486        info: *mut lapack_int,
6487    );
6488
6489    pub fn sormrq_(
6490        side: *const c_char,
6491        trans: *const c_char,
6492        m: *const lapack_int,
6493        n: *const lapack_int,
6494        k: *const lapack_int,
6495        a: *const c_float,
6496        lda: *const lapack_int,
6497        tau: *const c_float,
6498        c: *mut c_float,
6499        ldc: *const lapack_int,
6500        work: *mut c_float,
6501        lwork: *const lapack_int,
6502        info: *mut lapack_int,
6503    );
6504    pub fn dormrq_(
6505        side: *const c_char,
6506        trans: *const c_char,
6507        m: *const lapack_int,
6508        n: *const lapack_int,
6509        k: *const lapack_int,
6510        a: *const c_double,
6511        lda: *const lapack_int,
6512        tau: *const c_double,
6513        c: *mut c_double,
6514        ldc: *const lapack_int,
6515        work: *mut c_double,
6516        lwork: *const lapack_int,
6517        info: *mut lapack_int,
6518    );
6519    pub fn cunmrq_(
6520        side: *const c_char,
6521        trans: *const c_char,
6522        m: *const lapack_int,
6523        n: *const lapack_int,
6524        k: *const lapack_int,
6525        a: *const lapack_complex_float,
6526        lda: *const lapack_int,
6527        tau: *const lapack_complex_float,
6528        c: *mut lapack_complex_float,
6529        ldc: *const lapack_int,
6530        work: *mut lapack_complex_float,
6531        lwork: *const lapack_int,
6532        info: *mut lapack_int,
6533    );
6534    pub fn zunmrq_(
6535        side: *const c_char,
6536        trans: *const c_char,
6537        m: *const lapack_int,
6538        n: *const lapack_int,
6539        k: *const lapack_int,
6540        a: *const lapack_complex_double,
6541        lda: *const lapack_int,
6542        tau: *const lapack_complex_double,
6543        c: *mut lapack_complex_double,
6544        ldc: *const lapack_int,
6545        work: *mut lapack_complex_double,
6546        lwork: *const lapack_int,
6547        info: *mut lapack_int,
6548    );
6549
6550    pub fn stzrzf_(
6551        m: *const lapack_int,
6552        n: *const lapack_int,
6553        a: *mut c_float,
6554        lda: *const lapack_int,
6555        tau: *mut c_float,
6556        work: *mut c_float,
6557        lwork: *const lapack_int,
6558        info: *mut lapack_int,
6559    );
6560    pub fn dtzrzf_(
6561        m: *const lapack_int,
6562        n: *const lapack_int,
6563        a: *mut c_double,
6564        lda: *const lapack_int,
6565        tau: *mut c_double,
6566        work: *mut c_double,
6567        lwork: *const lapack_int,
6568        info: *mut lapack_int,
6569    );
6570    pub fn ctzrzf_(
6571        m: *const lapack_int,
6572        n: *const lapack_int,
6573        a: *mut lapack_complex_float,
6574        lda: *const lapack_int,
6575        tau: *mut lapack_complex_float,
6576        work: *mut lapack_complex_float,
6577        lwork: *const lapack_int,
6578        info: *mut lapack_int,
6579    );
6580    pub fn ztzrzf_(
6581        m: *const lapack_int,
6582        n: *const lapack_int,
6583        a: *mut lapack_complex_double,
6584        lda: *const lapack_int,
6585        tau: *mut lapack_complex_double,
6586        work: *mut lapack_complex_double,
6587        lwork: *const lapack_int,
6588        info: *mut lapack_int,
6589    );
6590
6591    pub fn sormrz_(
6592        side: *const c_char,
6593        trans: *const c_char,
6594        m: *const lapack_int,
6595        n: *const lapack_int,
6596        k: *const lapack_int,
6597        l: *const lapack_int,
6598        a: *const c_float,
6599        lda: *const lapack_int,
6600        tau: *const c_float,
6601        c: *mut c_float,
6602        ldc: *const lapack_int,
6603        work: *mut c_float,
6604        lwork: *const lapack_int,
6605        info: *mut lapack_int,
6606    );
6607    pub fn dormrz_(
6608        side: *const c_char,
6609        trans: *const c_char,
6610        m: *const lapack_int,
6611        n: *const lapack_int,
6612        k: *const lapack_int,
6613        l: *const lapack_int,
6614        a: *const c_double,
6615        lda: *const lapack_int,
6616        tau: *const c_double,
6617        c: *mut c_double,
6618        ldc: *const lapack_int,
6619        work: *mut c_double,
6620        lwork: *const lapack_int,
6621        info: *mut lapack_int,
6622    );
6623    pub fn cunmrz_(
6624        side: *const c_char,
6625        trans: *const c_char,
6626        m: *const lapack_int,
6627        n: *const lapack_int,
6628        k: *const lapack_int,
6629        l: *const lapack_int,
6630        a: *const lapack_complex_float,
6631        lda: *const lapack_int,
6632        tau: *const lapack_complex_float,
6633        c: *mut lapack_complex_float,
6634        ldc: *const lapack_int,
6635        work: *mut lapack_complex_float,
6636        lwork: *const lapack_int,
6637        info: *mut lapack_int,
6638    );
6639    pub fn zunmrz_(
6640        side: *const c_char,
6641        trans: *const c_char,
6642        m: *const lapack_int,
6643        n: *const lapack_int,
6644        k: *const lapack_int,
6645        l: *const lapack_int,
6646        a: *const lapack_complex_double,
6647        lda: *const lapack_int,
6648        tau: *const lapack_complex_double,
6649        c: *mut lapack_complex_double,
6650        ldc: *const lapack_int,
6651        work: *mut lapack_complex_double,
6652        lwork: *const lapack_int,
6653        info: *mut lapack_int,
6654    );
6655
6656    pub fn sggqrf_(
6657        n: *const lapack_int,
6658        m: *const lapack_int,
6659        p: *const lapack_int,
6660        a: *mut c_float,
6661        lda: *const lapack_int,
6662        taua: *mut c_float,
6663        b: *mut c_float,
6664        ldb: *const lapack_int,
6665        taub: *mut c_float,
6666        work: *mut c_float,
6667        lwork: *const lapack_int,
6668        info: *mut lapack_int,
6669    );
6670    pub fn dggqrf_(
6671        n: *const lapack_int,
6672        m: *const lapack_int,
6673        p: *const lapack_int,
6674        a: *mut c_double,
6675        lda: *const lapack_int,
6676        taua: *mut c_double,
6677        b: *mut c_double,
6678        ldb: *const lapack_int,
6679        taub: *mut c_double,
6680        work: *mut c_double,
6681        lwork: *const lapack_int,
6682        info: *mut lapack_int,
6683    );
6684    pub fn cggqrf_(
6685        n: *const lapack_int,
6686        m: *const lapack_int,
6687        p: *const lapack_int,
6688        a: *mut lapack_complex_float,
6689        lda: *const lapack_int,
6690        taua: *mut lapack_complex_float,
6691        b: *mut lapack_complex_float,
6692        ldb: *const lapack_int,
6693        taub: *mut lapack_complex_float,
6694        work: *mut lapack_complex_float,
6695        lwork: *const lapack_int,
6696        info: *mut lapack_int,
6697    );
6698    pub fn zggqrf_(
6699        n: *const lapack_int,
6700        m: *const lapack_int,
6701        p: *const lapack_int,
6702        a: *mut lapack_complex_double,
6703        lda: *const lapack_int,
6704        taua: *mut lapack_complex_double,
6705        b: *mut lapack_complex_double,
6706        ldb: *const lapack_int,
6707        taub: *mut lapack_complex_double,
6708        work: *mut lapack_complex_double,
6709        lwork: *const lapack_int,
6710        info: *mut lapack_int,
6711    );
6712
6713    pub fn sggrqf_(
6714        m: *const lapack_int,
6715        p: *const lapack_int,
6716        n: *const lapack_int,
6717        a: *mut c_float,
6718        lda: *const lapack_int,
6719        taua: *mut c_float,
6720        b: *mut c_float,
6721        ldb: *const lapack_int,
6722        taub: *mut c_float,
6723        work: *mut c_float,
6724        lwork: *const lapack_int,
6725        info: *mut lapack_int,
6726    );
6727    pub fn dggrqf_(
6728        m: *const lapack_int,
6729        p: *const lapack_int,
6730        n: *const lapack_int,
6731        a: *mut c_double,
6732        lda: *const lapack_int,
6733        taua: *mut c_double,
6734        b: *mut c_double,
6735        ldb: *const lapack_int,
6736        taub: *mut c_double,
6737        work: *mut c_double,
6738        lwork: *const lapack_int,
6739        info: *mut lapack_int,
6740    );
6741    pub fn cggrqf_(
6742        m: *const lapack_int,
6743        p: *const lapack_int,
6744        n: *const lapack_int,
6745        a: *mut lapack_complex_float,
6746        lda: *const lapack_int,
6747        taua: *mut lapack_complex_float,
6748        b: *mut lapack_complex_float,
6749        ldb: *const lapack_int,
6750        taub: *mut lapack_complex_float,
6751        work: *mut lapack_complex_float,
6752        lwork: *const lapack_int,
6753        info: *mut lapack_int,
6754    );
6755    pub fn zggrqf_(
6756        m: *const lapack_int,
6757        p: *const lapack_int,
6758        n: *const lapack_int,
6759        a: *mut lapack_complex_double,
6760        lda: *const lapack_int,
6761        taua: *mut lapack_complex_double,
6762        b: *mut lapack_complex_double,
6763        ldb: *const lapack_int,
6764        taub: *mut lapack_complex_double,
6765        work: *mut lapack_complex_double,
6766        lwork: *const lapack_int,
6767        info: *mut lapack_int,
6768    );
6769
6770    pub fn sgebrd_(
6771        m: *const lapack_int,
6772        n: *const lapack_int,
6773        a: *mut c_float,
6774        lda: *const lapack_int,
6775        d: *mut c_float,
6776        e: *mut c_float,
6777        tauq: *mut c_float,
6778        taup: *mut c_float,
6779        work: *mut c_float,
6780        lwork: *const lapack_int,
6781        info: *mut lapack_int,
6782    );
6783    pub fn dgebrd_(
6784        m: *const lapack_int,
6785        n: *const lapack_int,
6786        a: *mut c_double,
6787        lda: *const lapack_int,
6788        d: *mut c_double,
6789        e: *mut c_double,
6790        tauq: *mut c_double,
6791        taup: *mut c_double,
6792        work: *mut c_double,
6793        lwork: *const lapack_int,
6794        info: *mut lapack_int,
6795    );
6796    pub fn cgebrd_(
6797        m: *const lapack_int,
6798        n: *const lapack_int,
6799        a: *mut lapack_complex_float,
6800        lda: *const lapack_int,
6801        d: *mut c_float,
6802        e: *mut c_float,
6803        tauq: *mut lapack_complex_float,
6804        taup: *mut lapack_complex_float,
6805        work: *mut lapack_complex_float,
6806        lwork: *const lapack_int,
6807        info: *mut lapack_int,
6808    );
6809    pub fn zgebrd_(
6810        m: *const lapack_int,
6811        n: *const lapack_int,
6812        a: *mut lapack_complex_double,
6813        lda: *const lapack_int,
6814        d: *mut c_double,
6815        e: *mut c_double,
6816        tauq: *mut lapack_complex_double,
6817        taup: *mut lapack_complex_double,
6818        work: *mut lapack_complex_double,
6819        lwork: *const lapack_int,
6820        info: *mut lapack_int,
6821    );
6822
6823    pub fn sgbbrd_(
6824        vect: *const c_char,
6825        m: *const lapack_int,
6826        n: *const lapack_int,
6827        ncc: *const lapack_int,
6828        kl: *const lapack_int,
6829        ku: *const lapack_int,
6830        ab: *mut c_float,
6831        ldab: *const lapack_int,
6832        d: *mut c_float,
6833        e: *mut c_float,
6834        q: *mut c_float,
6835        ldq: *const lapack_int,
6836        pt: *mut c_float,
6837        ldpt: *const lapack_int,
6838        c: *mut c_float,
6839        ldc: *const lapack_int,
6840        work: *mut c_float,
6841        info: *mut lapack_int,
6842    );
6843    pub fn dgbbrd_(
6844        vect: *const c_char,
6845        m: *const lapack_int,
6846        n: *const lapack_int,
6847        ncc: *const lapack_int,
6848        kl: *const lapack_int,
6849        ku: *const lapack_int,
6850        ab: *mut c_double,
6851        ldab: *const lapack_int,
6852        d: *mut c_double,
6853        e: *mut c_double,
6854        q: *mut c_double,
6855        ldq: *const lapack_int,
6856        pt: *mut c_double,
6857        ldpt: *const lapack_int,
6858        c: *mut c_double,
6859        ldc: *const lapack_int,
6860        work: *mut c_double,
6861        info: *mut lapack_int,
6862    );
6863    pub fn cgbbrd_(
6864        vect: *const c_char,
6865        m: *const lapack_int,
6866        n: *const lapack_int,
6867        ncc: *const lapack_int,
6868        kl: *const lapack_int,
6869        ku: *const lapack_int,
6870        ab: *mut lapack_complex_float,
6871        ldab: *const lapack_int,
6872        d: *mut c_float,
6873        e: *mut c_float,
6874        q: *mut lapack_complex_float,
6875        ldq: *const lapack_int,
6876        pt: *mut lapack_complex_float,
6877        ldpt: *const lapack_int,
6878        c: *mut lapack_complex_float,
6879        ldc: *const lapack_int,
6880        work: *mut lapack_complex_float,
6881        rwork: *mut c_float,
6882        info: *mut lapack_int,
6883    );
6884    pub fn zgbbrd_(
6885        vect: *const c_char,
6886        m: *const lapack_int,
6887        n: *const lapack_int,
6888        ncc: *const lapack_int,
6889        kl: *const lapack_int,
6890        ku: *const lapack_int,
6891        ab: *mut lapack_complex_double,
6892        ldab: *const lapack_int,
6893        d: *mut c_double,
6894        e: *mut c_double,
6895        q: *mut lapack_complex_double,
6896        ldq: *const lapack_int,
6897        pt: *mut lapack_complex_double,
6898        ldpt: *const lapack_int,
6899        c: *mut lapack_complex_double,
6900        ldc: *const lapack_int,
6901        work: *mut lapack_complex_double,
6902        rwork: *mut c_double,
6903        info: *mut lapack_int,
6904    );
6905
6906    pub fn sorgbr_(
6907        vect: *const c_char,
6908        m: *const lapack_int,
6909        n: *const lapack_int,
6910        k: *const lapack_int,
6911        a: *mut c_float,
6912        lda: *const lapack_int,
6913        tau: *const c_float,
6914        work: *mut c_float,
6915        lwork: *const lapack_int,
6916        info: *mut lapack_int,
6917    );
6918    pub fn dorgbr_(
6919        vect: *const c_char,
6920        m: *const lapack_int,
6921        n: *const lapack_int,
6922        k: *const lapack_int,
6923        a: *mut c_double,
6924        lda: *const lapack_int,
6925        tau: *const c_double,
6926        work: *mut c_double,
6927        lwork: *const lapack_int,
6928        info: *mut lapack_int,
6929    );
6930    pub fn sormbr_(
6931        vect: *const c_char,
6932        side: *const c_char,
6933        trans: *const c_char,
6934        m: *const lapack_int,
6935        n: *const lapack_int,
6936        k: *const lapack_int,
6937        a: *const c_float,
6938        lda: *const lapack_int,
6939        tau: *const c_float,
6940        c: *mut c_float,
6941        ldc: *const lapack_int,
6942        work: *mut c_float,
6943        lwork: *const lapack_int,
6944        info: *mut lapack_int,
6945    );
6946    pub fn dormbr_(
6947        vect: *const c_char,
6948        side: *const c_char,
6949        trans: *const c_char,
6950        m: *const lapack_int,
6951        n: *const lapack_int,
6952        k: *const lapack_int,
6953        a: *const c_double,
6954        lda: *const lapack_int,
6955        tau: *const c_double,
6956        c: *mut c_double,
6957        ldc: *const lapack_int,
6958        work: *mut c_double,
6959        lwork: *const lapack_int,
6960        info: *mut lapack_int,
6961    );
6962    pub fn cungbr_(
6963        vect: *const c_char,
6964        m: *const lapack_int,
6965        n: *const lapack_int,
6966        k: *const lapack_int,
6967        a: *mut lapack_complex_float,
6968        lda: *const lapack_int,
6969        tau: *const lapack_complex_float,
6970        work: *mut lapack_complex_float,
6971        lwork: *const lapack_int,
6972        info: *mut lapack_int,
6973    );
6974    pub fn zungbr_(
6975        vect: *const c_char,
6976        m: *const lapack_int,
6977        n: *const lapack_int,
6978        k: *const lapack_int,
6979        a: *mut lapack_complex_double,
6980        lda: *const lapack_int,
6981        tau: *const lapack_complex_double,
6982        work: *mut lapack_complex_double,
6983        lwork: *const lapack_int,
6984        info: *mut lapack_int,
6985    );
6986
6987    pub fn cunmbr_(
6988        vect: *const c_char,
6989        side: *const c_char,
6990        trans: *const c_char,
6991        m: *const lapack_int,
6992        n: *const lapack_int,
6993        k: *const lapack_int,
6994        a: *const lapack_complex_float,
6995        lda: *const lapack_int,
6996        tau: *const lapack_complex_float,
6997        c: *mut lapack_complex_float,
6998        ldc: *const lapack_int,
6999        work: *mut lapack_complex_float,
7000        lwork: *const lapack_int,
7001        info: *mut lapack_int,
7002    );
7003    pub fn zunmbr_(
7004        vect: *const c_char,
7005        side: *const c_char,
7006        trans: *const c_char,
7007        m: *const lapack_int,
7008        n: *const lapack_int,
7009        k: *const lapack_int,
7010        a: *const lapack_complex_double,
7011        lda: *const lapack_int,
7012        tau: *const lapack_complex_double,
7013        c: *mut lapack_complex_double,
7014        ldc: *const lapack_int,
7015        work: *mut lapack_complex_double,
7016        lwork: *const lapack_int,
7017        info: *mut lapack_int,
7018    );
7019
7020    pub fn sbdsqr_(
7021        uplo: *const c_char,
7022        n: *const lapack_int,
7023        ncvt: *const lapack_int,
7024        nru: *const lapack_int,
7025        ncc: *const lapack_int,
7026        d: *mut c_float,
7027        e: *mut c_float,
7028        vt: *mut c_float,
7029        ldvt: *const lapack_int,
7030        u: *mut c_float,
7031        ldu: *const lapack_int,
7032        c: *mut c_float,
7033        ldc: *const lapack_int,
7034        work: *mut c_float,
7035        info: *mut lapack_int,
7036    );
7037    pub fn dbdsqr_(
7038        uplo: *const c_char,
7039        n: *const lapack_int,
7040        ncvt: *const lapack_int,
7041        nru: *const lapack_int,
7042        ncc: *const lapack_int,
7043        d: *mut c_double,
7044        e: *mut c_double,
7045        vt: *mut c_double,
7046        ldvt: *const lapack_int,
7047        u: *mut c_double,
7048        ldu: *const lapack_int,
7049        c: *mut c_double,
7050        ldc: *const lapack_int,
7051        work: *mut c_double,
7052        info: *mut lapack_int,
7053    );
7054    pub fn cbdsqr_(
7055        uplo: *const c_char,
7056        n: *const lapack_int,
7057        ncvt: *const lapack_int,
7058        nru: *const lapack_int,
7059        ncc: *const lapack_int,
7060        d: *mut c_float,
7061        e: *mut c_float,
7062        vt: *mut lapack_complex_float,
7063        ldvt: *const lapack_int,
7064        u: *mut lapack_complex_float,
7065        ldu: *const lapack_int,
7066        c: *mut lapack_complex_float,
7067        ldc: *const lapack_int,
7068        work: *mut c_float,
7069        info: *mut lapack_int,
7070    );
7071    pub fn zbdsqr_(
7072        uplo: *const c_char,
7073        n: *const lapack_int,
7074        ncvt: *const lapack_int,
7075        nru: *const lapack_int,
7076        ncc: *const lapack_int,
7077        d: *mut c_double,
7078        e: *mut c_double,
7079        vt: *mut lapack_complex_double,
7080        ldvt: *const lapack_int,
7081        u: *mut lapack_complex_double,
7082        ldu: *const lapack_int,
7083        c: *mut lapack_complex_double,
7084        ldc: *const lapack_int,
7085        work: *mut c_double,
7086        info: *mut lapack_int,
7087    );
7088
7089    pub fn sbdsdc_(
7090        uplo: *const c_char,
7091        compq: *const c_char,
7092        n: *const lapack_int,
7093        d: *mut c_float,
7094        e: *mut c_float,
7095        u: *mut c_float,
7096        ldu: *const lapack_int,
7097        vt: *mut c_float,
7098        ldvt: *const lapack_int,
7099        q: *mut c_float,
7100        iq: *mut lapack_int,
7101        work: *mut c_float,
7102        iwork: *mut lapack_int,
7103        info: *mut lapack_int,
7104    );
7105    pub fn dbdsdc_(
7106        uplo: *const c_char,
7107        compq: *const c_char,
7108        n: *const lapack_int,
7109        d: *mut c_double,
7110        e: *mut c_double,
7111        u: *mut c_double,
7112        ldu: *const lapack_int,
7113        vt: *mut c_double,
7114        ldvt: *const lapack_int,
7115        q: *mut c_double,
7116        iq: *mut lapack_int,
7117        work: *mut c_double,
7118        iwork: *mut lapack_int,
7119        info: *mut lapack_int,
7120    );
7121
7122    pub fn sbdsvdx_(
7123        uplo: *const c_char,
7124        jobz: *const c_char,
7125        range: *const c_char,
7126        n: *const lapack_int,
7127        d: *const c_float,
7128        e: *const c_float,
7129        vl: *const c_float,
7130        vu: *const c_float,
7131        il: *const lapack_int,
7132        iu: *const lapack_int,
7133        ns: *mut lapack_int,
7134        s: *mut c_float,
7135        z: *mut c_float,
7136        ldz: *const lapack_int,
7137        work: *mut c_float,
7138        iwork: *mut lapack_int,
7139        info: *mut lapack_int,
7140    );
7141    pub fn dbdsvdx_(
7142        uplo: *const c_char,
7143        jobz: *const c_char,
7144        range: *const c_char,
7145        n: *const lapack_int,
7146        d: *const c_double,
7147        e: *const c_double,
7148        vl: *const c_double,
7149        vu: *const c_double,
7150        il: *const lapack_int,
7151        iu: *const lapack_int,
7152        ns: *mut lapack_int,
7153        s: *mut c_double,
7154        z: *mut c_double,
7155        ldz: *const lapack_int,
7156        work: *mut c_double,
7157        iwork: *mut lapack_int,
7158        info: *mut lapack_int,
7159    );
7160
7161    pub fn ssytrd_(
7162        uplo: *const c_char,
7163        n: *const lapack_int,
7164        a: *mut c_float,
7165        lda: *const lapack_int,
7166        d: *mut c_float,
7167        e: *mut c_float,
7168        tau: *mut c_float,
7169        work: *mut c_float,
7170        lwork: *const lapack_int,
7171        info: *mut lapack_int,
7172    );
7173    pub fn dsytrd_(
7174        uplo: *const c_char,
7175        n: *const lapack_int,
7176        a: *mut c_double,
7177        lda: *const lapack_int,
7178        d: *mut c_double,
7179        e: *mut c_double,
7180        tau: *mut c_double,
7181        work: *mut c_double,
7182        lwork: *const lapack_int,
7183        info: *mut lapack_int,
7184    );
7185
7186    pub fn sorgtr_(
7187        uplo: *const c_char,
7188        n: *const lapack_int,
7189        a: *mut c_float,
7190        lda: *const lapack_int,
7191        tau: *const c_float,
7192        work: *mut c_float,
7193        lwork: *const lapack_int,
7194        info: *mut lapack_int,
7195    );
7196    pub fn dorgtr_(
7197        uplo: *const c_char,
7198        n: *const lapack_int,
7199        a: *mut c_double,
7200        lda: *const lapack_int,
7201        tau: *const c_double,
7202        work: *mut c_double,
7203        lwork: *const lapack_int,
7204        info: *mut lapack_int,
7205    );
7206
7207    pub fn sormtr_(
7208        side: *const c_char,
7209        uplo: *const c_char,
7210        trans: *const c_char,
7211        m: *const lapack_int,
7212        n: *const lapack_int,
7213        a: *const c_float,
7214        lda: *const lapack_int,
7215        tau: *const c_float,
7216        c: *mut c_float,
7217        ldc: *const lapack_int,
7218        work: *mut c_float,
7219        lwork: *const lapack_int,
7220        info: *mut lapack_int,
7221    );
7222    pub fn dormtr_(
7223        side: *const c_char,
7224        uplo: *const c_char,
7225        trans: *const c_char,
7226        m: *const lapack_int,
7227        n: *const lapack_int,
7228        a: *const c_double,
7229        lda: *const lapack_int,
7230        tau: *const c_double,
7231        c: *mut c_double,
7232        ldc: *const lapack_int,
7233        work: *mut c_double,
7234        lwork: *const lapack_int,
7235        info: *mut lapack_int,
7236    );
7237
7238    pub fn chetrd_(
7239        uplo: *const c_char,
7240        n: *const lapack_int,
7241        a: *mut lapack_complex_float,
7242        lda: *const lapack_int,
7243        d: *mut c_float,
7244        e: *mut c_float,
7245        tau: *mut lapack_complex_float,
7246        work: *mut lapack_complex_float,
7247        lwork: *const lapack_int,
7248        info: *mut lapack_int,
7249    );
7250    pub fn zhetrd_(
7251        uplo: *const c_char,
7252        n: *const lapack_int,
7253        a: *mut lapack_complex_double,
7254        lda: *const lapack_int,
7255        d: *mut c_double,
7256        e: *mut c_double,
7257        tau: *mut lapack_complex_double,
7258        work: *mut lapack_complex_double,
7259        lwork: *const lapack_int,
7260        info: *mut lapack_int,
7261    );
7262
7263    pub fn cungtr_(
7264        uplo: *const c_char,
7265        n: *const lapack_int,
7266        a: *mut lapack_complex_float,
7267        lda: *const lapack_int,
7268        tau: *const lapack_complex_float,
7269        work: *mut lapack_complex_float,
7270        lwork: *const lapack_int,
7271        info: *mut lapack_int,
7272    );
7273    pub fn zungtr_(
7274        uplo: *const c_char,
7275        n: *const lapack_int,
7276        a: *mut lapack_complex_double,
7277        lda: *const lapack_int,
7278        tau: *const lapack_complex_double,
7279        work: *mut lapack_complex_double,
7280        lwork: *const lapack_int,
7281        info: *mut lapack_int,
7282    );
7283
7284    pub fn cunmtr_(
7285        side: *const c_char,
7286        uplo: *const c_char,
7287        trans: *const c_char,
7288        m: *const lapack_int,
7289        n: *const lapack_int,
7290        a: *const lapack_complex_float,
7291        lda: *const lapack_int,
7292        tau: *const lapack_complex_float,
7293        c: *mut lapack_complex_float,
7294        ldc: *const lapack_int,
7295        work: *mut lapack_complex_float,
7296        lwork: *const lapack_int,
7297        info: *mut lapack_int,
7298    );
7299    pub fn zunmtr_(
7300        side: *const c_char,
7301        uplo: *const c_char,
7302        trans: *const c_char,
7303        m: *const lapack_int,
7304        n: *const lapack_int,
7305        a: *const lapack_complex_double,
7306        lda: *const lapack_int,
7307        tau: *const lapack_complex_double,
7308        c: *mut lapack_complex_double,
7309        ldc: *const lapack_int,
7310        work: *mut lapack_complex_double,
7311        lwork: *const lapack_int,
7312        info: *mut lapack_int,
7313    );
7314
7315    pub fn ssptrd_(
7316        uplo: *const c_char,
7317        n: *const lapack_int,
7318        ap: *mut c_float,
7319        d: *mut c_float,
7320        e: *mut c_float,
7321        tau: *mut c_float,
7322        info: *mut lapack_int,
7323    );
7324    pub fn dsptrd_(
7325        uplo: *const c_char,
7326        n: *const lapack_int,
7327        ap: *mut c_double,
7328        d: *mut c_double,
7329        e: *mut c_double,
7330        tau: *mut c_double,
7331        info: *mut lapack_int,
7332    );
7333
7334    pub fn sopgtr_(
7335        uplo: *const c_char,
7336        n: *const lapack_int,
7337        ap: *const c_float,
7338        tau: *const c_float,
7339        q: *mut c_float,
7340        ldq: *const lapack_int,
7341        work: *mut c_float,
7342        info: *mut lapack_int,
7343    );
7344    pub fn dopgtr_(
7345        uplo: *const c_char,
7346        n: *const lapack_int,
7347        ap: *const c_double,
7348        tau: *const c_double,
7349        q: *mut c_double,
7350        ldq: *const lapack_int,
7351        work: *mut c_double,
7352        info: *mut lapack_int,
7353    );
7354
7355    pub fn sopmtr_(
7356        side: *const c_char,
7357        uplo: *const c_char,
7358        trans: *const c_char,
7359        m: *const lapack_int,
7360        n: *const lapack_int,
7361        ap: *const c_float,
7362        tau: *const c_float,
7363        c: *mut c_float,
7364        ldc: *const lapack_int,
7365        work: *mut c_float,
7366        info: *mut lapack_int,
7367    );
7368    pub fn dopmtr_(
7369        side: *const c_char,
7370        uplo: *const c_char,
7371        trans: *const c_char,
7372        m: *const lapack_int,
7373        n: *const lapack_int,
7374        ap: *const c_double,
7375        tau: *const c_double,
7376        c: *mut c_double,
7377        ldc: *const lapack_int,
7378        work: *mut c_double,
7379        info: *mut lapack_int,
7380    );
7381
7382    pub fn chptrd_(
7383        uplo: *const c_char,
7384        n: *const lapack_int,
7385        ap: *mut lapack_complex_float,
7386        d: *mut c_float,
7387        e: *mut c_float,
7388        tau: *mut lapack_complex_float,
7389        info: *mut lapack_int,
7390    );
7391    pub fn zhptrd_(
7392        uplo: *const c_char,
7393        n: *const lapack_int,
7394        ap: *mut lapack_complex_double,
7395        d: *mut c_double,
7396        e: *mut c_double,
7397        tau: *mut lapack_complex_double,
7398        info: *mut lapack_int,
7399    );
7400
7401    pub fn cupgtr_(
7402        uplo: *const c_char,
7403        n: *const lapack_int,
7404        ap: *const lapack_complex_float,
7405        tau: *const lapack_complex_float,
7406        q: *mut lapack_complex_float,
7407        ldq: *const lapack_int,
7408        work: *mut lapack_complex_float,
7409        info: *mut lapack_int,
7410    );
7411    pub fn zupgtr_(
7412        uplo: *const c_char,
7413        n: *const lapack_int,
7414        ap: *const lapack_complex_double,
7415        tau: *const lapack_complex_double,
7416        q: *mut lapack_complex_double,
7417        ldq: *const lapack_int,
7418        work: *mut lapack_complex_double,
7419        info: *mut lapack_int,
7420    );
7421
7422    pub fn cupmtr_(
7423        side: *const c_char,
7424        uplo: *const c_char,
7425        trans: *const c_char,
7426        m: *const lapack_int,
7427        n: *const lapack_int,
7428        ap: *const lapack_complex_float,
7429        tau: *const lapack_complex_float,
7430        c: *mut lapack_complex_float,
7431        ldc: *const lapack_int,
7432        work: *mut lapack_complex_float,
7433        info: *mut lapack_int,
7434    );
7435    pub fn zupmtr_(
7436        side: *const c_char,
7437        uplo: *const c_char,
7438        trans: *const c_char,
7439        m: *const lapack_int,
7440        n: *const lapack_int,
7441        ap: *const lapack_complex_double,
7442        tau: *const lapack_complex_double,
7443        c: *mut lapack_complex_double,
7444        ldc: *const lapack_int,
7445        work: *mut lapack_complex_double,
7446        info: *mut lapack_int,
7447    );
7448
7449    pub fn ssbtrd_(
7450        vect: *const c_char,
7451        uplo: *const c_char,
7452        n: *const lapack_int,
7453        kd: *const lapack_int,
7454        ab: *mut c_float,
7455        ldab: *const lapack_int,
7456        d: *mut c_float,
7457        e: *mut c_float,
7458        q: *mut c_float,
7459        ldq: *const lapack_int,
7460        work: *mut c_float,
7461        info: *mut lapack_int,
7462    );
7463    pub fn dsbtrd_(
7464        vect: *const c_char,
7465        uplo: *const c_char,
7466        n: *const lapack_int,
7467        kd: *const lapack_int,
7468        ab: *mut c_double,
7469        ldab: *const lapack_int,
7470        d: *mut c_double,
7471        e: *mut c_double,
7472        q: *mut c_double,
7473        ldq: *const lapack_int,
7474        work: *mut c_double,
7475        info: *mut lapack_int,
7476    );
7477    pub fn chbtrd_(
7478        vect: *const c_char,
7479        uplo: *const c_char,
7480        n: *const lapack_int,
7481        kd: *const lapack_int,
7482        ab: *mut lapack_complex_float,
7483        ldab: *const lapack_int,
7484        d: *mut c_float,
7485        e: *mut c_float,
7486        q: *mut lapack_complex_float,
7487        ldq: *const lapack_int,
7488        work: *mut lapack_complex_float,
7489        info: *mut lapack_int,
7490    );
7491    pub fn zhbtrd_(
7492        vect: *const c_char,
7493        uplo: *const c_char,
7494        n: *const lapack_int,
7495        kd: *const lapack_int,
7496        ab: *mut lapack_complex_double,
7497        ldab: *const lapack_int,
7498        d: *mut c_double,
7499        e: *mut c_double,
7500        q: *mut lapack_complex_double,
7501        ldq: *const lapack_int,
7502        work: *mut lapack_complex_double,
7503        info: *mut lapack_int,
7504    );
7505
7506    pub fn ssterf_(n: *const lapack_int, d: *mut c_float, e: *mut c_float, info: *mut lapack_int);
7507    pub fn dsterf_(n: *const lapack_int, d: *mut c_double, e: *mut c_double, info: *mut lapack_int);
7508    pub fn ssteqr_(
7509        compz: *const c_char,
7510        n: *const lapack_int,
7511        d: *mut c_float,
7512        e: *mut c_float,
7513        z: *mut c_float,
7514        ldz: *const lapack_int,
7515        work: *mut c_float,
7516        info: *mut lapack_int,
7517    );
7518    pub fn dsteqr_(
7519        compz: *const c_char,
7520        n: *const lapack_int,
7521        d: *mut c_double,
7522        e: *mut c_double,
7523        z: *mut c_double,
7524        ldz: *const lapack_int,
7525        work: *mut c_double,
7526        info: *mut lapack_int,
7527    );
7528    pub fn csteqr_(
7529        compz: *const c_char,
7530        n: *const lapack_int,
7531        d: *mut c_float,
7532        e: *mut c_float,
7533        z: *mut lapack_complex_float,
7534        ldz: *const lapack_int,
7535        work: *mut c_float,
7536        info: *mut lapack_int,
7537    );
7538    pub fn zsteqr_(
7539        compz: *const c_char,
7540        n: *const lapack_int,
7541        d: *mut c_double,
7542        e: *mut c_double,
7543        z: *mut lapack_complex_double,
7544        ldz: *const lapack_int,
7545        work: *mut c_double,
7546        info: *mut lapack_int,
7547    );
7548
7549    pub fn sstemr_(
7550        jobz: *const c_char,
7551        range: *const c_char,
7552        n: *const lapack_int,
7553        d: *mut c_float,
7554        e: *mut c_float,
7555        vl: *const c_float,
7556        vu: *const c_float,
7557        il: *const lapack_int,
7558        iu: *const lapack_int,
7559        m: *mut lapack_int,
7560        w: *mut c_float,
7561        z: *mut c_float,
7562        ldz: *const lapack_int,
7563        nzc: *const lapack_int,
7564        isuppz: *mut lapack_int,
7565        tryrac: *mut lapack_logical,
7566        work: *mut c_float,
7567        lwork: *const lapack_int,
7568        iwork: *mut lapack_int,
7569        liwork: *const lapack_int,
7570        info: *mut lapack_int,
7571    );
7572    pub fn dstemr_(
7573        jobz: *const c_char,
7574        range: *const c_char,
7575        n: *const lapack_int,
7576        d: *mut c_double,
7577        e: *mut c_double,
7578        vl: *const c_double,
7579        vu: *const c_double,
7580        il: *const lapack_int,
7581        iu: *const lapack_int,
7582        m: *mut lapack_int,
7583        w: *mut c_double,
7584        z: *mut c_double,
7585        ldz: *const lapack_int,
7586        nzc: *const lapack_int,
7587        isuppz: *mut lapack_int,
7588        tryrac: *mut lapack_logical,
7589        work: *mut c_double,
7590        lwork: *const lapack_int,
7591        iwork: *mut lapack_int,
7592        liwork: *const lapack_int,
7593        info: *mut lapack_int,
7594    );
7595    pub fn cstemr_(
7596        jobz: *const c_char,
7597        range: *const c_char,
7598        n: *const lapack_int,
7599        d: *mut c_float,
7600        e: *mut c_float,
7601        vl: *const c_float,
7602        vu: *const c_float,
7603        il: *const lapack_int,
7604        iu: *const lapack_int,
7605        m: *mut lapack_int,
7606        w: *mut c_float,
7607        z: *mut lapack_complex_float,
7608        ldz: *const lapack_int,
7609        nzc: *const lapack_int,
7610        isuppz: *mut lapack_int,
7611        tryrac: *mut lapack_logical,
7612        work: *mut c_float,
7613        lwork: *const lapack_int,
7614        iwork: *mut lapack_int,
7615        liwork: *const lapack_int,
7616        info: *mut lapack_int,
7617    );
7618    pub fn zstemr_(
7619        jobz: *const c_char,
7620        range: *const c_char,
7621        n: *const lapack_int,
7622        d: *mut c_double,
7623        e: *mut c_double,
7624        vl: *const c_double,
7625        vu: *const c_double,
7626        il: *const lapack_int,
7627        iu: *const lapack_int,
7628        m: *mut lapack_int,
7629        w: *mut c_double,
7630        z: *mut lapack_complex_double,
7631        ldz: *const lapack_int,
7632        nzc: *const lapack_int,
7633        isuppz: *mut lapack_int,
7634        tryrac: *mut lapack_logical,
7635        work: *mut c_double,
7636        lwork: *const lapack_int,
7637        iwork: *mut lapack_int,
7638        liwork: *const lapack_int,
7639        info: *mut lapack_int,
7640    );
7641
7642    pub fn sstedc_(
7643        compz: *const c_char,
7644        n: *const lapack_int,
7645        d: *mut c_float,
7646        e: *mut c_float,
7647        z: *mut c_float,
7648        ldz: *const lapack_int,
7649        work: *mut c_float,
7650        lwork: *const lapack_int,
7651        iwork: *mut lapack_int,
7652        liwork: *const lapack_int,
7653        info: *mut lapack_int,
7654    );
7655    pub fn dstedc_(
7656        compz: *const c_char,
7657        n: *const lapack_int,
7658        d: *mut c_double,
7659        e: *mut c_double,
7660        z: *mut c_double,
7661        ldz: *const lapack_int,
7662        work: *mut c_double,
7663        lwork: *const lapack_int,
7664        iwork: *mut lapack_int,
7665        liwork: *const lapack_int,
7666        info: *mut lapack_int,
7667    );
7668    pub fn cstedc_(
7669        compz: *const c_char,
7670        n: *const lapack_int,
7671        d: *mut c_float,
7672        e: *mut c_float,
7673        z: *mut lapack_complex_float,
7674        ldz: *const lapack_int,
7675        work: *mut lapack_complex_float,
7676        lwork: *const lapack_int,
7677        rwork: *mut c_float,
7678        lrwork: *const lapack_int,
7679        iwork: *mut lapack_int,
7680        liwork: *const lapack_int,
7681        info: *mut lapack_int,
7682    );
7683    pub fn zstedc_(
7684        compz: *const c_char,
7685        n: *const lapack_int,
7686        d: *mut c_double,
7687        e: *mut c_double,
7688        z: *mut lapack_complex_double,
7689        ldz: *const lapack_int,
7690        work: *mut lapack_complex_double,
7691        lwork: *const lapack_int,
7692        rwork: *mut c_double,
7693        lrwork: *const lapack_int,
7694        iwork: *mut lapack_int,
7695        liwork: *const lapack_int,
7696        info: *mut lapack_int,
7697    );
7698
7699    pub fn sstegr_(
7700        jobz: *const c_char,
7701        range: *const c_char,
7702        n: *const lapack_int,
7703        d: *mut c_float,
7704        e: *mut c_float,
7705        vl: *const c_float,
7706        vu: *const c_float,
7707        il: *const lapack_int,
7708        iu: *const lapack_int,
7709        abstol: *const c_float,
7710        m: *mut lapack_int,
7711        w: *mut c_float,
7712        z: *mut c_float,
7713        ldz: *const lapack_int,
7714        isuppz: *mut lapack_int,
7715        work: *mut c_float,
7716        lwork: *const lapack_int,
7717        iwork: *mut lapack_int,
7718        liwork: *const lapack_int,
7719        info: *mut lapack_int,
7720    );
7721    pub fn dstegr_(
7722        jobz: *const c_char,
7723        range: *const c_char,
7724        n: *const lapack_int,
7725        d: *mut c_double,
7726        e: *mut c_double,
7727        vl: *const c_double,
7728        vu: *const c_double,
7729        il: *const lapack_int,
7730        iu: *const lapack_int,
7731        abstol: *const c_double,
7732        m: *mut lapack_int,
7733        w: *mut c_double,
7734        z: *mut c_double,
7735        ldz: *const lapack_int,
7736        isuppz: *mut lapack_int,
7737        work: *mut c_double,
7738        lwork: *const lapack_int,
7739        iwork: *mut lapack_int,
7740        liwork: *const lapack_int,
7741        info: *mut lapack_int,
7742    );
7743    pub fn cstegr_(
7744        jobz: *const c_char,
7745        range: *const c_char,
7746        n: *const lapack_int,
7747        d: *mut c_float,
7748        e: *mut c_float,
7749        vl: *const c_float,
7750        vu: *const c_float,
7751        il: *const lapack_int,
7752        iu: *const lapack_int,
7753        abstol: *const c_float,
7754        m: *mut lapack_int,
7755        w: *mut c_float,
7756        z: *mut lapack_complex_float,
7757        ldz: *const lapack_int,
7758        isuppz: *mut lapack_int,
7759        work: *mut c_float,
7760        lwork: *const lapack_int,
7761        iwork: *mut lapack_int,
7762        liwork: *const lapack_int,
7763        info: *mut lapack_int,
7764    );
7765    pub fn zstegr_(
7766        jobz: *const c_char,
7767        range: *const c_char,
7768        n: *const lapack_int,
7769        d: *mut c_double,
7770        e: *mut c_double,
7771        vl: *const c_double,
7772        vu: *const c_double,
7773        il: *const lapack_int,
7774        iu: *const lapack_int,
7775        abstol: *const c_double,
7776        m: *mut lapack_int,
7777        w: *mut c_double,
7778        z: *mut lapack_complex_double,
7779        ldz: *const lapack_int,
7780        isuppz: *mut lapack_int,
7781        work: *mut c_double,
7782        lwork: *const lapack_int,
7783        iwork: *mut lapack_int,
7784        liwork: *const lapack_int,
7785        info: *mut lapack_int,
7786    );
7787
7788    pub fn spteqr_(
7789        compz: *const c_char,
7790        n: *const lapack_int,
7791        d: *mut c_float,
7792        e: *mut c_float,
7793        z: *mut c_float,
7794        ldz: *const lapack_int,
7795        work: *mut c_float,
7796        info: *mut lapack_int,
7797    );
7798    pub fn dpteqr_(
7799        compz: *const c_char,
7800        n: *const lapack_int,
7801        d: *mut c_double,
7802        e: *mut c_double,
7803        z: *mut c_double,
7804        ldz: *const lapack_int,
7805        work: *mut c_double,
7806        info: *mut lapack_int,
7807    );
7808    pub fn cpteqr_(
7809        compz: *const c_char,
7810        n: *const lapack_int,
7811        d: *mut c_float,
7812        e: *mut c_float,
7813        z: *mut lapack_complex_float,
7814        ldz: *const lapack_int,
7815        work: *mut c_float,
7816        info: *mut lapack_int,
7817    );
7818    pub fn zpteqr_(
7819        compz: *const c_char,
7820        n: *const lapack_int,
7821        d: *mut c_double,
7822        e: *mut c_double,
7823        z: *mut lapack_complex_double,
7824        ldz: *const lapack_int,
7825        work: *mut c_double,
7826        info: *mut lapack_int,
7827    );
7828
7829    pub fn sstebz_(
7830        range: *const c_char,
7831        order: *const c_char,
7832        n: *const lapack_int,
7833        vl: *const c_float,
7834        vu: *const c_float,
7835        il: *const lapack_int,
7836        iu: *const lapack_int,
7837        abstol: *const c_float,
7838        d: *const c_float,
7839        e: *const c_float,
7840        m: *mut lapack_int,
7841        nsplit: *mut lapack_int,
7842        w: *mut c_float,
7843        iblock: *mut lapack_int,
7844        isplit: *mut lapack_int,
7845        work: *mut c_float,
7846        iwork: *mut lapack_int,
7847        info: *mut lapack_int,
7848    );
7849    pub fn dstebz_(
7850        range: *const c_char,
7851        order: *const c_char,
7852        n: *const lapack_int,
7853        vl: *const c_double,
7854        vu: *const c_double,
7855        il: *const lapack_int,
7856        iu: *const lapack_int,
7857        abstol: *const c_double,
7858        d: *const c_double,
7859        e: *const c_double,
7860        m: *mut lapack_int,
7861        nsplit: *mut lapack_int,
7862        w: *mut c_double,
7863        iblock: *mut lapack_int,
7864        isplit: *mut lapack_int,
7865        work: *mut c_double,
7866        iwork: *mut lapack_int,
7867        info: *mut lapack_int,
7868    );
7869
7870    pub fn sstein_(
7871        n: *const lapack_int,
7872        d: *const c_float,
7873        e: *const c_float,
7874        m: *const lapack_int,
7875        w: *const c_float,
7876        iblock: *const lapack_int,
7877        isplit: *const lapack_int,
7878        z: *mut c_float,
7879        ldz: *const lapack_int,
7880        work: *mut c_float,
7881        iwork: *mut lapack_int,
7882        ifail: *mut lapack_int,
7883        info: *mut lapack_int,
7884    );
7885    pub fn dstein_(
7886        n: *const lapack_int,
7887        d: *const c_double,
7888        e: *const c_double,
7889        m: *const lapack_int,
7890        w: *const c_double,
7891        iblock: *const lapack_int,
7892        isplit: *const lapack_int,
7893        z: *mut c_double,
7894        ldz: *const lapack_int,
7895        work: *mut c_double,
7896        iwork: *mut lapack_int,
7897        ifail: *mut lapack_int,
7898        info: *mut lapack_int,
7899    );
7900    pub fn cstein_(
7901        n: *const lapack_int,
7902        d: *const c_float,
7903        e: *const c_float,
7904        m: *const lapack_int,
7905        w: *const c_float,
7906        iblock: *const lapack_int,
7907        isplit: *const lapack_int,
7908        z: *mut lapack_complex_float,
7909        ldz: *const lapack_int,
7910        work: *mut c_float,
7911        iwork: *mut lapack_int,
7912        ifail: *mut lapack_int,
7913        info: *mut lapack_int,
7914    );
7915    pub fn zstein_(
7916        n: *const lapack_int,
7917        d: *const c_double,
7918        e: *const c_double,
7919        m: *const lapack_int,
7920        w: *const c_double,
7921        iblock: *const lapack_int,
7922        isplit: *const lapack_int,
7923        z: *mut lapack_complex_double,
7924        ldz: *const lapack_int,
7925        work: *mut c_double,
7926        iwork: *mut lapack_int,
7927        ifail: *mut lapack_int,
7928        info: *mut lapack_int,
7929    );
7930
7931    pub fn sdisna_(
7932        job: *const c_char,
7933        m: *const lapack_int,
7934        n: *const lapack_int,
7935        d: *const c_float,
7936        sep: *mut c_float,
7937        info: *mut lapack_int,
7938    );
7939    pub fn ddisna_(
7940        job: *const c_char,
7941        m: *const lapack_int,
7942        n: *const lapack_int,
7943        d: *const c_double,
7944        sep: *mut c_double,
7945        info: *mut lapack_int,
7946    );
7947
7948    pub fn ssygst_(
7949        itype: *const lapack_int,
7950        uplo: *const c_char,
7951        n: *const lapack_int,
7952        a: *mut c_float,
7953        lda: *const lapack_int,
7954        b: *const c_float,
7955        ldb: *const lapack_int,
7956        info: *mut lapack_int,
7957    );
7958    pub fn dsygst_(
7959        itype: *const lapack_int,
7960        uplo: *const c_char,
7961        n: *const lapack_int,
7962        a: *mut c_double,
7963        lda: *const lapack_int,
7964        b: *const c_double,
7965        ldb: *const lapack_int,
7966        info: *mut lapack_int,
7967    );
7968    pub fn chegst_(
7969        itype: *const lapack_int,
7970        uplo: *const c_char,
7971        n: *const lapack_int,
7972        a: *mut lapack_complex_float,
7973        lda: *const lapack_int,
7974        b: *const lapack_complex_float,
7975        ldb: *const lapack_int,
7976        info: *mut lapack_int,
7977    );
7978    pub fn zhegst_(
7979        itype: *const lapack_int,
7980        uplo: *const c_char,
7981        n: *const lapack_int,
7982        a: *mut lapack_complex_double,
7983        lda: *const lapack_int,
7984        b: *const lapack_complex_double,
7985        ldb: *const lapack_int,
7986        info: *mut lapack_int,
7987    );
7988
7989    pub fn sspgst_(
7990        itype: *const lapack_int,
7991        uplo: *const c_char,
7992        n: *const lapack_int,
7993        ap: *mut c_float,
7994        bp: *const c_float,
7995        info: *mut lapack_int,
7996    );
7997    pub fn dspgst_(
7998        itype: *const lapack_int,
7999        uplo: *const c_char,
8000        n: *const lapack_int,
8001        ap: *mut c_double,
8002        bp: *const c_double,
8003        info: *mut lapack_int,
8004    );
8005    pub fn chpgst_(
8006        itype: *const lapack_int,
8007        uplo: *const c_char,
8008        n: *const lapack_int,
8009        ap: *mut lapack_complex_float,
8010        bp: *const lapack_complex_float,
8011        info: *mut lapack_int,
8012    );
8013    pub fn zhpgst_(
8014        itype: *const lapack_int,
8015        uplo: *const c_char,
8016        n: *const lapack_int,
8017        ap: *mut lapack_complex_double,
8018        bp: *const lapack_complex_double,
8019        info: *mut lapack_int,
8020    );
8021
8022    pub fn ssbgst_(
8023        vect: *const c_char,
8024        uplo: *const c_char,
8025        n: *const lapack_int,
8026        ka: *const lapack_int,
8027        kb: *const lapack_int,
8028        ab: *mut c_float,
8029        ldab: *const lapack_int,
8030        bb: *const c_float,
8031        ldbb: *const lapack_int,
8032        x: *mut c_float,
8033        ldx: *const lapack_int,
8034        work: *mut c_float,
8035        info: *mut lapack_int,
8036    );
8037    pub fn dsbgst_(
8038        vect: *const c_char,
8039        uplo: *const c_char,
8040        n: *const lapack_int,
8041        ka: *const lapack_int,
8042        kb: *const lapack_int,
8043        ab: *mut c_double,
8044        ldab: *const lapack_int,
8045        bb: *const c_double,
8046        ldbb: *const lapack_int,
8047        x: *mut c_double,
8048        ldx: *const lapack_int,
8049        work: *mut c_double,
8050        info: *mut lapack_int,
8051    );
8052    pub fn chbgst_(
8053        vect: *const c_char,
8054        uplo: *const c_char,
8055        n: *const lapack_int,
8056        ka: *const lapack_int,
8057        kb: *const lapack_int,
8058        ab: *mut lapack_complex_float,
8059        ldab: *const lapack_int,
8060        bb: *const lapack_complex_float,
8061        ldbb: *const lapack_int,
8062        x: *mut lapack_complex_float,
8063        ldx: *const lapack_int,
8064        work: *mut lapack_complex_float,
8065        rwork: *mut c_float,
8066        info: *mut lapack_int,
8067    );
8068    pub fn zhbgst_(
8069        vect: *const c_char,
8070        uplo: *const c_char,
8071        n: *const lapack_int,
8072        ka: *const lapack_int,
8073        kb: *const lapack_int,
8074        ab: *mut lapack_complex_double,
8075        ldab: *const lapack_int,
8076        bb: *const lapack_complex_double,
8077        ldbb: *const lapack_int,
8078        x: *mut lapack_complex_double,
8079        ldx: *const lapack_int,
8080        work: *mut lapack_complex_double,
8081        rwork: *mut c_double,
8082        info: *mut lapack_int,
8083    );
8084
8085    pub fn spbstf_(
8086        uplo: *const c_char,
8087        n: *const lapack_int,
8088        kd: *const lapack_int,
8089        ab: *mut c_float,
8090        ldab: *const lapack_int,
8091        info: *mut lapack_int,
8092    );
8093    pub fn dpbstf_(
8094        uplo: *const c_char,
8095        n: *const lapack_int,
8096        kd: *const lapack_int,
8097        ab: *mut c_double,
8098        ldab: *const lapack_int,
8099        info: *mut lapack_int,
8100    );
8101    pub fn cpbstf_(
8102        uplo: *const c_char,
8103        n: *const lapack_int,
8104        kd: *const lapack_int,
8105        ab: *mut lapack_complex_float,
8106        ldab: *const lapack_int,
8107        info: *mut lapack_int,
8108    );
8109    pub fn zpbstf_(
8110        uplo: *const c_char,
8111        n: *const lapack_int,
8112        kd: *const lapack_int,
8113        ab: *mut lapack_complex_double,
8114        ldab: *const lapack_int,
8115        info: *mut lapack_int,
8116    );
8117
8118    pub fn sgehrd_(
8119        n: *const lapack_int,
8120        ilo: *const lapack_int,
8121        ihi: *const lapack_int,
8122        a: *mut c_float,
8123        lda: *const lapack_int,
8124        tau: *mut c_float,
8125        work: *mut c_float,
8126        lwork: *const lapack_int,
8127        info: *mut lapack_int,
8128    );
8129    pub fn dgehrd_(
8130        n: *const lapack_int,
8131        ilo: *const lapack_int,
8132        ihi: *const lapack_int,
8133        a: *mut c_double,
8134        lda: *const lapack_int,
8135        tau: *mut c_double,
8136        work: *mut c_double,
8137        lwork: *const lapack_int,
8138        info: *mut lapack_int,
8139    );
8140    pub fn cgehrd_(
8141        n: *const lapack_int,
8142        ilo: *const lapack_int,
8143        ihi: *const lapack_int,
8144        a: *mut lapack_complex_float,
8145        lda: *const lapack_int,
8146        tau: *mut lapack_complex_float,
8147        work: *mut lapack_complex_float,
8148        lwork: *const lapack_int,
8149        info: *mut lapack_int,
8150    );
8151    pub fn zgehrd_(
8152        n: *const lapack_int,
8153        ilo: *const lapack_int,
8154        ihi: *const lapack_int,
8155        a: *mut lapack_complex_double,
8156        lda: *const lapack_int,
8157        tau: *mut lapack_complex_double,
8158        work: *mut lapack_complex_double,
8159        lwork: *const lapack_int,
8160        info: *mut lapack_int,
8161    );
8162
8163    pub fn sorghr_(
8164        n: *const lapack_int,
8165        ilo: *const lapack_int,
8166        ihi: *const lapack_int,
8167        a: *mut c_float,
8168        lda: *const lapack_int,
8169        tau: *const c_float,
8170        work: *mut c_float,
8171        lwork: *const lapack_int,
8172        info: *mut lapack_int,
8173    );
8174    pub fn dorghr_(
8175        n: *const lapack_int,
8176        ilo: *const lapack_int,
8177        ihi: *const lapack_int,
8178        a: *mut c_double,
8179        lda: *const lapack_int,
8180        tau: *const c_double,
8181        work: *mut c_double,
8182        lwork: *const lapack_int,
8183        info: *mut lapack_int,
8184    );
8185
8186    pub fn sormhr_(
8187        side: *const c_char,
8188        trans: *const c_char,
8189        m: *const lapack_int,
8190        n: *const lapack_int,
8191        ilo: *const lapack_int,
8192        ihi: *const lapack_int,
8193        a: *const c_float,
8194        lda: *const lapack_int,
8195        tau: *const c_float,
8196        c: *mut c_float,
8197        ldc: *const lapack_int,
8198        work: *mut c_float,
8199        lwork: *const lapack_int,
8200        info: *mut lapack_int,
8201    );
8202    pub fn dormhr_(
8203        side: *const c_char,
8204        trans: *const c_char,
8205        m: *const lapack_int,
8206        n: *const lapack_int,
8207        ilo: *const lapack_int,
8208        ihi: *const lapack_int,
8209        a: *const c_double,
8210        lda: *const lapack_int,
8211        tau: *const c_double,
8212        c: *mut c_double,
8213        ldc: *const lapack_int,
8214        work: *mut c_double,
8215        lwork: *const lapack_int,
8216        info: *mut lapack_int,
8217    );
8218
8219    pub fn cunghr_(
8220        n: *const lapack_int,
8221        ilo: *const lapack_int,
8222        ihi: *const lapack_int,
8223        a: *mut lapack_complex_float,
8224        lda: *const lapack_int,
8225        tau: *const lapack_complex_float,
8226        work: *mut lapack_complex_float,
8227        lwork: *const lapack_int,
8228        info: *mut lapack_int,
8229    );
8230    pub fn zunghr_(
8231        n: *const lapack_int,
8232        ilo: *const lapack_int,
8233        ihi: *const lapack_int,
8234        a: *mut lapack_complex_double,
8235        lda: *const lapack_int,
8236        tau: *const lapack_complex_double,
8237        work: *mut lapack_complex_double,
8238        lwork: *const lapack_int,
8239        info: *mut lapack_int,
8240    );
8241
8242    pub fn cunmhr_(
8243        side: *const c_char,
8244        trans: *const c_char,
8245        m: *const lapack_int,
8246        n: *const lapack_int,
8247        ilo: *const lapack_int,
8248        ihi: *const lapack_int,
8249        a: *const lapack_complex_float,
8250        lda: *const lapack_int,
8251        tau: *const lapack_complex_float,
8252        c: *mut lapack_complex_float,
8253        ldc: *const lapack_int,
8254        work: *mut lapack_complex_float,
8255        lwork: *const lapack_int,
8256        info: *mut lapack_int,
8257    );
8258    pub fn zunmhr_(
8259        side: *const c_char,
8260        trans: *const c_char,
8261        m: *const lapack_int,
8262        n: *const lapack_int,
8263        ilo: *const lapack_int,
8264        ihi: *const lapack_int,
8265        a: *const lapack_complex_double,
8266        lda: *const lapack_int,
8267        tau: *const lapack_complex_double,
8268        c: *mut lapack_complex_double,
8269        ldc: *const lapack_int,
8270        work: *mut lapack_complex_double,
8271        lwork: *const lapack_int,
8272        info: *mut lapack_int,
8273    );
8274
8275    pub fn sgebal_(
8276        job: *const c_char,
8277        n: *const lapack_int,
8278        a: *mut c_float,
8279        lda: *const lapack_int,
8280        ilo: *mut lapack_int,
8281        ihi: *mut lapack_int,
8282        scale: *mut c_float,
8283        info: *mut lapack_int,
8284    );
8285    pub fn dgebal_(
8286        job: *const c_char,
8287        n: *const lapack_int,
8288        a: *mut c_double,
8289        lda: *const lapack_int,
8290        ilo: *mut lapack_int,
8291        ihi: *mut lapack_int,
8292        scale: *mut c_double,
8293        info: *mut lapack_int,
8294    );
8295    pub fn cgebal_(
8296        job: *const c_char,
8297        n: *const lapack_int,
8298        a: *mut lapack_complex_float,
8299        lda: *const lapack_int,
8300        ilo: *mut lapack_int,
8301        ihi: *mut lapack_int,
8302        scale: *mut c_float,
8303        info: *mut lapack_int,
8304    );
8305    pub fn zgebal_(
8306        job: *const c_char,
8307        n: *const lapack_int,
8308        a: *mut lapack_complex_double,
8309        lda: *const lapack_int,
8310        ilo: *mut lapack_int,
8311        ihi: *mut lapack_int,
8312        scale: *mut c_double,
8313        info: *mut lapack_int,
8314    );
8315
8316    pub fn sgebak_(
8317        job: *const c_char,
8318        side: *const c_char,
8319        n: *const lapack_int,
8320        ilo: *const lapack_int,
8321        ihi: *const lapack_int,
8322        scale: *const c_float,
8323        m: *const lapack_int,
8324        v: *mut c_float,
8325        ldv: *const lapack_int,
8326        info: *mut lapack_int,
8327    );
8328    pub fn dgebak_(
8329        job: *const c_char,
8330        side: *const c_char,
8331        n: *const lapack_int,
8332        ilo: *const lapack_int,
8333        ihi: *const lapack_int,
8334        scale: *const c_double,
8335        m: *const lapack_int,
8336        v: *mut c_double,
8337        ldv: *const lapack_int,
8338        info: *mut lapack_int,
8339    );
8340    pub fn cgebak_(
8341        job: *const c_char,
8342        side: *const c_char,
8343        n: *const lapack_int,
8344        ilo: *const lapack_int,
8345        ihi: *const lapack_int,
8346        scale: *const c_float,
8347        m: *const lapack_int,
8348        v: *mut lapack_complex_float,
8349        ldv: *const lapack_int,
8350        info: *mut lapack_int,
8351    );
8352    pub fn zgebak_(
8353        job: *const c_char,
8354        side: *const c_char,
8355        n: *const lapack_int,
8356        ilo: *const lapack_int,
8357        ihi: *const lapack_int,
8358        scale: *const c_double,
8359        m: *const lapack_int,
8360        v: *mut lapack_complex_double,
8361        ldv: *const lapack_int,
8362        info: *mut lapack_int,
8363    );
8364
8365    pub fn shseqr_(
8366        job: *const c_char,
8367        compz: *const c_char,
8368        n: *const lapack_int,
8369        ilo: *const lapack_int,
8370        ihi: *const lapack_int,
8371        h: *mut c_float,
8372        ldh: *const lapack_int,
8373        wr: *mut c_float,
8374        wi: *mut c_float,
8375        z: *mut c_float,
8376        ldz: *const lapack_int,
8377        work: *mut c_float,
8378        lwork: *const lapack_int,
8379        info: *mut lapack_int,
8380    );
8381    pub fn dhseqr_(
8382        job: *const c_char,
8383        compz: *const c_char,
8384        n: *const lapack_int,
8385        ilo: *const lapack_int,
8386        ihi: *const lapack_int,
8387        h: *mut c_double,
8388        ldh: *const lapack_int,
8389        wr: *mut c_double,
8390        wi: *mut c_double,
8391        z: *mut c_double,
8392        ldz: *const lapack_int,
8393        work: *mut c_double,
8394        lwork: *const lapack_int,
8395        info: *mut lapack_int,
8396    );
8397    pub fn chseqr_(
8398        job: *const c_char,
8399        compz: *const c_char,
8400        n: *const lapack_int,
8401        ilo: *const lapack_int,
8402        ihi: *const lapack_int,
8403        h: *mut lapack_complex_float,
8404        ldh: *const lapack_int,
8405        w: *mut lapack_complex_float,
8406        z: *mut lapack_complex_float,
8407        ldz: *const lapack_int,
8408        work: *mut lapack_complex_float,
8409        lwork: *const lapack_int,
8410        info: *mut lapack_int,
8411    );
8412    pub fn zhseqr_(
8413        job: *const c_char,
8414        compz: *const c_char,
8415        n: *const lapack_int,
8416        ilo: *const lapack_int,
8417        ihi: *const lapack_int,
8418        h: *mut lapack_complex_double,
8419        ldh: *const lapack_int,
8420        w: *mut lapack_complex_double,
8421        z: *mut lapack_complex_double,
8422        ldz: *const lapack_int,
8423        work: *mut lapack_complex_double,
8424        lwork: *const lapack_int,
8425        info: *mut lapack_int,
8426    );
8427
8428    pub fn shsein_(
8429        job: *const c_char,
8430        eigsrc: *const c_char,
8431        initv: *const c_char,
8432        select: *mut lapack_logical,
8433        n: *const lapack_int,
8434        h: *const c_float,
8435        ldh: *const lapack_int,
8436        wr: *mut c_float,
8437        wi: *const c_float,
8438        vl: *mut c_float,
8439        ldvl: *const lapack_int,
8440        vr: *mut c_float,
8441        ldvr: *const lapack_int,
8442        mm: *const lapack_int,
8443        m: *mut lapack_int,
8444        work: *mut c_float,
8445        ifaill: *mut lapack_int,
8446        ifailr: *mut lapack_int,
8447        info: *mut lapack_int,
8448    );
8449    pub fn dhsein_(
8450        job: *const c_char,
8451        eigsrc: *const c_char,
8452        initv: *const c_char,
8453        select: *mut lapack_logical,
8454        n: *const lapack_int,
8455        h: *const c_double,
8456        ldh: *const lapack_int,
8457        wr: *mut c_double,
8458        wi: *const c_double,
8459        vl: *mut c_double,
8460        ldvl: *const lapack_int,
8461        vr: *mut c_double,
8462        ldvr: *const lapack_int,
8463        mm: *const lapack_int,
8464        m: *mut lapack_int,
8465        work: *mut c_double,
8466        ifaill: *mut lapack_int,
8467        ifailr: *mut lapack_int,
8468        info: *mut lapack_int,
8469    );
8470    pub fn chsein_(
8471        job: *const c_char,
8472        eigsrc: *const c_char,
8473        initv: *const c_char,
8474        select: *const lapack_logical,
8475        n: *const lapack_int,
8476        h: *const lapack_complex_float,
8477        ldh: *const lapack_int,
8478        w: *mut lapack_complex_float,
8479        vl: *mut lapack_complex_float,
8480        ldvl: *const lapack_int,
8481        vr: *mut lapack_complex_float,
8482        ldvr: *const lapack_int,
8483        mm: *const lapack_int,
8484        m: *mut lapack_int,
8485        work: *mut lapack_complex_float,
8486        rwork: *mut c_float,
8487        ifaill: *mut lapack_int,
8488        ifailr: *mut lapack_int,
8489        info: *mut lapack_int,
8490    );
8491    pub fn zhsein_(
8492        job: *const c_char,
8493        eigsrc: *const c_char,
8494        initv: *const c_char,
8495        select: *const lapack_logical,
8496        n: *const lapack_int,
8497        h: *const lapack_complex_double,
8498        ldh: *const lapack_int,
8499        w: *mut lapack_complex_double,
8500        vl: *mut lapack_complex_double,
8501        ldvl: *const lapack_int,
8502        vr: *mut lapack_complex_double,
8503        ldvr: *const lapack_int,
8504        mm: *const lapack_int,
8505        m: *mut lapack_int,
8506        work: *mut lapack_complex_double,
8507        rwork: *mut c_double,
8508        ifaill: *mut lapack_int,
8509        ifailr: *mut lapack_int,
8510        info: *mut lapack_int,
8511    );
8512
8513    pub fn strevc_(
8514        side: *const c_char,
8515        howmny: *const c_char,
8516        select: *mut lapack_logical,
8517        n: *const lapack_int,
8518        t: *const c_float,
8519        ldt: *const lapack_int,
8520        vl: *mut c_float,
8521        ldvl: *const lapack_int,
8522        vr: *mut c_float,
8523        ldvr: *const lapack_int,
8524        mm: *const lapack_int,
8525        m: *mut lapack_int,
8526        work: *mut c_float,
8527        info: *mut lapack_int,
8528    );
8529    pub fn dtrevc_(
8530        side: *const c_char,
8531        howmny: *const c_char,
8532        select: *mut lapack_logical,
8533        n: *const lapack_int,
8534        t: *const c_double,
8535        ldt: *const lapack_int,
8536        vl: *mut c_double,
8537        ldvl: *const lapack_int,
8538        vr: *mut c_double,
8539        ldvr: *const lapack_int,
8540        mm: *const lapack_int,
8541        m: *mut lapack_int,
8542        work: *mut c_double,
8543        info: *mut lapack_int,
8544    );
8545    pub fn ctrevc_(
8546        side: *const c_char,
8547        howmny: *const c_char,
8548        select: *const lapack_logical,
8549        n: *const lapack_int,
8550        t: *mut lapack_complex_float,
8551        ldt: *const lapack_int,
8552        vl: *mut lapack_complex_float,
8553        ldvl: *const lapack_int,
8554        vr: *mut lapack_complex_float,
8555        ldvr: *const lapack_int,
8556        mm: *const lapack_int,
8557        m: *mut lapack_int,
8558        work: *mut lapack_complex_float,
8559        rwork: *mut c_float,
8560        info: *mut lapack_int,
8561    );
8562    pub fn ztrevc_(
8563        side: *const c_char,
8564        howmny: *const c_char,
8565        select: *const lapack_logical,
8566        n: *const lapack_int,
8567        t: *mut lapack_complex_double,
8568        ldt: *const lapack_int,
8569        vl: *mut lapack_complex_double,
8570        ldvl: *const lapack_int,
8571        vr: *mut lapack_complex_double,
8572        ldvr: *const lapack_int,
8573        mm: *const lapack_int,
8574        m: *mut lapack_int,
8575        work: *mut lapack_complex_double,
8576        rwork: *mut c_double,
8577        info: *mut lapack_int,
8578    );
8579
8580    pub fn strsna_(
8581        job: *const c_char,
8582        howmny: *const c_char,
8583        select: *const lapack_logical,
8584        n: *const lapack_int,
8585        t: *const c_float,
8586        ldt: *const lapack_int,
8587        vl: *const c_float,
8588        ldvl: *const lapack_int,
8589        vr: *const c_float,
8590        ldvr: *const lapack_int,
8591        s: *mut c_float,
8592        sep: *mut c_float,
8593        mm: *const lapack_int,
8594        m: *mut lapack_int,
8595        work: *mut c_float,
8596        ldwork: *const lapack_int,
8597        iwork: *mut lapack_int,
8598        info: *mut lapack_int,
8599    );
8600    pub fn dtrsna_(
8601        job: *const c_char,
8602        howmny: *const c_char,
8603        select: *const lapack_logical,
8604        n: *const lapack_int,
8605        t: *const c_double,
8606        ldt: *const lapack_int,
8607        vl: *const c_double,
8608        ldvl: *const lapack_int,
8609        vr: *const c_double,
8610        ldvr: *const lapack_int,
8611        s: *mut c_double,
8612        sep: *mut c_double,
8613        mm: *const lapack_int,
8614        m: *mut lapack_int,
8615        work: *mut c_double,
8616        ldwork: *const lapack_int,
8617        iwork: *mut lapack_int,
8618        info: *mut lapack_int,
8619    );
8620    pub fn ctrsna_(
8621        job: *const c_char,
8622        howmny: *const c_char,
8623        select: *const lapack_logical,
8624        n: *const lapack_int,
8625        t: *const lapack_complex_float,
8626        ldt: *const lapack_int,
8627        vl: *const lapack_complex_float,
8628        ldvl: *const lapack_int,
8629        vr: *const lapack_complex_float,
8630        ldvr: *const lapack_int,
8631        s: *mut c_float,
8632        sep: *mut c_float,
8633        mm: *const lapack_int,
8634        m: *mut lapack_int,
8635        work: *mut lapack_complex_float,
8636        ldwork: *const lapack_int,
8637        rwork: *mut c_float,
8638        info: *mut lapack_int,
8639    );
8640    pub fn ztrsna_(
8641        job: *const c_char,
8642        howmny: *const c_char,
8643        select: *const lapack_logical,
8644        n: *const lapack_int,
8645        t: *const lapack_complex_double,
8646        ldt: *const lapack_int,
8647        vl: *const lapack_complex_double,
8648        ldvl: *const lapack_int,
8649        vr: *const lapack_complex_double,
8650        ldvr: *const lapack_int,
8651        s: *mut c_double,
8652        sep: *mut c_double,
8653        mm: *const lapack_int,
8654        m: *mut lapack_int,
8655        work: *mut lapack_complex_double,
8656        ldwork: *const lapack_int,
8657        rwork: *mut c_double,
8658        info: *mut lapack_int,
8659    );
8660
8661    pub fn strexc_(
8662        compq: *const c_char,
8663        n: *const lapack_int,
8664        t: *mut c_float,
8665        ldt: *const lapack_int,
8666        q: *mut c_float,
8667        ldq: *const lapack_int,
8668        ifst: *const lapack_int,
8669        ilst: *mut lapack_int,
8670        work: *mut c_float,
8671        info: *mut lapack_int,
8672    );
8673    pub fn dtrexc_(
8674        compq: *const c_char,
8675        n: *const lapack_int,
8676        t: *mut c_double,
8677        ldt: *const lapack_int,
8678        q: *mut c_double,
8679        ldq: *const lapack_int,
8680        ifst: *const lapack_int,
8681        ilst: *mut lapack_int,
8682        work: *mut c_double,
8683        info: *mut lapack_int,
8684    );
8685    pub fn ctrexc_(
8686        compq: *const c_char,
8687        n: *const lapack_int,
8688        t: *mut lapack_complex_float,
8689        ldt: *const lapack_int,
8690        q: *mut lapack_complex_float,
8691        ldq: *const lapack_int,
8692        ifst: *const lapack_int,
8693        ilst: *const lapack_int,
8694        info: *const lapack_int,
8695    );
8696    pub fn ztrexc_(
8697        compq: *const c_char,
8698        n: *const lapack_int,
8699        t: *mut lapack_complex_double,
8700        ldt: *const lapack_int,
8701        q: *mut lapack_complex_double,
8702        ldq: *const lapack_int,
8703        ifst: *const lapack_int,
8704        ilst: *const lapack_int,
8705        info: *const lapack_int,
8706    );
8707
8708    pub fn strsen_(
8709        job: *const c_char,
8710        compq: *const c_char,
8711        select: *const lapack_logical,
8712        n: *const lapack_int,
8713        t: *mut c_float,
8714        ldt: *const lapack_int,
8715        q: *mut c_float,
8716        ldq: *const lapack_int,
8717        wr: *mut c_float,
8718        wi: *mut c_float,
8719        m: *mut lapack_int,
8720        s: *mut c_float,
8721        sep: *mut c_float,
8722        work: *mut c_float,
8723        lwork: *const lapack_int,
8724        iwork: *mut lapack_int,
8725        liwork: *const lapack_int,
8726        info: *mut lapack_int,
8727    );
8728    pub fn dtrsen_(
8729        job: *const c_char,
8730        compq: *const c_char,
8731        select: *const lapack_logical,
8732        n: *const lapack_int,
8733        t: *mut c_double,
8734        ldt: *const lapack_int,
8735        q: *mut c_double,
8736        ldq: *const lapack_int,
8737        wr: *mut c_double,
8738        wi: *mut c_double,
8739        m: *mut lapack_int,
8740        s: *mut c_double,
8741        sep: *mut c_double,
8742        work: *mut c_double,
8743        lwork: *const lapack_int,
8744        iwork: *mut lapack_int,
8745        liwork: *const lapack_int,
8746        info: *mut lapack_int,
8747    );
8748    pub fn ctrsen_(
8749        job: *const c_char,
8750        compq: *const c_char,
8751        select: *const lapack_logical,
8752        n: *const lapack_int,
8753        t: *mut lapack_complex_float,
8754        ldt: *const lapack_int,
8755        q: *mut lapack_complex_float,
8756        ldq: *const lapack_int,
8757        w: *mut lapack_complex_float,
8758        m: *mut lapack_int,
8759        s: *mut c_float,
8760        sep: *mut c_float,
8761        work: *mut lapack_complex_float,
8762        lwork: *const lapack_int,
8763        info: *mut lapack_int,
8764    );
8765    pub fn ztrsen_(
8766        job: *const c_char,
8767        compq: *const c_char,
8768        select: *const lapack_logical,
8769        n: *const lapack_int,
8770        t: *mut lapack_complex_double,
8771        ldt: *const lapack_int,
8772        q: *mut lapack_complex_double,
8773        ldq: *const lapack_int,
8774        w: *mut lapack_complex_double,
8775        m: *mut lapack_int,
8776        s: *mut c_double,
8777        sep: *mut c_double,
8778        work: *mut lapack_complex_double,
8779        lwork: *const lapack_int,
8780        info: *mut lapack_int,
8781    );
8782
8783    pub fn strsyl_(
8784        trana: *const c_char,
8785        tranb: *const c_char,
8786        isgn: *const lapack_int,
8787        m: *const lapack_int,
8788        n: *const lapack_int,
8789        a: *const c_float,
8790        lda: *const lapack_int,
8791        b: *const c_float,
8792        ldb: *const lapack_int,
8793        c: *mut c_float,
8794        ldc: *const lapack_int,
8795        scale: *mut c_float,
8796        info: *mut lapack_int,
8797    );
8798    pub fn dtrsyl_(
8799        trana: *const c_char,
8800        tranb: *const c_char,
8801        isgn: *const lapack_int,
8802        m: *const lapack_int,
8803        n: *const lapack_int,
8804        a: *const c_double,
8805        lda: *const lapack_int,
8806        b: *const c_double,
8807        ldb: *const lapack_int,
8808        c: *mut c_double,
8809        ldc: *const lapack_int,
8810        scale: *mut c_double,
8811        info: *mut lapack_int,
8812    );
8813    pub fn ctrsyl_(
8814        trana: *const c_char,
8815        tranb: *const c_char,
8816        isgn: *const lapack_int,
8817        m: *const lapack_int,
8818        n: *const lapack_int,
8819        a: *const lapack_complex_float,
8820        lda: *const lapack_int,
8821        b: *const lapack_complex_float,
8822        ldb: *const lapack_int,
8823        c: *mut lapack_complex_float,
8824        ldc: *const lapack_int,
8825        scale: *mut c_float,
8826        info: *mut lapack_int,
8827    );
8828    pub fn ztrsyl_(
8829        trana: *const c_char,
8830        tranb: *const c_char,
8831        isgn: *const lapack_int,
8832        m: *const lapack_int,
8833        n: *const lapack_int,
8834        a: *const lapack_complex_double,
8835        lda: *const lapack_int,
8836        b: *const lapack_complex_double,
8837        ldb: *const lapack_int,
8838        c: *mut lapack_complex_double,
8839        ldc: *const lapack_int,
8840        scale: *mut c_double,
8841        info: *mut lapack_int,
8842    );
8843
8844    pub fn sgghrd_(
8845        compq: *const c_char,
8846        compz: *const c_char,
8847        n: *const lapack_int,
8848        ilo: *const lapack_int,
8849        ihi: *const lapack_int,
8850        a: *mut c_float,
8851        lda: *const lapack_int,
8852        b: *mut c_float,
8853        ldb: *const lapack_int,
8854        q: *mut c_float,
8855        ldq: *const lapack_int,
8856        z: *mut c_float,
8857        ldz: *const lapack_int,
8858        info: *mut lapack_int,
8859    );
8860    pub fn dgghrd_(
8861        compq: *const c_char,
8862        compz: *const c_char,
8863        n: *const lapack_int,
8864        ilo: *const lapack_int,
8865        ihi: *const lapack_int,
8866        a: *mut c_double,
8867        lda: *const lapack_int,
8868        b: *mut c_double,
8869        ldb: *const lapack_int,
8870        q: *mut c_double,
8871        ldq: *const lapack_int,
8872        z: *mut c_double,
8873        ldz: *const lapack_int,
8874        info: *mut lapack_int,
8875    );
8876    pub fn cgghrd_(
8877        compq: *const c_char,
8878        compz: *const c_char,
8879        n: *const lapack_int,
8880        ilo: *const lapack_int,
8881        ihi: *const lapack_int,
8882        a: *mut lapack_complex_float,
8883        lda: *const lapack_int,
8884        b: *mut lapack_complex_float,
8885        ldb: *const lapack_int,
8886        q: *mut lapack_complex_float,
8887        ldq: *const lapack_int,
8888        z: *mut lapack_complex_float,
8889        ldz: *const lapack_int,
8890        info: *mut lapack_int,
8891    );
8892    pub fn zgghrd_(
8893        compq: *const c_char,
8894        compz: *const c_char,
8895        n: *const lapack_int,
8896        ilo: *const lapack_int,
8897        ihi: *const lapack_int,
8898        a: *mut lapack_complex_double,
8899        lda: *const lapack_int,
8900        b: *mut lapack_complex_double,
8901        ldb: *const lapack_int,
8902        q: *mut lapack_complex_double,
8903        ldq: *const lapack_int,
8904        z: *mut lapack_complex_double,
8905        ldz: *const lapack_int,
8906        info: *mut lapack_int,
8907    );
8908
8909    pub fn sgghd3_(
8910        compq: *const c_char,
8911        compz: *const c_char,
8912        n: *const lapack_int,
8913        ilo: *const lapack_int,
8914        ihi: *const lapack_int,
8915        a: *mut c_float,
8916        lda: *const lapack_int,
8917        b: *mut c_float,
8918        ldb: *const lapack_int,
8919        q: *mut c_float,
8920        ldq: *const lapack_int,
8921        z: *mut c_float,
8922        ldz: *const lapack_int,
8923        work: *mut c_float,
8924        lwork: *const lapack_int,
8925        info: *mut lapack_int,
8926    );
8927    pub fn dgghd3_(
8928        compq: *const c_char,
8929        compz: *const c_char,
8930        n: *const lapack_int,
8931        ilo: *const lapack_int,
8932        ihi: *const lapack_int,
8933        a: *mut c_double,
8934        lda: *const lapack_int,
8935        b: *mut c_double,
8936        ldb: *const lapack_int,
8937        q: *mut c_double,
8938        ldq: *const lapack_int,
8939        z: *mut c_double,
8940        ldz: *const lapack_int,
8941        work: *mut c_double,
8942        lwork: *const lapack_int,
8943        info: *mut lapack_int,
8944    );
8945    pub fn cgghd3_(
8946        compq: *const c_char,
8947        compz: *const c_char,
8948        n: *const lapack_int,
8949        ilo: *const lapack_int,
8950        ihi: *const lapack_int,
8951        a: *mut lapack_complex_float,
8952        lda: *const lapack_int,
8953        b: *mut lapack_complex_float,
8954        ldb: *const lapack_int,
8955        q: *mut lapack_complex_float,
8956        ldq: *const lapack_int,
8957        z: *mut lapack_complex_float,
8958        ldz: *const lapack_int,
8959        work: *mut lapack_complex_float,
8960        lwork: *const lapack_int,
8961        info: *mut lapack_int,
8962    );
8963    pub fn zgghd3_(
8964        compq: *const c_char,
8965        compz: *const c_char,
8966        n: *const lapack_int,
8967        ilo: *const lapack_int,
8968        ihi: *const lapack_int,
8969        a: *mut lapack_complex_double,
8970        lda: *const lapack_int,
8971        b: *mut lapack_complex_double,
8972        ldb: *const lapack_int,
8973        q: *mut lapack_complex_double,
8974        ldq: *const lapack_int,
8975        z: *mut lapack_complex_double,
8976        ldz: *const lapack_int,
8977        work: *mut lapack_complex_double,
8978        lwork: *const lapack_int,
8979        info: *mut lapack_int,
8980    );
8981
8982    pub fn sggbal_(
8983        job: *const c_char,
8984        n: *const lapack_int,
8985        a: *mut c_float,
8986        lda: *const lapack_int,
8987        b: *mut c_float,
8988        ldb: *const lapack_int,
8989        ilo: *mut lapack_int,
8990        ihi: *mut lapack_int,
8991        lscale: *mut c_float,
8992        rscale: *mut c_float,
8993        work: *mut c_float,
8994        info: *mut lapack_int,
8995    );
8996    pub fn dggbal_(
8997        job: *const c_char,
8998        n: *const lapack_int,
8999        a: *mut c_double,
9000        lda: *const lapack_int,
9001        b: *mut c_double,
9002        ldb: *const lapack_int,
9003        ilo: *mut lapack_int,
9004        ihi: *mut lapack_int,
9005        lscale: *mut c_double,
9006        rscale: *mut c_double,
9007        work: *mut c_double,
9008        info: *mut lapack_int,
9009    );
9010    pub fn cggbal_(
9011        job: *const c_char,
9012        n: *const lapack_int,
9013        a: *mut lapack_complex_float,
9014        lda: *const lapack_int,
9015        b: *mut lapack_complex_float,
9016        ldb: *const lapack_int,
9017        ilo: *mut lapack_int,
9018        ihi: *mut lapack_int,
9019        lscale: *mut c_float,
9020        rscale: *mut c_float,
9021        work: *mut c_float,
9022        info: *mut lapack_int,
9023    );
9024    pub fn zggbal_(
9025        job: *const c_char,
9026        n: *const lapack_int,
9027        a: *mut lapack_complex_double,
9028        lda: *const lapack_int,
9029        b: *mut lapack_complex_double,
9030        ldb: *const lapack_int,
9031        ilo: *mut lapack_int,
9032        ihi: *mut lapack_int,
9033        lscale: *mut c_double,
9034        rscale: *mut c_double,
9035        work: *mut c_double,
9036        info: *mut lapack_int,
9037    );
9038
9039    pub fn sggbak_(
9040        job: *const c_char,
9041        side: *const c_char,
9042        n: *const lapack_int,
9043        ilo: *const lapack_int,
9044        ihi: *const lapack_int,
9045        lscale: *const c_float,
9046        rscale: *const c_float,
9047        m: *const lapack_int,
9048        v: *mut c_float,
9049        ldv: *const lapack_int,
9050        info: *mut lapack_int,
9051    );
9052    pub fn dggbak_(
9053        job: *const c_char,
9054        side: *const c_char,
9055        n: *const lapack_int,
9056        ilo: *const lapack_int,
9057        ihi: *const lapack_int,
9058        lscale: *const c_double,
9059        rscale: *const c_double,
9060        m: *const lapack_int,
9061        v: *mut c_double,
9062        ldv: *const lapack_int,
9063        info: *mut lapack_int,
9064    );
9065    pub fn cggbak_(
9066        job: *const c_char,
9067        side: *const c_char,
9068        n: *const lapack_int,
9069        ilo: *const lapack_int,
9070        ihi: *const lapack_int,
9071        lscale: *const c_float,
9072        rscale: *const c_float,
9073        m: *const lapack_int,
9074        v: *mut lapack_complex_float,
9075        ldv: *const lapack_int,
9076        info: *mut lapack_int,
9077    );
9078    pub fn zggbak_(
9079        job: *const c_char,
9080        side: *const c_char,
9081        n: *const lapack_int,
9082        ilo: *const lapack_int,
9083        ihi: *const lapack_int,
9084        lscale: *const c_double,
9085        rscale: *const c_double,
9086        m: *const lapack_int,
9087        v: *mut lapack_complex_double,
9088        ldv: *const lapack_int,
9089        info: *mut lapack_int,
9090    );
9091
9092    pub fn shgeqz_(
9093        job: *const c_char,
9094        compq: *const c_char,
9095        compz: *const c_char,
9096        n: *const lapack_int,
9097        ilo: *const lapack_int,
9098        ihi: *const lapack_int,
9099        h: *mut c_float,
9100        ldh: *const lapack_int,
9101        t: *mut c_float,
9102        ldt: *const lapack_int,
9103        alphar: *mut c_float,
9104        alphai: *mut c_float,
9105        beta: *mut c_float,
9106        q: *mut c_float,
9107        ldq: *const lapack_int,
9108        z: *mut c_float,
9109        ldz: *const lapack_int,
9110        work: *mut c_float,
9111        lwork: *const lapack_int,
9112        info: *mut lapack_int,
9113    );
9114    pub fn dhgeqz_(
9115        job: *const c_char,
9116        compq: *const c_char,
9117        compz: *const c_char,
9118        n: *const lapack_int,
9119        ilo: *const lapack_int,
9120        ihi: *const lapack_int,
9121        h: *mut c_double,
9122        ldh: *const lapack_int,
9123        t: *mut c_double,
9124        ldt: *const lapack_int,
9125        alphar: *mut c_double,
9126        alphai: *mut c_double,
9127        beta: *mut c_double,
9128        q: *mut c_double,
9129        ldq: *const lapack_int,
9130        z: *mut c_double,
9131        ldz: *const lapack_int,
9132        work: *mut c_double,
9133        lwork: *const lapack_int,
9134        info: *mut lapack_int,
9135    );
9136    pub fn chgeqz_(
9137        job: *const c_char,
9138        compq: *const c_char,
9139        compz: *const c_char,
9140        n: *const lapack_int,
9141        ilo: *const lapack_int,
9142        ihi: *const lapack_int,
9143        h: *mut lapack_complex_float,
9144        ldh: *const lapack_int,
9145        t: *mut lapack_complex_float,
9146        ldt: *const lapack_int,
9147        alpha: *mut lapack_complex_float,
9148        beta: *mut lapack_complex_float,
9149        q: *mut lapack_complex_float,
9150        ldq: *const lapack_int,
9151        z: *mut lapack_complex_float,
9152        ldz: *const lapack_int,
9153        work: *mut lapack_complex_float,
9154        lwork: *const lapack_int,
9155        rwork: *mut c_float,
9156        info: *mut lapack_int,
9157    );
9158    pub fn zhgeqz_(
9159        job: *const c_char,
9160        compq: *const c_char,
9161        compz: *const c_char,
9162        n: *const lapack_int,
9163        ilo: *const lapack_int,
9164        ihi: *const lapack_int,
9165        h: *mut lapack_complex_double,
9166        ldh: *const lapack_int,
9167        t: *mut lapack_complex_double,
9168        ldt: *const lapack_int,
9169        alpha: *mut lapack_complex_double,
9170        beta: *mut lapack_complex_double,
9171        q: *mut lapack_complex_double,
9172        ldq: *const lapack_int,
9173        z: *mut lapack_complex_double,
9174        ldz: *const lapack_int,
9175        work: *mut lapack_complex_double,
9176        lwork: *const lapack_int,
9177        rwork: *mut c_double,
9178        info: *mut lapack_int,
9179    );
9180
9181    pub fn stgevc_(
9182        side: *const c_char,
9183        howmny: *const c_char,
9184        select: *const lapack_logical,
9185        n: *const lapack_int,
9186        s: *const c_float,
9187        lds: *const lapack_int,
9188        p: *const c_float,
9189        ldp: *const lapack_int,
9190        vl: *mut c_float,
9191        ldvl: *const lapack_int,
9192        vr: *mut c_float,
9193        ldvr: *const lapack_int,
9194        mm: *const lapack_int,
9195        m: *mut lapack_int,
9196        work: *mut c_float,
9197        info: *mut lapack_int,
9198    );
9199    pub fn dtgevc_(
9200        side: *const c_char,
9201        howmny: *const c_char,
9202        select: *const lapack_logical,
9203        n: *const lapack_int,
9204        s: *const c_double,
9205        lds: *const lapack_int,
9206        p: *const c_double,
9207        ldp: *const lapack_int,
9208        vl: *mut c_double,
9209        ldvl: *const lapack_int,
9210        vr: *mut c_double,
9211        ldvr: *const lapack_int,
9212        mm: *const lapack_int,
9213        m: *mut lapack_int,
9214        work: *mut c_double,
9215        info: *mut lapack_int,
9216    );
9217    pub fn ctgevc_(
9218        side: *const c_char,
9219        howmny: *const c_char,
9220        select: *const lapack_logical,
9221        n: *const lapack_int,
9222        s: *const lapack_complex_float,
9223        lds: *const lapack_int,
9224        p: *const lapack_complex_float,
9225        ldp: *const lapack_int,
9226        vl: *mut lapack_complex_float,
9227        ldvl: *const lapack_int,
9228        vr: *mut lapack_complex_float,
9229        ldvr: *const lapack_int,
9230        mm: *const lapack_int,
9231        m: *mut lapack_int,
9232        work: *mut lapack_complex_float,
9233        rwork: *mut c_float,
9234        info: *mut lapack_int,
9235    );
9236    pub fn ztgevc_(
9237        side: *const c_char,
9238        howmny: *const c_char,
9239        select: *const lapack_logical,
9240        n: *const lapack_int,
9241        s: *const lapack_complex_double,
9242        lds: *const lapack_int,
9243        p: *const lapack_complex_double,
9244        ldp: *const lapack_int,
9245        vl: *mut lapack_complex_double,
9246        ldvl: *const lapack_int,
9247        vr: *mut lapack_complex_double,
9248        ldvr: *const lapack_int,
9249        mm: *const lapack_int,
9250        m: *mut lapack_int,
9251        work: *mut lapack_complex_double,
9252        rwork: *mut c_double,
9253        info: *mut lapack_int,
9254    );
9255
9256    pub fn stgexc_(
9257        wantq: *const lapack_logical,
9258        wantz: *const lapack_logical,
9259        n: *const lapack_int,
9260        a: *mut c_float,
9261        lda: *const lapack_int,
9262        b: *mut c_float,
9263        ldb: *const lapack_int,
9264        q: *mut c_float,
9265        ldq: *const lapack_int,
9266        z: *mut c_float,
9267        ldz: *const lapack_int,
9268        ifst: *mut lapack_int,
9269        ilst: *mut lapack_int,
9270        work: *mut c_float,
9271        lwork: *const lapack_int,
9272        info: *mut lapack_int,
9273    );
9274    pub fn dtgexc_(
9275        wantq: *const lapack_logical,
9276        wantz: *const lapack_logical,
9277        n: *const lapack_int,
9278        a: *mut c_double,
9279        lda: *const lapack_int,
9280        b: *mut c_double,
9281        ldb: *const lapack_int,
9282        q: *mut c_double,
9283        ldq: *const lapack_int,
9284        z: *mut c_double,
9285        ldz: *const lapack_int,
9286        ifst: *mut lapack_int,
9287        ilst: *mut lapack_int,
9288        work: *mut c_double,
9289        lwork: *const lapack_int,
9290        info: *mut lapack_int,
9291    );
9292    pub fn ctgexc_(
9293        wantq: *const lapack_logical,
9294        wantz: *const lapack_logical,
9295        n: *const lapack_int,
9296        a: *mut lapack_complex_float,
9297        lda: *const lapack_int,
9298        b: *mut lapack_complex_float,
9299        ldb: *const lapack_int,
9300        q: *mut lapack_complex_float,
9301        ldq: *const lapack_int,
9302        z: *mut lapack_complex_float,
9303        ldz: *const lapack_int,
9304        ifst: *const lapack_int,
9305        ilst: *mut lapack_int,
9306        info: *mut lapack_int,
9307    );
9308    pub fn ztgexc_(
9309        wantq: *const lapack_logical,
9310        wantz: *const lapack_logical,
9311        n: *const lapack_int,
9312        a: *mut lapack_complex_double,
9313        lda: *const lapack_int,
9314        b: *mut lapack_complex_double,
9315        ldb: *const lapack_int,
9316        q: *mut lapack_complex_double,
9317        ldq: *const lapack_int,
9318        z: *mut lapack_complex_double,
9319        ldz: *const lapack_int,
9320        ifst: *const lapack_int,
9321        ilst: *mut lapack_int,
9322        info: *mut lapack_int,
9323    );
9324
9325    pub fn stgsen_(
9326        ijob: *const lapack_int,
9327        wantq: *const lapack_logical,
9328        wantz: *const lapack_logical,
9329        select: *const lapack_logical,
9330        n: *const lapack_int,
9331        a: *mut c_float,
9332        lda: *const lapack_int,
9333        b: *mut c_float,
9334        ldb: *const lapack_int,
9335        alphar: *mut c_float,
9336        alphai: *mut c_float,
9337        beta: *mut c_float,
9338        q: *mut c_float,
9339        ldq: *const lapack_int,
9340        z: *mut c_float,
9341        ldz: *const lapack_int,
9342        m: *mut lapack_int,
9343        pl: *mut c_float,
9344        pr: *mut c_float,
9345        dif: *mut c_float,
9346        work: *mut c_float,
9347        lwork: *const lapack_int,
9348        iwork: *mut lapack_int,
9349        liwork: *const lapack_int,
9350        info: *mut lapack_int,
9351    );
9352    pub fn dtgsen_(
9353        ijob: *const lapack_int,
9354        wantq: *const lapack_logical,
9355        wantz: *const lapack_logical,
9356        select: *const lapack_logical,
9357        n: *const lapack_int,
9358        a: *mut c_double,
9359        lda: *const lapack_int,
9360        b: *mut c_double,
9361        ldb: *const lapack_int,
9362        alphar: *mut c_double,
9363        alphai: *mut c_double,
9364        beta: *mut c_double,
9365        q: *mut c_double,
9366        ldq: *const lapack_int,
9367        z: *mut c_double,
9368        ldz: *const lapack_int,
9369        m: *mut lapack_int,
9370        pl: *mut c_double,
9371        pr: *mut c_double,
9372        dif: *mut c_double,
9373        work: *mut c_double,
9374        lwork: *const lapack_int,
9375        iwork: *mut lapack_int,
9376        liwork: *const lapack_int,
9377        info: *mut lapack_int,
9378    );
9379    pub fn ctgsen_(
9380        ijob: *const lapack_int,
9381        wantq: *const lapack_logical,
9382        wantz: *const lapack_logical,
9383        select: *const lapack_logical,
9384        n: *const lapack_int,
9385        a: *mut lapack_complex_float,
9386        lda: *const lapack_int,
9387        b: *mut lapack_complex_float,
9388        ldb: *const lapack_int,
9389        alpha: *mut lapack_complex_float,
9390        beta: *mut lapack_complex_float,
9391        q: *mut lapack_complex_float,
9392        ldq: *const lapack_int,
9393        z: *mut lapack_complex_float,
9394        ldz: *const lapack_int,
9395        m: *mut lapack_int,
9396        pl: *mut c_float,
9397        pr: *mut c_float,
9398        dif: *mut c_float,
9399        work: *mut lapack_complex_float,
9400        lwork: *const lapack_int,
9401        iwork: *mut lapack_int,
9402        liwork: *const lapack_int,
9403        info: *mut lapack_int,
9404    );
9405    pub fn ztgsen_(
9406        ijob: *const lapack_int,
9407        wantq: *const lapack_logical,
9408        wantz: *const lapack_logical,
9409        select: *const lapack_logical,
9410        n: *const lapack_int,
9411        a: *mut lapack_complex_double,
9412        lda: *const lapack_int,
9413        b: *mut lapack_complex_double,
9414        ldb: *const lapack_int,
9415        alpha: *mut lapack_complex_double,
9416        beta: *mut lapack_complex_double,
9417        q: *mut lapack_complex_double,
9418        ldq: *const lapack_int,
9419        z: *mut lapack_complex_double,
9420        ldz: *const lapack_int,
9421        m: *mut lapack_int,
9422        pl: *mut c_double,
9423        pr: *mut c_double,
9424        dif: *mut c_double,
9425        work: *mut lapack_complex_double,
9426        lwork: *const lapack_int,
9427        iwork: *mut lapack_int,
9428        liwork: *const lapack_int,
9429        info: *mut lapack_int,
9430    );
9431
9432    pub fn stgsyl_(
9433        trans: *const c_char,
9434        ijob: *const lapack_int,
9435        m: *const lapack_int,
9436        n: *const lapack_int,
9437        a: *const c_float,
9438        lda: *const lapack_int,
9439        b: *const c_float,
9440        ldb: *const lapack_int,
9441        c: *mut c_float,
9442        ldc: *const lapack_int,
9443        d: *const c_float,
9444        ldd: *const lapack_int,
9445        e: *const c_float,
9446        lde: *const lapack_int,
9447        f: *mut c_float,
9448        ldf: *const lapack_int,
9449        scale: *mut c_float,
9450        dif: *mut c_float,
9451        work: *mut c_float,
9452        lwork: *const lapack_int,
9453        iwork: *mut lapack_int,
9454        info: *mut lapack_int,
9455    );
9456    pub fn dtgsyl_(
9457        trans: *const c_char,
9458        ijob: *const lapack_int,
9459        m: *const lapack_int,
9460        n: *const lapack_int,
9461        a: *const c_double,
9462        lda: *const lapack_int,
9463        b: *const c_double,
9464        ldb: *const lapack_int,
9465        c: *mut c_double,
9466        ldc: *const lapack_int,
9467        d: *const c_double,
9468        ldd: *const lapack_int,
9469        e: *const c_double,
9470        lde: *const lapack_int,
9471        f: *mut c_double,
9472        ldf: *const lapack_int,
9473        scale: *mut c_double,
9474        dif: *mut c_double,
9475        work: *mut c_double,
9476        lwork: *const lapack_int,
9477        iwork: *mut lapack_int,
9478        info: *mut lapack_int,
9479    );
9480    pub fn ctgsyl_(
9481        trans: *const c_char,
9482        ijob: *const lapack_int,
9483        m: *const lapack_int,
9484        n: *const lapack_int,
9485        a: *const lapack_complex_float,
9486        lda: *const lapack_int,
9487        b: *const lapack_complex_float,
9488        ldb: *const lapack_int,
9489        c: *mut lapack_complex_float,
9490        ldc: *const lapack_int,
9491        d: *const lapack_complex_float,
9492        ldd: *const lapack_int,
9493        e: *const lapack_complex_float,
9494        lde: *const lapack_int,
9495        f: *mut lapack_complex_float,
9496        ldf: *const lapack_int,
9497        scale: *mut c_float,
9498        dif: *mut c_float,
9499        work: *mut lapack_complex_float,
9500        lwork: *const lapack_int,
9501        iwork: *mut lapack_int,
9502        info: *mut lapack_int,
9503    );
9504    pub fn ztgsyl_(
9505        trans: *const c_char,
9506        ijob: *const lapack_int,
9507        m: *const lapack_int,
9508        n: *const lapack_int,
9509        a: *const lapack_complex_double,
9510        lda: *const lapack_int,
9511        b: *const lapack_complex_double,
9512        ldb: *const lapack_int,
9513        c: *mut lapack_complex_double,
9514        ldc: *const lapack_int,
9515        d: *const lapack_complex_double,
9516        ldd: *const lapack_int,
9517        e: *const lapack_complex_double,
9518        lde: *const lapack_int,
9519        f: *mut lapack_complex_double,
9520        ldf: *const lapack_int,
9521        scale: *mut c_double,
9522        dif: *mut c_double,
9523        work: *mut lapack_complex_double,
9524        lwork: *const lapack_int,
9525        iwork: *mut lapack_int,
9526        info: *mut lapack_int,
9527    );
9528
9529    pub fn stgsna_(
9530        job: *const c_char,
9531        howmny: *const c_char,
9532        select: *const lapack_logical,
9533        n: *const lapack_int,
9534        a: *const c_float,
9535        lda: *const lapack_int,
9536        b: *const c_float,
9537        ldb: *const lapack_int,
9538        vl: *const c_float,
9539        ldvl: *const lapack_int,
9540        vr: *const c_float,
9541        ldvr: *const lapack_int,
9542        s: *mut c_float,
9543        dif: *mut c_float,
9544        mm: *const lapack_int,
9545        m: *mut lapack_int,
9546        work: *mut c_float,
9547        lwork: *const lapack_int,
9548        iwork: *mut lapack_int,
9549        info: *mut lapack_int,
9550    );
9551    pub fn dtgsna_(
9552        job: *const c_char,
9553        howmny: *const c_char,
9554        select: *const lapack_logical,
9555        n: *const lapack_int,
9556        a: *const c_double,
9557        lda: *const lapack_int,
9558        b: *const c_double,
9559        ldb: *const lapack_int,
9560        vl: *const c_double,
9561        ldvl: *const lapack_int,
9562        vr: *const c_double,
9563        ldvr: *const lapack_int,
9564        s: *mut c_double,
9565        dif: *mut c_double,
9566        mm: *const lapack_int,
9567        m: *mut lapack_int,
9568        work: *mut c_double,
9569        lwork: *const lapack_int,
9570        iwork: *mut lapack_int,
9571        info: *mut lapack_int,
9572    );
9573    pub fn ctgsna_(
9574        job: *const c_char,
9575        howmny: *const c_char,
9576        select: *const lapack_logical,
9577        n: *const lapack_int,
9578        a: *const lapack_complex_float,
9579        lda: *const lapack_int,
9580        b: *const lapack_complex_float,
9581        ldb: *const lapack_int,
9582        vl: *const lapack_complex_float,
9583        ldvl: *const lapack_int,
9584        vr: *const lapack_complex_float,
9585        ldvr: *const lapack_int,
9586        s: *mut c_float,
9587        dif: *mut c_float,
9588        mm: *const lapack_int,
9589        m: *mut lapack_int,
9590        work: *mut lapack_complex_float,
9591        lwork: *const lapack_int,
9592        iwork: *mut lapack_int,
9593        info: *mut lapack_int,
9594    );
9595    pub fn ztgsna_(
9596        job: *const c_char,
9597        howmny: *const c_char,
9598        select: *const lapack_logical,
9599        n: *const lapack_int,
9600        a: *const lapack_complex_double,
9601        lda: *const lapack_int,
9602        b: *const lapack_complex_double,
9603        ldb: *const lapack_int,
9604        vl: *const lapack_complex_double,
9605        ldvl: *const lapack_int,
9606        vr: *const lapack_complex_double,
9607        ldvr: *const lapack_int,
9608        s: *mut c_double,
9609        dif: *mut c_double,
9610        mm: *const lapack_int,
9611        m: *mut lapack_int,
9612        work: *mut lapack_complex_double,
9613        lwork: *const lapack_int,
9614        iwork: *mut lapack_int,
9615        info: *mut lapack_int,
9616    );
9617
9618    pub fn sggsvp_(
9619        jobu: *const c_char,
9620        jobv: *const c_char,
9621        jobq: *const c_char,
9622        m: *const lapack_int,
9623        p: *const lapack_int,
9624        n: *const lapack_int,
9625        a: *mut c_float,
9626        lda: *const lapack_int,
9627        b: *mut c_float,
9628        ldb: *const lapack_int,
9629        tola: *const c_float,
9630        tolb: *const c_float,
9631        k: *mut lapack_int,
9632        l: *mut lapack_int,
9633        u: *mut c_float,
9634        ldu: *const lapack_int,
9635        v: *mut c_float,
9636        ldv: *const lapack_int,
9637        q: *mut c_float,
9638        ldq: *const lapack_int,
9639        iwork: *mut lapack_int,
9640        tau: *mut c_float,
9641        work: *mut c_float,
9642        info: *mut lapack_int,
9643    );
9644    pub fn dggsvp_(
9645        jobu: *const c_char,
9646        jobv: *const c_char,
9647        jobq: *const c_char,
9648        m: *const lapack_int,
9649        p: *const lapack_int,
9650        n: *const lapack_int,
9651        a: *mut c_double,
9652        lda: *const lapack_int,
9653        b: *mut c_double,
9654        ldb: *const lapack_int,
9655        tola: *const c_double,
9656        tolb: *const c_double,
9657        k: *mut lapack_int,
9658        l: *mut lapack_int,
9659        u: *mut c_double,
9660        ldu: *const lapack_int,
9661        v: *mut c_double,
9662        ldv: *const lapack_int,
9663        q: *mut c_double,
9664        ldq: *const lapack_int,
9665        iwork: *mut lapack_int,
9666        tau: *mut c_double,
9667        work: *mut c_double,
9668        info: *mut lapack_int,
9669    );
9670    pub fn cggsvp_(
9671        jobu: *const c_char,
9672        jobv: *const c_char,
9673        jobq: *const c_char,
9674        m: *const lapack_int,
9675        p: *const lapack_int,
9676        n: *const lapack_int,
9677        a: *mut lapack_complex_float,
9678        lda: *const lapack_int,
9679        b: *mut lapack_complex_float,
9680        ldb: *const lapack_int,
9681        tola: *const c_float,
9682        tolb: *const c_float,
9683        k: *mut lapack_int,
9684        l: *mut lapack_int,
9685        u: *mut lapack_complex_float,
9686        ldu: *const lapack_int,
9687        v: *mut lapack_complex_float,
9688        ldv: *const lapack_int,
9689        q: *mut lapack_complex_float,
9690        ldq: *const lapack_int,
9691        iwork: *mut lapack_int,
9692        rwork: *mut c_float,
9693        tau: *mut lapack_complex_float,
9694        work: *mut lapack_complex_float,
9695        info: *mut lapack_int,
9696    );
9697    pub fn zggsvp_(
9698        jobu: *const c_char,
9699        jobv: *const c_char,
9700        jobq: *const c_char,
9701        m: *const lapack_int,
9702        p: *const lapack_int,
9703        n: *const lapack_int,
9704        a: *mut lapack_complex_double,
9705        lda: *const lapack_int,
9706        b: *mut lapack_complex_double,
9707        ldb: *const lapack_int,
9708        tola: *const c_double,
9709        tolb: *const c_double,
9710        k: *mut lapack_int,
9711        l: *mut lapack_int,
9712        u: *mut lapack_complex_double,
9713        ldu: *const lapack_int,
9714        v: *mut lapack_complex_double,
9715        ldv: *const lapack_int,
9716        q: *mut lapack_complex_double,
9717        ldq: *const lapack_int,
9718        iwork: *mut lapack_int,
9719        rwork: *mut c_double,
9720        tau: *mut lapack_complex_double,
9721        work: *mut lapack_complex_double,
9722        info: *mut lapack_int,
9723    );
9724
9725    pub fn sggsvp3_(
9726        jobu: *const c_char,
9727        jobv: *const c_char,
9728        jobq: *const c_char,
9729        m: *const lapack_int,
9730        p: *const lapack_int,
9731        n: *const lapack_int,
9732        a: *mut c_float,
9733        lda: *const lapack_int,
9734        b: *mut c_float,
9735        ldb: *const lapack_int,
9736        tola: *const c_float,
9737        tolb: *const c_float,
9738        k: *mut lapack_int,
9739        l: *mut lapack_int,
9740        u: *mut c_float,
9741        ldu: *const lapack_int,
9742        v: *mut c_float,
9743        ldv: *const lapack_int,
9744        q: *mut c_float,
9745        ldq: *const lapack_int,
9746        iwork: *mut lapack_int,
9747        tau: *mut c_float,
9748        work: *mut c_float,
9749        lwork: *const lapack_int,
9750        info: *mut lapack_int,
9751    );
9752    pub fn dggsvp3_(
9753        jobu: *const c_char,
9754        jobv: *const c_char,
9755        jobq: *const c_char,
9756        m: *const lapack_int,
9757        p: *const lapack_int,
9758        n: *const lapack_int,
9759        a: *mut c_double,
9760        lda: *const lapack_int,
9761        b: *mut c_double,
9762        ldb: *const lapack_int,
9763        tola: *const c_double,
9764        tolb: *const c_double,
9765        k: *mut lapack_int,
9766        l: *mut lapack_int,
9767        u: *mut c_double,
9768        ldu: *const lapack_int,
9769        v: *mut c_double,
9770        ldv: *const lapack_int,
9771        q: *mut c_double,
9772        ldq: *const lapack_int,
9773        iwork: *mut lapack_int,
9774        tau: *mut c_double,
9775        work: *mut c_double,
9776        lwork: *const lapack_int,
9777        info: *mut lapack_int,
9778    );
9779    pub fn cggsvp3_(
9780        jobu: *const c_char,
9781        jobv: *const c_char,
9782        jobq: *const c_char,
9783        m: *const lapack_int,
9784        p: *const lapack_int,
9785        n: *const lapack_int,
9786        a: *mut lapack_complex_float,
9787        lda: *const lapack_int,
9788        b: *mut lapack_complex_float,
9789        ldb: *const lapack_int,
9790        tola: *const c_float,
9791        tolb: *const c_float,
9792        k: *mut lapack_int,
9793        l: *mut lapack_int,
9794        u: *mut lapack_complex_float,
9795        ldu: *const lapack_int,
9796        v: *mut lapack_complex_float,
9797        ldv: *const lapack_int,
9798        q: *mut lapack_complex_float,
9799        ldq: *const lapack_int,
9800        iwork: *mut lapack_int,
9801        rwork: *mut c_float,
9802        tau: *mut lapack_complex_float,
9803        work: *mut lapack_complex_float,
9804        lwork: *const lapack_int,
9805        info: *mut lapack_int,
9806    );
9807    pub fn zggsvp3_(
9808        jobu: *const c_char,
9809        jobv: *const c_char,
9810        jobq: *const c_char,
9811        m: *const lapack_int,
9812        p: *const lapack_int,
9813        n: *const lapack_int,
9814        a: *mut lapack_complex_double,
9815        lda: *const lapack_int,
9816        b: *mut lapack_complex_double,
9817        ldb: *const lapack_int,
9818        tola: *const c_double,
9819        tolb: *const c_double,
9820        k: *mut lapack_int,
9821        l: *mut lapack_int,
9822        u: *mut lapack_complex_double,
9823        ldu: *const lapack_int,
9824        v: *mut lapack_complex_double,
9825        ldv: *const lapack_int,
9826        q: *mut lapack_complex_double,
9827        ldq: *const lapack_int,
9828        iwork: *mut lapack_int,
9829        rwork: *mut c_double,
9830        tau: *mut lapack_complex_double,
9831        work: *mut lapack_complex_double,
9832        lwork: *const lapack_int,
9833        info: *mut lapack_int,
9834    );
9835
9836    pub fn stgsja_(
9837        jobu: *const c_char,
9838        jobv: *const c_char,
9839        jobq: *const c_char,
9840        m: *const lapack_int,
9841        p: *const lapack_int,
9842        n: *const lapack_int,
9843        k: *const lapack_int,
9844        l: *const lapack_int,
9845        a: *mut c_float,
9846        lda: *const lapack_int,
9847        b: *mut c_float,
9848        ldb: *const lapack_int,
9849        tola: *const c_float,
9850        tolb: *const c_float,
9851        alpha: *mut c_float,
9852        beta: *mut c_float,
9853        u: *mut c_float,
9854        ldu: *const lapack_int,
9855        v: *mut c_float,
9856        ldv: *const lapack_int,
9857        q: *mut c_float,
9858        ldq: *const lapack_int,
9859        work: *mut c_float,
9860        ncycle: *mut lapack_int,
9861        info: *mut lapack_int,
9862    );
9863    pub fn dtgsja_(
9864        jobu: *const c_char,
9865        jobv: *const c_char,
9866        jobq: *const c_char,
9867        m: *const lapack_int,
9868        p: *const lapack_int,
9869        n: *const lapack_int,
9870        k: *const lapack_int,
9871        l: *const lapack_int,
9872        a: *mut c_double,
9873        lda: *const lapack_int,
9874        b: *mut c_double,
9875        ldb: *const lapack_int,
9876        tola: *const c_double,
9877        tolb: *const c_double,
9878        alpha: *mut c_double,
9879        beta: *mut c_double,
9880        u: *mut c_double,
9881        ldu: *const lapack_int,
9882        v: *mut c_double,
9883        ldv: *const lapack_int,
9884        q: *mut c_double,
9885        ldq: *const lapack_int,
9886        work: *mut c_double,
9887        ncycle: *mut lapack_int,
9888        info: *mut lapack_int,
9889    );
9890    pub fn ctgsja_(
9891        jobu: *const c_char,
9892        jobv: *const c_char,
9893        jobq: *const c_char,
9894        m: *const lapack_int,
9895        p: *const lapack_int,
9896        n: *const lapack_int,
9897        k: *const lapack_int,
9898        l: *const lapack_int,
9899        a: *mut lapack_complex_float,
9900        lda: *const lapack_int,
9901        b: *mut lapack_complex_float,
9902        ldb: *const lapack_int,
9903        tola: *const c_float,
9904        tolb: *const c_float,
9905        alpha: *mut c_float,
9906        beta: *mut c_float,
9907        u: *mut lapack_complex_float,
9908        ldu: *const lapack_int,
9909        v: *mut lapack_complex_float,
9910        ldv: *const lapack_int,
9911        q: *mut lapack_complex_float,
9912        ldq: *const lapack_int,
9913        work: *mut lapack_complex_float,
9914        ncycle: *mut lapack_int,
9915        info: *mut lapack_int,
9916    );
9917    pub fn ztgsja_(
9918        jobu: *const c_char,
9919        jobv: *const c_char,
9920        jobq: *const c_char,
9921        m: *const lapack_int,
9922        p: *const lapack_int,
9923        n: *const lapack_int,
9924        k: *const lapack_int,
9925        l: *const lapack_int,
9926        a: *mut lapack_complex_double,
9927        lda: *const lapack_int,
9928        b: *mut lapack_complex_double,
9929        ldb: *const lapack_int,
9930        tola: *const c_double,
9931        tolb: *const c_double,
9932        alpha: *mut c_double,
9933        beta: *mut c_double,
9934        u: *mut lapack_complex_double,
9935        ldu: *const lapack_int,
9936        v: *mut lapack_complex_double,
9937        ldv: *const lapack_int,
9938        q: *mut lapack_complex_double,
9939        ldq: *const lapack_int,
9940        work: *mut lapack_complex_double,
9941        ncycle: *mut lapack_int,
9942        info: *mut lapack_int,
9943    );
9944
9945    pub fn sgels_(
9946        trans: *const c_char,
9947        m: *const lapack_int,
9948        n: *const lapack_int,
9949        nrhs: *const lapack_int,
9950        a: *mut c_float,
9951        lda: *const lapack_int,
9952        b: *mut c_float,
9953        ldb: *const lapack_int,
9954        work: *mut c_float,
9955        lwork: *const lapack_int,
9956        info: *mut lapack_int,
9957    );
9958    pub fn dgels_(
9959        trans: *const c_char,
9960        m: *const lapack_int,
9961        n: *const lapack_int,
9962        nrhs: *const lapack_int,
9963        a: *mut c_double,
9964        lda: *const lapack_int,
9965        b: *mut c_double,
9966        ldb: *const lapack_int,
9967        work: *mut c_double,
9968        lwork: *const lapack_int,
9969        info: *mut lapack_int,
9970    );
9971    pub fn cgels_(
9972        trans: *const c_char,
9973        m: *const lapack_int,
9974        n: *const lapack_int,
9975        nrhs: *const lapack_int,
9976        a: *mut lapack_complex_float,
9977        lda: *const lapack_int,
9978        b: *mut lapack_complex_float,
9979        ldb: *const lapack_int,
9980        work: *mut lapack_complex_float,
9981        lwork: *const lapack_int,
9982        info: *mut lapack_int,
9983    );
9984    pub fn zgels_(
9985        trans: *const c_char,
9986        m: *const lapack_int,
9987        n: *const lapack_int,
9988        nrhs: *const lapack_int,
9989        a: *mut lapack_complex_double,
9990        lda: *const lapack_int,
9991        b: *mut lapack_complex_double,
9992        ldb: *const lapack_int,
9993        work: *mut lapack_complex_double,
9994        lwork: *const lapack_int,
9995        info: *mut lapack_int,
9996    );
9997
9998    pub fn sgelsy_(
9999        m: *const lapack_int,
10000        n: *const lapack_int,
10001        nrhs: *const lapack_int,
10002        a: *mut c_float,
10003        lda: *const lapack_int,
10004        b: *mut c_float,
10005        ldb: *const lapack_int,
10006        jpvt: *mut lapack_int,
10007        rcond: *const c_float,
10008        rank: *mut lapack_int,
10009        work: *mut c_float,
10010        lwork: *const lapack_int,
10011        info: *mut lapack_int,
10012    );
10013    pub fn dgelsy_(
10014        m: *const lapack_int,
10015        n: *const lapack_int,
10016        nrhs: *const lapack_int,
10017        a: *mut c_double,
10018        lda: *const lapack_int,
10019        b: *mut c_double,
10020        ldb: *const lapack_int,
10021        jpvt: *mut lapack_int,
10022        rcond: *const c_double,
10023        rank: *mut lapack_int,
10024        work: *mut c_double,
10025        lwork: *const lapack_int,
10026        info: *mut lapack_int,
10027    );
10028    pub fn cgelsy_(
10029        m: *const lapack_int,
10030        n: *const lapack_int,
10031        nrhs: *const lapack_int,
10032        a: *mut lapack_complex_float,
10033        lda: *const lapack_int,
10034        b: *mut lapack_complex_float,
10035        ldb: *const lapack_int,
10036        jpvt: *mut lapack_int,
10037        rcond: *const c_float,
10038        rank: *mut lapack_int,
10039        work: *mut lapack_complex_float,
10040        lwork: *const lapack_int,
10041        rwork: *mut c_float,
10042        info: *mut lapack_int,
10043    );
10044    pub fn zgelsy_(
10045        m: *const lapack_int,
10046        n: *const lapack_int,
10047        nrhs: *const lapack_int,
10048        a: *mut lapack_complex_double,
10049        lda: *const lapack_int,
10050        b: *mut lapack_complex_double,
10051        ldb: *const lapack_int,
10052        jpvt: *mut lapack_int,
10053        rcond: *const c_double,
10054        rank: *mut lapack_int,
10055        work: *mut lapack_complex_double,
10056        lwork: *const lapack_int,
10057        rwork: *mut c_double,
10058        info: *mut lapack_int,
10059    );
10060
10061    pub fn sgelss_(
10062        m: *const lapack_int,
10063        n: *const lapack_int,
10064        nrhs: *const lapack_int,
10065        a: *mut c_float,
10066        lda: *const lapack_int,
10067        b: *mut c_float,
10068        ldb: *const lapack_int,
10069        s: *mut c_float,
10070        rcond: *const c_float,
10071        rank: *mut lapack_int,
10072        work: *mut c_float,
10073        lwork: *const lapack_int,
10074        info: *mut lapack_int,
10075    );
10076    pub fn dgelss_(
10077        m: *const lapack_int,
10078        n: *const lapack_int,
10079        nrhs: *const lapack_int,
10080        a: *mut c_double,
10081        lda: *const lapack_int,
10082        b: *mut c_double,
10083        ldb: *const lapack_int,
10084        s: *mut c_double,
10085        rcond: *const c_double,
10086        rank: *mut lapack_int,
10087        work: *mut c_double,
10088        lwork: *const lapack_int,
10089        info: *mut lapack_int,
10090    );
10091    pub fn cgelss_(
10092        m: *const lapack_int,
10093        n: *const lapack_int,
10094        nrhs: *const lapack_int,
10095        a: *mut lapack_complex_float,
10096        lda: *const lapack_int,
10097        b: *mut lapack_complex_float,
10098        ldb: *const lapack_int,
10099        s: *mut c_float,
10100        rcond: *const c_float,
10101        rank: *mut lapack_int,
10102        work: *mut lapack_complex_float,
10103        lwork: *const lapack_int,
10104        rwork: *mut c_float,
10105        info: *mut lapack_int,
10106    );
10107    pub fn zgelss_(
10108        m: *const lapack_int,
10109        n: *const lapack_int,
10110        nrhs: *const lapack_int,
10111        a: *mut lapack_complex_double,
10112        lda: *const lapack_int,
10113        b: *mut lapack_complex_double,
10114        ldb: *const lapack_int,
10115        s: *mut c_double,
10116        rcond: *const c_double,
10117        rank: *mut lapack_int,
10118        work: *mut lapack_complex_double,
10119        lwork: *const lapack_int,
10120        rwork: *mut c_double,
10121        info: *mut lapack_int,
10122    );
10123
10124    pub fn sgelsd_(
10125        m: *const lapack_int,
10126        n: *const lapack_int,
10127        nrhs: *const lapack_int,
10128        a: *const c_float,
10129        lda: *const lapack_int,
10130        b: *mut c_float,
10131        ldb: *const lapack_int,
10132        s: *mut c_float,
10133        rcond: *const c_float,
10134        rank: *mut lapack_int,
10135        work: *mut c_float,
10136        lwork: *const lapack_int,
10137        iwork: *mut lapack_int,
10138        info: *mut lapack_int,
10139    );
10140    pub fn dgelsd_(
10141        m: *const lapack_int,
10142        n: *const lapack_int,
10143        nrhs: *const lapack_int,
10144        a: *const c_double,
10145        lda: *const lapack_int,
10146        b: *mut c_double,
10147        ldb: *const lapack_int,
10148        s: *mut c_double,
10149        rcond: *const c_double,
10150        rank: *mut lapack_int,
10151        work: *mut c_double,
10152        lwork: *const lapack_int,
10153        iwork: *mut lapack_int,
10154        info: *mut lapack_int,
10155    );
10156    pub fn cgelsd_(
10157        m: *const lapack_int,
10158        n: *const lapack_int,
10159        nrhs: *const lapack_int,
10160        a: *const lapack_complex_float,
10161        lda: *const lapack_int,
10162        b: *mut lapack_complex_float,
10163        ldb: *const lapack_int,
10164        s: *mut c_float,
10165        rcond: *const c_float,
10166        rank: *mut lapack_int,
10167        work: *mut lapack_complex_float,
10168        lwork: *const lapack_int,
10169        rwork: *mut c_float,
10170        iwork: *mut lapack_int,
10171        info: *mut lapack_int,
10172    );
10173    pub fn zgelsd_(
10174        m: *const lapack_int,
10175        n: *const lapack_int,
10176        nrhs: *const lapack_int,
10177        a: *const lapack_complex_double,
10178        lda: *const lapack_int,
10179        b: *mut lapack_complex_double,
10180        ldb: *const lapack_int,
10181        s: *mut c_double,
10182        rcond: *const c_double,
10183        rank: *mut lapack_int,
10184        work: *mut lapack_complex_double,
10185        lwork: *const lapack_int,
10186        rwork: *mut c_double,
10187        iwork: *mut lapack_int,
10188        info: *mut lapack_int,
10189    );
10190
10191    pub fn sgglse_(
10192        m: *const lapack_int,
10193        n: *const lapack_int,
10194        p: *const lapack_int,
10195        a: *mut c_float,
10196        lda: *const lapack_int,
10197        b: *mut c_float,
10198        ldb: *const lapack_int,
10199        c: *mut c_float,
10200        d: *mut c_float,
10201        x: *mut c_float,
10202        work: *mut c_float,
10203        lwork: *const lapack_int,
10204        info: *mut lapack_int,
10205    );
10206    pub fn dgglse_(
10207        m: *const lapack_int,
10208        n: *const lapack_int,
10209        p: *const lapack_int,
10210        a: *mut c_double,
10211        lda: *const lapack_int,
10212        b: *mut c_double,
10213        ldb: *const lapack_int,
10214        c: *mut c_double,
10215        d: *mut c_double,
10216        x: *mut c_double,
10217        work: *mut c_double,
10218        lwork: *const lapack_int,
10219        info: *mut lapack_int,
10220    );
10221    pub fn cgglse_(
10222        m: *const lapack_int,
10223        n: *const lapack_int,
10224        p: *const lapack_int,
10225        a: *mut lapack_complex_float,
10226        lda: *const lapack_int,
10227        b: *mut lapack_complex_float,
10228        ldb: *const lapack_int,
10229        c: *mut lapack_complex_float,
10230        d: *mut lapack_complex_float,
10231        x: *mut lapack_complex_float,
10232        work: *mut lapack_complex_float,
10233        lwork: *const lapack_int,
10234        info: *mut lapack_int,
10235    );
10236    pub fn zgglse_(
10237        m: *const lapack_int,
10238        n: *const lapack_int,
10239        p: *const lapack_int,
10240        a: *mut lapack_complex_double,
10241        lda: *const lapack_int,
10242        b: *mut lapack_complex_double,
10243        ldb: *const lapack_int,
10244        c: *mut lapack_complex_double,
10245        d: *mut lapack_complex_double,
10246        x: *mut lapack_complex_double,
10247        work: *mut lapack_complex_double,
10248        lwork: *const lapack_int,
10249        info: *mut lapack_int,
10250    );
10251
10252    pub fn sggglm_(
10253        n: *const lapack_int,
10254        m: *const lapack_int,
10255        p: *const lapack_int,
10256        a: *mut c_float,
10257        lda: *const lapack_int,
10258        b: *mut c_float,
10259        ldb: *const lapack_int,
10260        d: *mut c_float,
10261        x: *mut c_float,
10262        y: *mut c_float,
10263        work: *mut c_float,
10264        lwork: *const lapack_int,
10265        info: *mut lapack_int,
10266    );
10267    pub fn dggglm_(
10268        n: *const lapack_int,
10269        m: *const lapack_int,
10270        p: *const lapack_int,
10271        a: *mut c_double,
10272        lda: *const lapack_int,
10273        b: *mut c_double,
10274        ldb: *const lapack_int,
10275        d: *mut c_double,
10276        x: *mut c_double,
10277        y: *mut c_double,
10278        work: *mut c_double,
10279        lwork: *const lapack_int,
10280        info: *mut lapack_int,
10281    );
10282    pub fn cggglm_(
10283        n: *const lapack_int,
10284        m: *const lapack_int,
10285        p: *const lapack_int,
10286        a: *mut lapack_complex_float,
10287        lda: *const lapack_int,
10288        b: *mut lapack_complex_float,
10289        ldb: *const lapack_int,
10290        d: *mut lapack_complex_float,
10291        x: *mut lapack_complex_float,
10292        y: *mut lapack_complex_float,
10293        work: *mut lapack_complex_float,
10294        lwork: *const lapack_int,
10295        info: *mut lapack_int,
10296    );
10297    pub fn zggglm_(
10298        n: *const lapack_int,
10299        m: *const lapack_int,
10300        p: *const lapack_int,
10301        a: *mut lapack_complex_double,
10302        lda: *const lapack_int,
10303        b: *mut lapack_complex_double,
10304        ldb: *const lapack_int,
10305        d: *mut lapack_complex_double,
10306        x: *mut lapack_complex_double,
10307        y: *mut lapack_complex_double,
10308        work: *mut lapack_complex_double,
10309        lwork: *const lapack_int,
10310        info: *mut lapack_int,
10311    );
10312
10313    pub fn ssyev_(
10314        jobz: *const c_char,
10315        uplo: *const c_char,
10316        n: *const lapack_int,
10317        a: *mut c_float,
10318        lda: *const lapack_int,
10319        w: *mut c_float,
10320        work: *mut c_float,
10321        lwork: *const lapack_int,
10322        info: *mut lapack_int,
10323    );
10324    pub fn dsyev_(
10325        jobz: *const c_char,
10326        uplo: *const c_char,
10327        n: *const lapack_int,
10328        a: *mut c_double,
10329        lda: *const lapack_int,
10330        w: *mut c_double,
10331        work: *mut c_double,
10332        lwork: *const lapack_int,
10333        info: *mut lapack_int,
10334    );
10335    pub fn cheev_(
10336        jobz: *const c_char,
10337        uplo: *const c_char,
10338        n: *const lapack_int,
10339        a: *mut lapack_complex_float,
10340        lda: *const lapack_int,
10341        w: *mut c_float,
10342        work: *mut lapack_complex_float,
10343        lwork: *const lapack_int,
10344        rwork: *mut c_float,
10345        info: *mut lapack_int,
10346    );
10347    pub fn zheev_(
10348        jobz: *const c_char,
10349        uplo: *const c_char,
10350        n: *const lapack_int,
10351        a: *mut lapack_complex_double,
10352        lda: *const lapack_int,
10353        w: *mut c_double,
10354        work: *mut lapack_complex_double,
10355        lwork: *const lapack_int,
10356        rwork: *mut c_double,
10357        info: *mut lapack_int,
10358    );
10359
10360    pub fn ssyevd_(
10361        jobz: *const c_char,
10362        uplo: *const c_char,
10363        n: *const lapack_int,
10364        a: *mut c_float,
10365        lda: *const lapack_int,
10366        w: *mut c_float,
10367        work: *mut c_float,
10368        lwork: *const lapack_int,
10369        iwork: *mut lapack_int,
10370        liwork: *const lapack_int,
10371        info: *mut lapack_int,
10372    );
10373    pub fn dsyevd_(
10374        jobz: *const c_char,
10375        uplo: *const c_char,
10376        n: *const lapack_int,
10377        a: *mut c_double,
10378        lda: *const lapack_int,
10379        w: *mut c_double,
10380        work: *mut c_double,
10381        lwork: *const lapack_int,
10382        iwork: *mut lapack_int,
10383        liwork: *const lapack_int,
10384        info: *mut lapack_int,
10385    );
10386    pub fn cheevd_(
10387        jobz: *const c_char,
10388        uplo: *const c_char,
10389        n: *const lapack_int,
10390        a: *mut lapack_complex_float,
10391        lda: *const lapack_int,
10392        w: *mut c_float,
10393        work: *mut lapack_complex_float,
10394        lwork: *const lapack_int,
10395        rwork: *mut c_float,
10396        lrwork: *const lapack_int,
10397        iwork: *mut lapack_int,
10398        liwork: *const lapack_int,
10399        info: *mut lapack_int,
10400    );
10401    pub fn zheevd_(
10402        jobz: *const c_char,
10403        uplo: *const c_char,
10404        n: *const lapack_int,
10405        a: *mut lapack_complex_double,
10406        lda: *const lapack_int,
10407        w: *mut c_double,
10408        work: *mut lapack_complex_double,
10409        lwork: *const lapack_int,
10410        rwork: *mut c_double,
10411        lrwork: *const lapack_int,
10412        iwork: *mut lapack_int,
10413        liwork: *const lapack_int,
10414        info: *mut lapack_int,
10415    );
10416
10417    pub fn ssyevx_(
10418        jobz: *const c_char,
10419        range: *const c_char,
10420        uplo: *const c_char,
10421        n: *const lapack_int,
10422        a: *mut c_float,
10423        lda: *const lapack_int,
10424        vl: *const c_float,
10425        vu: *const c_float,
10426        il: *const lapack_int,
10427        iu: *const lapack_int,
10428        abstol: *const c_float,
10429        m: *mut lapack_int,
10430        w: *mut c_float,
10431        z: *mut c_float,
10432        ldz: *const lapack_int,
10433        work: *mut c_float,
10434        lwork: *const lapack_int,
10435        iwork: *mut lapack_int,
10436        ifail: *mut lapack_int,
10437        info: *mut lapack_int,
10438    );
10439    pub fn dsyevx_(
10440        jobz: *const c_char,
10441        range: *const c_char,
10442        uplo: *const c_char,
10443        n: *const lapack_int,
10444        a: *mut c_double,
10445        lda: *const lapack_int,
10446        vl: *const c_double,
10447        vu: *const c_double,
10448        il: *const lapack_int,
10449        iu: *const lapack_int,
10450        abstol: *const c_double,
10451        m: *mut lapack_int,
10452        w: *mut c_double,
10453        z: *mut c_double,
10454        ldz: *const lapack_int,
10455        work: *mut c_double,
10456        lwork: *const lapack_int,
10457        iwork: *mut lapack_int,
10458        ifail: *mut lapack_int,
10459        info: *mut lapack_int,
10460    );
10461    pub fn cheevx_(
10462        jobz: *const c_char,
10463        range: *const c_char,
10464        uplo: *const c_char,
10465        n: *const lapack_int,
10466        a: *mut lapack_complex_float,
10467        lda: *const lapack_int,
10468        vl: *const c_float,
10469        vu: *const c_float,
10470        il: *const lapack_int,
10471        iu: *const lapack_int,
10472        abstol: *const c_float,
10473        m: *mut lapack_int,
10474        w: *mut c_float,
10475        z: *mut lapack_complex_float,
10476        ldz: *const lapack_int,
10477        work: *mut lapack_complex_float,
10478        lwork: *const lapack_int,
10479        rwork: *mut c_float,
10480        iwork: *mut lapack_int,
10481        ifail: *mut lapack_int,
10482        info: *mut lapack_int,
10483    );
10484    pub fn zheevx_(
10485        jobz: *const c_char,
10486        range: *const c_char,
10487        uplo: *const c_char,
10488        n: *const lapack_int,
10489        a: *mut lapack_complex_double,
10490        lda: *const lapack_int,
10491        vl: *const c_double,
10492        vu: *const c_double,
10493        il: *const lapack_int,
10494        iu: *const lapack_int,
10495        abstol: *const c_double,
10496        m: *mut lapack_int,
10497        w: *mut c_double,
10498        z: *mut lapack_complex_double,
10499        ldz: *const lapack_int,
10500        work: *mut lapack_complex_double,
10501        lwork: *const lapack_int,
10502        rwork: *mut c_double,
10503        iwork: *mut lapack_int,
10504        ifail: *mut lapack_int,
10505        info: *mut lapack_int,
10506    );
10507
10508    pub fn ssyevr_(
10509        jobz: *const c_char,
10510        range: *const c_char,
10511        uplo: *const c_char,
10512        n: *const lapack_int,
10513        a: *mut c_float,
10514        lda: *const lapack_int,
10515        vl: *const c_float,
10516        vu: *const c_float,
10517        il: *const lapack_int,
10518        iu: *const lapack_int,
10519        abstol: *const c_float,
10520        m: *mut lapack_int,
10521        w: *mut c_float,
10522        z: *mut c_float,
10523        ldz: *const lapack_int,
10524        isuppz: *mut lapack_int,
10525        work: *mut c_float,
10526        lwork: *const lapack_int,
10527        iwork: *mut lapack_int,
10528        liwork: *const lapack_int,
10529        info: *mut lapack_int,
10530    );
10531    pub fn dsyevr_(
10532        jobz: *const c_char,
10533        range: *const c_char,
10534        uplo: *const c_char,
10535        n: *const lapack_int,
10536        a: *mut c_double,
10537        lda: *const lapack_int,
10538        vl: *const c_double,
10539        vu: *const c_double,
10540        il: *const lapack_int,
10541        iu: *const lapack_int,
10542        abstol: *const c_double,
10543        m: *mut lapack_int,
10544        w: *mut c_double,
10545        z: *mut c_double,
10546        ldz: *const lapack_int,
10547        isuppz: *mut lapack_int,
10548        work: *mut c_double,
10549        lwork: *const lapack_int,
10550        iwork: *mut lapack_int,
10551        liwork: *const lapack_int,
10552        info: *mut lapack_int,
10553    );
10554    pub fn cheevr_(
10555        jobz: *const c_char,
10556        range: *const c_char,
10557        uplo: *const c_char,
10558        n: *const lapack_int,
10559        a: *mut lapack_complex_float,
10560        lda: *const lapack_int,
10561        vl: *const c_float,
10562        vu: *const c_float,
10563        il: *const lapack_int,
10564        iu: *const lapack_int,
10565        abstol: *const c_float,
10566        m: *mut lapack_int,
10567        w: *mut c_float,
10568        z: *mut lapack_complex_float,
10569        ldz: *const lapack_int,
10570        isuppz: *mut lapack_int,
10571        work: *mut lapack_complex_float,
10572        lwork: *const lapack_int,
10573        rwork: *mut c_float,
10574        lrwork: *const lapack_int,
10575        iwork: *mut lapack_int,
10576        liwork: *const lapack_int,
10577        info: *mut lapack_int,
10578    );
10579    pub fn zheevr_(
10580        jobz: *const c_char,
10581        range: *const c_char,
10582        uplo: *const c_char,
10583        n: *const lapack_int,
10584        a: *mut lapack_complex_double,
10585        lda: *const lapack_int,
10586        vl: *const c_double,
10587        vu: *const c_double,
10588        il: *const lapack_int,
10589        iu: *const lapack_int,
10590        abstol: *const c_double,
10591        m: *mut lapack_int,
10592        w: *mut c_double,
10593        z: *mut lapack_complex_double,
10594        ldz: *const lapack_int,
10595        isuppz: *mut lapack_int,
10596        work: *mut lapack_complex_double,
10597        lwork: *const lapack_int,
10598        rwork: *mut c_double,
10599        lrwork: *const lapack_int,
10600        iwork: *mut lapack_int,
10601        liwork: *const lapack_int,
10602        info: *mut lapack_int,
10603    );
10604
10605    pub fn sspev_(
10606        jobz: *const c_char,
10607        uplo: *const c_char,
10608        n: *const lapack_int,
10609        ap: *mut c_float,
10610        w: *mut c_float,
10611        z: *mut c_float,
10612        ldz: *const lapack_int,
10613        work: *mut c_float,
10614        info: *mut lapack_int,
10615    );
10616    pub fn dspev_(
10617        jobz: *const c_char,
10618        uplo: *const c_char,
10619        n: *const lapack_int,
10620        ap: *mut c_double,
10621        w: *mut c_double,
10622        z: *mut c_double,
10623        ldz: *const lapack_int,
10624        work: *mut c_double,
10625        info: *mut lapack_int,
10626    );
10627    pub fn chpev_(
10628        jobz: *const c_char,
10629        uplo: *const c_char,
10630        n: *const lapack_int,
10631        ap: *mut lapack_complex_float,
10632        w: *mut c_float,
10633        z: *mut lapack_complex_float,
10634        ldz: *const lapack_int,
10635        work: *mut lapack_complex_float,
10636        rwork: *mut c_float,
10637        info: *mut lapack_int,
10638    );
10639    pub fn zhpev_(
10640        jobz: *const c_char,
10641        uplo: *const c_char,
10642        n: *const lapack_int,
10643        ap: *mut lapack_complex_double,
10644        w: *mut c_double,
10645        z: *mut lapack_complex_double,
10646        ldz: *const lapack_int,
10647        work: *mut lapack_complex_double,
10648        rwork: *mut c_double,
10649        info: *mut lapack_int,
10650    );
10651
10652    pub fn sspevd_(
10653        jobz: *const c_char,
10654        uplo: *const c_char,
10655        n: *const lapack_int,
10656        ap: *mut c_float,
10657        w: *mut c_float,
10658        z: *mut c_float,
10659        ldz: *const lapack_int,
10660        work: *mut c_float,
10661        lwork: *const lapack_int,
10662        iwork: *mut lapack_int,
10663        liwork: *const lapack_int,
10664        info: *mut lapack_int,
10665    );
10666    pub fn dspevd_(
10667        jobz: *const c_char,
10668        uplo: *const c_char,
10669        n: *const lapack_int,
10670        ap: *mut c_double,
10671        w: *mut c_double,
10672        z: *mut c_double,
10673        ldz: *const lapack_int,
10674        work: *mut c_double,
10675        lwork: *const lapack_int,
10676        iwork: *mut lapack_int,
10677        liwork: *const lapack_int,
10678        info: *mut lapack_int,
10679    );
10680    pub fn chpevd_(
10681        jobz: *const c_char,
10682        uplo: *const c_char,
10683        n: *const lapack_int,
10684        ap: *mut lapack_complex_float,
10685        w: *mut c_float,
10686        z: *mut lapack_complex_float,
10687        ldz: *const lapack_int,
10688        work: *mut lapack_complex_float,
10689        lwork: *const lapack_int,
10690        rwork: *mut c_float,
10691        lrwork: *const lapack_int,
10692        iwork: *mut lapack_int,
10693        liwork: *const lapack_int,
10694        info: *mut lapack_int,
10695    );
10696    pub fn zhpevd_(
10697        jobz: *const c_char,
10698        uplo: *const c_char,
10699        n: *const lapack_int,
10700        ap: *mut lapack_complex_double,
10701        w: *mut c_double,
10702        z: *mut lapack_complex_double,
10703        ldz: *const lapack_int,
10704        work: *mut lapack_complex_double,
10705        lwork: *const lapack_int,
10706        rwork: *mut c_double,
10707        lrwork: *const lapack_int,
10708        iwork: *mut lapack_int,
10709        liwork: *const lapack_int,
10710        info: *mut lapack_int,
10711    );
10712
10713    pub fn sspevx_(
10714        jobz: *const c_char,
10715        range: *const c_char,
10716        uplo: *const c_char,
10717        n: *const lapack_int,
10718        ap: *mut c_float,
10719        vl: *const c_float,
10720        vu: *const c_float,
10721        il: *const lapack_int,
10722        iu: *const lapack_int,
10723        abstol: *const c_float,
10724        m: *mut lapack_int,
10725        w: *mut c_float,
10726        z: *mut c_float,
10727        ldz: *const lapack_int,
10728        work: *mut c_float,
10729        iwork: *mut lapack_int,
10730        ifail: *mut lapack_int,
10731        info: *mut lapack_int,
10732    );
10733    pub fn dspevx_(
10734        jobz: *const c_char,
10735        range: *const c_char,
10736        uplo: *const c_char,
10737        n: *const lapack_int,
10738        ap: *mut c_double,
10739        vl: *const c_double,
10740        vu: *const c_double,
10741        il: *const lapack_int,
10742        iu: *const lapack_int,
10743        abstol: *const c_double,
10744        m: *mut lapack_int,
10745        w: *mut c_double,
10746        z: *mut c_double,
10747        ldz: *const lapack_int,
10748        work: *mut c_double,
10749        iwork: *mut lapack_int,
10750        ifail: *mut lapack_int,
10751        info: *mut lapack_int,
10752    );
10753    pub fn chpevx_(
10754        jobz: *const c_char,
10755        range: *const c_char,
10756        uplo: *const c_char,
10757        n: *const lapack_int,
10758        ap: *mut lapack_complex_float,
10759        vl: *const c_float,
10760        vu: *const c_float,
10761        il: *const lapack_int,
10762        iu: *const lapack_int,
10763        abstol: *const c_float,
10764        m: *mut lapack_int,
10765        w: *mut c_float,
10766        z: *mut lapack_complex_float,
10767        ldz: *const lapack_int,
10768        work: *mut lapack_complex_float,
10769        rwork: *mut c_float,
10770        iwork: *mut lapack_int,
10771        ifail: *mut lapack_int,
10772        info: *mut lapack_int,
10773    );
10774    pub fn zhpevx_(
10775        jobz: *const c_char,
10776        range: *const c_char,
10777        uplo: *const c_char,
10778        n: *const lapack_int,
10779        ap: *mut lapack_complex_double,
10780        vl: *const c_double,
10781        vu: *const c_double,
10782        il: *const lapack_int,
10783        iu: *const lapack_int,
10784        abstol: *const c_double,
10785        m: *mut lapack_int,
10786        w: *mut c_double,
10787        z: *mut lapack_complex_double,
10788        ldz: *const lapack_int,
10789        work: *mut lapack_complex_double,
10790        rwork: *mut c_double,
10791        iwork: *mut lapack_int,
10792        ifail: *mut lapack_int,
10793        info: *mut lapack_int,
10794    );
10795
10796    pub fn ssbev_(
10797        jobz: *const c_char,
10798        uplo: *const c_char,
10799        n: *const lapack_int,
10800        kd: *const lapack_int,
10801        ab: *mut c_float,
10802        ldab: *const lapack_int,
10803        w: *mut c_float,
10804        z: *mut c_float,
10805        ldz: *const lapack_int,
10806        work: *mut c_float,
10807        info: *mut lapack_int,
10808    );
10809    pub fn dsbev_(
10810        jobz: *const c_char,
10811        uplo: *const c_char,
10812        n: *const lapack_int,
10813        kd: *const lapack_int,
10814        ab: *mut c_double,
10815        ldab: *const lapack_int,
10816        w: *mut c_double,
10817        z: *mut c_double,
10818        ldz: *const lapack_int,
10819        work: *mut c_double,
10820        info: *mut lapack_int,
10821    );
10822    pub fn chbev_(
10823        jobz: *const c_char,
10824        uplo: *const c_char,
10825        n: *const lapack_int,
10826        kd: *const lapack_int,
10827        ab: *mut lapack_complex_float,
10828        ldab: *const lapack_int,
10829        w: *mut c_float,
10830        z: *mut lapack_complex_float,
10831        ldz: *const lapack_int,
10832        work: *mut lapack_complex_float,
10833        rwork: *mut c_float,
10834        info: *mut lapack_int,
10835    );
10836    pub fn zhbev_(
10837        jobz: *const c_char,
10838        uplo: *const c_char,
10839        n: *const lapack_int,
10840        kd: *const lapack_int,
10841        ab: *mut lapack_complex_double,
10842        ldab: *const lapack_int,
10843        w: *mut c_double,
10844        z: *mut lapack_complex_double,
10845        ldz: *const lapack_int,
10846        work: *mut lapack_complex_double,
10847        rwork: *mut c_double,
10848        info: *mut lapack_int,
10849    );
10850
10851    pub fn ssbevd_(
10852        jobz: *const c_char,
10853        uplo: *const c_char,
10854        n: *const lapack_int,
10855        kd: *const lapack_int,
10856        ab: *mut c_float,
10857        ldab: *const lapack_int,
10858        w: *mut c_float,
10859        z: *mut c_float,
10860        ldz: *const lapack_int,
10861        work: *mut c_float,
10862        lwork: *const lapack_int,
10863        iwork: *mut lapack_int,
10864        liwork: *const lapack_int,
10865        info: *mut lapack_int,
10866    );
10867    pub fn dsbevd_(
10868        jobz: *const c_char,
10869        uplo: *const c_char,
10870        n: *const lapack_int,
10871        kd: *const lapack_int,
10872        ab: *mut c_double,
10873        ldab: *const lapack_int,
10874        w: *mut c_double,
10875        z: *mut c_double,
10876        ldz: *const lapack_int,
10877        work: *mut c_double,
10878        lwork: *const lapack_int,
10879        iwork: *mut lapack_int,
10880        liwork: *const lapack_int,
10881        info: *mut lapack_int,
10882    );
10883    pub fn chbevd_(
10884        jobz: *const c_char,
10885        uplo: *const c_char,
10886        n: *const lapack_int,
10887        kd: *const lapack_int,
10888        ab: *mut lapack_complex_float,
10889        ldab: *const lapack_int,
10890        w: *mut c_float,
10891        z: *mut lapack_complex_float,
10892        ldz: *const lapack_int,
10893        work: *mut lapack_complex_float,
10894        lwork: *const lapack_int,
10895        rwork: *mut c_float,
10896        lrwork: *const lapack_int,
10897        iwork: *mut lapack_int,
10898        liwork: *const lapack_int,
10899        info: *mut lapack_int,
10900    );
10901    pub fn zhbevd_(
10902        jobz: *const c_char,
10903        uplo: *const c_char,
10904        n: *const lapack_int,
10905        kd: *const lapack_int,
10906        ab: *mut lapack_complex_double,
10907        ldab: *const lapack_int,
10908        w: *mut c_double,
10909        z: *mut lapack_complex_double,
10910        ldz: *const lapack_int,
10911        work: *mut lapack_complex_double,
10912        lwork: *const lapack_int,
10913        rwork: *mut c_double,
10914        lrwork: *const lapack_int,
10915        iwork: *mut lapack_int,
10916        liwork: *const lapack_int,
10917        info: *mut lapack_int,
10918    );
10919
10920    pub fn ssbevx_(
10921        jobz: *const c_char,
10922        range: *const c_char,
10923        uplo: *const c_char,
10924        n: *const lapack_int,
10925        kd: *const lapack_int,
10926        ab: *mut c_float,
10927        ldab: *const lapack_int,
10928        q: *mut c_float,
10929        ldq: *const lapack_int,
10930        vl: *const c_float,
10931        vu: *const c_float,
10932        il: *const lapack_int,
10933        iu: *const lapack_int,
10934        abstol: *const c_float,
10935        m: *mut lapack_int,
10936        w: *mut c_float,
10937        z: *mut c_float,
10938        ldz: *const lapack_int,
10939        work: *mut c_float,
10940        iwork: *mut lapack_int,
10941        ifail: *mut lapack_int,
10942        info: *mut lapack_int,
10943    );
10944    pub fn dsbevx_(
10945        jobz: *const c_char,
10946        range: *const c_char,
10947        uplo: *const c_char,
10948        n: *const lapack_int,
10949        kd: *const lapack_int,
10950        ab: *mut c_double,
10951        ldab: *const lapack_int,
10952        q: *mut c_double,
10953        ldq: *const lapack_int,
10954        vl: *const c_double,
10955        vu: *const c_double,
10956        il: *const lapack_int,
10957        iu: *const lapack_int,
10958        abstol: *const c_double,
10959        m: *mut lapack_int,
10960        w: *mut c_double,
10961        z: *mut c_double,
10962        ldz: *const lapack_int,
10963        work: *mut c_double,
10964        iwork: *mut lapack_int,
10965        ifail: *mut lapack_int,
10966        info: *mut lapack_int,
10967    );
10968    pub fn chbevx_(
10969        jobz: *const c_char,
10970        range: *const c_char,
10971        uplo: *const c_char,
10972        n: *const lapack_int,
10973        kd: *const lapack_int,
10974        ab: *mut lapack_complex_float,
10975        ldab: *const lapack_int,
10976        q: *mut lapack_complex_float,
10977        ldq: *const lapack_int,
10978        vl: *const c_float,
10979        vu: *const c_float,
10980        il: *const lapack_int,
10981        iu: *const lapack_int,
10982        abstol: *const c_float,
10983        m: *mut lapack_int,
10984        w: *mut c_float,
10985        z: *mut lapack_complex_float,
10986        ldz: *const lapack_int,
10987        work: *mut lapack_complex_float,
10988        rwork: *mut c_float,
10989        iwork: *mut lapack_int,
10990        ifail: *mut lapack_int,
10991        info: *mut lapack_int,
10992    );
10993    pub fn zhbevx_(
10994        jobz: *const c_char,
10995        range: *const c_char,
10996        uplo: *const c_char,
10997        n: *const lapack_int,
10998        kd: *const lapack_int,
10999        ab: *mut lapack_complex_double,
11000        ldab: *const lapack_int,
11001        q: *mut lapack_complex_double,
11002        ldq: *const lapack_int,
11003        vl: *const c_double,
11004        vu: *const c_double,
11005        il: *const lapack_int,
11006        iu: *const lapack_int,
11007        abstol: *const c_double,
11008        m: *mut lapack_int,
11009        w: *mut c_double,
11010        z: *mut lapack_complex_double,
11011        ldz: *const lapack_int,
11012        work: *mut lapack_complex_double,
11013        rwork: *mut c_double,
11014        iwork: *mut lapack_int,
11015        ifail: *mut lapack_int,
11016        info: *mut lapack_int,
11017    );
11018
11019    pub fn sstev_(
11020        jobz: *const c_char,
11021        n: *const lapack_int,
11022        d: *mut c_float,
11023        e: *mut c_float,
11024        z: *mut c_float,
11025        ldz: *const lapack_int,
11026        work: *mut c_float,
11027        info: *mut lapack_int,
11028    );
11029    pub fn dstev_(
11030        jobz: *const c_char,
11031        n: *const lapack_int,
11032        d: *mut c_double,
11033        e: *mut c_double,
11034        z: *mut c_double,
11035        ldz: *const lapack_int,
11036        work: *mut c_double,
11037        info: *mut lapack_int,
11038    );
11039
11040    pub fn sstevd_(
11041        jobz: *const c_char,
11042        n: *const lapack_int,
11043        d: *mut c_float,
11044        e: *mut c_float,
11045        z: *mut c_float,
11046        ldz: *const lapack_int,
11047        work: *mut c_float,
11048        lwork: *const lapack_int,
11049        iwork: *mut lapack_int,
11050        liwork: *const lapack_int,
11051        info: *mut lapack_int,
11052    );
11053    pub fn dstevd_(
11054        jobz: *const c_char,
11055        n: *const lapack_int,
11056        d: *mut c_double,
11057        e: *mut c_double,
11058        z: *mut c_double,
11059        ldz: *const lapack_int,
11060        work: *mut c_double,
11061        lwork: *const lapack_int,
11062        iwork: *mut lapack_int,
11063        liwork: *const lapack_int,
11064        info: *mut lapack_int,
11065    );
11066
11067    pub fn sstevx_(
11068        jobz: *const c_char,
11069        range: *const c_char,
11070        n: *const lapack_int,
11071        d: *mut c_float,
11072        e: *mut c_float,
11073        vl: *const c_float,
11074        vu: *const c_float,
11075        il: *const lapack_int,
11076        iu: *const lapack_int,
11077        abstol: *const c_float,
11078        m: *mut lapack_int,
11079        w: *mut c_float,
11080        z: *mut c_float,
11081        ldz: *const lapack_int,
11082        work: *mut c_float,
11083        iwork: *mut lapack_int,
11084        ifail: *mut lapack_int,
11085        info: *mut lapack_int,
11086    );
11087    pub fn dstevx_(
11088        jobz: *const c_char,
11089        range: *const c_char,
11090        n: *const lapack_int,
11091        d: *mut c_double,
11092        e: *mut c_double,
11093        vl: *const c_double,
11094        vu: *const c_double,
11095        il: *const lapack_int,
11096        iu: *const lapack_int,
11097        abstol: *const c_double,
11098        m: *mut lapack_int,
11099        w: *mut c_double,
11100        z: *mut c_double,
11101        ldz: *const lapack_int,
11102        work: *mut c_double,
11103        iwork: *mut lapack_int,
11104        ifail: *mut lapack_int,
11105        info: *mut lapack_int,
11106    );
11107
11108    pub fn sstevr_(
11109        jobz: *const c_char,
11110        range: *const c_char,
11111        n: *const lapack_int,
11112        d: *mut c_float,
11113        e: *mut c_float,
11114        vl: *const c_float,
11115        vu: *const c_float,
11116        il: *const lapack_int,
11117        iu: *const lapack_int,
11118        abstol: *const c_float,
11119        m: *mut lapack_int,
11120        w: *mut c_float,
11121        z: *mut c_float,
11122        ldz: *const lapack_int,
11123        isuppz: *mut lapack_int,
11124        work: *mut c_float,
11125        lwork: *const lapack_int,
11126        iwork: *mut lapack_int,
11127        liwork: *const lapack_int,
11128        info: *mut lapack_int,
11129    );
11130    pub fn dstevr_(
11131        jobz: *const c_char,
11132        range: *const c_char,
11133        n: *const lapack_int,
11134        d: *mut c_double,
11135        e: *mut c_double,
11136        vl: *const c_double,
11137        vu: *const c_double,
11138        il: *const lapack_int,
11139        iu: *const lapack_int,
11140        abstol: *const c_double,
11141        m: *mut lapack_int,
11142        w: *mut c_double,
11143        z: *mut c_double,
11144        ldz: *const lapack_int,
11145        isuppz: *mut lapack_int,
11146        work: *mut c_double,
11147        lwork: *const lapack_int,
11148        iwork: *mut lapack_int,
11149        liwork: *const lapack_int,
11150        info: *mut lapack_int,
11151    );
11152
11153    pub fn sgees_(
11154        jobvs: *const c_char,
11155        sort: *const c_char,
11156        select: LAPACK_S_SELECT2,
11157        n: *const lapack_int,
11158        a: *mut c_float,
11159        lda: *const lapack_int,
11160        sdim: *mut lapack_int,
11161        wr: *mut c_float,
11162        wi: *mut c_float,
11163        vs: *mut c_float,
11164        ldvs: *const lapack_int,
11165        work: *mut c_float,
11166        lwork: *const lapack_int,
11167        bwork: *mut lapack_logical,
11168        info: *mut lapack_int,
11169    );
11170    pub fn dgees_(
11171        jobvs: *const c_char,
11172        sort: *const c_char,
11173        select: LAPACK_D_SELECT2,
11174        n: *const lapack_int,
11175        a: *mut c_double,
11176        lda: *const lapack_int,
11177        sdim: *mut lapack_int,
11178        wr: *mut c_double,
11179        wi: *mut c_double,
11180        vs: *mut c_double,
11181        ldvs: *const lapack_int,
11182        work: *mut c_double,
11183        lwork: *const lapack_int,
11184        bwork: *mut lapack_logical,
11185        info: *mut lapack_int,
11186    );
11187    pub fn cgees_(
11188        jobvs: *const c_char,
11189        sort: *const c_char,
11190        select: LAPACK_C_SELECT1,
11191        n: *const lapack_int,
11192        a: *mut lapack_complex_float,
11193        lda: *const lapack_int,
11194        sdim: *mut lapack_int,
11195        w: *mut lapack_complex_float,
11196        vs: *mut lapack_complex_float,
11197        ldvs: *const lapack_int,
11198        work: *mut lapack_complex_float,
11199        lwork: *const lapack_int,
11200        rwork: *mut c_float,
11201        bwork: *mut lapack_logical,
11202        info: *mut lapack_int,
11203    );
11204    pub fn zgees_(
11205        jobvs: *const c_char,
11206        sort: *const c_char,
11207        select: LAPACK_Z_SELECT1,
11208        n: *const lapack_int,
11209        a: *mut lapack_complex_double,
11210        lda: *const lapack_int,
11211        sdim: *mut lapack_int,
11212        w: *mut lapack_complex_double,
11213        vs: *mut lapack_complex_double,
11214        ldvs: *const lapack_int,
11215        work: *mut lapack_complex_double,
11216        lwork: *const lapack_int,
11217        rwork: *mut c_double,
11218        bwork: *mut lapack_logical,
11219        info: *mut lapack_int,
11220    );
11221
11222    pub fn sgeesx_(
11223        jobvs: *const c_char,
11224        sort: *const c_char,
11225        select: LAPACK_S_SELECT2,
11226        sense: *const c_char,
11227        n: *const lapack_int,
11228        a: *mut c_float,
11229        lda: *const lapack_int,
11230        sdim: *mut lapack_int,
11231        wr: *mut c_float,
11232        wi: *mut c_float,
11233        vs: *mut c_float,
11234        ldvs: *const lapack_int,
11235        rconde: *mut c_float,
11236        rcondv: *mut c_float,
11237        work: *mut c_float,
11238        lwork: *const lapack_int,
11239        iwork: *mut lapack_int,
11240        liwork: *const lapack_int,
11241        bwork: *mut lapack_logical,
11242        info: *mut lapack_int,
11243    );
11244    pub fn dgeesx_(
11245        jobvs: *const c_char,
11246        sort: *const c_char,
11247        select: LAPACK_D_SELECT2,
11248        sense: *const c_char,
11249        n: *const lapack_int,
11250        a: *mut c_double,
11251        lda: *const lapack_int,
11252        sdim: *mut lapack_int,
11253        wr: *mut c_double,
11254        wi: *mut c_double,
11255        vs: *mut c_double,
11256        ldvs: *const lapack_int,
11257        rconde: *mut c_double,
11258        rcondv: *mut c_double,
11259        work: *mut c_double,
11260        lwork: *const lapack_int,
11261        iwork: *mut lapack_int,
11262        liwork: *const lapack_int,
11263        bwork: *mut lapack_logical,
11264        info: *mut lapack_int,
11265    );
11266    pub fn cgeesx_(
11267        jobvs: *const c_char,
11268        sort: *const c_char,
11269        select: LAPACK_C_SELECT1,
11270        sense: *const c_char,
11271        n: *const lapack_int,
11272        a: *mut lapack_complex_float,
11273        lda: *const lapack_int,
11274        sdim: *mut lapack_int,
11275        w: *mut lapack_complex_float,
11276        vs: *mut lapack_complex_float,
11277        ldvs: *const lapack_int,
11278        rconde: *mut c_float,
11279        rcondv: *mut c_float,
11280        work: *mut lapack_complex_float,
11281        lwork: *const lapack_int,
11282        rwork: *mut c_float,
11283        bwork: *mut lapack_logical,
11284        info: *mut lapack_int,
11285    );
11286    pub fn zgeesx_(
11287        jobvs: *const c_char,
11288        sort: *const c_char,
11289        select: LAPACK_Z_SELECT1,
11290        sense: *const c_char,
11291        n: *const lapack_int,
11292        a: *mut lapack_complex_double,
11293        lda: *const lapack_int,
11294        sdim: *mut lapack_int,
11295        w: *mut lapack_complex_double,
11296        vs: *mut lapack_complex_double,
11297        ldvs: *const lapack_int,
11298        rconde: *mut c_double,
11299        rcondv: *mut c_double,
11300        work: *mut lapack_complex_double,
11301        lwork: *const lapack_int,
11302        rwork: *mut c_double,
11303        bwork: *mut lapack_logical,
11304        info: *mut lapack_int,
11305    );
11306
11307    pub fn sgeev_(
11308        jobvl: *const c_char,
11309        jobvr: *const c_char,
11310        n: *const lapack_int,
11311        a: *mut c_float,
11312        lda: *const lapack_int,
11313        wr: *mut c_float,
11314        wi: *mut c_float,
11315        vl: *mut c_float,
11316        ldvl: *const lapack_int,
11317        vr: *mut c_float,
11318        ldvr: *const lapack_int,
11319        work: *mut c_float,
11320        lwork: *const lapack_int,
11321        info: *mut lapack_int,
11322    );
11323    pub fn dgeev_(
11324        jobvl: *const c_char,
11325        jobvr: *const c_char,
11326        n: *const lapack_int,
11327        a: *mut c_double,
11328        lda: *const lapack_int,
11329        wr: *mut c_double,
11330        wi: *mut c_double,
11331        vl: *mut c_double,
11332        ldvl: *const lapack_int,
11333        vr: *mut c_double,
11334        ldvr: *const lapack_int,
11335        work: *mut c_double,
11336        lwork: *const lapack_int,
11337        info: *mut lapack_int,
11338    );
11339    pub fn cgeev_(
11340        jobvl: *const c_char,
11341        jobvr: *const c_char,
11342        n: *const lapack_int,
11343        a: *mut lapack_complex_float,
11344        lda: *const lapack_int,
11345        w: *mut lapack_complex_float,
11346        vl: *mut lapack_complex_float,
11347        ldvl: *const lapack_int,
11348        vr: *mut lapack_complex_float,
11349        ldvr: *const lapack_int,
11350        work: *mut lapack_complex_float,
11351        lwork: *const lapack_int,
11352        rwork: *mut c_float,
11353        info: *mut lapack_int,
11354    );
11355    pub fn zgeev_(
11356        jobvl: *const c_char,
11357        jobvr: *const c_char,
11358        n: *const lapack_int,
11359        a: *mut lapack_complex_double,
11360        lda: *const lapack_int,
11361        w: *mut lapack_complex_double,
11362        vl: *mut lapack_complex_double,
11363        ldvl: *const lapack_int,
11364        vr: *mut lapack_complex_double,
11365        ldvr: *const lapack_int,
11366        work: *mut lapack_complex_double,
11367        lwork: *const lapack_int,
11368        rwork: *mut c_double,
11369        info: *mut lapack_int,
11370    );
11371
11372    pub fn sgeevx_(
11373        balanc: *const c_char,
11374        jobvl: *const c_char,
11375        jobvr: *const c_char,
11376        sense: *const c_char,
11377        n: *const lapack_int,
11378        a: *mut c_float,
11379        lda: *const lapack_int,
11380        wr: *mut c_float,
11381        wi: *mut c_float,
11382        vl: *mut c_float,
11383        ldvl: *const lapack_int,
11384        vr: *mut c_float,
11385        ldvr: *const lapack_int,
11386        ilo: *mut lapack_int,
11387        ihi: *mut lapack_int,
11388        scale: *mut c_float,
11389        abnrm: *mut c_float,
11390        rconde: *mut c_float,
11391        rcondv: *mut c_float,
11392        work: *mut c_float,
11393        lwork: *const lapack_int,
11394        iwork: *mut lapack_int,
11395        info: *mut lapack_int,
11396    );
11397    pub fn dgeevx_(
11398        balanc: *const c_char,
11399        jobvl: *const c_char,
11400        jobvr: *const c_char,
11401        sense: *const c_char,
11402        n: *const lapack_int,
11403        a: *mut c_double,
11404        lda: *const lapack_int,
11405        wr: *mut c_double,
11406        wi: *mut c_double,
11407        vl: *mut c_double,
11408        ldvl: *const lapack_int,
11409        vr: *mut c_double,
11410        ldvr: *const lapack_int,
11411        ilo: *mut lapack_int,
11412        ihi: *mut lapack_int,
11413        scale: *mut c_double,
11414        abnrm: *mut c_double,
11415        rconde: *mut c_double,
11416        rcondv: *mut c_double,
11417        work: *mut c_double,
11418        lwork: *const lapack_int,
11419        iwork: *mut lapack_int,
11420        info: *mut lapack_int,
11421    );
11422    pub fn cgeevx_(
11423        balanc: *const c_char,
11424        jobvl: *const c_char,
11425        jobvr: *const c_char,
11426        sense: *const c_char,
11427        n: *const lapack_int,
11428        a: *mut lapack_complex_float,
11429        lda: *const lapack_int,
11430        w: *mut lapack_complex_float,
11431        vl: *mut lapack_complex_float,
11432        ldvl: *const lapack_int,
11433        vr: *mut lapack_complex_float,
11434        ldvr: *const lapack_int,
11435        ilo: *mut lapack_int,
11436        ihi: *mut lapack_int,
11437        scale: *mut c_float,
11438        abnrm: *mut c_float,
11439        rconde: *mut c_float,
11440        rcondv: *mut c_float,
11441        work: *mut lapack_complex_float,
11442        lwork: *const lapack_int,
11443        rwork: *mut c_float,
11444        info: *mut lapack_int,
11445    );
11446    pub fn zgeevx_(
11447        balanc: *const c_char,
11448        jobvl: *const c_char,
11449        jobvr: *const c_char,
11450        sense: *const c_char,
11451        n: *const lapack_int,
11452        a: *mut lapack_complex_double,
11453        lda: *const lapack_int,
11454        w: *mut lapack_complex_double,
11455        vl: *mut lapack_complex_double,
11456        ldvl: *const lapack_int,
11457        vr: *mut lapack_complex_double,
11458        ldvr: *const lapack_int,
11459        ilo: *mut lapack_int,
11460        ihi: *mut lapack_int,
11461        scale: *mut c_double,
11462        abnrm: *mut c_double,
11463        rconde: *mut c_double,
11464        rcondv: *mut c_double,
11465        work: *mut lapack_complex_double,
11466        lwork: *const lapack_int,
11467        rwork: *mut c_double,
11468        info: *mut lapack_int,
11469    );
11470
11471    pub fn sgesvd_(
11472        jobu: *const c_char,
11473        jobvt: *const c_char,
11474        m: *const lapack_int,
11475        n: *const lapack_int,
11476        a: *mut c_float,
11477        lda: *const lapack_int,
11478        s: *mut c_float,
11479        u: *mut c_float,
11480        ldu: *const lapack_int,
11481        vt: *mut c_float,
11482        ldvt: *const lapack_int,
11483        work: *mut c_float,
11484        lwork: *const lapack_int,
11485        info: *mut lapack_int,
11486    );
11487    pub fn dgesvd_(
11488        jobu: *const c_char,
11489        jobvt: *const c_char,
11490        m: *const lapack_int,
11491        n: *const lapack_int,
11492        a: *mut c_double,
11493        lda: *const lapack_int,
11494        s: *mut c_double,
11495        u: *mut c_double,
11496        ldu: *const lapack_int,
11497        vt: *mut c_double,
11498        ldvt: *const lapack_int,
11499        work: *mut c_double,
11500        lwork: *const lapack_int,
11501        info: *mut lapack_int,
11502    );
11503    pub fn cgesvd_(
11504        jobu: *const c_char,
11505        jobvt: *const c_char,
11506        m: *const lapack_int,
11507        n: *const lapack_int,
11508        a: *mut lapack_complex_float,
11509        lda: *const lapack_int,
11510        s: *mut c_float,
11511        u: *mut lapack_complex_float,
11512        ldu: *const lapack_int,
11513        vt: *mut lapack_complex_float,
11514        ldvt: *const lapack_int,
11515        work: *mut lapack_complex_float,
11516        lwork: *const lapack_int,
11517        rwork: *mut c_float,
11518        info: *mut lapack_int,
11519    );
11520    pub fn zgesvd_(
11521        jobu: *const c_char,
11522        jobvt: *const c_char,
11523        m: *const lapack_int,
11524        n: *const lapack_int,
11525        a: *mut lapack_complex_double,
11526        lda: *const lapack_int,
11527        s: *mut c_double,
11528        u: *mut lapack_complex_double,
11529        ldu: *const lapack_int,
11530        vt: *mut lapack_complex_double,
11531        ldvt: *const lapack_int,
11532        work: *mut lapack_complex_double,
11533        lwork: *const lapack_int,
11534        rwork: *mut c_double,
11535        info: *mut lapack_int,
11536    );
11537
11538    pub fn sgesvdx_(
11539        jobu: *const c_char,
11540        jobvt: *const c_char,
11541        range: *const c_char,
11542        m: *const lapack_int,
11543        n: *const lapack_int,
11544        a: *mut c_float,
11545        lda: *const lapack_int,
11546        vl: *const c_float,
11547        vu: *const c_float,
11548        il: *const lapack_int,
11549        iu: *const lapack_int,
11550        ns: *mut lapack_int,
11551        s: *mut c_float,
11552        u: *mut c_float,
11553        ldu: *const lapack_int,
11554        vt: *mut c_float,
11555        ldvt: *const lapack_int,
11556        work: *mut c_float,
11557        lwork: *const lapack_int,
11558        iwork: *mut lapack_int,
11559        info: *mut lapack_int,
11560    );
11561    pub fn dgesvdx_(
11562        jobu: *const c_char,
11563        jobvt: *const c_char,
11564        range: *const c_char,
11565        m: *const lapack_int,
11566        n: *const lapack_int,
11567        a: *mut c_double,
11568        lda: *const lapack_int,
11569        vl: *const c_double,
11570        vu: *const c_double,
11571        il: *const lapack_int,
11572        iu: *const lapack_int,
11573        ns: *mut lapack_int,
11574        s: *mut c_double,
11575        u: *mut c_double,
11576        ldu: *const lapack_int,
11577        vt: *mut c_double,
11578        ldvt: *const lapack_int,
11579        work: *mut c_double,
11580        lwork: *const lapack_int,
11581        iwork: *mut lapack_int,
11582        info: *mut lapack_int,
11583    );
11584    pub fn cgesvdx_(
11585        jobu: *const c_char,
11586        jobvt: *const c_char,
11587        range: *const c_char,
11588        m: *const lapack_int,
11589        n: *const lapack_int,
11590        a: *mut lapack_complex_float,
11591        lda: *const lapack_int,
11592        vl: *const c_float,
11593        vu: *const c_float,
11594        il: *const lapack_int,
11595        iu: *const lapack_int,
11596        ns: *mut lapack_int,
11597        s: *mut c_float,
11598        u: *mut lapack_complex_float,
11599        ldu: *const lapack_int,
11600        vt: *mut lapack_complex_float,
11601        ldvt: *const lapack_int,
11602        work: *mut lapack_complex_float,
11603        lwork: *const lapack_int,
11604        rwork: *mut c_float,
11605        iwork: *mut lapack_int,
11606        info: *mut lapack_int,
11607    );
11608    pub fn zgesvdx_(
11609        jobu: *const c_char,
11610        jobvt: *const c_char,
11611        range: *const c_char,
11612        m: *const lapack_int,
11613        n: *const lapack_int,
11614        a: *mut lapack_complex_double,
11615        lda: *const lapack_int,
11616        vl: *const c_double,
11617        vu: *const c_double,
11618        il: *const lapack_int,
11619        iu: *const lapack_int,
11620        ns: *mut lapack_int,
11621        s: *mut c_double,
11622        u: *mut lapack_complex_double,
11623        ldu: *const lapack_int,
11624        vt: *mut lapack_complex_double,
11625        ldvt: *const lapack_int,
11626        work: *mut lapack_complex_double,
11627        lwork: *const lapack_int,
11628        rwork: *mut c_double,
11629        iwork: *mut lapack_int,
11630        info: *mut lapack_int,
11631    );
11632
11633    pub fn sgesdd_(
11634        jobz: *const c_char,
11635        m: *const lapack_int,
11636        n: *const lapack_int,
11637        a: *mut c_float,
11638        lda: *const lapack_int,
11639        s: *mut c_float,
11640        u: *mut c_float,
11641        ldu: *const lapack_int,
11642        vt: *mut c_float,
11643        ldvt: *const lapack_int,
11644        work: *mut c_float,
11645        lwork: *const lapack_int,
11646        iwork: *mut lapack_int,
11647        info: *mut lapack_int,
11648    );
11649    pub fn dgesdd_(
11650        jobz: *const c_char,
11651        m: *const lapack_int,
11652        n: *const lapack_int,
11653        a: *mut c_double,
11654        lda: *const lapack_int,
11655        s: *mut c_double,
11656        u: *mut c_double,
11657        ldu: *const lapack_int,
11658        vt: *mut c_double,
11659        ldvt: *const lapack_int,
11660        work: *mut c_double,
11661        lwork: *const lapack_int,
11662        iwork: *mut lapack_int,
11663        info: *mut lapack_int,
11664    );
11665    pub fn cgesdd_(
11666        jobz: *const c_char,
11667        m: *const lapack_int,
11668        n: *const lapack_int,
11669        a: *mut lapack_complex_float,
11670        lda: *const lapack_int,
11671        s: *mut c_float,
11672        u: *mut lapack_complex_float,
11673        ldu: *const lapack_int,
11674        vt: *mut lapack_complex_float,
11675        ldvt: *const lapack_int,
11676        work: *mut lapack_complex_float,
11677        lwork: *const lapack_int,
11678        rwork: *mut c_float,
11679        iwork: *mut lapack_int,
11680        info: *mut lapack_int,
11681    );
11682    pub fn zgesdd_(
11683        jobz: *const c_char,
11684        m: *const lapack_int,
11685        n: *const lapack_int,
11686        a: *mut lapack_complex_double,
11687        lda: *const lapack_int,
11688        s: *mut c_double,
11689        u: *mut lapack_complex_double,
11690        ldu: *const lapack_int,
11691        vt: *mut lapack_complex_double,
11692        ldvt: *const lapack_int,
11693        work: *mut lapack_complex_double,
11694        lwork: *const lapack_int,
11695        rwork: *mut c_double,
11696        iwork: *mut lapack_int,
11697        info: *mut lapack_int,
11698    );
11699
11700    pub fn dgejsv_(
11701        joba: *const c_char,
11702        jobu: *const c_char,
11703        jobv: *const c_char,
11704        jobr: *const c_char,
11705        jobt: *const c_char,
11706        jobp: *const c_char,
11707        m: *const lapack_int,
11708        n: *const lapack_int,
11709        a: *mut c_double,
11710        lda: *const lapack_int,
11711        sva: *mut c_double,
11712        u: *mut c_double,
11713        ldu: *const lapack_int,
11714        v: *mut c_double,
11715        ldv: *const lapack_int,
11716        work: *mut c_double,
11717        lwork: *const lapack_int,
11718        iwork: *mut lapack_int,
11719        info: *mut lapack_int,
11720    );
11721    pub fn sgejsv_(
11722        joba: *const c_char,
11723        jobu: *const c_char,
11724        jobv: *const c_char,
11725        jobr: *const c_char,
11726        jobt: *const c_char,
11727        jobp: *const c_char,
11728        m: *const lapack_int,
11729        n: *const lapack_int,
11730        a: *mut c_float,
11731        lda: *const lapack_int,
11732        sva: *mut c_float,
11733        u: *mut c_float,
11734        ldu: *const lapack_int,
11735        v: *mut c_float,
11736        ldv: *const lapack_int,
11737        work: *mut c_float,
11738        lwork: *const lapack_int,
11739        iwork: *mut lapack_int,
11740        info: *mut lapack_int,
11741    );
11742    pub fn cgejsv_(
11743        joba: *const c_char,
11744        jobu: *const c_char,
11745        jobv: *const c_char,
11746        jobr: *const c_char,
11747        jobt: *const c_char,
11748        jobp: *const c_char,
11749        m: *const lapack_int,
11750        n: *const lapack_int,
11751        a: *mut lapack_complex_float,
11752        lda: *const lapack_int,
11753        sva: *mut c_float,
11754        u: *mut lapack_complex_float,
11755        ldu: *const lapack_int,
11756        v: *mut lapack_complex_float,
11757        ldv: *const lapack_int,
11758        cwork: *mut lapack_complex_float,
11759        lwork: *const lapack_int,
11760        work: *mut c_float,
11761        lrwork: *const lapack_int,
11762        iwork: *mut lapack_int,
11763        info: *mut lapack_int,
11764    );
11765    pub fn zgejsv_(
11766        joba: *const c_char,
11767        jobu: *const c_char,
11768        jobv: *const c_char,
11769        jobr: *const c_char,
11770        jobt: *const c_char,
11771        jobp: *const c_char,
11772        m: *const lapack_int,
11773        n: *const lapack_int,
11774        a: *mut lapack_complex_double,
11775        lda: *const lapack_int,
11776        sva: *mut c_double,
11777        u: *mut lapack_complex_double,
11778        ldu: *const lapack_int,
11779        v: *mut lapack_complex_double,
11780        ldv: *const lapack_int,
11781        cwork: *mut lapack_complex_double,
11782        lwork: *const lapack_int,
11783        work: *mut c_double,
11784        lrwork: *const lapack_int,
11785        iwork: *mut lapack_int,
11786        info: *mut lapack_int,
11787    );
11788
11789    pub fn dgesvj_(
11790        joba: *const c_char,
11791        jobu: *const c_char,
11792        jobv: *const c_char,
11793        m: *const lapack_int,
11794        n: *const lapack_int,
11795        a: *mut c_double,
11796        lda: *const lapack_int,
11797        sva: *mut c_double,
11798        mv: *const lapack_int,
11799        v: *mut c_double,
11800        ldv: *const lapack_int,
11801        work: *mut c_double,
11802        lwork: *const lapack_int,
11803        info: *mut lapack_int,
11804    );
11805    pub fn sgesvj_(
11806        joba: *const c_char,
11807        jobu: *const c_char,
11808        jobv: *const c_char,
11809        m: *const lapack_int,
11810        n: *const lapack_int,
11811        a: *mut c_float,
11812        lda: *const lapack_int,
11813        sva: *mut c_float,
11814        mv: *const lapack_int,
11815        v: *mut c_float,
11816        ldv: *const lapack_int,
11817        work: *mut c_float,
11818        lwork: *const lapack_int,
11819        info: *mut lapack_int,
11820    );
11821    pub fn cgesvj_(
11822        joba: *const c_char,
11823        jobu: *const c_char,
11824        jobv: *const c_char,
11825        m: *const lapack_int,
11826        n: *const lapack_int,
11827        a: *mut lapack_complex_float,
11828        lda: *const lapack_int,
11829        sva: *mut c_float,
11830        mv: *const lapack_int,
11831        v: *mut lapack_complex_float,
11832        ldv: *const lapack_int,
11833        cwork: *mut lapack_complex_float,
11834        lwork: *const lapack_int,
11835        rwork: *mut c_float,
11836        lrwork: *const lapack_int,
11837        info: *mut lapack_int,
11838    );
11839    pub fn zgesvj_(
11840        joba: *const c_char,
11841        jobu: *const c_char,
11842        jobv: *const c_char,
11843        m: *const lapack_int,
11844        n: *const lapack_int,
11845        a: *mut lapack_complex_double,
11846        lda: *const lapack_int,
11847        sva: *mut c_double,
11848        mv: *const lapack_int,
11849        v: *mut lapack_complex_double,
11850        ldv: *const lapack_int,
11851        cwork: *mut lapack_complex_double,
11852        lwork: *const lapack_int,
11853        rwork: *mut c_double,
11854        lrwork: *const lapack_int,
11855        info: *mut lapack_int,
11856    );
11857
11858    pub fn sggsvd_(
11859        jobu: *const c_char,
11860        jobv: *const c_char,
11861        jobq: *const c_char,
11862        m: *const lapack_int,
11863        n: *const lapack_int,
11864        p: *const lapack_int,
11865        k: *mut lapack_int,
11866        l: *mut lapack_int,
11867        a: *mut c_float,
11868        lda: *const lapack_int,
11869        b: *mut c_float,
11870        ldb: *const lapack_int,
11871        alpha: *mut c_float,
11872        beta: *mut c_float,
11873        u: *mut c_float,
11874        ldu: *const lapack_int,
11875        v: *mut c_float,
11876        ldv: *const lapack_int,
11877        q: *mut c_float,
11878        ldq: *const lapack_int,
11879        work: *mut c_float,
11880        iwork: *mut lapack_int,
11881        info: *mut lapack_int,
11882    );
11883    pub fn dggsvd_(
11884        jobu: *const c_char,
11885        jobv: *const c_char,
11886        jobq: *const c_char,
11887        m: *const lapack_int,
11888        n: *const lapack_int,
11889        p: *const lapack_int,
11890        k: *mut lapack_int,
11891        l: *mut lapack_int,
11892        a: *mut c_double,
11893        lda: *const lapack_int,
11894        b: *mut c_double,
11895        ldb: *const lapack_int,
11896        alpha: *mut c_double,
11897        beta: *mut c_double,
11898        u: *mut c_double,
11899        ldu: *const lapack_int,
11900        v: *mut c_double,
11901        ldv: *const lapack_int,
11902        q: *mut c_double,
11903        ldq: *const lapack_int,
11904        work: *mut c_double,
11905        iwork: *mut lapack_int,
11906        info: *mut lapack_int,
11907    );
11908    pub fn cggsvd_(
11909        jobu: *const c_char,
11910        jobv: *const c_char,
11911        jobq: *const c_char,
11912        m: *const lapack_int,
11913        n: *const lapack_int,
11914        p: *const lapack_int,
11915        k: *mut lapack_int,
11916        l: *mut lapack_int,
11917        a: *mut lapack_complex_float,
11918        lda: *const lapack_int,
11919        b: *mut lapack_complex_float,
11920        ldb: *const lapack_int,
11921        alpha: *mut c_float,
11922        beta: *mut c_float,
11923        u: *mut lapack_complex_float,
11924        ldu: *const lapack_int,
11925        v: *mut lapack_complex_float,
11926        ldv: *const lapack_int,
11927        q: *mut lapack_complex_float,
11928        ldq: *const lapack_int,
11929        work: *mut lapack_complex_float,
11930        rwork: *mut c_float,
11931        iwork: *mut lapack_int,
11932        info: *mut lapack_int,
11933    );
11934    pub fn zggsvd_(
11935        jobu: *const c_char,
11936        jobv: *const c_char,
11937        jobq: *const c_char,
11938        m: *const lapack_int,
11939        n: *const lapack_int,
11940        p: *const lapack_int,
11941        k: *mut lapack_int,
11942        l: *mut lapack_int,
11943        a: *mut lapack_complex_double,
11944        lda: *const lapack_int,
11945        b: *mut lapack_complex_double,
11946        ldb: *const lapack_int,
11947        alpha: *mut c_double,
11948        beta: *mut c_double,
11949        u: *mut lapack_complex_double,
11950        ldu: *const lapack_int,
11951        v: *mut lapack_complex_double,
11952        ldv: *const lapack_int,
11953        q: *mut lapack_complex_double,
11954        ldq: *const lapack_int,
11955        work: *mut lapack_complex_double,
11956        rwork: *mut c_double,
11957        iwork: *mut lapack_int,
11958        info: *mut lapack_int,
11959    );
11960
11961    pub fn sggsvd3_(
11962        jobu: *const c_char,
11963        jobv: *const c_char,
11964        jobq: *const c_char,
11965        m: *const lapack_int,
11966        n: *const lapack_int,
11967        p: *const lapack_int,
11968        k: *mut lapack_int,
11969        l: *mut lapack_int,
11970        a: *mut c_float,
11971        lda: *const lapack_int,
11972        b: *mut c_float,
11973        ldb: *const lapack_int,
11974        alpha: *mut c_float,
11975        beta: *mut c_float,
11976        u: *mut c_float,
11977        ldu: *const lapack_int,
11978        v: *mut c_float,
11979        ldv: *const lapack_int,
11980        q: *mut c_float,
11981        ldq: *const lapack_int,
11982        work: *mut c_float,
11983        lwork: *const lapack_int,
11984        iwork: *mut lapack_int,
11985        info: *mut lapack_int,
11986    );
11987    pub fn dggsvd3_(
11988        jobu: *const c_char,
11989        jobv: *const c_char,
11990        jobq: *const c_char,
11991        m: *const lapack_int,
11992        n: *const lapack_int,
11993        p: *const lapack_int,
11994        k: *mut lapack_int,
11995        l: *mut lapack_int,
11996        a: *mut c_double,
11997        lda: *const lapack_int,
11998        b: *mut c_double,
11999        ldb: *const lapack_int,
12000        alpha: *mut c_double,
12001        beta: *mut c_double,
12002        u: *mut c_double,
12003        ldu: *const lapack_int,
12004        v: *mut c_double,
12005        ldv: *const lapack_int,
12006        q: *mut c_double,
12007        ldq: *const lapack_int,
12008        work: *mut c_double,
12009        lwork: *const lapack_int,
12010        iwork: *mut lapack_int,
12011        info: *mut lapack_int,
12012    );
12013    pub fn cggsvd3_(
12014        jobu: *const c_char,
12015        jobv: *const c_char,
12016        jobq: *const c_char,
12017        m: *const lapack_int,
12018        n: *const lapack_int,
12019        p: *const lapack_int,
12020        k: *mut lapack_int,
12021        l: *mut lapack_int,
12022        a: *mut lapack_complex_float,
12023        lda: *const lapack_int,
12024        b: *mut lapack_complex_float,
12025        ldb: *const lapack_int,
12026        alpha: *mut c_float,
12027        beta: *mut c_float,
12028        u: *mut lapack_complex_float,
12029        ldu: *const lapack_int,
12030        v: *mut lapack_complex_float,
12031        ldv: *const lapack_int,
12032        q: *mut lapack_complex_float,
12033        ldq: *const lapack_int,
12034        work: *mut lapack_complex_float,
12035        lwork: *const lapack_int,
12036        rwork: *mut c_float,
12037        iwork: *mut lapack_int,
12038        info: *mut lapack_int,
12039    );
12040    pub fn zggsvd3_(
12041        jobu: *const c_char,
12042        jobv: *const c_char,
12043        jobq: *const c_char,
12044        m: *const lapack_int,
12045        n: *const lapack_int,
12046        p: *const lapack_int,
12047        k: *mut lapack_int,
12048        l: *mut lapack_int,
12049        a: *mut lapack_complex_double,
12050        lda: *const lapack_int,
12051        b: *mut lapack_complex_double,
12052        ldb: *const lapack_int,
12053        alpha: *mut c_double,
12054        beta: *mut c_double,
12055        u: *mut lapack_complex_double,
12056        ldu: *const lapack_int,
12057        v: *mut lapack_complex_double,
12058        ldv: *const lapack_int,
12059        q: *mut lapack_complex_double,
12060        ldq: *const lapack_int,
12061        work: *mut lapack_complex_double,
12062        lwork: *const lapack_int,
12063        rwork: *mut c_double,
12064        iwork: *mut lapack_int,
12065        info: *mut lapack_int,
12066    );
12067
12068    pub fn ssygv_(
12069        itype: *const lapack_int,
12070        jobz: *const c_char,
12071        uplo: *const c_char,
12072        n: *const lapack_int,
12073        a: *mut c_float,
12074        lda: *const lapack_int,
12075        b: *mut c_float,
12076        ldb: *const lapack_int,
12077        w: *mut c_float,
12078        work: *mut c_float,
12079        lwork: *const lapack_int,
12080        info: *mut lapack_int,
12081    );
12082    pub fn dsygv_(
12083        itype: *const lapack_int,
12084        jobz: *const c_char,
12085        uplo: *const c_char,
12086        n: *const lapack_int,
12087        a: *mut c_double,
12088        lda: *const lapack_int,
12089        b: *mut c_double,
12090        ldb: *const lapack_int,
12091        w: *mut c_double,
12092        work: *mut c_double,
12093        lwork: *const lapack_int,
12094        info: *mut lapack_int,
12095    );
12096    pub fn chegv_(
12097        itype: *const lapack_int,
12098        jobz: *const c_char,
12099        uplo: *const c_char,
12100        n: *const lapack_int,
12101        a: *mut lapack_complex_float,
12102        lda: *const lapack_int,
12103        b: *mut lapack_complex_float,
12104        ldb: *const lapack_int,
12105        w: *mut c_float,
12106        work: *mut lapack_complex_float,
12107        lwork: *const lapack_int,
12108        rwork: *mut c_float,
12109        info: *mut lapack_int,
12110    );
12111    pub fn zhegv_(
12112        itype: *const lapack_int,
12113        jobz: *const c_char,
12114        uplo: *const c_char,
12115        n: *const lapack_int,
12116        a: *mut lapack_complex_double,
12117        lda: *const lapack_int,
12118        b: *mut lapack_complex_double,
12119        ldb: *const lapack_int,
12120        w: *mut c_double,
12121        work: *mut lapack_complex_double,
12122        lwork: *const lapack_int,
12123        rwork: *mut c_double,
12124        info: *mut lapack_int,
12125    );
12126
12127    pub fn ssygvd_(
12128        itype: *const lapack_int,
12129        jobz: *const c_char,
12130        uplo: *const c_char,
12131        n: *const lapack_int,
12132        a: *mut c_float,
12133        lda: *const lapack_int,
12134        b: *mut c_float,
12135        ldb: *const lapack_int,
12136        w: *mut c_float,
12137        work: *mut c_float,
12138        lwork: *const lapack_int,
12139        iwork: *mut lapack_int,
12140        liwork: *const lapack_int,
12141        info: *mut lapack_int,
12142    );
12143    pub fn dsygvd_(
12144        itype: *const lapack_int,
12145        jobz: *const c_char,
12146        uplo: *const c_char,
12147        n: *const lapack_int,
12148        a: *mut c_double,
12149        lda: *const lapack_int,
12150        b: *mut c_double,
12151        ldb: *const lapack_int,
12152        w: *mut c_double,
12153        work: *mut c_double,
12154        lwork: *const lapack_int,
12155        iwork: *mut lapack_int,
12156        liwork: *const lapack_int,
12157        info: *mut lapack_int,
12158    );
12159    pub fn chegvd_(
12160        itype: *const lapack_int,
12161        jobz: *const c_char,
12162        uplo: *const c_char,
12163        n: *const lapack_int,
12164        a: *mut lapack_complex_float,
12165        lda: *const lapack_int,
12166        b: *mut lapack_complex_float,
12167        ldb: *const lapack_int,
12168        w: *mut c_float,
12169        work: *mut lapack_complex_float,
12170        lwork: *const lapack_int,
12171        rwork: *mut c_float,
12172        lrwork: *const lapack_int,
12173        iwork: *mut lapack_int,
12174        liwork: *const lapack_int,
12175        info: *mut lapack_int,
12176    );
12177    pub fn zhegvd_(
12178        itype: *const lapack_int,
12179        jobz: *const c_char,
12180        uplo: *const c_char,
12181        n: *const lapack_int,
12182        a: *mut lapack_complex_double,
12183        lda: *const lapack_int,
12184        b: *mut lapack_complex_double,
12185        ldb: *const lapack_int,
12186        w: *mut c_double,
12187        work: *mut lapack_complex_double,
12188        lwork: *const lapack_int,
12189        rwork: *mut c_double,
12190        lrwork: *const lapack_int,
12191        iwork: *mut lapack_int,
12192        liwork: *const lapack_int,
12193        info: *mut lapack_int,
12194    );
12195
12196    pub fn ssygvx_(
12197        itype: *const lapack_int,
12198        jobz: *const c_char,
12199        range: *const c_char,
12200        uplo: *const c_char,
12201        n: *const lapack_int,
12202        a: *mut c_float,
12203        lda: *const lapack_int,
12204        b: *mut c_float,
12205        ldb: *const lapack_int,
12206        vl: *const c_float,
12207        vu: *const c_float,
12208        il: *const lapack_int,
12209        iu: *const lapack_int,
12210        abstol: *const c_float,
12211        m: *mut lapack_int,
12212        w: *mut c_float,
12213        z: *mut c_float,
12214        ldz: *const lapack_int,
12215        work: *mut c_float,
12216        lwork: *const lapack_int,
12217        iwork: *mut lapack_int,
12218        ifail: *mut lapack_int,
12219        info: *mut lapack_int,
12220    );
12221    pub fn dsygvx_(
12222        itype: *const lapack_int,
12223        jobz: *const c_char,
12224        range: *const c_char,
12225        uplo: *const c_char,
12226        n: *const lapack_int,
12227        a: *mut c_double,
12228        lda: *const lapack_int,
12229        b: *mut c_double,
12230        ldb: *const lapack_int,
12231        vl: *const c_double,
12232        vu: *const c_double,
12233        il: *const lapack_int,
12234        iu: *const lapack_int,
12235        abstol: *const c_double,
12236        m: *mut lapack_int,
12237        w: *mut c_double,
12238        z: *mut c_double,
12239        ldz: *const lapack_int,
12240        work: *mut c_double,
12241        lwork: *const lapack_int,
12242        iwork: *mut lapack_int,
12243        ifail: *mut lapack_int,
12244        info: *mut lapack_int,
12245    );
12246    pub fn chegvx_(
12247        itype: *const lapack_int,
12248        jobz: *const c_char,
12249        range: *const c_char,
12250        uplo: *const c_char,
12251        n: *const lapack_int,
12252        a: *mut lapack_complex_float,
12253        lda: *const lapack_int,
12254        b: *mut lapack_complex_float,
12255        ldb: *const lapack_int,
12256        vl: *const c_float,
12257        vu: *const c_float,
12258        il: *const lapack_int,
12259        iu: *const lapack_int,
12260        abstol: *const c_float,
12261        m: *mut lapack_int,
12262        w: *mut c_float,
12263        z: *mut lapack_complex_float,
12264        ldz: *const lapack_int,
12265        work: *mut lapack_complex_float,
12266        lwork: *const lapack_int,
12267        rwork: *mut c_float,
12268        iwork: *mut lapack_int,
12269        ifail: *mut lapack_int,
12270        info: *mut lapack_int,
12271    );
12272    pub fn zhegvx_(
12273        itype: *const lapack_int,
12274        jobz: *const c_char,
12275        range: *const c_char,
12276        uplo: *const c_char,
12277        n: *const lapack_int,
12278        a: *mut lapack_complex_double,
12279        lda: *const lapack_int,
12280        b: *mut lapack_complex_double,
12281        ldb: *const lapack_int,
12282        vl: *const c_double,
12283        vu: *const c_double,
12284        il: *const lapack_int,
12285        iu: *const lapack_int,
12286        abstol: *const c_double,
12287        m: *mut lapack_int,
12288        w: *mut c_double,
12289        z: *mut lapack_complex_double,
12290        ldz: *const lapack_int,
12291        work: *mut lapack_complex_double,
12292        lwork: *const lapack_int,
12293        rwork: *mut c_double,
12294        iwork: *mut lapack_int,
12295        ifail: *mut lapack_int,
12296        info: *mut lapack_int,
12297    );
12298
12299    pub fn sspgv_(
12300        itype: *const lapack_int,
12301        jobz: *const c_char,
12302        uplo: *const c_char,
12303        n: *const lapack_int,
12304        ap: *mut c_float,
12305        bp: *mut c_float,
12306        w: *mut c_float,
12307        z: *mut c_float,
12308        ldz: *const lapack_int,
12309        work: *mut c_float,
12310        info: *mut lapack_int,
12311    );
12312    pub fn dspgv_(
12313        itype: *const lapack_int,
12314        jobz: *const c_char,
12315        uplo: *const c_char,
12316        n: *const lapack_int,
12317        ap: *mut c_double,
12318        bp: *mut c_double,
12319        w: *mut c_double,
12320        z: *mut c_double,
12321        ldz: *const lapack_int,
12322        work: *mut c_double,
12323        info: *mut lapack_int,
12324    );
12325    pub fn chpgv_(
12326        itype: *const lapack_int,
12327        jobz: *const c_char,
12328        uplo: *const c_char,
12329        n: *const lapack_int,
12330        ap: *mut lapack_complex_float,
12331        bp: *mut lapack_complex_float,
12332        w: *mut c_float,
12333        z: *mut lapack_complex_float,
12334        ldz: *const lapack_int,
12335        work: *mut lapack_complex_float,
12336        rwork: *mut c_float,
12337        info: *mut lapack_int,
12338    );
12339    pub fn zhpgv_(
12340        itype: *const lapack_int,
12341        jobz: *const c_char,
12342        uplo: *const c_char,
12343        n: *const lapack_int,
12344        ap: *mut lapack_complex_double,
12345        bp: *mut lapack_complex_double,
12346        w: *mut c_double,
12347        z: *mut lapack_complex_double,
12348        ldz: *const lapack_int,
12349        work: *mut lapack_complex_double,
12350        rwork: *mut c_double,
12351        info: *mut lapack_int,
12352    );
12353
12354    pub fn sspgvd_(
12355        itype: *const lapack_int,
12356        jobz: *const c_char,
12357        uplo: *const c_char,
12358        n: *const lapack_int,
12359        ap: *mut c_float,
12360        bp: *mut c_float,
12361        w: *mut c_float,
12362        z: *mut c_float,
12363        ldz: *const lapack_int,
12364        work: *mut c_float,
12365        lwork: *const lapack_int,
12366        iwork: *mut lapack_int,
12367        liwork: *const lapack_int,
12368        info: *mut lapack_int,
12369    );
12370    pub fn dspgvd_(
12371        itype: *const lapack_int,
12372        jobz: *const c_char,
12373        uplo: *const c_char,
12374        n: *const lapack_int,
12375        ap: *mut c_double,
12376        bp: *mut c_double,
12377        w: *mut c_double,
12378        z: *mut c_double,
12379        ldz: *const lapack_int,
12380        work: *mut c_double,
12381        lwork: *const lapack_int,
12382        iwork: *mut lapack_int,
12383        liwork: *const lapack_int,
12384        info: *mut lapack_int,
12385    );
12386    pub fn chpgvd_(
12387        itype: *const lapack_int,
12388        jobz: *const c_char,
12389        uplo: *const c_char,
12390        n: *const lapack_int,
12391        ap: *mut lapack_complex_float,
12392        bp: *mut lapack_complex_float,
12393        w: *mut c_float,
12394        z: *mut lapack_complex_float,
12395        ldz: *const lapack_int,
12396        work: *mut lapack_complex_float,
12397        lwork: *const lapack_int,
12398        rwork: *mut c_float,
12399        lrwork: *const lapack_int,
12400        iwork: *mut lapack_int,
12401        liwork: *const lapack_int,
12402        info: *mut lapack_int,
12403    );
12404    pub fn zhpgvd_(
12405        itype: *const lapack_int,
12406        jobz: *const c_char,
12407        uplo: *const c_char,
12408        n: *const lapack_int,
12409        ap: *mut lapack_complex_double,
12410        bp: *mut lapack_complex_double,
12411        w: *mut c_double,
12412        z: *mut lapack_complex_double,
12413        ldz: *const lapack_int,
12414        work: *mut lapack_complex_double,
12415        lwork: *const lapack_int,
12416        rwork: *mut c_double,
12417        lrwork: *const lapack_int,
12418        iwork: *mut lapack_int,
12419        liwork: *const lapack_int,
12420        info: *mut lapack_int,
12421    );
12422
12423    pub fn sspgvx_(
12424        itype: *const lapack_int,
12425        jobz: *const c_char,
12426        range: *const c_char,
12427        uplo: *const c_char,
12428        n: *const lapack_int,
12429        ap: *mut c_float,
12430        bp: *mut c_float,
12431        vl: *const c_float,
12432        vu: *const c_float,
12433        il: *const lapack_int,
12434        iu: *const lapack_int,
12435        abstol: *const c_float,
12436        m: *mut lapack_int,
12437        w: *mut c_float,
12438        z: *mut c_float,
12439        ldz: *const lapack_int,
12440        work: *mut c_float,
12441        iwork: *mut lapack_int,
12442        ifail: *mut lapack_int,
12443        info: *mut lapack_int,
12444    );
12445    pub fn dspgvx_(
12446        itype: *const lapack_int,
12447        jobz: *const c_char,
12448        range: *const c_char,
12449        uplo: *const c_char,
12450        n: *const lapack_int,
12451        ap: *mut c_double,
12452        bp: *mut c_double,
12453        vl: *const c_double,
12454        vu: *const c_double,
12455        il: *const lapack_int,
12456        iu: *const lapack_int,
12457        abstol: *const c_double,
12458        m: *mut lapack_int,
12459        w: *mut c_double,
12460        z: *mut c_double,
12461        ldz: *const lapack_int,
12462        work: *mut c_double,
12463        iwork: *mut lapack_int,
12464        ifail: *mut lapack_int,
12465        info: *mut lapack_int,
12466    );
12467    pub fn chpgvx_(
12468        itype: *const lapack_int,
12469        jobz: *const c_char,
12470        range: *const c_char,
12471        uplo: *const c_char,
12472        n: *const lapack_int,
12473        ap: *mut lapack_complex_float,
12474        bp: *mut lapack_complex_float,
12475        vl: *const c_float,
12476        vu: *const c_float,
12477        il: *const lapack_int,
12478        iu: *const lapack_int,
12479        abstol: *const c_float,
12480        m: *mut lapack_int,
12481        w: *mut c_float,
12482        z: *mut lapack_complex_float,
12483        ldz: *const lapack_int,
12484        work: *mut lapack_complex_float,
12485        rwork: *mut c_float,
12486        iwork: *mut lapack_int,
12487        ifail: *mut lapack_int,
12488        info: *mut lapack_int,
12489    );
12490    pub fn zhpgvx_(
12491        itype: *const lapack_int,
12492        jobz: *const c_char,
12493        range: *const c_char,
12494        uplo: *const c_char,
12495        n: *const lapack_int,
12496        ap: *mut lapack_complex_double,
12497        bp: *mut lapack_complex_double,
12498        vl: *const c_double,
12499        vu: *const c_double,
12500        il: *const lapack_int,
12501        iu: *const lapack_int,
12502        abstol: *const c_double,
12503        m: *mut lapack_int,
12504        w: *mut c_double,
12505        z: *mut lapack_complex_double,
12506        ldz: *const lapack_int,
12507        work: *mut lapack_complex_double,
12508        rwork: *mut c_double,
12509        iwork: *mut lapack_int,
12510        ifail: *mut lapack_int,
12511        info: *mut lapack_int,
12512    );
12513
12514    pub fn ssbgv_(
12515        jobz: *const c_char,
12516        uplo: *const c_char,
12517        n: *const lapack_int,
12518        ka: *const lapack_int,
12519        kb: *const lapack_int,
12520        ab: *mut c_float,
12521        ldab: *const lapack_int,
12522        bb: *mut c_float,
12523        ldbb: *const lapack_int,
12524        w: *mut c_float,
12525        z: *mut c_float,
12526        ldz: *const lapack_int,
12527        work: *mut c_float,
12528        info: *mut lapack_int,
12529    );
12530    pub fn dsbgv_(
12531        jobz: *const c_char,
12532        uplo: *const c_char,
12533        n: *const lapack_int,
12534        ka: *const lapack_int,
12535        kb: *const lapack_int,
12536        ab: *mut c_double,
12537        ldab: *const lapack_int,
12538        bb: *mut c_double,
12539        ldbb: *const lapack_int,
12540        w: *mut c_double,
12541        z: *mut c_double,
12542        ldz: *const lapack_int,
12543        work: *mut c_double,
12544        info: *mut lapack_int,
12545    );
12546    pub fn chbgv_(
12547        jobz: *const c_char,
12548        uplo: *const c_char,
12549        n: *const lapack_int,
12550        ka: *const lapack_int,
12551        kb: *const lapack_int,
12552        ab: *mut lapack_complex_float,
12553        ldab: *const lapack_int,
12554        bb: *mut lapack_complex_float,
12555        ldbb: *const lapack_int,
12556        w: *mut c_float,
12557        z: *mut lapack_complex_float,
12558        ldz: *const lapack_int,
12559        work: *mut lapack_complex_float,
12560        rwork: *mut c_float,
12561        info: *mut lapack_int,
12562    );
12563    pub fn zhbgv_(
12564        jobz: *const c_char,
12565        uplo: *const c_char,
12566        n: *const lapack_int,
12567        ka: *const lapack_int,
12568        kb: *const lapack_int,
12569        ab: *mut lapack_complex_double,
12570        ldab: *const lapack_int,
12571        bb: *mut lapack_complex_double,
12572        ldbb: *const lapack_int,
12573        w: *mut c_double,
12574        z: *mut lapack_complex_double,
12575        ldz: *const lapack_int,
12576        work: *mut lapack_complex_double,
12577        rwork: *mut c_double,
12578        info: *mut lapack_int,
12579    );
12580
12581    pub fn ssbgvd_(
12582        jobz: *const c_char,
12583        uplo: *const c_char,
12584        n: *const lapack_int,
12585        ka: *const lapack_int,
12586        kb: *const lapack_int,
12587        ab: *mut c_float,
12588        ldab: *const lapack_int,
12589        bb: *mut c_float,
12590        ldbb: *const lapack_int,
12591        w: *mut c_float,
12592        z: *mut c_float,
12593        ldz: *const lapack_int,
12594        work: *mut c_float,
12595        lwork: *const lapack_int,
12596        iwork: *mut lapack_int,
12597        liwork: *const lapack_int,
12598        info: *mut lapack_int,
12599    );
12600    pub fn dsbgvd_(
12601        jobz: *const c_char,
12602        uplo: *const c_char,
12603        n: *const lapack_int,
12604        ka: *const lapack_int,
12605        kb: *const lapack_int,
12606        ab: *mut c_double,
12607        ldab: *const lapack_int,
12608        bb: *mut c_double,
12609        ldbb: *const lapack_int,
12610        w: *mut c_double,
12611        z: *mut c_double,
12612        ldz: *const lapack_int,
12613        work: *mut c_double,
12614        lwork: *const lapack_int,
12615        iwork: *mut lapack_int,
12616        liwork: *const lapack_int,
12617        info: *mut lapack_int,
12618    );
12619    pub fn chbgvd_(
12620        jobz: *const c_char,
12621        uplo: *const c_char,
12622        n: *const lapack_int,
12623        ka: *const lapack_int,
12624        kb: *const lapack_int,
12625        ab: *mut lapack_complex_float,
12626        ldab: *const lapack_int,
12627        bb: *mut lapack_complex_float,
12628        ldbb: *const lapack_int,
12629        w: *mut c_float,
12630        z: *mut lapack_complex_float,
12631        ldz: *const lapack_int,
12632        work: *mut lapack_complex_float,
12633        lwork: *const lapack_int,
12634        rwork: *mut c_float,
12635        lrwork: *const lapack_int,
12636        iwork: *mut lapack_int,
12637        liwork: *const lapack_int,
12638        info: *mut lapack_int,
12639    );
12640    pub fn zhbgvd_(
12641        jobz: *const c_char,
12642        uplo: *const c_char,
12643        n: *const lapack_int,
12644        ka: *const lapack_int,
12645        kb: *const lapack_int,
12646        ab: *mut lapack_complex_double,
12647        ldab: *const lapack_int,
12648        bb: *mut lapack_complex_double,
12649        ldbb: *const lapack_int,
12650        w: *mut c_double,
12651        z: *mut lapack_complex_double,
12652        ldz: *const lapack_int,
12653        work: *mut lapack_complex_double,
12654        lwork: *const lapack_int,
12655        rwork: *mut c_double,
12656        lrwork: *const lapack_int,
12657        iwork: *mut lapack_int,
12658        liwork: *const lapack_int,
12659        info: *mut lapack_int,
12660    );
12661
12662    pub fn ssbgvx_(
12663        jobz: *const c_char,
12664        range: *const c_char,
12665        uplo: *const c_char,
12666        n: *const lapack_int,
12667        ka: *const lapack_int,
12668        kb: *const lapack_int,
12669        ab: *mut c_float,
12670        ldab: *const lapack_int,
12671        bb: *mut c_float,
12672        ldbb: *const lapack_int,
12673        q: *mut c_float,
12674        ldq: *const lapack_int,
12675        vl: *const c_float,
12676        vu: *const c_float,
12677        il: *const lapack_int,
12678        iu: *const lapack_int,
12679        abstol: *const c_float,
12680        m: *mut lapack_int,
12681        w: *mut c_float,
12682        z: *mut c_float,
12683        ldz: *const lapack_int,
12684        work: *mut c_float,
12685        iwork: *mut lapack_int,
12686        ifail: *mut lapack_int,
12687        info: *mut lapack_int,
12688    );
12689    pub fn dsbgvx_(
12690        jobz: *const c_char,
12691        range: *const c_char,
12692        uplo: *const c_char,
12693        n: *const lapack_int,
12694        ka: *const lapack_int,
12695        kb: *const lapack_int,
12696        ab: *mut c_double,
12697        ldab: *const lapack_int,
12698        bb: *mut c_double,
12699        ldbb: *const lapack_int,
12700        q: *mut c_double,
12701        ldq: *const lapack_int,
12702        vl: *const c_double,
12703        vu: *const c_double,
12704        il: *const lapack_int,
12705        iu: *const lapack_int,
12706        abstol: *const c_double,
12707        m: *mut lapack_int,
12708        w: *mut c_double,
12709        z: *mut c_double,
12710        ldz: *const lapack_int,
12711        work: *mut c_double,
12712        iwork: *mut lapack_int,
12713        ifail: *mut lapack_int,
12714        info: *mut lapack_int,
12715    );
12716    pub fn chbgvx_(
12717        jobz: *const c_char,
12718        range: *const c_char,
12719        uplo: *const c_char,
12720        n: *const lapack_int,
12721        ka: *const lapack_int,
12722        kb: *const lapack_int,
12723        ab: *mut lapack_complex_float,
12724        ldab: *const lapack_int,
12725        bb: *mut lapack_complex_float,
12726        ldbb: *const lapack_int,
12727        q: *mut lapack_complex_float,
12728        ldq: *const lapack_int,
12729        vl: *const c_float,
12730        vu: *const c_float,
12731        il: *const lapack_int,
12732        iu: *const lapack_int,
12733        abstol: *const c_float,
12734        m: *mut lapack_int,
12735        w: *mut c_float,
12736        z: *mut lapack_complex_float,
12737        ldz: *const lapack_int,
12738        work: *mut lapack_complex_float,
12739        rwork: *mut c_float,
12740        iwork: *mut lapack_int,
12741        ifail: *mut lapack_int,
12742        info: *mut lapack_int,
12743    );
12744    pub fn zhbgvx_(
12745        jobz: *const c_char,
12746        range: *const c_char,
12747        uplo: *const c_char,
12748        n: *const lapack_int,
12749        ka: *const lapack_int,
12750        kb: *const lapack_int,
12751        ab: *mut lapack_complex_double,
12752        ldab: *const lapack_int,
12753        bb: *mut lapack_complex_double,
12754        ldbb: *const lapack_int,
12755        q: *mut lapack_complex_double,
12756        ldq: *const lapack_int,
12757        vl: *const c_double,
12758        vu: *const c_double,
12759        il: *const lapack_int,
12760        iu: *const lapack_int,
12761        abstol: *const c_double,
12762        m: *mut lapack_int,
12763        w: *mut c_double,
12764        z: *mut lapack_complex_double,
12765        ldz: *const lapack_int,
12766        work: *mut lapack_complex_double,
12767        rwork: *mut c_double,
12768        iwork: *mut lapack_int,
12769        ifail: *mut lapack_int,
12770        info: *mut lapack_int,
12771    );
12772
12773    pub fn sgges_(
12774        jobvsl: *const c_char,
12775        jobvsr: *const c_char,
12776        sort: *const c_char,
12777        selctg: LAPACK_S_SELECT3,
12778        n: *const lapack_int,
12779        a: *mut c_float,
12780        lda: *const lapack_int,
12781        b: *mut c_float,
12782        ldb: *const lapack_int,
12783        sdim: *mut lapack_int,
12784        alphar: *mut c_float,
12785        alphai: *mut c_float,
12786        beta: *mut c_float,
12787        vsl: *mut c_float,
12788        ldvsl: *const lapack_int,
12789        vsr: *mut c_float,
12790        ldvsr: *const lapack_int,
12791        work: *mut c_float,
12792        lwork: *const lapack_int,
12793        bwork: *mut lapack_logical,
12794        info: *mut lapack_int,
12795    );
12796    pub fn dgges_(
12797        jobvsl: *const c_char,
12798        jobvsr: *const c_char,
12799        sort: *const c_char,
12800        selctg: LAPACK_D_SELECT3,
12801        n: *const lapack_int,
12802        a: *mut c_double,
12803        lda: *const lapack_int,
12804        b: *mut c_double,
12805        ldb: *const lapack_int,
12806        sdim: *mut lapack_int,
12807        alphar: *mut c_double,
12808        alphai: *mut c_double,
12809        beta: *mut c_double,
12810        vsl: *mut c_double,
12811        ldvsl: *const lapack_int,
12812        vsr: *mut c_double,
12813        ldvsr: *const lapack_int,
12814        work: *mut c_double,
12815        lwork: *const lapack_int,
12816        bwork: *mut lapack_logical,
12817        info: *mut lapack_int,
12818    );
12819    pub fn cgges_(
12820        jobvsl: *const c_char,
12821        jobvsr: *const c_char,
12822        sort: *const c_char,
12823        selctg: LAPACK_C_SELECT2,
12824        n: *const lapack_int,
12825        a: *mut lapack_complex_float,
12826        lda: *const lapack_int,
12827        b: *mut lapack_complex_float,
12828        ldb: *const lapack_int,
12829        sdim: *mut lapack_int,
12830        alpha: *mut lapack_complex_float,
12831        beta: *mut lapack_complex_float,
12832        vsl: *mut lapack_complex_float,
12833        ldvsl: *const lapack_int,
12834        vsr: *mut lapack_complex_float,
12835        ldvsr: *const lapack_int,
12836        work: *mut lapack_complex_float,
12837        lwork: *const lapack_int,
12838        rwork: *mut c_float,
12839        bwork: *mut lapack_logical,
12840        info: *mut lapack_int,
12841    );
12842    pub fn zgges_(
12843        jobvsl: *const c_char,
12844        jobvsr: *const c_char,
12845        sort: *const c_char,
12846        selctg: LAPACK_Z_SELECT2,
12847        n: *const lapack_int,
12848        a: *mut lapack_complex_double,
12849        lda: *const lapack_int,
12850        b: *mut lapack_complex_double,
12851        ldb: *const lapack_int,
12852        sdim: *mut lapack_int,
12853        alpha: *mut lapack_complex_double,
12854        beta: *mut lapack_complex_double,
12855        vsl: *mut lapack_complex_double,
12856        ldvsl: *const lapack_int,
12857        vsr: *mut lapack_complex_double,
12858        ldvsr: *const lapack_int,
12859        work: *mut lapack_complex_double,
12860        lwork: *const lapack_int,
12861        rwork: *mut c_double,
12862        bwork: *mut lapack_logical,
12863        info: *mut lapack_int,
12864    );
12865
12866    pub fn sgges3_(
12867        jobvsl: *const c_char,
12868        jobvsr: *const c_char,
12869        sort: *const c_char,
12870        selctg: LAPACK_S_SELECT3,
12871        n: *const lapack_int,
12872        a: *mut c_float,
12873        lda: *const lapack_int,
12874        b: *mut c_float,
12875        ldb: *const lapack_int,
12876        sdim: *mut lapack_int,
12877        alphar: *mut c_float,
12878        alphai: *mut c_float,
12879        beta: *mut c_float,
12880        vsl: *mut c_float,
12881        ldvsl: *const lapack_int,
12882        vsr: *mut c_float,
12883        ldvsr: *const lapack_int,
12884        work: *mut c_float,
12885        lwork: *const lapack_int,
12886        bwork: *mut lapack_logical,
12887        info: *mut lapack_int,
12888    );
12889    pub fn dgges3_(
12890        jobvsl: *const c_char,
12891        jobvsr: *const c_char,
12892        sort: *const c_char,
12893        selctg: LAPACK_D_SELECT3,
12894        n: *const lapack_int,
12895        a: *mut c_double,
12896        lda: *const lapack_int,
12897        b: *mut c_double,
12898        ldb: *const lapack_int,
12899        sdim: *mut lapack_int,
12900        alphar: *mut c_double,
12901        alphai: *mut c_double,
12902        beta: *mut c_double,
12903        vsl: *mut c_double,
12904        ldvsl: *const lapack_int,
12905        vsr: *mut c_double,
12906        ldvsr: *const lapack_int,
12907        work: *mut c_double,
12908        lwork: *const lapack_int,
12909        bwork: *mut lapack_logical,
12910        info: *mut lapack_int,
12911    );
12912    pub fn cgges3_(
12913        jobvsl: *const c_char,
12914        jobvsr: *const c_char,
12915        sort: *const c_char,
12916        selctg: LAPACK_C_SELECT2,
12917        n: *const lapack_int,
12918        a: *mut lapack_complex_float,
12919        lda: *const lapack_int,
12920        b: *mut lapack_complex_float,
12921        ldb: *const lapack_int,
12922        sdim: *mut lapack_int,
12923        alpha: *mut lapack_complex_float,
12924        beta: *mut lapack_complex_float,
12925        vsl: *mut lapack_complex_float,
12926        ldvsl: *const lapack_int,
12927        vsr: *mut lapack_complex_float,
12928        ldvsr: *const lapack_int,
12929        work: *mut lapack_complex_float,
12930        lwork: *const lapack_int,
12931        rwork: *mut c_float,
12932        bwork: *mut lapack_logical,
12933        info: *mut lapack_int,
12934    );
12935    pub fn zgges3_(
12936        jobvsl: *const c_char,
12937        jobvsr: *const c_char,
12938        sort: *const c_char,
12939        selctg: LAPACK_Z_SELECT2,
12940        n: *const lapack_int,
12941        a: *mut lapack_complex_double,
12942        lda: *const lapack_int,
12943        b: *mut lapack_complex_double,
12944        ldb: *const lapack_int,
12945        sdim: *mut lapack_int,
12946        alpha: *mut lapack_complex_double,
12947        beta: *mut lapack_complex_double,
12948        vsl: *mut lapack_complex_double,
12949        ldvsl: *const lapack_int,
12950        vsr: *mut lapack_complex_double,
12951        ldvsr: *const lapack_int,
12952        work: *mut lapack_complex_double,
12953        lwork: *const lapack_int,
12954        rwork: *mut c_double,
12955        bwork: *mut lapack_logical,
12956        info: *mut lapack_int,
12957    );
12958
12959    pub fn sggesx_(
12960        jobvsl: *const c_char,
12961        jobvsr: *const c_char,
12962        sort: *const c_char,
12963        selctg: LAPACK_S_SELECT3,
12964        sense: *const c_char,
12965        n: *const lapack_int,
12966        a: *mut c_float,
12967        lda: *const lapack_int,
12968        b: *mut c_float,
12969        ldb: *const lapack_int,
12970        sdim: *mut lapack_int,
12971        alphar: *mut c_float,
12972        alphai: *mut c_float,
12973        beta: *mut c_float,
12974        vsl: *mut c_float,
12975        ldvsl: *const lapack_int,
12976        vsr: *mut c_float,
12977        ldvsr: *const lapack_int,
12978        rconde: *mut c_float,
12979        rcondv: *mut c_float,
12980        work: *mut c_float,
12981        lwork: *const lapack_int,
12982        iwork: *mut lapack_int,
12983        liwork: *const lapack_int,
12984        bwork: *mut lapack_logical,
12985        info: *mut lapack_int,
12986    );
12987    pub fn dggesx_(
12988        jobvsl: *const c_char,
12989        jobvsr: *const c_char,
12990        sort: *const c_char,
12991        selctg: LAPACK_D_SELECT3,
12992        sense: *const c_char,
12993        n: *const lapack_int,
12994        a: *mut c_double,
12995        lda: *const lapack_int,
12996        b: *mut c_double,
12997        ldb: *const lapack_int,
12998        sdim: *mut lapack_int,
12999        alphar: *mut c_double,
13000        alphai: *mut c_double,
13001        beta: *mut c_double,
13002        vsl: *mut c_double,
13003        ldvsl: *const lapack_int,
13004        vsr: *mut c_double,
13005        ldvsr: *const lapack_int,
13006        rconde: *mut c_double,
13007        rcondv: *mut c_double,
13008        work: *mut c_double,
13009        lwork: *const lapack_int,
13010        iwork: *mut lapack_int,
13011        liwork: *const lapack_int,
13012        bwork: *mut lapack_logical,
13013        info: *mut lapack_int,
13014    );
13015    pub fn cggesx_(
13016        jobvsl: *const c_char,
13017        jobvsr: *const c_char,
13018        sort: *const c_char,
13019        selctg: LAPACK_C_SELECT2,
13020        sense: *const c_char,
13021        n: *const lapack_int,
13022        a: *mut lapack_complex_float,
13023        lda: *const lapack_int,
13024        b: *mut lapack_complex_float,
13025        ldb: *const lapack_int,
13026        sdim: *mut lapack_int,
13027        alpha: *mut lapack_complex_float,
13028        beta: *mut lapack_complex_float,
13029        vsl: *mut lapack_complex_float,
13030        ldvsl: *const lapack_int,
13031        vsr: *mut lapack_complex_float,
13032        ldvsr: *const lapack_int,
13033        rconde: *mut c_float,
13034        rcondv: *mut c_float,
13035        work: *mut lapack_complex_float,
13036        lwork: *const lapack_int,
13037        rwork: *mut c_float,
13038        iwork: *mut lapack_int,
13039        liwork: *const lapack_int,
13040        bwork: *mut lapack_logical,
13041        info: *mut lapack_int,
13042    );
13043    pub fn zggesx_(
13044        jobvsl: *const c_char,
13045        jobvsr: *const c_char,
13046        sort: *const c_char,
13047        selctg: LAPACK_Z_SELECT2,
13048        sense: *const c_char,
13049        n: *const lapack_int,
13050        a: *mut lapack_complex_double,
13051        lda: *const lapack_int,
13052        b: *mut lapack_complex_double,
13053        ldb: *const lapack_int,
13054        sdim: *mut lapack_int,
13055        alpha: *mut lapack_complex_double,
13056        beta: *mut lapack_complex_double,
13057        vsl: *mut lapack_complex_double,
13058        ldvsl: *const lapack_int,
13059        vsr: *mut lapack_complex_double,
13060        ldvsr: *const lapack_int,
13061        rconde: *mut c_double,
13062        rcondv: *mut c_double,
13063        work: *mut lapack_complex_double,
13064        lwork: *const lapack_int,
13065        rwork: *mut c_double,
13066        iwork: *mut lapack_int,
13067        liwork: *const lapack_int,
13068        bwork: *mut lapack_logical,
13069        info: *mut lapack_int,
13070    );
13071
13072    pub fn sggev_(
13073        jobvl: *const c_char,
13074        jobvr: *const c_char,
13075        n: *const lapack_int,
13076        a: *mut c_float,
13077        lda: *const lapack_int,
13078        b: *mut c_float,
13079        ldb: *const lapack_int,
13080        alphar: *mut c_float,
13081        alphai: *mut c_float,
13082        beta: *mut c_float,
13083        vl: *mut c_float,
13084        ldvl: *const lapack_int,
13085        vr: *mut c_float,
13086        ldvr: *const lapack_int,
13087        work: *mut c_float,
13088        lwork: *const lapack_int,
13089        info: *mut lapack_int,
13090    );
13091    pub fn dggev_(
13092        jobvl: *const c_char,
13093        jobvr: *const c_char,
13094        n: *const lapack_int,
13095        a: *mut c_double,
13096        lda: *const lapack_int,
13097        b: *mut c_double,
13098        ldb: *const lapack_int,
13099        alphar: *mut c_double,
13100        alphai: *mut c_double,
13101        beta: *mut c_double,
13102        vl: *mut c_double,
13103        ldvl: *const lapack_int,
13104        vr: *mut c_double,
13105        ldvr: *const lapack_int,
13106        work: *mut c_double,
13107        lwork: *const lapack_int,
13108        info: *mut lapack_int,
13109    );
13110    pub fn cggev_(
13111        jobvl: *const c_char,
13112        jobvr: *const c_char,
13113        n: *const lapack_int,
13114        a: *mut lapack_complex_float,
13115        lda: *const lapack_int,
13116        b: *mut lapack_complex_float,
13117        ldb: *const lapack_int,
13118        alpha: *mut lapack_complex_float,
13119        beta: *mut lapack_complex_float,
13120        vl: *mut lapack_complex_float,
13121        ldvl: *const lapack_int,
13122        vr: *mut lapack_complex_float,
13123        ldvr: *const lapack_int,
13124        work: *mut lapack_complex_float,
13125        lwork: *const lapack_int,
13126        rwork: *mut c_float,
13127        info: *mut lapack_int,
13128    );
13129    pub fn zggev_(
13130        jobvl: *const c_char,
13131        jobvr: *const c_char,
13132        n: *const lapack_int,
13133        a: *mut lapack_complex_double,
13134        lda: *const lapack_int,
13135        b: *mut lapack_complex_double,
13136        ldb: *const lapack_int,
13137        alpha: *mut lapack_complex_double,
13138        beta: *mut lapack_complex_double,
13139        vl: *mut lapack_complex_double,
13140        ldvl: *const lapack_int,
13141        vr: *mut lapack_complex_double,
13142        ldvr: *const lapack_int,
13143        work: *mut lapack_complex_double,
13144        lwork: *const lapack_int,
13145        rwork: *mut c_double,
13146        info: *mut lapack_int,
13147    );
13148
13149    pub fn sggev3_(
13150        jobvl: *const c_char,
13151        jobvr: *const c_char,
13152        n: *const lapack_int,
13153        a: *mut c_float,
13154        lda: *const lapack_int,
13155        b: *mut c_float,
13156        ldb: *const lapack_int,
13157        alphar: *mut c_float,
13158        alphai: *mut c_float,
13159        beta: *mut c_float,
13160        vl: *mut c_float,
13161        ldvl: *const lapack_int,
13162        vr: *mut c_float,
13163        ldvr: *const lapack_int,
13164        work: *mut c_float,
13165        lwork: *const lapack_int,
13166        info: *mut lapack_int,
13167    );
13168    pub fn dggev3_(
13169        jobvl: *const c_char,
13170        jobvr: *const c_char,
13171        n: *const lapack_int,
13172        a: *mut c_double,
13173        lda: *const lapack_int,
13174        b: *mut c_double,
13175        ldb: *const lapack_int,
13176        alphar: *mut c_double,
13177        alphai: *mut c_double,
13178        beta: *mut c_double,
13179        vl: *mut c_double,
13180        ldvl: *const lapack_int,
13181        vr: *mut c_double,
13182        ldvr: *const lapack_int,
13183        work: *mut c_double,
13184        lwork: *const lapack_int,
13185        info: *mut lapack_int,
13186    );
13187    pub fn cggev3_(
13188        jobvl: *const c_char,
13189        jobvr: *const c_char,
13190        n: *const lapack_int,
13191        a: *mut lapack_complex_float,
13192        lda: *const lapack_int,
13193        b: *mut lapack_complex_float,
13194        ldb: *const lapack_int,
13195        alpha: *mut lapack_complex_float,
13196        beta: *mut lapack_complex_float,
13197        vl: *mut lapack_complex_float,
13198        ldvl: *const lapack_int,
13199        vr: *mut lapack_complex_float,
13200        ldvr: *const lapack_int,
13201        work: *mut lapack_complex_float,
13202        lwork: *const lapack_int,
13203        rwork: *mut c_float,
13204        info: *mut lapack_int,
13205    );
13206    pub fn zggev3_(
13207        jobvl: *const c_char,
13208        jobvr: *const c_char,
13209        n: *const lapack_int,
13210        a: *mut lapack_complex_double,
13211        lda: *const lapack_int,
13212        b: *mut lapack_complex_double,
13213        ldb: *const lapack_int,
13214        alpha: *mut lapack_complex_double,
13215        beta: *mut lapack_complex_double,
13216        vl: *mut lapack_complex_double,
13217        ldvl: *const lapack_int,
13218        vr: *mut lapack_complex_double,
13219        ldvr: *const lapack_int,
13220        work: *mut lapack_complex_double,
13221        lwork: *const lapack_int,
13222        rwork: *mut c_double,
13223        info: *mut lapack_int,
13224    );
13225
13226    pub fn sggevx_(
13227        balanc: *const c_char,
13228        jobvl: *const c_char,
13229        jobvr: *const c_char,
13230        sense: *const c_char,
13231        n: *const lapack_int,
13232        a: *mut c_float,
13233        lda: *const lapack_int,
13234        b: *mut c_float,
13235        ldb: *const lapack_int,
13236        alphar: *mut c_float,
13237        alphai: *mut c_float,
13238        beta: *mut c_float,
13239        vl: *mut c_float,
13240        ldvl: *const lapack_int,
13241        vr: *mut c_float,
13242        ldvr: *const lapack_int,
13243        ilo: *mut lapack_int,
13244        ihi: *mut lapack_int,
13245        lscale: *mut c_float,
13246        rscale: *mut c_float,
13247        abnrm: *mut c_float,
13248        bbnrm: *mut c_float,
13249        rconde: *mut c_float,
13250        rcondv: *mut c_float,
13251        work: *mut c_float,
13252        lwork: *const lapack_int,
13253        iwork: *mut lapack_int,
13254        bwork: *mut lapack_logical,
13255        info: *mut lapack_int,
13256    );
13257    pub fn dggevx_(
13258        balanc: *const c_char,
13259        jobvl: *const c_char,
13260        jobvr: *const c_char,
13261        sense: *const c_char,
13262        n: *const lapack_int,
13263        a: *mut c_double,
13264        lda: *const lapack_int,
13265        b: *mut c_double,
13266        ldb: *const lapack_int,
13267        alphar: *mut c_double,
13268        alphai: *mut c_double,
13269        beta: *mut c_double,
13270        vl: *mut c_double,
13271        ldvl: *const lapack_int,
13272        vr: *mut c_double,
13273        ldvr: *const lapack_int,
13274        ilo: *mut lapack_int,
13275        ihi: *mut lapack_int,
13276        lscale: *mut c_double,
13277        rscale: *mut c_double,
13278        abnrm: *mut c_double,
13279        bbnrm: *mut c_double,
13280        rconde: *mut c_double,
13281        rcondv: *mut c_double,
13282        work: *mut c_double,
13283        lwork: *const lapack_int,
13284        iwork: *mut lapack_int,
13285        bwork: *mut lapack_logical,
13286        info: *mut lapack_int,
13287    );
13288    pub fn cggevx_(
13289        balanc: *const c_char,
13290        jobvl: *const c_char,
13291        jobvr: *const c_char,
13292        sense: *const c_char,
13293        n: *const lapack_int,
13294        a: *mut lapack_complex_float,
13295        lda: *const lapack_int,
13296        b: *mut lapack_complex_float,
13297        ldb: *const lapack_int,
13298        alpha: *mut lapack_complex_float,
13299        beta: *mut lapack_complex_float,
13300        vl: *mut lapack_complex_float,
13301        ldvl: *const lapack_int,
13302        vr: *mut lapack_complex_float,
13303        ldvr: *const lapack_int,
13304        ilo: *mut lapack_int,
13305        ihi: *mut lapack_int,
13306        lscale: *mut c_float,
13307        rscale: *mut c_float,
13308        abnrm: *mut c_float,
13309        bbnrm: *mut c_float,
13310        rconde: *mut c_float,
13311        rcondv: *mut c_float,
13312        work: *mut lapack_complex_float,
13313        lwork: *const lapack_int,
13314        rwork: *mut c_float,
13315        iwork: *mut lapack_int,
13316        bwork: *mut lapack_logical,
13317        info: *mut lapack_int,
13318    );
13319    pub fn zggevx_(
13320        balanc: *const c_char,
13321        jobvl: *const c_char,
13322        jobvr: *const c_char,
13323        sense: *const c_char,
13324        n: *const lapack_int,
13325        a: *mut lapack_complex_double,
13326        lda: *const lapack_int,
13327        b: *mut lapack_complex_double,
13328        ldb: *const lapack_int,
13329        alpha: *mut lapack_complex_double,
13330        beta: *mut lapack_complex_double,
13331        vl: *mut lapack_complex_double,
13332        ldvl: *const lapack_int,
13333        vr: *mut lapack_complex_double,
13334        ldvr: *const lapack_int,
13335        ilo: *mut lapack_int,
13336        ihi: *mut lapack_int,
13337        lscale: *mut c_double,
13338        rscale: *mut c_double,
13339        abnrm: *mut c_double,
13340        bbnrm: *mut c_double,
13341        rconde: *mut c_double,
13342        rcondv: *mut c_double,
13343        work: *mut lapack_complex_double,
13344        lwork: *const lapack_int,
13345        rwork: *mut c_double,
13346        iwork: *mut lapack_int,
13347        bwork: *mut lapack_logical,
13348        info: *mut lapack_int,
13349    );
13350
13351    pub fn dsfrk_(
13352        transr: *const c_char,
13353        uplo: *const c_char,
13354        trans: *const c_char,
13355        n: *const lapack_int,
13356        k: *const lapack_int,
13357        alpha: *const c_double,
13358        a: *const c_double,
13359        lda: *const lapack_int,
13360        beta: *const c_double,
13361        c: *mut c_double,
13362    );
13363    pub fn ssfrk_(
13364        transr: *const c_char,
13365        uplo: *const c_char,
13366        trans: *const c_char,
13367        n: *const lapack_int,
13368        k: *const lapack_int,
13369        alpha: *const c_float,
13370        a: *const c_float,
13371        lda: *const lapack_int,
13372        beta: *const c_float,
13373        c: *mut c_float,
13374    );
13375    pub fn zhfrk_(
13376        transr: *const c_char,
13377        uplo: *const c_char,
13378        trans: *const c_char,
13379        n: *const lapack_int,
13380        k: *const lapack_int,
13381        alpha: *const c_double,
13382        a: *const lapack_complex_double,
13383        lda: *const lapack_int,
13384        beta: *const c_double,
13385        c: *mut lapack_complex_double,
13386    );
13387    pub fn chfrk_(
13388        transr: *const c_char,
13389        uplo: *const c_char,
13390        trans: *const c_char,
13391        n: *const lapack_int,
13392        k: *const lapack_int,
13393        alpha: *const c_float,
13394        a: *const lapack_complex_float,
13395        lda: *const lapack_int,
13396        beta: *const c_float,
13397        c: *mut lapack_complex_float,
13398    );
13399
13400    pub fn dtfsm_(
13401        transr: *const c_char,
13402        side: *const c_char,
13403        uplo: *const c_char,
13404        trans: *const c_char,
13405        diag: *const c_char,
13406        m: *const lapack_int,
13407        n: *const lapack_int,
13408        alpha: *const c_double,
13409        a: *const c_double,
13410        b: *mut c_double,
13411        ldb: *const lapack_int,
13412    );
13413    pub fn stfsm_(
13414        transr: *const c_char,
13415        side: *const c_char,
13416        uplo: *const c_char,
13417        trans: *const c_char,
13418        diag: *const c_char,
13419        m: *const lapack_int,
13420        n: *const lapack_int,
13421        alpha: *const c_float,
13422        a: *const c_float,
13423        b: *mut c_float,
13424        ldb: *const lapack_int,
13425    );
13426    pub fn ztfsm_(
13427        transr: *const c_char,
13428        side: *const c_char,
13429        uplo: *const c_char,
13430        trans: *const c_char,
13431        diag: *const c_char,
13432        m: *const lapack_int,
13433        n: *const lapack_int,
13434        alpha: *const lapack_complex_double,
13435        a: *const lapack_complex_double,
13436        b: *mut lapack_complex_double,
13437        ldb: *const lapack_int,
13438    );
13439    pub fn ctfsm_(
13440        transr: *const c_char,
13441        side: *const c_char,
13442        uplo: *const c_char,
13443        trans: *const c_char,
13444        diag: *const c_char,
13445        m: *const lapack_int,
13446        n: *const lapack_int,
13447        alpha: *const lapack_complex_float,
13448        a: *const lapack_complex_float,
13449        b: *mut lapack_complex_float,
13450        ldb: *const lapack_int,
13451    );
13452
13453    pub fn dtfttp_(
13454        transr: *const c_char,
13455        uplo: *const c_char,
13456        n: *const lapack_int,
13457        arf: *const c_double,
13458        ap: *mut c_double,
13459        info: *mut lapack_int,
13460    );
13461    pub fn stfttp_(
13462        transr: *const c_char,
13463        uplo: *const c_char,
13464        n: *const lapack_int,
13465        arf: *const c_float,
13466        ap: *mut c_float,
13467        info: *mut lapack_int,
13468    );
13469    pub fn ztfttp_(
13470        transr: *const c_char,
13471        uplo: *const c_char,
13472        n: *const lapack_int,
13473        arf: *const lapack_complex_double,
13474        ap: *mut lapack_complex_double,
13475        info: *mut lapack_int,
13476    );
13477    pub fn ctfttp_(
13478        transr: *const c_char,
13479        uplo: *const c_char,
13480        n: *const lapack_int,
13481        arf: *const lapack_complex_float,
13482        ap: *mut lapack_complex_float,
13483        info: *mut lapack_int,
13484    );
13485
13486    pub fn dtfttr_(
13487        transr: *const c_char,
13488        uplo: *const c_char,
13489        n: *const lapack_int,
13490        arf: *const c_double,
13491        a: *mut c_double,
13492        lda: *const lapack_int,
13493        info: *mut lapack_int,
13494    );
13495    pub fn stfttr_(
13496        transr: *const c_char,
13497        uplo: *const c_char,
13498        n: *const lapack_int,
13499        arf: *const c_float,
13500        a: *mut c_float,
13501        lda: *const lapack_int,
13502        info: *mut lapack_int,
13503    );
13504    pub fn ztfttr_(
13505        transr: *const c_char,
13506        uplo: *const c_char,
13507        n: *const lapack_int,
13508        arf: *const lapack_complex_double,
13509        a: *mut lapack_complex_double,
13510        lda: *const lapack_int,
13511        info: *mut lapack_int,
13512    );
13513    pub fn ctfttr_(
13514        transr: *const c_char,
13515        uplo: *const c_char,
13516        n: *const lapack_int,
13517        arf: *const lapack_complex_float,
13518        a: *mut lapack_complex_float,
13519        lda: *const lapack_int,
13520        info: *mut lapack_int,
13521    );
13522
13523    pub fn dtpttf_(
13524        transr: *const c_char,
13525        uplo: *const c_char,
13526        n: *const lapack_int,
13527        ap: *const c_double,
13528        arf: *mut c_double,
13529        info: *mut lapack_int,
13530    );
13531    pub fn stpttf_(
13532        transr: *const c_char,
13533        uplo: *const c_char,
13534        n: *const lapack_int,
13535        ap: *const c_float,
13536        arf: *mut c_float,
13537        info: *mut lapack_int,
13538    );
13539    pub fn ztpttf_(
13540        transr: *const c_char,
13541        uplo: *const c_char,
13542        n: *const lapack_int,
13543        ap: *const lapack_complex_double,
13544        arf: *mut lapack_complex_double,
13545        info: *mut lapack_int,
13546    );
13547    pub fn ctpttf_(
13548        transr: *const c_char,
13549        uplo: *const c_char,
13550        n: *const lapack_int,
13551        ap: *const lapack_complex_float,
13552        arf: *mut lapack_complex_float,
13553        info: *mut lapack_int,
13554    );
13555
13556    pub fn dtpttr_(
13557        uplo: *const c_char,
13558        n: *const lapack_int,
13559        ap: *const c_double,
13560        a: *mut c_double,
13561        lda: *const lapack_int,
13562        info: *mut lapack_int,
13563    );
13564    pub fn stpttr_(
13565        uplo: *const c_char,
13566        n: *const lapack_int,
13567        ap: *const c_float,
13568        a: *mut c_float,
13569        lda: *const lapack_int,
13570        info: *mut lapack_int,
13571    );
13572    pub fn ztpttr_(
13573        uplo: *const c_char,
13574        n: *const lapack_int,
13575        ap: *const lapack_complex_double,
13576        a: *mut lapack_complex_double,
13577        lda: *const lapack_int,
13578        info: *mut lapack_int,
13579    );
13580    pub fn ctpttr_(
13581        uplo: *const c_char,
13582        n: *const lapack_int,
13583        ap: *const lapack_complex_float,
13584        a: *mut lapack_complex_float,
13585        lda: *const lapack_int,
13586        info: *mut lapack_int,
13587    );
13588
13589    pub fn dtrttf_(
13590        transr: *const c_char,
13591        uplo: *const c_char,
13592        n: *const lapack_int,
13593        a: *const c_double,
13594        lda: *const lapack_int,
13595        arf: *mut c_double,
13596        info: *mut lapack_int,
13597    );
13598    pub fn strttf_(
13599        transr: *const c_char,
13600        uplo: *const c_char,
13601        n: *const lapack_int,
13602        a: *const c_float,
13603        lda: *const lapack_int,
13604        arf: *mut c_float,
13605        info: *mut lapack_int,
13606    );
13607    pub fn ztrttf_(
13608        transr: *const c_char,
13609        uplo: *const c_char,
13610        n: *const lapack_int,
13611        a: *const lapack_complex_double,
13612        lda: *const lapack_int,
13613        arf: *mut lapack_complex_double,
13614        info: *mut lapack_int,
13615    );
13616    pub fn ctrttf_(
13617        transr: *const c_char,
13618        uplo: *const c_char,
13619        n: *const lapack_int,
13620        a: *const lapack_complex_float,
13621        lda: *const lapack_int,
13622        arf: *mut lapack_complex_float,
13623        info: *mut lapack_int,
13624    );
13625
13626    pub fn dtrttp_(
13627        uplo: *const c_char,
13628        n: *const lapack_int,
13629        a: *const c_double,
13630        lda: *const lapack_int,
13631        ap: *mut c_double,
13632        info: *mut lapack_int,
13633    );
13634    pub fn strttp_(
13635        uplo: *const c_char,
13636        n: *const lapack_int,
13637        a: *const c_float,
13638        lda: *const lapack_int,
13639        ap: *mut c_float,
13640        info: *mut lapack_int,
13641    );
13642    pub fn ztrttp_(
13643        uplo: *const c_char,
13644        n: *const lapack_int,
13645        a: *const lapack_complex_double,
13646        lda: *const lapack_int,
13647        ap: *mut lapack_complex_double,
13648        info: *mut lapack_int,
13649    );
13650    pub fn ctrttp_(
13651        uplo: *const c_char,
13652        n: *const lapack_int,
13653        a: *const lapack_complex_float,
13654        lda: *const lapack_int,
13655        ap: *mut lapack_complex_float,
13656        info: *mut lapack_int,
13657    );
13658
13659    pub fn sgeqrfp_(
13660        m: *const lapack_int,
13661        n: *const lapack_int,
13662        a: *mut c_float,
13663        lda: *const lapack_int,
13664        tau: *mut c_float,
13665        work: *mut c_float,
13666        lwork: *const lapack_int,
13667        info: *mut lapack_int,
13668    );
13669    pub fn dgeqrfp_(
13670        m: *const lapack_int,
13671        n: *const lapack_int,
13672        a: *mut c_double,
13673        lda: *const lapack_int,
13674        tau: *mut c_double,
13675        work: *mut c_double,
13676        lwork: *const lapack_int,
13677        info: *mut lapack_int,
13678    );
13679    pub fn cgeqrfp_(
13680        m: *const lapack_int,
13681        n: *const lapack_int,
13682        a: *mut lapack_complex_float,
13683        lda: *const lapack_int,
13684        tau: *mut lapack_complex_float,
13685        work: *mut lapack_complex_float,
13686        lwork: *const lapack_int,
13687        info: *mut lapack_int,
13688    );
13689    pub fn zgeqrfp_(
13690        m: *const lapack_int,
13691        n: *const lapack_int,
13692        a: *mut lapack_complex_double,
13693        lda: *const lapack_int,
13694        tau: *mut lapack_complex_double,
13695        work: *mut lapack_complex_double,
13696        lwork: *const lapack_int,
13697        info: *mut lapack_int,
13698    );
13699
13700    pub fn clacgv_(n: *const lapack_int, x: *mut lapack_complex_float, incx: *const lapack_int);
13701    pub fn zlacgv_(n: *const lapack_int, x: *mut lapack_complex_double, incx: *const lapack_int);
13702
13703    pub fn slarnv_(
13704        idist: *const lapack_int,
13705        iseed: *mut lapack_int,
13706        n: *const lapack_int,
13707        x: *mut c_float,
13708    );
13709    pub fn dlarnv_(
13710        idist: *const lapack_int,
13711        iseed: *mut lapack_int,
13712        n: *const lapack_int,
13713        x: *mut c_double,
13714    );
13715    pub fn clarnv_(
13716        idist: *const lapack_int,
13717        iseed: *mut lapack_int,
13718        n: *const lapack_int,
13719        x: *mut lapack_complex_float,
13720    );
13721    pub fn zlarnv_(
13722        idist: *const lapack_int,
13723        iseed: *mut lapack_int,
13724        n: *const lapack_int,
13725        x: *mut lapack_complex_double,
13726    );
13727
13728    pub fn sgeqr2_(
13729        m: *const lapack_int,
13730        n: *const lapack_int,
13731        a: *mut c_float,
13732        lda: *const lapack_int,
13733        tau: *mut c_float,
13734        work: *mut c_float,
13735        info: *mut lapack_int,
13736    );
13737    pub fn dgeqr2_(
13738        m: *const lapack_int,
13739        n: *const lapack_int,
13740        a: *mut c_double,
13741        lda: *const lapack_int,
13742        tau: *mut c_double,
13743        work: *mut c_double,
13744        info: *mut lapack_int,
13745    );
13746    pub fn cgeqr2_(
13747        m: *const lapack_int,
13748        n: *const lapack_int,
13749        a: *mut lapack_complex_float,
13750        lda: *const lapack_int,
13751        tau: *mut lapack_complex_float,
13752        work: *mut lapack_complex_float,
13753        info: *mut lapack_int,
13754    );
13755    pub fn zgeqr2_(
13756        m: *const lapack_int,
13757        n: *const lapack_int,
13758        a: *mut lapack_complex_double,
13759        lda: *const lapack_int,
13760        tau: *mut lapack_complex_double,
13761        work: *mut lapack_complex_double,
13762        info: *mut lapack_int,
13763    );
13764
13765    pub fn slacn2_(
13766        n: *const lapack_int,
13767        v: *mut c_float,
13768        x: *mut c_float,
13769        isgn: *mut lapack_int,
13770        est: *mut c_float,
13771        kase: *mut lapack_int,
13772        isave: *mut lapack_int,
13773    );
13774    pub fn dlacn2_(
13775        n: *const lapack_int,
13776        v: *mut c_double,
13777        x: *mut c_double,
13778        isgn: *mut lapack_int,
13779        est: *mut c_double,
13780        kase: *mut lapack_int,
13781        isave: *mut lapack_int,
13782    );
13783    pub fn clacn2_(
13784        n: *const lapack_int,
13785        v: *mut lapack_complex_float,
13786        x: *mut lapack_complex_float,
13787        est: *mut c_float,
13788        kase: *mut lapack_int,
13789        isave: *mut lapack_int,
13790    );
13791    pub fn zlacn2_(
13792        n: *const lapack_int,
13793        v: *mut lapack_complex_double,
13794        x: *mut lapack_complex_double,
13795        est: *mut c_double,
13796        kase: *mut lapack_int,
13797        isave: *mut lapack_int,
13798    );
13799
13800    pub fn slacpy_(
13801        uplo: *const c_char,
13802        m: *const lapack_int,
13803        n: *const lapack_int,
13804        a: *const c_float,
13805        lda: *const lapack_int,
13806        b: *mut c_float,
13807        ldb: *const lapack_int,
13808    );
13809    pub fn dlacpy_(
13810        uplo: *const c_char,
13811        m: *const lapack_int,
13812        n: *const lapack_int,
13813        a: *const c_double,
13814        lda: *const lapack_int,
13815        b: *mut c_double,
13816        ldb: *const lapack_int,
13817    );
13818    pub fn clacpy_(
13819        uplo: *const c_char,
13820        m: *const lapack_int,
13821        n: *const lapack_int,
13822        a: *const lapack_complex_float,
13823        lda: *const lapack_int,
13824        b: *mut lapack_complex_float,
13825        ldb: *const lapack_int,
13826    );
13827    pub fn zlacpy_(
13828        uplo: *const c_char,
13829        m: *const lapack_int,
13830        n: *const lapack_int,
13831        a: *const lapack_complex_double,
13832        lda: *const lapack_int,
13833        b: *mut lapack_complex_double,
13834        ldb: *const lapack_int,
13835    );
13836
13837    pub fn clacp2_(
13838        uplo: *const c_char,
13839        m: *const lapack_int,
13840        n: *const lapack_int,
13841        a: *const c_float,
13842        lda: *const lapack_int,
13843        b: *mut lapack_complex_float,
13844        ldb: *const lapack_int,
13845    );
13846    pub fn zlacp2_(
13847        uplo: *const c_char,
13848        m: *const lapack_int,
13849        n: *const lapack_int,
13850        a: *const c_double,
13851        lda: *const lapack_int,
13852        b: *mut lapack_complex_double,
13853        ldb: *const lapack_int,
13854    );
13855
13856    pub fn sgetf2_(
13857        m: *const lapack_int,
13858        n: *const lapack_int,
13859        a: *mut c_float,
13860        lda: *const lapack_int,
13861        ipiv: *mut lapack_int,
13862        info: *mut lapack_int,
13863    );
13864    pub fn dgetf2_(
13865        m: *const lapack_int,
13866        n: *const lapack_int,
13867        a: *mut c_double,
13868        lda: *const lapack_int,
13869        ipiv: *mut lapack_int,
13870        info: *mut lapack_int,
13871    );
13872    pub fn cgetf2_(
13873        m: *const lapack_int,
13874        n: *const lapack_int,
13875        a: *mut lapack_complex_float,
13876        lda: *const lapack_int,
13877        ipiv: *mut lapack_int,
13878        info: *mut lapack_int,
13879    );
13880    pub fn zgetf2_(
13881        m: *const lapack_int,
13882        n: *const lapack_int,
13883        a: *mut lapack_complex_double,
13884        lda: *const lapack_int,
13885        ipiv: *mut lapack_int,
13886        info: *mut lapack_int,
13887    );
13888
13889    pub fn slaswp_(
13890        n: *const lapack_int,
13891        a: *mut c_float,
13892        lda: *const lapack_int,
13893        k1: *const lapack_int,
13894        k2: *const lapack_int,
13895        ipiv: *const lapack_int,
13896        incx: *const lapack_int,
13897    );
13898    pub fn dlaswp_(
13899        n: *const lapack_int,
13900        a: *mut c_double,
13901        lda: *const lapack_int,
13902        k1: *const lapack_int,
13903        k2: *const lapack_int,
13904        ipiv: *const lapack_int,
13905        incx: *const lapack_int,
13906    );
13907    pub fn claswp_(
13908        n: *const lapack_int,
13909        a: *mut lapack_complex_float,
13910        lda: *const lapack_int,
13911        k1: *const lapack_int,
13912        k2: *const lapack_int,
13913        ipiv: *const lapack_int,
13914        incx: *const lapack_int,
13915    );
13916    pub fn zlaswp_(
13917        n: *const lapack_int,
13918        a: *mut lapack_complex_double,
13919        lda: *const lapack_int,
13920        k1: *const lapack_int,
13921        k2: *const lapack_int,
13922        ipiv: *const lapack_int,
13923        incx: *const lapack_int,
13924    );
13925
13926    pub fn slange_(
13927        norm: *const c_char,
13928        m: *const lapack_int,
13929        n: *const lapack_int,
13930        a: *const c_float,
13931        lda: *const lapack_int,
13932        work: *mut c_float,
13933    ) -> c_float;
13934    pub fn dlange_(
13935        norm: *const c_char,
13936        m: *const lapack_int,
13937        n: *const lapack_int,
13938        a: *const c_double,
13939        lda: *const lapack_int,
13940        work: *mut c_double,
13941    ) -> c_double;
13942    pub fn clange_(
13943        norm: *const c_char,
13944        m: *const lapack_int,
13945        n: *const lapack_int,
13946        a: *const lapack_complex_float,
13947        lda: *const lapack_int,
13948        work: *mut c_float,
13949    ) -> c_float;
13950    pub fn zlange_(
13951        norm: *const c_char,
13952        m: *const lapack_int,
13953        n: *const lapack_int,
13954        a: *const lapack_complex_double,
13955        lda: *const lapack_int,
13956        work: *mut c_double,
13957    ) -> c_double;
13958
13959    pub fn clanhe_(
13960        norm: *const c_char,
13961        uplo: *const c_char,
13962        n: *const lapack_int,
13963        a: *const lapack_complex_float,
13964        lda: *const lapack_int,
13965        work: *mut c_float,
13966    ) -> c_float;
13967    pub fn zlanhe_(
13968        norm: *const c_char,
13969        uplo: *const c_char,
13970        n: *const lapack_int,
13971        a: *const lapack_complex_double,
13972        lda: *const lapack_int,
13973        work: *mut c_double,
13974    ) -> c_double;
13975
13976    pub fn slansy_(
13977        norm: *const c_char,
13978        uplo: *const c_char,
13979        n: *const lapack_int,
13980        a: *const c_float,
13981        lda: *const lapack_int,
13982        work: *mut c_float,
13983    ) -> c_float;
13984    pub fn dlansy_(
13985        norm: *const c_char,
13986        uplo: *const c_char,
13987        n: *const lapack_int,
13988        a: *const c_double,
13989        lda: *const lapack_int,
13990        work: *mut c_double,
13991    ) -> c_double;
13992    pub fn clansy_(
13993        norm: *const c_char,
13994        uplo: *const c_char,
13995        n: *const lapack_int,
13996        a: *const lapack_complex_float,
13997        lda: *const lapack_int,
13998        work: *mut c_float,
13999    ) -> c_float;
14000    pub fn zlansy_(
14001        norm: *const c_char,
14002        uplo: *const c_char,
14003        n: *const lapack_int,
14004        a: *const lapack_complex_double,
14005        lda: *const lapack_int,
14006        work: *mut c_double,
14007    ) -> c_double;
14008
14009    pub fn slantr_(
14010        norm: *const c_char,
14011        uplo: *const c_char,
14012        diag: *const c_char,
14013        m: *const lapack_int,
14014        n: *const lapack_int,
14015        a: *const c_float,
14016        lda: *const lapack_int,
14017        work: *mut c_float,
14018    ) -> c_float;
14019    pub fn dlantr_(
14020        norm: *const c_char,
14021        uplo: *const c_char,
14022        diag: *const c_char,
14023        m: *const lapack_int,
14024        n: *const lapack_int,
14025        a: *const c_double,
14026        lda: *const lapack_int,
14027        work: *mut c_double,
14028    ) -> c_double;
14029    pub fn clantr_(
14030        norm: *const c_char,
14031        uplo: *const c_char,
14032        diag: *const c_char,
14033        m: *const lapack_int,
14034        n: *const lapack_int,
14035        a: *const lapack_complex_float,
14036        lda: *const lapack_int,
14037        work: *mut c_float,
14038    ) -> c_float;
14039    pub fn zlantr_(
14040        norm: *const c_char,
14041        uplo: *const c_char,
14042        diag: *const c_char,
14043        m: *const lapack_int,
14044        n: *const lapack_int,
14045        a: *const lapack_complex_double,
14046        lda: *const lapack_int,
14047        work: *mut c_double,
14048    ) -> c_double;
14049
14050    pub fn slamch_(cmach: *const c_char) -> c_float;
14051    pub fn dlamch_(cmach: *const c_char) -> c_double;
14052
14053    pub fn sgelq2_(
14054        m: *const lapack_int,
14055        n: *const lapack_int,
14056        a: *mut c_float,
14057        lda: *const lapack_int,
14058        tau: *mut c_float,
14059        work: *mut c_float,
14060        info: *mut lapack_int,
14061    );
14062    pub fn dgelq2_(
14063        m: *const lapack_int,
14064        n: *const lapack_int,
14065        a: *mut c_double,
14066        lda: *const lapack_int,
14067        tau: *mut c_double,
14068        work: *mut c_double,
14069        info: *mut lapack_int,
14070    );
14071    pub fn cgelq2_(
14072        m: *const lapack_int,
14073        n: *const lapack_int,
14074        a: *mut lapack_complex_float,
14075        lda: *const lapack_int,
14076        tau: *mut lapack_complex_float,
14077        work: *mut lapack_complex_float,
14078        info: *mut lapack_int,
14079    );
14080    pub fn zgelq2_(
14081        m: *const lapack_int,
14082        n: *const lapack_int,
14083        a: *mut lapack_complex_double,
14084        lda: *const lapack_int,
14085        tau: *mut lapack_complex_double,
14086        work: *mut lapack_complex_double,
14087        info: *mut lapack_int,
14088    );
14089
14090    pub fn slarfb_(
14091        side: *const c_char,
14092        trans: *const c_char,
14093        direct: *const c_char,
14094        storev: *const c_char,
14095        m: *const lapack_int,
14096        n: *const lapack_int,
14097        k: *const lapack_int,
14098        v: *const c_float,
14099        ldv: *const lapack_int,
14100        t: *const c_float,
14101        ldt: *const lapack_int,
14102        c: *mut c_float,
14103        ldc: *const lapack_int,
14104        work: *mut c_float,
14105        ldwork: *const lapack_int,
14106    );
14107    pub fn dlarfb_(
14108        side: *const c_char,
14109        trans: *const c_char,
14110        direct: *const c_char,
14111        storev: *const c_char,
14112        m: *const lapack_int,
14113        n: *const lapack_int,
14114        k: *const lapack_int,
14115        v: *const c_double,
14116        ldv: *const lapack_int,
14117        t: *const c_double,
14118        ldt: *const lapack_int,
14119        c: *mut c_double,
14120        ldc: *const lapack_int,
14121        work: *mut c_double,
14122        ldwork: *const lapack_int,
14123    );
14124    pub fn clarfb_(
14125        side: *const c_char,
14126        trans: *const c_char,
14127        direct: *const c_char,
14128        storev: *const c_char,
14129        m: *const lapack_int,
14130        n: *const lapack_int,
14131        k: *const lapack_int,
14132        v: *const lapack_complex_float,
14133        ldv: *const lapack_int,
14134        t: *const lapack_complex_float,
14135        ldt: *const lapack_int,
14136        c: *mut lapack_complex_float,
14137        ldc: *const lapack_int,
14138        work: *mut lapack_complex_float,
14139        ldwork: *const lapack_int,
14140    );
14141    pub fn zlarfb_(
14142        side: *const c_char,
14143        trans: *const c_char,
14144        direct: *const c_char,
14145        storev: *const c_char,
14146        m: *const lapack_int,
14147        n: *const lapack_int,
14148        k: *const lapack_int,
14149        v: *const lapack_complex_double,
14150        ldv: *const lapack_int,
14151        t: *const lapack_complex_double,
14152        ldt: *const lapack_int,
14153        c: *mut lapack_complex_double,
14154        ldc: *const lapack_int,
14155        work: *mut lapack_complex_double,
14156        ldwork: *const lapack_int,
14157    );
14158
14159    pub fn slarfg_(
14160        n: *const lapack_int,
14161        alpha: *mut c_float,
14162        x: *mut c_float,
14163        incx: *const lapack_int,
14164        tau: *mut c_float,
14165    );
14166    pub fn dlarfg_(
14167        n: *const lapack_int,
14168        alpha: *mut c_double,
14169        x: *mut c_double,
14170        incx: *const lapack_int,
14171        tau: *mut c_double,
14172    );
14173    pub fn clarfg_(
14174        n: *const lapack_int,
14175        alpha: *mut lapack_complex_float,
14176        x: *mut lapack_complex_float,
14177        incx: *const lapack_int,
14178        tau: *mut lapack_complex_float,
14179    );
14180    pub fn zlarfg_(
14181        n: *const lapack_int,
14182        alpha: *mut lapack_complex_double,
14183        x: *mut lapack_complex_double,
14184        incx: *const lapack_int,
14185        tau: *mut lapack_complex_double,
14186    );
14187
14188    pub fn slarft_(
14189        direct: *const c_char,
14190        storev: *const c_char,
14191        n: *const lapack_int,
14192        k: *const lapack_int,
14193        v: *const c_float,
14194        ldv: *const lapack_int,
14195        tau: *const c_float,
14196        t: *mut c_float,
14197        ldt: *const lapack_int,
14198    );
14199    pub fn dlarft_(
14200        direct: *const c_char,
14201        storev: *const c_char,
14202        n: *const lapack_int,
14203        k: *const lapack_int,
14204        v: *const c_double,
14205        ldv: *const lapack_int,
14206        tau: *const c_double,
14207        t: *mut c_double,
14208        ldt: *const lapack_int,
14209    );
14210    pub fn clarft_(
14211        direct: *const c_char,
14212        storev: *const c_char,
14213        n: *const lapack_int,
14214        k: *const lapack_int,
14215        v: *const lapack_complex_float,
14216        ldv: *const lapack_int,
14217        tau: *const lapack_complex_float,
14218        t: *mut lapack_complex_float,
14219        ldt: *const lapack_int,
14220    );
14221    pub fn zlarft_(
14222        direct: *const c_char,
14223        storev: *const c_char,
14224        n: *const lapack_int,
14225        k: *const lapack_int,
14226        v: *const lapack_complex_double,
14227        ldv: *const lapack_int,
14228        tau: *const lapack_complex_double,
14229        t: *mut lapack_complex_double,
14230        ldt: *const lapack_int,
14231    );
14232
14233    pub fn slarfx_(
14234        side: *const c_char,
14235        m: *const lapack_int,
14236        n: *const lapack_int,
14237        v: *const c_float,
14238        tau: *const c_float,
14239        c: *mut c_float,
14240        ldc: *const lapack_int,
14241        work: *mut c_float,
14242    );
14243    pub fn dlarfx_(
14244        side: *const c_char,
14245        m: *const lapack_int,
14246        n: *const lapack_int,
14247        v: *const c_double,
14248        tau: *const c_double,
14249        c: *mut c_double,
14250        ldc: *const lapack_int,
14251        work: *mut c_double,
14252    );
14253    pub fn clarfx_(
14254        side: *const c_char,
14255        m: *const lapack_int,
14256        n: *const lapack_int,
14257        v: *const lapack_complex_float,
14258        tau: *const lapack_complex_float,
14259        c: *mut lapack_complex_float,
14260        ldc: *const lapack_int,
14261        work: *mut lapack_complex_float,
14262    );
14263    pub fn zlarfx_(
14264        side: *const c_char,
14265        m: *const lapack_int,
14266        n: *const lapack_int,
14267        v: *const lapack_complex_double,
14268        tau: *const lapack_complex_double,
14269        c: *mut lapack_complex_double,
14270        ldc: *const lapack_int,
14271        work: *mut lapack_complex_double,
14272    );
14273
14274    pub fn slatms_(
14275        m: *const lapack_int,
14276        n: *const lapack_int,
14277        dist: *const c_char,
14278        iseed: *mut lapack_int,
14279        sym: *const c_char,
14280        d: *mut c_float,
14281        mode: *const lapack_int,
14282        cond: *const c_float,
14283        dmax: *const c_float,
14284        kl: *const lapack_int,
14285        ku: *const lapack_int,
14286        pack: *const c_char,
14287        a: *mut c_float,
14288        lda: *const lapack_int,
14289        work: *mut c_float,
14290        info: *mut lapack_int,
14291    );
14292    pub fn dlatms_(
14293        m: *const lapack_int,
14294        n: *const lapack_int,
14295        dist: *const c_char,
14296        iseed: *mut lapack_int,
14297        sym: *const c_char,
14298        d: *mut c_double,
14299        mode: *const lapack_int,
14300        cond: *const c_double,
14301        dmax: *const c_double,
14302        kl: *const lapack_int,
14303        ku: *const lapack_int,
14304        pack: *const c_char,
14305        a: *mut c_double,
14306        lda: *const lapack_int,
14307        work: *mut c_double,
14308        info: *mut lapack_int,
14309    );
14310    pub fn clatms_(
14311        m: *const lapack_int,
14312        n: *const lapack_int,
14313        dist: *const c_char,
14314        iseed: *mut lapack_int,
14315        sym: *const c_char,
14316        d: *mut c_float,
14317        mode: *const lapack_int,
14318        cond: *const c_float,
14319        dmax: *const c_float,
14320        kl: *const lapack_int,
14321        ku: *const lapack_int,
14322        pack: *const c_char,
14323        a: *mut lapack_complex_float,
14324        lda: *const lapack_int,
14325        work: *mut lapack_complex_float,
14326        info: *mut lapack_int,
14327    );
14328    pub fn zlatms_(
14329        m: *const lapack_int,
14330        n: *const lapack_int,
14331        dist: *const c_char,
14332        iseed: *mut lapack_int,
14333        sym: *const c_char,
14334        d: *mut c_double,
14335        mode: *const lapack_int,
14336        cond: *const c_double,
14337        dmax: *const c_double,
14338        kl: *const lapack_int,
14339        ku: *const lapack_int,
14340        pack: *const c_char,
14341        a: *mut lapack_complex_double,
14342        lda: *const lapack_int,
14343        work: *mut lapack_complex_double,
14344        info: *mut lapack_int,
14345    );
14346
14347    pub fn slag2d_(
14348        m: *const lapack_int,
14349        n: *const lapack_int,
14350        sa: *const c_float,
14351        ldsa: *const lapack_int,
14352        a: *mut c_double,
14353        lda: *const lapack_int,
14354        info: *mut lapack_int,
14355    );
14356    pub fn dlag2s_(
14357        m: *const lapack_int,
14358        n: *const lapack_int,
14359        a: *const c_double,
14360        lda: *const lapack_int,
14361        sa: *mut c_float,
14362        ldsa: *const lapack_int,
14363        info: *mut lapack_int,
14364    );
14365    pub fn clag2z_(
14366        m: *const lapack_int,
14367        n: *const lapack_int,
14368        sa: *const lapack_complex_float,
14369        ldsa: *const lapack_int,
14370        a: *mut lapack_complex_double,
14371        lda: *const lapack_int,
14372        info: *mut lapack_int,
14373    );
14374    pub fn zlag2c_(
14375        m: *const lapack_int,
14376        n: *const lapack_int,
14377        a: *const lapack_complex_double,
14378        lda: *const lapack_int,
14379        sa: *mut lapack_complex_float,
14380        ldsa: *const lapack_int,
14381        info: *mut lapack_int,
14382    );
14383
14384    pub fn slauum_(
14385        uplo: *const c_char,
14386        n: *const lapack_int,
14387        a: *mut c_float,
14388        lda: *const lapack_int,
14389        info: *mut lapack_int,
14390    );
14391    pub fn dlauum_(
14392        uplo: *const c_char,
14393        n: *const lapack_int,
14394        a: *mut c_double,
14395        lda: *const lapack_int,
14396        info: *mut lapack_int,
14397    );
14398    pub fn clauum_(
14399        uplo: *const c_char,
14400        n: *const lapack_int,
14401        a: *mut lapack_complex_float,
14402        lda: *const lapack_int,
14403        info: *mut lapack_int,
14404    );
14405    pub fn zlauum_(
14406        uplo: *const c_char,
14407        n: *const lapack_int,
14408        a: *mut lapack_complex_double,
14409        lda: *const lapack_int,
14410        info: *mut lapack_int,
14411    );
14412
14413    pub fn slagge_(
14414        m: *const lapack_int,
14415        n: *const lapack_int,
14416        kl: *const lapack_int,
14417        ku: *const lapack_int,
14418        d: *const c_float,
14419        a: *mut c_float,
14420        lda: *const lapack_int,
14421        iseed: *mut lapack_int,
14422        work: *mut c_float,
14423        info: *mut lapack_int,
14424    );
14425    pub fn dlagge_(
14426        m: *const lapack_int,
14427        n: *const lapack_int,
14428        kl: *const lapack_int,
14429        ku: *const lapack_int,
14430        d: *const c_double,
14431        a: *mut c_double,
14432        lda: *const lapack_int,
14433        iseed: *mut lapack_int,
14434        work: *mut c_double,
14435        info: *mut lapack_int,
14436    );
14437    pub fn clagge_(
14438        m: *const lapack_int,
14439        n: *const lapack_int,
14440        kl: *const lapack_int,
14441        ku: *const lapack_int,
14442        d: *const c_float,
14443        a: *mut lapack_complex_float,
14444        lda: *const lapack_int,
14445        iseed: *mut lapack_int,
14446        work: *mut lapack_complex_float,
14447        info: *mut lapack_int,
14448    );
14449    pub fn zlagge_(
14450        m: *const lapack_int,
14451        n: *const lapack_int,
14452        kl: *const lapack_int,
14453        ku: *const lapack_int,
14454        d: *const c_double,
14455        a: *mut lapack_complex_double,
14456        lda: *const lapack_int,
14457        iseed: *mut lapack_int,
14458        work: *mut lapack_complex_double,
14459        info: *mut lapack_int,
14460    );
14461
14462    pub fn slascl_(
14463        _type: *const c_char,
14464        kl: *const lapack_int,
14465        ku: *const lapack_int,
14466        cfrom: *const c_float,
14467        cto: *const c_float,
14468        m: *const lapack_int,
14469        n: *const lapack_int,
14470        a: *mut c_float,
14471        lda: *const lapack_int,
14472        info: *mut lapack_int,
14473    );
14474    pub fn dlascl_(
14475        _type: *const c_char,
14476        kl: *const lapack_int,
14477        ku: *const lapack_int,
14478        cfrom: *const c_double,
14479        cto: *const c_double,
14480        m: *const lapack_int,
14481        n: *const lapack_int,
14482        a: *mut c_double,
14483        lda: *const lapack_int,
14484        info: *mut lapack_int,
14485    );
14486    pub fn clascl_(
14487        _type: *const c_char,
14488        kl: *const lapack_int,
14489        ku: *const lapack_int,
14490        cfrom: *const c_float,
14491        cto: *const c_float,
14492        m: *const lapack_int,
14493        n: *const lapack_int,
14494        a: *mut lapack_complex_float,
14495        lda: *const lapack_int,
14496        info: *mut lapack_int,
14497    );
14498    pub fn zlascl_(
14499        _type: *const c_char,
14500        kl: *const lapack_int,
14501        ku: *const lapack_int,
14502        cfrom: *const c_double,
14503        cto: *const c_double,
14504        m: *const lapack_int,
14505        n: *const lapack_int,
14506        a: *mut lapack_complex_double,
14507        lda: *const lapack_int,
14508        info: *mut lapack_int,
14509    );
14510
14511    pub fn slaset_(
14512        uplo: *const c_char,
14513        m: *const lapack_int,
14514        n: *const lapack_int,
14515        alpha: *const c_float,
14516        beta: *const c_float,
14517        a: *mut c_float,
14518        lda: *const lapack_int,
14519    );
14520    pub fn dlaset_(
14521        uplo: *const c_char,
14522        m: *const lapack_int,
14523        n: *const lapack_int,
14524        alpha: *const c_double,
14525        beta: *const c_double,
14526        a: *mut c_double,
14527        lda: *const lapack_int,
14528    );
14529    pub fn claset_(
14530        uplo: *const c_char,
14531        m: *const lapack_int,
14532        n: *const lapack_int,
14533        alpha: *const lapack_complex_float,
14534        beta: *const lapack_complex_float,
14535        a: *mut lapack_complex_float,
14536        lda: *const lapack_int,
14537    );
14538    pub fn zlaset_(
14539        uplo: *const c_char,
14540        m: *const lapack_int,
14541        n: *const lapack_int,
14542        alpha: *const lapack_complex_double,
14543        beta: *const lapack_complex_double,
14544        a: *mut lapack_complex_double,
14545        lda: *const lapack_int,
14546    );
14547
14548    pub fn slasrt_(id: *const c_char, n: *const lapack_int, d: *mut c_float, info: *mut lapack_int);
14549    pub fn dlasrt_(
14550        id: *const c_char,
14551        n: *const lapack_int,
14552        d: *mut c_double,
14553        info: *mut lapack_int,
14554    );
14555
14556    pub fn claghe_(
14557        n: *const lapack_int,
14558        k: *const lapack_int,
14559        d: *const c_float,
14560        a: *mut lapack_complex_float,
14561        lda: *const lapack_int,
14562        iseed: *mut lapack_int,
14563        work: *mut lapack_complex_float,
14564        info: *mut lapack_int,
14565    );
14566    pub fn zlaghe_(
14567        n: *const lapack_int,
14568        k: *const lapack_int,
14569        d: *const c_double,
14570        a: *mut lapack_complex_double,
14571        lda: *const lapack_int,
14572        iseed: *mut lapack_int,
14573        work: *mut lapack_complex_double,
14574        info: *mut lapack_int,
14575    );
14576
14577    pub fn slagsy_(
14578        n: *const lapack_int,
14579        k: *const lapack_int,
14580        d: *const c_float,
14581        a: *mut c_float,
14582        lda: *const lapack_int,
14583        iseed: *mut lapack_int,
14584        work: *mut c_float,
14585        info: *mut lapack_int,
14586    );
14587    pub fn dlagsy_(
14588        n: *const lapack_int,
14589        k: *const lapack_int,
14590        d: *const c_double,
14591        a: *mut c_double,
14592        lda: *const lapack_int,
14593        iseed: *mut lapack_int,
14594        work: *mut c_double,
14595        info: *mut lapack_int,
14596    );
14597    pub fn clagsy_(
14598        n: *const lapack_int,
14599        k: *const lapack_int,
14600        d: *const c_float,
14601        a: *mut lapack_complex_float,
14602        lda: *const lapack_int,
14603        iseed: *mut lapack_int,
14604        work: *mut lapack_complex_float,
14605        info: *mut lapack_int,
14606    );
14607    pub fn zlagsy_(
14608        n: *const lapack_int,
14609        k: *const lapack_int,
14610        d: *const c_double,
14611        a: *mut lapack_complex_double,
14612        lda: *const lapack_int,
14613        iseed: *mut lapack_int,
14614        work: *mut lapack_complex_double,
14615        info: *mut lapack_int,
14616    );
14617
14618    pub fn slapmr_(
14619        forwrd: *const lapack_logical,
14620        m: *const lapack_int,
14621        n: *const lapack_int,
14622        x: *mut c_float,
14623        ldx: *const lapack_int,
14624        k: *mut lapack_int,
14625    );
14626    pub fn dlapmr_(
14627        forwrd: *const lapack_logical,
14628        m: *const lapack_int,
14629        n: *const lapack_int,
14630        x: *mut c_double,
14631        ldx: *const lapack_int,
14632        k: *mut lapack_int,
14633    );
14634    pub fn clapmr_(
14635        forwrd: *const lapack_logical,
14636        m: *const lapack_int,
14637        n: *const lapack_int,
14638        x: *mut lapack_complex_float,
14639        ldx: *const lapack_int,
14640        k: *mut lapack_int,
14641    );
14642    pub fn zlapmr_(
14643        forwrd: *const lapack_logical,
14644        m: *const lapack_int,
14645        n: *const lapack_int,
14646        x: *mut lapack_complex_double,
14647        ldx: *const lapack_int,
14648        k: *mut lapack_int,
14649    );
14650
14651    pub fn slapmt_(
14652        forwrd: *const lapack_logical,
14653        m: *const lapack_int,
14654        n: *const lapack_int,
14655        x: *mut c_float,
14656        ldx: *const lapack_int,
14657        k: *mut lapack_int,
14658    );
14659    pub fn dlapmt_(
14660        forwrd: *const lapack_logical,
14661        m: *const lapack_int,
14662        n: *const lapack_int,
14663        x: *mut c_double,
14664        ldx: *const lapack_int,
14665        k: *mut lapack_int,
14666    );
14667    pub fn clapmt_(
14668        forwrd: *const lapack_logical,
14669        m: *const lapack_int,
14670        n: *const lapack_int,
14671        x: *mut lapack_complex_float,
14672        ldx: *const lapack_int,
14673        k: *mut lapack_int,
14674    );
14675    pub fn zlapmt_(
14676        forwrd: *const lapack_logical,
14677        m: *const lapack_int,
14678        n: *const lapack_int,
14679        x: *mut lapack_complex_double,
14680        ldx: *const lapack_int,
14681        k: *mut lapack_int,
14682    );
14683
14684    pub fn slapy2_(x: *const c_float, y: *const c_float) -> c_float;
14685    pub fn dlapy2_(x: *const c_double, y: *const c_double) -> c_double;
14686
14687    pub fn slapy3_(x: *const c_float, y: *const c_float, z: *const c_float) -> c_float;
14688    pub fn dlapy3_(x: *const c_double, y: *const c_double, z: *const c_double) -> c_double;
14689
14690    pub fn slartgp_(
14691        f: *const c_float,
14692        g: *const c_float,
14693        cs: *mut c_float,
14694        sn: *mut c_float,
14695        r: *mut c_float,
14696    );
14697    pub fn dlartgp_(
14698        f: *const c_double,
14699        g: *const c_double,
14700        cs: *mut c_double,
14701        sn: *mut c_double,
14702        r: *mut c_double,
14703    );
14704
14705    pub fn slartgs_(
14706        x: *const c_float,
14707        y: *const c_float,
14708        sigma: *const c_float,
14709        cs: *mut c_float,
14710        sn: *mut c_float,
14711    );
14712    pub fn dlartgs_(
14713        x: *const c_double,
14714        y: *const c_double,
14715        sigma: *const c_double,
14716        cs: *mut c_double,
14717        sn: *mut c_double,
14718    );
14719
14720    // Version 3.3.0
14721    pub fn cbbcsd_(
14722        jobu1: *const c_char,
14723        jobu2: *const c_char,
14724        jobv1t: *const c_char,
14725        jobv2t: *const c_char,
14726        trans: *const c_char,
14727        m: *const lapack_int,
14728        p: *const lapack_int,
14729        q: *const lapack_int,
14730        theta: *mut c_float,
14731        phi: *mut c_float,
14732        u1: *mut lapack_complex_float,
14733        ldu1: *const lapack_int,
14734        u2: *mut lapack_complex_float,
14735        ldu2: *const lapack_int,
14736        v1t: *mut lapack_complex_float,
14737        ldv1t: *const lapack_int,
14738        v2t: *mut lapack_complex_float,
14739        ldv2t: *const lapack_int,
14740        b11d: *mut c_float,
14741        b11e: *mut c_float,
14742        b12d: *mut c_float,
14743        b12e: *mut c_float,
14744        b21d: *mut c_float,
14745        b21e: *mut c_float,
14746        b22d: *mut c_float,
14747        b22e: *mut c_float,
14748        rwork: *mut c_float,
14749        lrwork: *const lapack_int,
14750        info: *mut lapack_int,
14751    );
14752    pub fn cheswapr_(
14753        uplo: *const c_char,
14754        n: *const lapack_int,
14755        a: *mut lapack_complex_float,
14756        i1: *const lapack_int,
14757        i2: *const lapack_int,
14758    );
14759    pub fn chetri2_(
14760        uplo: *const c_char,
14761        n: *const lapack_int,
14762        a: *mut lapack_complex_float,
14763        lda: *const lapack_int,
14764        ipiv: *const lapack_int,
14765        work: *mut lapack_complex_float,
14766        lwork: *const lapack_int,
14767        info: *mut lapack_int,
14768    );
14769    pub fn chetri2x_(
14770        uplo: *const c_char,
14771        n: *const lapack_int,
14772        a: *mut lapack_complex_float,
14773        lda: *const lapack_int,
14774        ipiv: *const lapack_int,
14775        work: *mut lapack_complex_float,
14776        nb: *const lapack_int,
14777        info: *mut lapack_int,
14778    );
14779    pub fn chetrs2_(
14780        uplo: *const c_char,
14781        n: *const lapack_int,
14782        nrhs: *const lapack_int,
14783        a: *const lapack_complex_float,
14784        lda: *const lapack_int,
14785        ipiv: *const lapack_int,
14786        b: *mut lapack_complex_float,
14787        ldb: *const lapack_int,
14788        work: *mut lapack_complex_float,
14789        info: *mut lapack_int,
14790    );
14791    pub fn csyconv_(
14792        uplo: *const c_char,
14793        way: *const c_char,
14794        n: *const lapack_int,
14795        a: *mut lapack_complex_float,
14796        lda: *const lapack_int,
14797        ipiv: *const lapack_int,
14798        work: *mut lapack_complex_float,
14799        info: *mut lapack_int,
14800    );
14801    pub fn csyswapr_(
14802        uplo: *const c_char,
14803        n: *const lapack_int,
14804        a: *mut lapack_complex_float,
14805        i1: *const lapack_int,
14806        i2: *const lapack_int,
14807    );
14808    pub fn csytri2_(
14809        uplo: *const c_char,
14810        n: *const lapack_int,
14811        a: *mut lapack_complex_float,
14812        lda: *const lapack_int,
14813        ipiv: *const lapack_int,
14814        work: *mut lapack_complex_float,
14815        lwork: *const lapack_int,
14816        info: *mut lapack_int,
14817    );
14818    pub fn csytri2x_(
14819        uplo: *const c_char,
14820        n: *const lapack_int,
14821        a: *mut lapack_complex_float,
14822        lda: *const lapack_int,
14823        ipiv: *const lapack_int,
14824        work: *mut lapack_complex_float,
14825        nb: *const lapack_int,
14826        info: *mut lapack_int,
14827    );
14828    pub fn csytrs2_(
14829        uplo: *const c_char,
14830        n: *const lapack_int,
14831        nrhs: *const lapack_int,
14832        a: *const lapack_complex_float,
14833        lda: *const lapack_int,
14834        ipiv: *const lapack_int,
14835        b: *mut lapack_complex_float,
14836        ldb: *const lapack_int,
14837        work: *mut lapack_complex_float,
14838        info: *mut lapack_int,
14839    );
14840    pub fn cunbdb_(
14841        trans: *const c_char,
14842        signs: *const c_char,
14843        m: *const lapack_int,
14844        p: *const lapack_int,
14845        q: *const lapack_int,
14846        x11: *mut lapack_complex_float,
14847        ldx11: *const lapack_int,
14848        x12: *mut lapack_complex_float,
14849        ldx12: *const lapack_int,
14850        x21: *mut lapack_complex_float,
14851        ldx21: *const lapack_int,
14852        x22: *mut lapack_complex_float,
14853        ldx22: *const lapack_int,
14854        theta: *mut c_float,
14855        phi: *mut c_float,
14856        taup1: *mut lapack_complex_float,
14857        taup2: *mut lapack_complex_float,
14858        tauq1: *mut lapack_complex_float,
14859        tauq2: *mut lapack_complex_float,
14860        work: *mut lapack_complex_float,
14861        lwork: *const lapack_int,
14862        info: *mut lapack_int,
14863    );
14864    pub fn cuncsd_(
14865        jobu1: *const c_char,
14866        jobu2: *const c_char,
14867        jobv1t: *const c_char,
14868        jobv2t: *const c_char,
14869        trans: *const c_char,
14870        signs: *const c_char,
14871        m: *const lapack_int,
14872        p: *const lapack_int,
14873        q: *const lapack_int,
14874        x11: *mut lapack_complex_float,
14875        ldx11: *const lapack_int,
14876        x12: *mut lapack_complex_float,
14877        ldx12: *const lapack_int,
14878        x21: *mut lapack_complex_float,
14879        ldx21: *const lapack_int,
14880        x22: *mut lapack_complex_float,
14881        ldx22: *const lapack_int,
14882        theta: *mut c_float,
14883        u1: *mut lapack_complex_float,
14884        ldu1: *const lapack_int,
14885        u2: *mut lapack_complex_float,
14886        ldu2: *const lapack_int,
14887        v1t: *mut lapack_complex_float,
14888        ldv1t: *const lapack_int,
14889        v2t: *mut lapack_complex_float,
14890        ldv2t: *const lapack_int,
14891        work: *mut lapack_complex_float,
14892        lwork: *const lapack_int,
14893        rwork: *mut c_float,
14894        lrwork: *const lapack_int,
14895        iwork: *mut lapack_int,
14896        info: *mut lapack_int,
14897    );
14898    pub fn cuncsd2by1_(
14899        jobu1: *const c_char,
14900        jobu2: *const c_char,
14901        jobv1t: *const c_char,
14902        m: *const lapack_int,
14903        p: *const lapack_int,
14904        q: *const lapack_int,
14905        x11: *mut lapack_complex_float,
14906        ldx11: *const lapack_int,
14907        x21: *mut lapack_complex_float,
14908        ldx21: *const lapack_int,
14909        theta: *mut lapack_complex_float,
14910        u1: *mut lapack_complex_float,
14911        ldu1: *const lapack_int,
14912        u2: *mut lapack_complex_float,
14913        ldu2: *const lapack_int,
14914        v1t: *mut lapack_complex_float,
14915        ldv1t: *const lapack_int,
14916        work: *mut lapack_complex_float,
14917        lwork: *const lapack_int,
14918        rwork: *mut c_float,
14919        lrwork: *const lapack_int,
14920        iwork: *mut lapack_int,
14921        info: *mut lapack_int,
14922    );
14923    pub fn dbbcsd_(
14924        jobu1: *const c_char,
14925        jobu2: *const c_char,
14926        jobv1t: *const c_char,
14927        jobv2t: *const c_char,
14928        trans: *const c_char,
14929        m: *const lapack_int,
14930        p: *const lapack_int,
14931        q: *const lapack_int,
14932        theta: *mut c_double,
14933        phi: *mut c_double,
14934        u1: *mut c_double,
14935        ldu1: *const lapack_int,
14936        u2: *mut c_double,
14937        ldu2: *const lapack_int,
14938        v1t: *mut c_double,
14939        ldv1t: *const lapack_int,
14940        v2t: *mut c_double,
14941        ldv2t: *const lapack_int,
14942        b11d: *mut c_double,
14943        b11e: *mut c_double,
14944        b12d: *mut c_double,
14945        b12e: *mut c_double,
14946        b21d: *mut c_double,
14947        b21e: *mut c_double,
14948        b22d: *mut c_double,
14949        b22e: *mut c_double,
14950        work: *mut c_double,
14951        lwork: *const lapack_int,
14952        info: *mut lapack_int,
14953    );
14954    pub fn dorbdb_(
14955        trans: *const c_char,
14956        signs: *const c_char,
14957        m: *const lapack_int,
14958        p: *const lapack_int,
14959        q: *const lapack_int,
14960        x11: *mut c_double,
14961        ldx11: *const lapack_int,
14962        x12: *mut c_double,
14963        ldx12: *const lapack_int,
14964        x21: *mut c_double,
14965        ldx21: *const lapack_int,
14966        x22: *mut c_double,
14967        ldx22: *const lapack_int,
14968        theta: *mut c_double,
14969        phi: *mut c_double,
14970        taup1: *mut c_double,
14971        taup2: *mut c_double,
14972        tauq1: *mut c_double,
14973        tauq2: *mut c_double,
14974        work: *mut c_double,
14975        lwork: *const lapack_int,
14976        info: *mut lapack_int,
14977    );
14978    pub fn dorcsd_(
14979        jobu1: *const c_char,
14980        jobu2: *const c_char,
14981        jobv1t: *const c_char,
14982        jobv2t: *const c_char,
14983        trans: *const c_char,
14984        signs: *const c_char,
14985        m: *const lapack_int,
14986        p: *const lapack_int,
14987        q: *const lapack_int,
14988        x11: *mut c_double,
14989        ldx11: *const lapack_int,
14990        x12: *mut c_double,
14991        ldx12: *const lapack_int,
14992        x21: *mut c_double,
14993        ldx21: *const lapack_int,
14994        x22: *mut c_double,
14995        ldx22: *const lapack_int,
14996        theta: *mut c_double,
14997        u1: *mut c_double,
14998        ldu1: *const lapack_int,
14999        u2: *mut c_double,
15000        ldu2: *const lapack_int,
15001        v1t: *mut c_double,
15002        ldv1t: *const lapack_int,
15003        v2t: *mut c_double,
15004        ldv2t: *const lapack_int,
15005        work: *mut c_double,
15006        lwork: *const lapack_int,
15007        iwork: *mut lapack_int,
15008        info: *mut lapack_int,
15009    );
15010    pub fn dorcsd2by1_(
15011        jobu1: *const c_char,
15012        jobu2: *const c_char,
15013        jobv1t: *const c_char,
15014        m: *const lapack_int,
15015        p: *const lapack_int,
15016        q: *const lapack_int,
15017        x11: *mut c_double,
15018        ldx11: *const lapack_int,
15019        x21: *mut c_double,
15020        ldx21: *const lapack_int,
15021        theta: *mut c_double,
15022        u1: *mut c_double,
15023        ldu1: *const lapack_int,
15024        u2: *mut c_double,
15025        ldu2: *const lapack_int,
15026        v1t: *mut c_double,
15027        ldv1t: *const lapack_int,
15028        work: *mut c_double,
15029        lwork: *const lapack_int,
15030        iwork: *mut lapack_int,
15031        info: *mut lapack_int,
15032    );
15033    pub fn dsyconv_(
15034        uplo: *const c_char,
15035        way: *const c_char,
15036        n: *const lapack_int,
15037        a: *mut c_double,
15038        lda: *const lapack_int,
15039        ipiv: *const lapack_int,
15040        work: *mut c_double,
15041        info: *mut lapack_int,
15042    );
15043    pub fn dsyswapr_(
15044        uplo: *const c_char,
15045        n: *const lapack_int,
15046        a: *mut c_double,
15047        i1: *const lapack_int,
15048        i2: *const lapack_int,
15049    );
15050    pub fn dsytri2_(
15051        uplo: *const c_char,
15052        n: *const lapack_int,
15053        a: *mut c_double,
15054        lda: *const lapack_int,
15055        ipiv: *const lapack_int,
15056        work: *mut lapack_complex_double,
15057        lwork: *const lapack_int,
15058        info: *mut lapack_int,
15059    );
15060    pub fn dsytri2x_(
15061        uplo: *const c_char,
15062        n: *const lapack_int,
15063        a: *mut c_double,
15064        lda: *const lapack_int,
15065        ipiv: *const lapack_int,
15066        work: *mut c_double,
15067        nb: *const lapack_int,
15068        info: *mut lapack_int,
15069    );
15070    pub fn dsytrs2_(
15071        uplo: *const c_char,
15072        n: *const lapack_int,
15073        nrhs: *const lapack_int,
15074        a: *const c_double,
15075        lda: *const lapack_int,
15076        ipiv: *const lapack_int,
15077        b: *mut c_double,
15078        ldb: *const lapack_int,
15079        work: *mut c_double,
15080        info: *mut lapack_int,
15081    );
15082    pub fn sbbcsd_(
15083        jobu1: *const c_char,
15084        jobu2: *const c_char,
15085        jobv1t: *const c_char,
15086        jobv2t: *const c_char,
15087        trans: *const c_char,
15088        m: *const lapack_int,
15089        p: *const lapack_int,
15090        q: *const lapack_int,
15091        theta: *mut c_float,
15092        phi: *mut c_float,
15093        u1: *mut c_float,
15094        ldu1: *const lapack_int,
15095        u2: *mut c_float,
15096        ldu2: *const lapack_int,
15097        v1t: *mut c_float,
15098        ldv1t: *const lapack_int,
15099        v2t: *mut c_float,
15100        ldv2t: *const lapack_int,
15101        b11d: *mut c_float,
15102        b11e: *mut c_float,
15103        b12d: *mut c_float,
15104        b12e: *mut c_float,
15105        b21d: *mut c_float,
15106        b21e: *mut c_float,
15107        b22d: *mut c_float,
15108        b22e: *mut c_float,
15109        work: *mut c_float,
15110        lwork: *const lapack_int,
15111        info: *mut lapack_int,
15112    );
15113    pub fn sorbdb_(
15114        trans: *const c_char,
15115        signs: *const c_char,
15116        m: *const lapack_int,
15117        p: *const lapack_int,
15118        q: *const lapack_int,
15119        x11: *mut c_float,
15120        ldx11: *const lapack_int,
15121        x12: *mut c_float,
15122        ldx12: *const lapack_int,
15123        x21: *mut c_float,
15124        ldx21: *const lapack_int,
15125        x22: *mut c_float,
15126        ldx22: *const lapack_int,
15127        theta: *mut c_float,
15128        phi: *mut c_float,
15129        taup1: *mut c_float,
15130        taup2: *mut c_float,
15131        tauq1: *mut c_float,
15132        tauq2: *mut c_float,
15133        work: *mut c_float,
15134        lwork: *const lapack_int,
15135        info: *mut lapack_int,
15136    );
15137    pub fn sorcsd_(
15138        jobu1: *const c_char,
15139        jobu2: *const c_char,
15140        jobv1t: *const c_char,
15141        jobv2t: *const c_char,
15142        trans: *const c_char,
15143        signs: *const c_char,
15144        m: *const lapack_int,
15145        p: *const lapack_int,
15146        q: *const lapack_int,
15147        x11: *mut c_float,
15148        ldx11: *const lapack_int,
15149        x12: *mut c_float,
15150        ldx12: *const lapack_int,
15151        x21: *mut c_float,
15152        ldx21: *const lapack_int,
15153        x22: *mut c_float,
15154        ldx22: *const lapack_int,
15155        theta: *mut c_float,
15156        u1: *mut c_float,
15157        ldu1: *const lapack_int,
15158        u2: *mut c_float,
15159        ldu2: *const lapack_int,
15160        v1t: *mut c_float,
15161        ldv1t: *const lapack_int,
15162        v2t: *mut c_float,
15163        ldv2t: *const lapack_int,
15164        work: *mut c_float,
15165        lwork: *const lapack_int,
15166        iwork: *mut lapack_int,
15167        info: *mut lapack_int,
15168    );
15169    pub fn sorcsd2by1_(
15170        jobu1: *const c_char,
15171        jobu2: *const c_char,
15172        jobv1t: *const c_char,
15173        m: *const lapack_int,
15174        p: *const lapack_int,
15175        q: *const lapack_int,
15176        x11: *mut c_float,
15177        ldx11: *const lapack_int,
15178        x21: *mut c_float,
15179        ldx21: *const lapack_int,
15180        theta: *mut c_float,
15181        u1: *mut c_float,
15182        ldu1: *const lapack_int,
15183        u2: *mut c_float,
15184        ldu2: *const lapack_int,
15185        v1t: *mut c_float,
15186        ldv1t: *const lapack_int,
15187        work: *mut c_float,
15188        lwork: *const lapack_int,
15189        iwork: *mut lapack_int,
15190        info: *mut lapack_int,
15191    );
15192    pub fn ssyconv_(
15193        uplo: *const c_char,
15194        way: *const c_char,
15195        n: *const lapack_int,
15196        a: *mut c_float,
15197        lda: *const lapack_int,
15198        ipiv: *const lapack_int,
15199        work: *mut c_float,
15200        info: *mut lapack_int,
15201    );
15202    pub fn ssyswapr_(
15203        uplo: *const c_char,
15204        n: *const lapack_int,
15205        a: *mut c_float,
15206        i1: *const lapack_int,
15207        i2: *const lapack_int,
15208    );
15209    pub fn ssytri2_(
15210        uplo: *const c_char,
15211        n: *const lapack_int,
15212        a: *mut c_float,
15213        lda: *const lapack_int,
15214        ipiv: *const lapack_int,
15215        work: *mut lapack_complex_float,
15216        lwork: *const lapack_int,
15217        info: *mut lapack_int,
15218    );
15219    pub fn ssytri2x_(
15220        uplo: *const c_char,
15221        n: *const lapack_int,
15222        a: *mut c_float,
15223        lda: *const lapack_int,
15224        ipiv: *const lapack_int,
15225        work: *mut c_float,
15226        nb: *const lapack_int,
15227        info: *mut lapack_int,
15228    );
15229    pub fn ssytrs2_(
15230        uplo: *const c_char,
15231        n: *const lapack_int,
15232        nrhs: *const lapack_int,
15233        a: *const c_float,
15234        lda: *const lapack_int,
15235        ipiv: *const lapack_int,
15236        b: *mut c_float,
15237        ldb: *const lapack_int,
15238        work: *mut c_float,
15239        info: *mut lapack_int,
15240    );
15241    pub fn zbbcsd_(
15242        jobu1: *const c_char,
15243        jobu2: *const c_char,
15244        jobv1t: *const c_char,
15245        jobv2t: *const c_char,
15246        trans: *const c_char,
15247        m: *const lapack_int,
15248        p: *const lapack_int,
15249        q: *const lapack_int,
15250        theta: *mut c_double,
15251        phi: *mut c_double,
15252        u1: *mut lapack_complex_double,
15253        ldu1: *const lapack_int,
15254        u2: *mut lapack_complex_double,
15255        ldu2: *const lapack_int,
15256        v1t: *mut lapack_complex_double,
15257        ldv1t: *const lapack_int,
15258        v2t: *mut lapack_complex_double,
15259        ldv2t: *const lapack_int,
15260        b11d: *mut c_double,
15261        b11e: *mut c_double,
15262        b12d: *mut c_double,
15263        b12e: *mut c_double,
15264        b21d: *mut c_double,
15265        b21e: *mut c_double,
15266        b22d: *mut c_double,
15267        b22e: *mut c_double,
15268        rwork: *mut c_double,
15269        lrwork: *const lapack_int,
15270        info: *mut lapack_int,
15271    );
15272    pub fn zheswapr_(
15273        uplo: *const c_char,
15274        n: *const lapack_int,
15275        a: *mut lapack_complex_double,
15276        i1: *const lapack_int,
15277        i2: *const lapack_int,
15278    );
15279    pub fn zhetri2_(
15280        uplo: *const c_char,
15281        n: *const lapack_int,
15282        a: *mut lapack_complex_double,
15283        lda: *const lapack_int,
15284        ipiv: *const lapack_int,
15285        work: *mut lapack_complex_double,
15286        lwork: *const lapack_int,
15287        info: *mut lapack_int,
15288    );
15289    pub fn zhetri2x_(
15290        uplo: *const c_char,
15291        n: *const lapack_int,
15292        a: *mut lapack_complex_double,
15293        lda: *const lapack_int,
15294        ipiv: *const lapack_int,
15295        work: *mut lapack_complex_double,
15296        nb: *const lapack_int,
15297        info: *mut lapack_int,
15298    );
15299    pub fn zhetrs2_(
15300        uplo: *const c_char,
15301        n: *const lapack_int,
15302        nrhs: *const lapack_int,
15303        a: *const lapack_complex_double,
15304        lda: *const lapack_int,
15305        ipiv: *const lapack_int,
15306        b: *mut lapack_complex_double,
15307        ldb: *const lapack_int,
15308        work: *mut lapack_complex_double,
15309        info: *mut lapack_int,
15310    );
15311    pub fn zsyconv_(
15312        uplo: *const c_char,
15313        way: *const c_char,
15314        n: *const lapack_int,
15315        a: *mut lapack_complex_double,
15316        lda: *const lapack_int,
15317        ipiv: *const lapack_int,
15318        work: *mut lapack_complex_double,
15319        info: *mut lapack_int,
15320    );
15321    pub fn zsyswapr_(
15322        uplo: *const c_char,
15323        n: *const lapack_int,
15324        a: *mut lapack_complex_double,
15325        i1: *const lapack_int,
15326        i2: *const lapack_int,
15327    );
15328    pub fn zsytri2_(
15329        uplo: *const c_char,
15330        n: *const lapack_int,
15331        a: *mut lapack_complex_double,
15332        lda: *const lapack_int,
15333        ipiv: *const lapack_int,
15334        work: *mut lapack_complex_double,
15335        lwork: *const lapack_int,
15336        info: *mut lapack_int,
15337    );
15338    pub fn zsytri2x_(
15339        uplo: *const c_char,
15340        n: *const lapack_int,
15341        a: *mut lapack_complex_double,
15342        lda: *const lapack_int,
15343        ipiv: *const lapack_int,
15344        work: *mut lapack_complex_double,
15345        nb: *const lapack_int,
15346        info: *mut lapack_int,
15347    );
15348    pub fn zsytrs2_(
15349        uplo: *const c_char,
15350        n: *const lapack_int,
15351        nrhs: *const lapack_int,
15352        a: *const lapack_complex_double,
15353        lda: *const lapack_int,
15354        ipiv: *const lapack_int,
15355        b: *mut lapack_complex_double,
15356        ldb: *const lapack_int,
15357        work: *mut lapack_complex_double,
15358        info: *mut lapack_int,
15359    );
15360    pub fn zunbdb_(
15361        trans: *const c_char,
15362        signs: *const c_char,
15363        m: *const lapack_int,
15364        p: *const lapack_int,
15365        q: *const lapack_int,
15366        x11: *mut lapack_complex_double,
15367        ldx11: *const lapack_int,
15368        x12: *mut lapack_complex_double,
15369        ldx12: *const lapack_int,
15370        x21: *mut lapack_complex_double,
15371        ldx21: *const lapack_int,
15372        x22: *mut lapack_complex_double,
15373        ldx22: *const lapack_int,
15374        theta: *mut c_double,
15375        phi: *mut c_double,
15376        taup1: *mut lapack_complex_double,
15377        taup2: *mut lapack_complex_double,
15378        tauq1: *mut lapack_complex_double,
15379        tauq2: *mut lapack_complex_double,
15380        work: *mut lapack_complex_double,
15381        lwork: *const lapack_int,
15382        info: *mut lapack_int,
15383    );
15384    pub fn zuncsd_(
15385        jobu1: *const c_char,
15386        jobu2: *const c_char,
15387        jobv1t: *const c_char,
15388        jobv2t: *const c_char,
15389        trans: *const c_char,
15390        signs: *const c_char,
15391        m: *const lapack_int,
15392        p: *const lapack_int,
15393        q: *const lapack_int,
15394        x11: *mut lapack_complex_double,
15395        ldx11: *const lapack_int,
15396        x12: *mut lapack_complex_double,
15397        ldx12: *const lapack_int,
15398        x21: *mut lapack_complex_double,
15399        ldx21: *const lapack_int,
15400        x22: *mut lapack_complex_double,
15401        ldx22: *const lapack_int,
15402        theta: *mut c_double,
15403        u1: *mut lapack_complex_double,
15404        ldu1: *const lapack_int,
15405        u2: *mut lapack_complex_double,
15406        ldu2: *const lapack_int,
15407        v1t: *mut lapack_complex_double,
15408        ldv1t: *const lapack_int,
15409        v2t: *mut lapack_complex_double,
15410        ldv2t: *const lapack_int,
15411        work: *mut lapack_complex_double,
15412        lwork: *const lapack_int,
15413        rwork: *mut c_double,
15414        lrwork: *const lapack_int,
15415        iwork: *mut lapack_int,
15416        info: *mut lapack_int,
15417    );
15418    pub fn zuncsd2by1_(
15419        jobu1: *const c_char,
15420        jobu2: *const c_char,
15421        jobv1t: *const c_char,
15422        m: *const lapack_int,
15423        p: *const lapack_int,
15424        q: *const lapack_int,
15425        x11: *mut lapack_complex_double,
15426        ldx11: *const lapack_int,
15427        x21: *mut lapack_complex_double,
15428        ldx21: *const lapack_int,
15429        theta: *mut lapack_complex_double,
15430        u1: *mut lapack_complex_double,
15431        ldu1: *const lapack_int,
15432        u2: *mut lapack_complex_double,
15433        ldu2: *const lapack_int,
15434        v1t: *mut lapack_complex_double,
15435        ldv1t: *const lapack_int,
15436        work: *mut lapack_complex_double,
15437        lwork: *const lapack_int,
15438        rwork: *mut c_double,
15439        lrwork: *const lapack_int,
15440        iwork: *mut lapack_int,
15441        info: *mut lapack_int,
15442    );
15443
15444    // Version 3.4.0
15445    pub fn sgemqrt_(
15446        side: *const c_char,
15447        trans: *const c_char,
15448        m: *const lapack_int,
15449        n: *const lapack_int,
15450        k: *const lapack_int,
15451        nb: *const lapack_int,
15452        v: *const c_float,
15453        ldv: *const lapack_int,
15454        t: *const c_float,
15455        ldt: *const lapack_int,
15456        c: *mut c_float,
15457        ldc: *const lapack_int,
15458        work: *mut c_float,
15459        info: *mut lapack_int,
15460    );
15461    pub fn dgemqrt_(
15462        side: *const c_char,
15463        trans: *const c_char,
15464        m: *const lapack_int,
15465        n: *const lapack_int,
15466        k: *const lapack_int,
15467        nb: *const lapack_int,
15468        v: *const c_double,
15469        ldv: *const lapack_int,
15470        t: *const c_double,
15471        ldt: *const lapack_int,
15472        c: *mut c_double,
15473        ldc: *const lapack_int,
15474        work: *mut c_double,
15475        info: *mut lapack_int,
15476    );
15477    pub fn cgemqrt_(
15478        side: *const c_char,
15479        trans: *const c_char,
15480        m: *const lapack_int,
15481        n: *const lapack_int,
15482        k: *const lapack_int,
15483        nb: *const lapack_int,
15484        v: *const lapack_complex_float,
15485        ldv: *const lapack_int,
15486        t: *const lapack_complex_float,
15487        ldt: *const lapack_int,
15488        c: *mut lapack_complex_float,
15489        ldc: *const lapack_int,
15490        work: *mut lapack_complex_float,
15491        info: *mut lapack_int,
15492    );
15493    pub fn zgemqrt_(
15494        side: *const c_char,
15495        trans: *const c_char,
15496        m: *const lapack_int,
15497        n: *const lapack_int,
15498        k: *const lapack_int,
15499        nb: *const lapack_int,
15500        v: *const lapack_complex_double,
15501        ldv: *const lapack_int,
15502        t: *const lapack_complex_double,
15503        ldt: *const lapack_int,
15504        c: *mut lapack_complex_double,
15505        ldc: *const lapack_int,
15506        work: *mut lapack_complex_double,
15507        info: *mut lapack_int,
15508    );
15509
15510    pub fn sgeqrt_(
15511        m: *const lapack_int,
15512        n: *const lapack_int,
15513        nb: *const lapack_int,
15514        a: *mut c_float,
15515        lda: *const lapack_int,
15516        t: *mut c_float,
15517        ldt: *const lapack_int,
15518        work: *mut c_float,
15519        info: *mut lapack_int,
15520    );
15521    pub fn dgeqrt_(
15522        m: *const lapack_int,
15523        n: *const lapack_int,
15524        nb: *const lapack_int,
15525        a: *mut c_double,
15526        lda: *const lapack_int,
15527        t: *mut c_double,
15528        ldt: *const lapack_int,
15529        work: *mut c_double,
15530        info: *mut lapack_int,
15531    );
15532    pub fn cgeqrt_(
15533        m: *const lapack_int,
15534        n: *const lapack_int,
15535        nb: *const lapack_int,
15536        a: *mut lapack_complex_float,
15537        lda: *const lapack_int,
15538        t: *mut lapack_complex_float,
15539        ldt: *const lapack_int,
15540        work: *mut lapack_complex_float,
15541        info: *mut lapack_int,
15542    );
15543    pub fn zgeqrt_(
15544        m: *const lapack_int,
15545        n: *const lapack_int,
15546        nb: *const lapack_int,
15547        a: *mut lapack_complex_double,
15548        lda: *const lapack_int,
15549        t: *mut lapack_complex_double,
15550        ldt: *const lapack_int,
15551        work: *mut lapack_complex_double,
15552        info: *mut lapack_int,
15553    );
15554
15555    pub fn sgeqrt2_(
15556        m: *const lapack_int,
15557        n: *const lapack_int,
15558        a: *mut c_float,
15559        lda: *const lapack_int,
15560        t: *mut c_float,
15561        ldt: *const lapack_int,
15562        info: *mut lapack_int,
15563    );
15564    pub fn dgeqrt2_(
15565        m: *const lapack_int,
15566        n: *const lapack_int,
15567        a: *mut c_double,
15568        lda: *const lapack_int,
15569        t: *mut c_double,
15570        ldt: *const lapack_int,
15571        info: *mut lapack_int,
15572    );
15573    pub fn cgeqrt2_(
15574        m: *const lapack_int,
15575        n: *const lapack_int,
15576        a: *mut lapack_complex_float,
15577        lda: *const lapack_int,
15578        t: *mut lapack_complex_float,
15579        ldt: *const lapack_int,
15580        info: *mut lapack_int,
15581    );
15582    pub fn zgeqrt2_(
15583        m: *const lapack_int,
15584        n: *const lapack_int,
15585        a: *mut lapack_complex_double,
15586        lda: *const lapack_int,
15587        t: *mut lapack_complex_double,
15588        ldt: *const lapack_int,
15589        info: *mut lapack_int,
15590    );
15591
15592    pub fn sgeqrt3_(
15593        m: *const lapack_int,
15594        n: *const lapack_int,
15595        a: *mut c_float,
15596        lda: *const lapack_int,
15597        t: *mut c_float,
15598        ldt: *const lapack_int,
15599        info: *mut lapack_int,
15600    );
15601    pub fn dgeqrt3_(
15602        m: *const lapack_int,
15603        n: *const lapack_int,
15604        a: *mut c_double,
15605        lda: *const lapack_int,
15606        t: *mut c_double,
15607        ldt: *const lapack_int,
15608        info: *mut lapack_int,
15609    );
15610    pub fn cgeqrt3_(
15611        m: *const lapack_int,
15612        n: *const lapack_int,
15613        a: *mut lapack_complex_float,
15614        lda: *const lapack_int,
15615        t: *mut lapack_complex_float,
15616        ldt: *const lapack_int,
15617        info: *mut lapack_int,
15618    );
15619    pub fn zgeqrt3_(
15620        m: *const lapack_int,
15621        n: *const lapack_int,
15622        a: *mut lapack_complex_double,
15623        lda: *const lapack_int,
15624        t: *mut lapack_complex_double,
15625        ldt: *const lapack_int,
15626        info: *mut lapack_int,
15627    );
15628
15629    pub fn stpmqrt_(
15630        side: *const c_char,
15631        trans: *const c_char,
15632        m: *const lapack_int,
15633        n: *const lapack_int,
15634        k: *const lapack_int,
15635        l: *const lapack_int,
15636        nb: *const lapack_int,
15637        v: *const c_float,
15638        ldv: *const lapack_int,
15639        t: *const c_float,
15640        ldt: *const lapack_int,
15641        a: *mut c_float,
15642        lda: *const lapack_int,
15643        b: *mut c_float,
15644        ldb: *const lapack_int,
15645        work: *mut c_float,
15646        info: *mut lapack_int,
15647    );
15648    pub fn dtpmqrt_(
15649        side: *const c_char,
15650        trans: *const c_char,
15651        m: *const lapack_int,
15652        n: *const lapack_int,
15653        k: *const lapack_int,
15654        l: *const lapack_int,
15655        nb: *const lapack_int,
15656        v: *const c_double,
15657        ldv: *const lapack_int,
15658        t: *const c_double,
15659        ldt: *const lapack_int,
15660        a: *mut c_double,
15661        lda: *const lapack_int,
15662        b: *mut c_double,
15663        ldb: *const lapack_int,
15664        work: *mut c_double,
15665        info: *mut lapack_int,
15666    );
15667    pub fn ctpmqrt_(
15668        side: *const c_char,
15669        trans: *const c_char,
15670        m: *const lapack_int,
15671        n: *const lapack_int,
15672        k: *const lapack_int,
15673        l: *const lapack_int,
15674        nb: *const lapack_int,
15675        v: *const lapack_complex_float,
15676        ldv: *const lapack_int,
15677        t: *const lapack_complex_float,
15678        ldt: *const lapack_int,
15679        a: *mut lapack_complex_float,
15680        lda: *const lapack_int,
15681        b: *mut lapack_complex_float,
15682        ldb: *const lapack_int,
15683        work: *mut lapack_complex_float,
15684        info: *mut lapack_int,
15685    );
15686    pub fn ztpmqrt_(
15687        side: *const c_char,
15688        trans: *const c_char,
15689        m: *const lapack_int,
15690        n: *const lapack_int,
15691        k: *const lapack_int,
15692        l: *const lapack_int,
15693        nb: *const lapack_int,
15694        v: *const lapack_complex_double,
15695        ldv: *const lapack_int,
15696        t: *const lapack_complex_double,
15697        ldt: *const lapack_int,
15698        a: *mut lapack_complex_double,
15699        lda: *const lapack_int,
15700        b: *mut lapack_complex_double,
15701        ldb: *const lapack_int,
15702        work: *mut lapack_complex_double,
15703        info: *mut lapack_int,
15704    );
15705
15706    pub fn stpqrt_(
15707        m: *const lapack_int,
15708        n: *const lapack_int,
15709        l: *const lapack_int,
15710        nb: *const lapack_int,
15711        a: *mut c_float,
15712        lda: *const lapack_int,
15713        b: *mut c_float,
15714        ldb: *const lapack_int,
15715        t: *mut c_float,
15716        ldt: *const lapack_int,
15717        work: *mut c_float,
15718        info: *mut lapack_int,
15719    );
15720    pub fn dtpqrt_(
15721        m: *const lapack_int,
15722        n: *const lapack_int,
15723        l: *const lapack_int,
15724        nb: *const lapack_int,
15725        a: *mut c_double,
15726        lda: *const lapack_int,
15727        b: *mut c_double,
15728        ldb: *const lapack_int,
15729        t: *mut c_double,
15730        ldt: *const lapack_int,
15731        work: *mut c_double,
15732        info: *mut lapack_int,
15733    );
15734    pub fn ctpqrt_(
15735        m: *const lapack_int,
15736        n: *const lapack_int,
15737        l: *const lapack_int,
15738        nb: *const lapack_int,
15739        a: *mut lapack_complex_float,
15740        lda: *const lapack_int,
15741        b: *mut lapack_complex_float,
15742        ldb: *const lapack_int,
15743        t: *mut lapack_complex_float,
15744        ldt: *const lapack_int,
15745        work: *mut lapack_complex_float,
15746        info: *mut lapack_int,
15747    );
15748    pub fn ztpqrt_(
15749        m: *const lapack_int,
15750        n: *const lapack_int,
15751        l: *const lapack_int,
15752        nb: *const lapack_int,
15753        a: *mut lapack_complex_double,
15754        lda: *const lapack_int,
15755        b: *mut lapack_complex_double,
15756        ldb: *const lapack_int,
15757        t: *mut lapack_complex_double,
15758        ldt: *const lapack_int,
15759        work: *mut lapack_complex_double,
15760        info: *mut lapack_int,
15761    );
15762
15763    pub fn stpqrt2_(
15764        m: *const lapack_int,
15765        n: *const lapack_int,
15766        l: *const lapack_int,
15767        a: *mut c_float,
15768        lda: *const lapack_int,
15769        b: *mut c_float,
15770        ldb: *const lapack_int,
15771        t: *mut c_float,
15772        ldt: *const lapack_int,
15773        info: *mut lapack_int,
15774    );
15775    pub fn dtpqrt2_(
15776        m: *const lapack_int,
15777        n: *const lapack_int,
15778        l: *const lapack_int,
15779        a: *mut c_double,
15780        lda: *const lapack_int,
15781        b: *mut c_double,
15782        ldb: *const lapack_int,
15783        t: *mut c_double,
15784        ldt: *const lapack_int,
15785        info: *mut lapack_int,
15786    );
15787    pub fn ctpqrt2_(
15788        m: *const lapack_int,
15789        n: *const lapack_int,
15790        l: *const lapack_int,
15791        a: *mut lapack_complex_float,
15792        lda: *const lapack_int,
15793        b: *mut lapack_complex_float,
15794        ldb: *const lapack_int,
15795        t: *mut lapack_complex_float,
15796        ldt: *const lapack_int,
15797        info: *mut lapack_int,
15798    );
15799    pub fn ztpqrt2_(
15800        m: *const lapack_int,
15801        n: *const lapack_int,
15802        l: *const lapack_int,
15803        a: *mut lapack_complex_double,
15804        lda: *const lapack_int,
15805        b: *mut lapack_complex_double,
15806        ldb: *const lapack_int,
15807        t: *mut lapack_complex_double,
15808        ldt: *const lapack_int,
15809        info: *mut lapack_int,
15810    );
15811
15812    pub fn stprfb_(
15813        side: *const c_char,
15814        trans: *const c_char,
15815        direct: *const c_char,
15816        storev: *const c_char,
15817        m: *const lapack_int,
15818        n: *const lapack_int,
15819        k: *const lapack_int,
15820        l: *const lapack_int,
15821        v: *const c_float,
15822        ldv: *const lapack_int,
15823        t: *const c_float,
15824        ldt: *const lapack_int,
15825        a: *mut c_float,
15826        lda: *const lapack_int,
15827        b: *mut c_float,
15828        ldb: *const lapack_int,
15829        work: *const c_float,
15830        ldwork: *const lapack_int,
15831    );
15832    pub fn dtprfb_(
15833        side: *const c_char,
15834        trans: *const c_char,
15835        direct: *const c_char,
15836        storev: *const c_char,
15837        m: *const lapack_int,
15838        n: *const lapack_int,
15839        k: *const lapack_int,
15840        l: *const lapack_int,
15841        v: *const c_double,
15842        ldv: *const lapack_int,
15843        t: *const c_double,
15844        ldt: *const lapack_int,
15845        a: *mut c_double,
15846        lda: *const lapack_int,
15847        b: *mut c_double,
15848        ldb: *const lapack_int,
15849        work: *const c_double,
15850        ldwork: *const lapack_int,
15851    );
15852    pub fn ctprfb_(
15853        side: *const c_char,
15854        trans: *const c_char,
15855        direct: *const c_char,
15856        storev: *const c_char,
15857        m: *const lapack_int,
15858        n: *const lapack_int,
15859        k: *const lapack_int,
15860        l: *const lapack_int,
15861        v: *const lapack_complex_float,
15862        ldv: *const lapack_int,
15863        t: *const lapack_complex_float,
15864        ldt: *const lapack_int,
15865        a: *mut lapack_complex_float,
15866        lda: *const lapack_int,
15867        b: *mut lapack_complex_float,
15868        ldb: *const lapack_int,
15869        work: *mut lapack_complex_float,
15870        ldwork: *const lapack_int,
15871    );
15872    pub fn ztprfb_(
15873        side: *const c_char,
15874        trans: *const c_char,
15875        direct: *const c_char,
15876        storev: *const c_char,
15877        m: *const lapack_int,
15878        n: *const lapack_int,
15879        k: *const lapack_int,
15880        l: *const lapack_int,
15881        v: *const lapack_complex_double,
15882        ldv: *const lapack_int,
15883        t: *const lapack_complex_double,
15884        ldt: *const lapack_int,
15885        a: *mut lapack_complex_double,
15886        lda: *const lapack_int,
15887        b: *mut lapack_complex_double,
15888        ldb: *const lapack_int,
15889        work: *mut lapack_complex_double,
15890        ldwork: *const lapack_int,
15891    );
15892
15893    // Version 3.5.0
15894    pub fn ssysv_rook_(
15895        uplo: *const c_char,
15896        n: *const lapack_int,
15897        nrhs: *const lapack_int,
15898        a: *mut c_float,
15899        lda: *const lapack_int,
15900        ipiv: *mut lapack_int,
15901        b: *mut c_float,
15902        ldb: *const lapack_int,
15903        work: *mut c_float,
15904        lwork: *const lapack_int,
15905        info: *mut lapack_int,
15906    );
15907    pub fn dsysv_rook_(
15908        uplo: *const c_char,
15909        n: *const lapack_int,
15910        nrhs: *const lapack_int,
15911        a: *mut c_double,
15912        lda: *const lapack_int,
15913        ipiv: *mut lapack_int,
15914        b: *mut c_double,
15915        ldb: *const lapack_int,
15916        work: *mut c_double,
15917        lwork: *const lapack_int,
15918        info: *mut lapack_int,
15919    );
15920    pub fn csysv_rook_(
15921        uplo: *const c_char,
15922        n: *const lapack_int,
15923        nrhs: *const lapack_int,
15924        a: *mut lapack_complex_float,
15925        lda: *const lapack_int,
15926        ipiv: *mut lapack_int,
15927        b: *mut lapack_complex_float,
15928        ldb: *const lapack_int,
15929        work: *mut lapack_complex_float,
15930        lwork: *const lapack_int,
15931        info: *mut lapack_int,
15932    );
15933    pub fn zsysv_rook_(
15934        uplo: *const c_char,
15935        n: *const lapack_int,
15936        nrhs: *const lapack_int,
15937        a: *mut lapack_complex_double,
15938        lda: *const lapack_int,
15939        ipiv: *mut lapack_int,
15940        b: *mut lapack_complex_double,
15941        ldb: *const lapack_int,
15942        work: *mut lapack_complex_double,
15943        lwork: *const lapack_int,
15944        info: *mut lapack_int,
15945    );
15946
15947    pub fn ssytrf_rook_(
15948        uplo: *const c_char,
15949        n: *const lapack_int,
15950        a: *mut c_float,
15951        lda: *const lapack_int,
15952        ipiv: *mut lapack_int,
15953        work: *mut c_float,
15954        lwork: *const lapack_int,
15955        info: *mut lapack_int,
15956    );
15957    pub fn dsytrf_rook_(
15958        uplo: *const c_char,
15959        n: *const lapack_int,
15960        a: *mut c_double,
15961        lda: *const lapack_int,
15962        ipiv: *mut lapack_int,
15963        work: *mut c_double,
15964        lwork: *const lapack_int,
15965        info: *mut lapack_int,
15966    );
15967    pub fn csytrf_rook_(
15968        uplo: *const c_char,
15969        n: *const lapack_int,
15970        a: *mut lapack_complex_float,
15971        lda: *const lapack_int,
15972        ipiv: *mut lapack_int,
15973        work: *mut lapack_complex_float,
15974        lwork: *const lapack_int,
15975        info: *mut lapack_int,
15976    );
15977    pub fn zsytrf_rook_(
15978        uplo: *const c_char,
15979        n: *const lapack_int,
15980        a: *mut lapack_complex_double,
15981        lda: *const lapack_int,
15982        ipiv: *mut lapack_int,
15983        work: *mut lapack_complex_double,
15984        lwork: *const lapack_int,
15985        info: *mut lapack_int,
15986    );
15987
15988    pub fn ssytrs_rook_(
15989        uplo: *const c_char,
15990        n: *const lapack_int,
15991        nrhs: *const lapack_int,
15992        a: *const c_float,
15993        lda: *const lapack_int,
15994        ipiv: *const lapack_int,
15995        b: *mut c_float,
15996        ldb: *const lapack_int,
15997        info: *mut lapack_int,
15998    );
15999    pub fn dsytrs_rook_(
16000        uplo: *const c_char,
16001        n: *const lapack_int,
16002        nrhs: *const lapack_int,
16003        a: *const c_double,
16004        lda: *const lapack_int,
16005        ipiv: *const lapack_int,
16006        b: *mut c_double,
16007        ldb: *const lapack_int,
16008        info: *mut lapack_int,
16009    );
16010    pub fn csytrs_rook_(
16011        uplo: *const c_char,
16012        n: *const lapack_int,
16013        nrhs: *const lapack_int,
16014        a: *const lapack_complex_float,
16015        lda: *const lapack_int,
16016        ipiv: *const lapack_int,
16017        b: *mut lapack_complex_float,
16018        ldb: *const lapack_int,
16019        info: *mut lapack_int,
16020    );
16021    pub fn zsytrs_rook_(
16022        uplo: *const c_char,
16023        n: *const lapack_int,
16024        nrhs: *const lapack_int,
16025        a: *const lapack_complex_double,
16026        lda: *const lapack_int,
16027        ipiv: *const lapack_int,
16028        b: *mut lapack_complex_double,
16029        ldb: *const lapack_int,
16030        info: *mut lapack_int,
16031    );
16032
16033    pub fn chetrf_rook_(
16034        uplo: *const c_char,
16035        n: *const lapack_int,
16036        a: *mut lapack_complex_float,
16037        lda: *const lapack_int,
16038        ipiv: *mut lapack_int,
16039        work: *mut lapack_complex_float,
16040        lwork: *const lapack_int,
16041        info: *mut lapack_int,
16042    );
16043    pub fn zhetrf_rook_(
16044        uplo: *const c_char,
16045        n: *const lapack_int,
16046        a: *mut lapack_complex_double,
16047        lda: *const lapack_int,
16048        ipiv: *mut lapack_int,
16049        work: *mut lapack_complex_double,
16050        lwork: *const lapack_int,
16051        info: *mut lapack_int,
16052    );
16053
16054    pub fn chetrs_rook_(
16055        uplo: *const c_char,
16056        n: *const lapack_int,
16057        nrhs: *const lapack_int,
16058        a: *const lapack_complex_float,
16059        lda: *const lapack_int,
16060        ipiv: *const lapack_int,
16061        b: *mut lapack_complex_float,
16062        ldb: *const lapack_int,
16063        info: *mut lapack_int,
16064    );
16065    pub fn zhetrs_rook_(
16066        uplo: *const c_char,
16067        n: *const lapack_int,
16068        nrhs: *const lapack_int,
16069        a: *const lapack_complex_double,
16070        lda: *const lapack_int,
16071        ipiv: *const lapack_int,
16072        b: *mut lapack_complex_double,
16073        ldb: *const lapack_int,
16074        info: *mut lapack_int,
16075    );
16076
16077    pub fn csyr_(
16078        uplo: *const c_char,
16079        n: *const lapack_int,
16080        alpha: *const lapack_complex_float,
16081        x: *const lapack_complex_float,
16082        incx: *const lapack_int,
16083        a: *mut lapack_complex_float,
16084        lda: *const lapack_int,
16085    );
16086    pub fn zsyr_(
16087        uplo: *const c_char,
16088        n: *const lapack_int,
16089        alpha: *const lapack_complex_double,
16090        x: *const lapack_complex_double,
16091        incx: *const lapack_int,
16092        a: *mut lapack_complex_double,
16093        lda: *const lapack_int,
16094    );
16095
16096    pub fn ilaver_(
16097        vers_major: *mut lapack_int,
16098        vers_minor: *mut lapack_int,
16099        vers_patch: *mut lapack_int,
16100    );
16101}