9294 lines
672 KiB
Cython
9294 lines
672 KiB
Cython
|
# This file was generated by _generate_pyx.py.
|
||
|
|
# Do not edit this file directly.
|
||
|
|
|
||
|
|
"""
|
||
|
|
LAPACK functions for Cython
|
||
|
|
===========================
|
||
|
|
|
||
|
|
Usable from Cython via::
|
||
|
|
|
||
|
|
cimport scipy.linalg.cython_lapack
|
||
|
|
|
||
|
|
This module provides Cython-level wrappers for all primary routines included
|
||
|
|
in LAPACK 3.4.0 except for ``zcgesv`` since its interface is not consistent
|
||
|
|
from LAPACK 3.4.0 to 3.6.0. It also provides some of the
|
||
|
|
fixed-api auxiliary routines.
|
||
|
|
|
||
|
|
These wrappers do not check for alignment of arrays.
|
||
|
|
Alignment should be checked before these wrappers are used.
|
||
|
|
|
||
|
|
Raw function pointers (Fortran-style pointer arguments):
|
||
|
|
|
||
|
|
- cbbcsd
|
||
|
|
- cbdsqr
|
||
|
|
- cgbbrd
|
||
|
|
- cgbcon
|
||
|
|
- cgbequ
|
||
|
|
- cgbequb
|
||
|
|
- cgbrfs
|
||
|
|
- cgbsv
|
||
|
|
- cgbsvx
|
||
|
|
- cgbtf2
|
||
|
|
- cgbtrf
|
||
|
|
- cgbtrs
|
||
|
|
- cgebak
|
||
|
|
- cgebal
|
||
|
|
- cgebd2
|
||
|
|
- cgebrd
|
||
|
|
- cgecon
|
||
|
|
- cgeequ
|
||
|
|
- cgeequb
|
||
|
|
- cgees
|
||
|
|
- cgeesx
|
||
|
|
- cgeev
|
||
|
|
- cgeevx
|
||
|
|
- cgehd2
|
||
|
|
- cgehrd
|
||
|
|
- cgelq2
|
||
|
|
- cgelqf
|
||
|
|
- cgels
|
||
|
|
- cgelsd
|
||
|
|
- cgelss
|
||
|
|
- cgelsy
|
||
|
|
- cgemqrt
|
||
|
|
- cgeql2
|
||
|
|
- cgeqlf
|
||
|
|
- cgeqp3
|
||
|
|
- cgeqr2
|
||
|
|
- cgeqr2p
|
||
|
|
- cgeqrf
|
||
|
|
- cgeqrfp
|
||
|
|
- cgeqrt
|
||
|
|
- cgeqrt2
|
||
|
|
- cgeqrt3
|
||
|
|
- cgerfs
|
||
|
|
- cgerq2
|
||
|
|
- cgerqf
|
||
|
|
- cgesc2
|
||
|
|
- cgesdd
|
||
|
|
- cgesv
|
||
|
|
- cgesvd
|
||
|
|
- cgesvx
|
||
|
|
- cgetc2
|
||
|
|
- cgetf2
|
||
|
|
- cgetrf
|
||
|
|
- cgetri
|
||
|
|
- cgetrs
|
||
|
|
- cggbak
|
||
|
|
- cggbal
|
||
|
|
- cgges
|
||
|
|
- cggesx
|
||
|
|
- cggev
|
||
|
|
- cggevx
|
||
|
|
- cggglm
|
||
|
|
- cgghrd
|
||
|
|
- cgglse
|
||
|
|
- cggqrf
|
||
|
|
- cggrqf
|
||
|
|
- cgtcon
|
||
|
|
- cgtrfs
|
||
|
|
- cgtsv
|
||
|
|
- cgtsvx
|
||
|
|
- cgttrf
|
||
|
|
- cgttrs
|
||
|
|
- cgtts2
|
||
|
|
- chbev
|
||
|
|
- chbevd
|
||
|
|
- chbevx
|
||
|
|
- chbgst
|
||
|
|
- chbgv
|
||
|
|
- chbgvd
|
||
|
|
- chbgvx
|
||
|
|
- chbtrd
|
||
|
|
- checon
|
||
|
|
- cheequb
|
||
|
|
- cheev
|
||
|
|
- cheevd
|
||
|
|
- cheevr
|
||
|
|
- cheevx
|
||
|
|
- chegs2
|
||
|
|
- chegst
|
||
|
|
- chegv
|
||
|
|
- chegvd
|
||
|
|
- chegvx
|
||
|
|
- cherfs
|
||
|
|
- chesv
|
||
|
|
- chesvx
|
||
|
|
- cheswapr
|
||
|
|
- chetd2
|
||
|
|
- chetf2
|
||
|
|
- chetrd
|
||
|
|
- chetrf
|
||
|
|
- chetri
|
||
|
|
- chetri2
|
||
|
|
- chetri2x
|
||
|
|
- chetrs
|
||
|
|
- chetrs2
|
||
|
|
- chfrk
|
||
|
|
- chgeqz
|
||
|
|
- chla_transtype
|
||
|
|
- chpcon
|
||
|
|
- chpev
|
||
|
|
- chpevd
|
||
|
|
- chpevx
|
||
|
|
- chpgst
|
||
|
|
- chpgv
|
||
|
|
- chpgvd
|
||
|
|
- chpgvx
|
||
|
|
- chprfs
|
||
|
|
- chpsv
|
||
|
|
- chpsvx
|
||
|
|
- chptrd
|
||
|
|
- chptrf
|
||
|
|
- chptri
|
||
|
|
- chptrs
|
||
|
|
- chsein
|
||
|
|
- chseqr
|
||
|
|
- clabrd
|
||
|
|
- clacgv
|
||
|
|
- clacn2
|
||
|
|
- clacon
|
||
|
|
- clacp2
|
||
|
|
- clacpy
|
||
|
|
- clacrm
|
||
|
|
- clacrt
|
||
|
|
- cladiv
|
||
|
|
- claed0
|
||
|
|
- claed7
|
||
|
|
- claed8
|
||
|
|
- claein
|
||
|
|
- claesy
|
||
|
|
- claev2
|
||
|
|
- clag2z
|
||
|
|
- clags2
|
||
|
|
- clagtm
|
||
|
|
- clahef
|
||
|
|
- clahqr
|
||
|
|
- clahr2
|
||
|
|
- claic1
|
||
|
|
- clals0
|
||
|
|
- clalsa
|
||
|
|
- clalsd
|
||
|
|
- clangb
|
||
|
|
- clange
|
||
|
|
- clangt
|
||
|
|
- clanhb
|
||
|
|
- clanhe
|
||
|
|
- clanhf
|
||
|
|
- clanhp
|
||
|
|
- clanhs
|
||
|
|
- clanht
|
||
|
|
- clansb
|
||
|
|
- clansp
|
||
|
|
- clansy
|
||
|
|
- clantb
|
||
|
|
- clantp
|
||
|
|
- clantr
|
||
|
|
- clapll
|
||
|
|
- clapmr
|
||
|
|
- clapmt
|
||
|
|
- claqgb
|
||
|
|
- claqge
|
||
|
|
- claqhb
|
||
|
|
- claqhe
|
||
|
|
- claqhp
|
||
|
|
- claqp2
|
||
|
|
- claqps
|
||
|
|
- claqr0
|
||
|
|
- claqr1
|
||
|
|
- claqr2
|
||
|
|
- claqr3
|
||
|
|
- claqr4
|
||
|
|
- claqr5
|
||
|
|
- claqsb
|
||
|
|
- claqsp
|
||
|
|
- claqsy
|
||
|
|
- clar1v
|
||
|
|
- clar2v
|
||
|
|
- clarcm
|
||
|
|
- clarf
|
||
|
|
- clarfb
|
||
|
|
- clarfg
|
||
|
|
- clarfgp
|
||
|
|
- clarft
|
||
|
|
- clarfx
|
||
|
|
- clargv
|
||
|
|
- clarnv
|
||
|
|
- clarrv
|
||
|
|
- clartg
|
||
|
|
- clartv
|
||
|
|
- clarz
|
||
|
|
- clarzb
|
||
|
|
- clarzt
|
||
|
|
- clascl
|
||
|
|
- claset
|
||
|
|
- clasr
|
||
|
|
- classq
|
||
|
|
- claswp
|
||
|
|
- clasyf
|
||
|
|
- clatbs
|
||
|
|
- clatdf
|
||
|
|
- clatps
|
||
|
|
- clatrd
|
||
|
|
- clatrs
|
||
|
|
- clatrz
|
||
|
|
- clauu2
|
||
|
|
- clauum
|
||
|
|
- cpbcon
|
||
|
|
- cpbequ
|
||
|
|
- cpbrfs
|
||
|
|
- cpbstf
|
||
|
|
- cpbsv
|
||
|
|
- cpbsvx
|
||
|
|
- cpbtf2
|
||
|
|
- cpbtrf
|
||
|
|
- cpbtrs
|
||
|
|
- cpftrf
|
||
|
|
- cpftri
|
||
|
|
- cpftrs
|
||
|
|
- cpocon
|
||
|
|
- cpoequ
|
||
|
|
- cpoequb
|
||
|
|
- cporfs
|
||
|
|
- cposv
|
||
|
|
- cposvx
|
||
|
|
- cpotf2
|
||
|
|
- cpotrf
|
||
|
|
- cpotri
|
||
|
|
- cpotrs
|
||
|
|
- cppcon
|
||
|
|
- cppequ
|
||
|
|
- cpprfs
|
||
|
|
- cppsv
|
||
|
|
- cppsvx
|
||
|
|
- cpptrf
|
||
|
|
- cpptri
|
||
|
|
- cpptrs
|
||
|
|
- cpstf2
|
||
|
|
- cpstrf
|
||
|
|
- cptcon
|
||
|
|
- cpteqr
|
||
|
|
- cptrfs
|
||
|
|
- cptsv
|
||
|
|
- cptsvx
|
||
|
|
- cpttrf
|
||
|
|
- cpttrs
|
||
|
|
- cptts2
|
||
|
|
- crot
|
||
|
|
- cspcon
|
||
|
|
- cspmv
|
||
|
|
- cspr
|
||
|
|
- csprfs
|
||
|
|
- cspsv
|
||
|
|
- cspsvx
|
||
|
|
- csptrf
|
||
|
|
- csptri
|
||
|
|
- csptrs
|
||
|
|
- csrscl
|
||
|
|
- cstedc
|
||
|
|
- cstegr
|
||
|
|
- cstein
|
||
|
|
- cstemr
|
||
|
|
- csteqr
|
||
|
|
- csycon
|
||
|
|
- csyconv
|
||
|
|
- csyequb
|
||
|
|
- csymv
|
||
|
|
- csyr
|
||
|
|
- csyrfs
|
||
|
|
- csysv
|
||
|
|
- csysvx
|
||
|
|
- csyswapr
|
||
|
|
- csytf2
|
||
|
|
- csytrf
|
||
|
|
- csytri
|
||
|
|
- csytri2
|
||
|
|
- csytri2x
|
||
|
|
- csytrs
|
||
|
|
- csytrs2
|
||
|
|
- ctbcon
|
||
|
|
- ctbrfs
|
||
|
|
- ctbtrs
|
||
|
|
- ctfsm
|
||
|
|
- ctftri
|
||
|
|
- ctfttp
|
||
|
|
- ctfttr
|
||
|
|
- ctgevc
|
||
|
|
- ctgex2
|
||
|
|
- ctgexc
|
||
|
|
- ctgsen
|
||
|
|
- ctgsja
|
||
|
|
- ctgsna
|
||
|
|
- ctgsy2
|
||
|
|
- ctgsyl
|
||
|
|
- ctpcon
|
||
|
|
- ctpmqrt
|
||
|
|
- ctpqrt
|
||
|
|
- ctpqrt2
|
||
|
|
- ctprfb
|
||
|
|
- ctprfs
|
||
|
|
- ctptri
|
||
|
|
- ctptrs
|
||
|
|
- ctpttf
|
||
|
|
- ctpttr
|
||
|
|
- ctrcon
|
||
|
|
- ctrevc
|
||
|
|
- ctrexc
|
||
|
|
- ctrrfs
|
||
|
|
- ctrsen
|
||
|
|
- ctrsna
|
||
|
|
- ctrsyl
|
||
|
|
- ctrti2
|
||
|
|
- ctrtri
|
||
|
|
- ctrtrs
|
||
|
|
- ctrttf
|
||
|
|
- ctrttp
|
||
|
|
- ctzrzf
|
||
|
|
- cunbdb
|
||
|
|
- cuncsd
|
||
|
|
- cung2l
|
||
|
|
- cung2r
|
||
|
|
- cungbr
|
||
|
|
- cunghr
|
||
|
|
- cungl2
|
||
|
|
- cunglq
|
||
|
|
- cungql
|
||
|
|
- cungqr
|
||
|
|
- cungr2
|
||
|
|
- cungrq
|
||
|
|
- cungtr
|
||
|
|
- cunm2l
|
||
|
|
- cunm2r
|
||
|
|
- cunmbr
|
||
|
|
- cunmhr
|
||
|
|
- cunml2
|
||
|
|
- cunmlq
|
||
|
|
- cunmql
|
||
|
|
- cunmqr
|
||
|
|
- cunmr2
|
||
|
|
- cunmr3
|
||
|
|
- cunmrq
|
||
|
|
- cunmrz
|
||
|
|
- cunmtr
|
||
|
|
- cupgtr
|
||
|
|
- cupmtr
|
||
|
|
- dbbcsd
|
||
|
|
- dbdsdc
|
||
|
|
- dbdsqr
|
||
|
|
- ddisna
|
||
|
|
- dgbbrd
|
||
|
|
- dgbcon
|
||
|
|
- dgbequ
|
||
|
|
- dgbequb
|
||
|
|
- dgbrfs
|
||
|
|
- dgbsv
|
||
|
|
- dgbsvx
|
||
|
|
- dgbtf2
|
||
|
|
- dgbtrf
|
||
|
|
- dgbtrs
|
||
|
|
- dgebak
|
||
|
|
- dgebal
|
||
|
|
- dgebd2
|
||
|
|
- dgebrd
|
||
|
|
- dgecon
|
||
|
|
- dgeequ
|
||
|
|
- dgeequb
|
||
|
|
- dgees
|
||
|
|
- dgeesx
|
||
|
|
- dgeev
|
||
|
|
- dgeevx
|
||
|
|
- dgehd2
|
||
|
|
- dgehrd
|
||
|
|
- dgejsv
|
||
|
|
- dgelq2
|
||
|
|
- dgelqf
|
||
|
|
- dgels
|
||
|
|
- dgelsd
|
||
|
|
- dgelss
|
||
|
|
- dgelsy
|
||
|
|
- dgemqrt
|
||
|
|
- dgeql2
|
||
|
|
- dgeqlf
|
||
|
|
- dgeqp3
|
||
|
|
- dgeqr2
|
||
|
|
- dgeqr2p
|
||
|
|
- dgeqrf
|
||
|
|
- dgeqrfp
|
||
|
|
- dgeqrt
|
||
|
|
- dgeqrt2
|
||
|
|
- dgeqrt3
|
||
|
|
- dgerfs
|
||
|
|
- dgerq2
|
||
|
|
- dgerqf
|
||
|
|
- dgesc2
|
||
|
|
- dgesdd
|
||
|
|
- dgesv
|
||
|
|
- dgesvd
|
||
|
|
- dgesvj
|
||
|
|
- dgesvx
|
||
|
|
- dgetc2
|
||
|
|
- dgetf2
|
||
|
|
- dgetrf
|
||
|
|
- dgetri
|
||
|
|
- dgetrs
|
||
|
|
- dggbak
|
||
|
|
- dggbal
|
||
|
|
- dgges
|
||
|
|
- dggesx
|
||
|
|
- dggev
|
||
|
|
- dggevx
|
||
|
|
- dggglm
|
||
|
|
- dgghrd
|
||
|
|
- dgglse
|
||
|
|
- dggqrf
|
||
|
|
- dggrqf
|
||
|
|
- dgsvj0
|
||
|
|
- dgsvj1
|
||
|
|
- dgtcon
|
||
|
|
- dgtrfs
|
||
|
|
- dgtsv
|
||
|
|
- dgtsvx
|
||
|
|
- dgttrf
|
||
|
|
- dgttrs
|
||
|
|
- dgtts2
|
||
|
|
- dhgeqz
|
||
|
|
- dhsein
|
||
|
|
- dhseqr
|
||
|
|
- disnan
|
||
|
|
- dlabad
|
||
|
|
- dlabrd
|
||
|
|
- dlacn2
|
||
|
|
- dlacon
|
||
|
|
- dlacpy
|
||
|
|
- dladiv
|
||
|
|
- dlae2
|
||
|
|
- dlaebz
|
||
|
|
- dlaed0
|
||
|
|
- dlaed1
|
||
|
|
- dlaed2
|
||
|
|
- dlaed3
|
||
|
|
- dlaed4
|
||
|
|
- dlaed5
|
||
|
|
- dlaed6
|
||
|
|
- dlaed7
|
||
|
|
- dlaed8
|
||
|
|
- dlaed9
|
||
|
|
- dlaeda
|
||
|
|
- dlaein
|
||
|
|
- dlaev2
|
||
|
|
- dlaexc
|
||
|
|
- dlag2
|
||
|
|
- dlag2s
|
||
|
|
- dlags2
|
||
|
|
- dlagtf
|
||
|
|
- dlagtm
|
||
|
|
- dlagts
|
||
|
|
- dlagv2
|
||
|
|
- dlahqr
|
||
|
|
- dlahr2
|
||
|
|
- dlaic1
|
||
|
|
- dlaln2
|
||
|
|
- dlals0
|
||
|
|
- dlalsa
|
||
|
|
- dlalsd
|
||
|
|
- dlamch
|
||
|
|
- dlamrg
|
||
|
|
- dlaneg
|
||
|
|
- dlangb
|
||
|
|
- dlange
|
||
|
|
- dlangt
|
||
|
|
- dlanhs
|
||
|
|
- dlansb
|
||
|
|
- dlansf
|
||
|
|
- dlansp
|
||
|
|
- dlanst
|
||
|
|
- dlansy
|
||
|
|
- dlantb
|
||
|
|
- dlantp
|
||
|
|
- dlantr
|
||
|
|
- dlanv2
|
||
|
|
- dlapll
|
||
|
|
- dlapmr
|
||
|
|
- dlapmt
|
||
|
|
- dlapy2
|
||
|
|
- dlapy3
|
||
|
|
- dlaqgb
|
||
|
|
- dlaqge
|
||
|
|
- dlaqp2
|
||
|
|
- dlaqps
|
||
|
|
- dlaqr0
|
||
|
|
- dlaqr1
|
||
|
|
- dlaqr2
|
||
|
|
- dlaqr3
|
||
|
|
- dlaqr4
|
||
|
|
- dlaqr5
|
||
|
|
- dlaqsb
|
||
|
|
- dlaqsp
|
||
|
|
- dlaqsy
|
||
|
|
- dlaqtr
|
||
|
|
- dlar1v
|
||
|
|
- dlar2v
|
||
|
|
- dlarf
|
||
|
|
- dlarfb
|
||
|
|
- dlarfg
|
||
|
|
- dlarfgp
|
||
|
|
- dlarft
|
||
|
|
- dlarfx
|
||
|
|
- dlargv
|
||
|
|
- dlarnv
|
||
|
|
- dlarra
|
||
|
|
- dlarrb
|
||
|
|
- dlarrc
|
||
|
|
- dlarrd
|
||
|
|
- dlarre
|
||
|
|
- dlarrf
|
||
|
|
- dlarrj
|
||
|
|
- dlarrk
|
||
|
|
- dlarrr
|
||
|
|
- dlarrv
|
||
|
|
- dlartg
|
||
|
|
- dlartgp
|
||
|
|
- dlartgs
|
||
|
|
- dlartv
|
||
|
|
- dlaruv
|
||
|
|
- dlarz
|
||
|
|
- dlarzb
|
||
|
|
- dlarzt
|
||
|
|
- dlas2
|
||
|
|
- dlascl
|
||
|
|
- dlasd0
|
||
|
|
- dlasd1
|
||
|
|
- dlasd2
|
||
|
|
- dlasd3
|
||
|
|
- dlasd4
|
||
|
|
- dlasd5
|
||
|
|
- dlasd6
|
||
|
|
- dlasd7
|
||
|
|
- dlasd8
|
||
|
|
- dlasda
|
||
|
|
- dlasdq
|
||
|
|
- dlasdt
|
||
|
|
- dlaset
|
||
|
|
- dlasq1
|
||
|
|
- dlasq2
|
||
|
|
- dlasq3
|
||
|
|
- dlasq4
|
||
|
|
- dlasq6
|
||
|
|
- dlasr
|
||
|
|
- dlasrt
|
||
|
|
- dlassq
|
||
|
|
- dlasv2
|
||
|
|
- dlaswp
|
||
|
|
- dlasy2
|
||
|
|
- dlasyf
|
||
|
|
- dlat2s
|
||
|
|
- dlatbs
|
||
|
|
- dlatdf
|
||
|
|
- dlatps
|
||
|
|
- dlatrd
|
||
|
|
- dlatrs
|
||
|
|
- dlatrz
|
||
|
|
- dlauu2
|
||
|
|
- dlauum
|
||
|
|
- dopgtr
|
||
|
|
- dopmtr
|
||
|
|
- dorbdb
|
||
|
|
- dorcsd
|
||
|
|
- dorg2l
|
||
|
|
- dorg2r
|
||
|
|
- dorgbr
|
||
|
|
- dorghr
|
||
|
|
- dorgl2
|
||
|
|
- dorglq
|
||
|
|
- dorgql
|
||
|
|
- dorgqr
|
||
|
|
- dorgr2
|
||
|
|
- dorgrq
|
||
|
|
- dorgtr
|
||
|
|
- dorm2l
|
||
|
|
- dorm2r
|
||
|
|
- dormbr
|
||
|
|
- dormhr
|
||
|
|
- dorml2
|
||
|
|
- dormlq
|
||
|
|
- dormql
|
||
|
|
- dormqr
|
||
|
|
- dormr2
|
||
|
|
- dormr3
|
||
|
|
- dormrq
|
||
|
|
- dormrz
|
||
|
|
- dormtr
|
||
|
|
- dpbcon
|
||
|
|
- dpbequ
|
||
|
|
- dpbrfs
|
||
|
|
- dpbstf
|
||
|
|
- dpbsv
|
||
|
|
- dpbsvx
|
||
|
|
- dpbtf2
|
||
|
|
- dpbtrf
|
||
|
|
- dpbtrs
|
||
|
|
- dpftrf
|
||
|
|
- dpftri
|
||
|
|
- dpftrs
|
||
|
|
- dpocon
|
||
|
|
- dpoequ
|
||
|
|
- dpoequb
|
||
|
|
- dporfs
|
||
|
|
- dposv
|
||
|
|
- dposvx
|
||
|
|
- dpotf2
|
||
|
|
- dpotrf
|
||
|
|
- dpotri
|
||
|
|
- dpotrs
|
||
|
|
- dppcon
|
||
|
|
- dppequ
|
||
|
|
- dpprfs
|
||
|
|
- dppsv
|
||
|
|
- dppsvx
|
||
|
|
- dpptrf
|
||
|
|
- dpptri
|
||
|
|
- dpptrs
|
||
|
|
- dpstf2
|
||
|
|
- dpstrf
|
||
|
|
- dptcon
|
||
|
|
- dpteqr
|
||
|
|
- dptrfs
|
||
|
|
- dptsv
|
||
|
|
- dptsvx
|
||
|
|
- dpttrf
|
||
|
|
- dpttrs
|
||
|
|
- dptts2
|
||
|
|
- drscl
|
||
|
|
- dsbev
|
||
|
|
- dsbevd
|
||
|
|
- dsbevx
|
||
|
|
- dsbgst
|
||
|
|
- dsbgv
|
||
|
|
- dsbgvd
|
||
|
|
- dsbgvx
|
||
|
|
- dsbtrd
|
||
|
|
- dsfrk
|
||
|
|
- dsgesv
|
||
|
|
- dspcon
|
||
|
|
- dspev
|
||
|
|
- dspevd
|
||
|
|
- dspevx
|
||
|
|
- dspgst
|
||
|
|
- dspgv
|
||
|
|
- dspgvd
|
||
|
|
- dspgvx
|
||
|
|
- dsposv
|
||
|
|
- dsprfs
|
||
|
|
- dspsv
|
||
|
|
- dspsvx
|
||
|
|
- dsptrd
|
||
|
|
- dsptrf
|
||
|
|
- dsptri
|
||
|
|
- dsptrs
|
||
|
|
- dstebz
|
||
|
|
- dstedc
|
||
|
|
- dstegr
|
||
|
|
- dstein
|
||
|
|
- dstemr
|
||
|
|
- dsteqr
|
||
|
|
- dsterf
|
||
|
|
- dstev
|
||
|
|
- dstevd
|
||
|
|
- dstevr
|
||
|
|
- dstevx
|
||
|
|
- dsycon
|
||
|
|
- dsyconv
|
||
|
|
- dsyequb
|
||
|
|
- dsyev
|
||
|
|
- dsyevd
|
||
|
|
- dsyevr
|
||
|
|
- dsyevx
|
||
|
|
- dsygs2
|
||
|
|
- dsygst
|
||
|
|
- dsygv
|
||
|
|
- dsygvd
|
||
|
|
- dsygvx
|
||
|
|
- dsyrfs
|
||
|
|
- dsysv
|
||
|
|
- dsysvx
|
||
|
|
- dsyswapr
|
||
|
|
- dsytd2
|
||
|
|
- dsytf2
|
||
|
|
- dsytrd
|
||
|
|
- dsytrf
|
||
|
|
- dsytri
|
||
|
|
- dsytri2
|
||
|
|
- dsytri2x
|
||
|
|
- dsytrs
|
||
|
|
- dsytrs2
|
||
|
|
- dtbcon
|
||
|
|
- dtbrfs
|
||
|
|
- dtbtrs
|
||
|
|
- dtfsm
|
||
|
|
- dtftri
|
||
|
|
- dtfttp
|
||
|
|
- dtfttr
|
||
|
|
- dtgevc
|
||
|
|
- dtgex2
|
||
|
|
- dtgexc
|
||
|
|
- dtgsen
|
||
|
|
- dtgsja
|
||
|
|
- dtgsna
|
||
|
|
- dtgsy2
|
||
|
|
- dtgsyl
|
||
|
|
- dtpcon
|
||
|
|
- dtpmqrt
|
||
|
|
- dtpqrt
|
||
|
|
- dtpqrt2
|
||
|
|
- dtprfb
|
||
|
|
- dtprfs
|
||
|
|
- dtptri
|
||
|
|
- dtptrs
|
||
|
|
- dtpttf
|
||
|
|
- dtpttr
|
||
|
|
- dtrcon
|
||
|
|
- dtrevc
|
||
|
|
- dtrexc
|
||
|
|
- dtrrfs
|
||
|
|
- dtrsen
|
||
|
|
- dtrsna
|
||
|
|
- dtrsyl
|
||
|
|
- dtrti2
|
||
|
|
- dtrtri
|
||
|
|
- dtrtrs
|
||
|
|
- dtrttf
|
||
|
|
- dtrttp
|
||
|
|
- dtzrzf
|
||
|
|
- dzsum1
|
||
|
|
- icmax1
|
||
|
|
- ieeeck
|
||
|
|
- ilaclc
|
||
|
|
- ilaclr
|
||
|
|
- iladiag
|
||
|
|
- iladlc
|
||
|
|
- iladlr
|
||
|
|
- ilaprec
|
||
|
|
- ilaslc
|
||
|
|
- ilaslr
|
||
|
|
- ilatrans
|
||
|
|
- ilauplo
|
||
|
|
- ilaver
|
||
|
|
- ilazlc
|
||
|
|
- ilazlr
|
||
|
|
- izmax1
|
||
|
|
- sbbcsd
|
||
|
|
- sbdsdc
|
||
|
|
- sbdsqr
|
||
|
|
- scsum1
|
||
|
|
- sdisna
|
||
|
|
- sgbbrd
|
||
|
|
- sgbcon
|
||
|
|
- sgbequ
|
||
|
|
- sgbequb
|
||
|
|
- sgbrfs
|
||
|
|
- sgbsv
|
||
|
|
- sgbsvx
|
||
|
|
- sgbtf2
|
||
|
|
- sgbtrf
|
||
|
|
- sgbtrs
|
||
|
|
- sgebak
|
||
|
|
- sgebal
|
||
|
|
- sgebd2
|
||
|
|
- sgebrd
|
||
|
|
- sgecon
|
||
|
|
- sgeequ
|
||
|
|
- sgeequb
|
||
|
|
- sgees
|
||
|
|
- sgeesx
|
||
|
|
- sgeev
|
||
|
|
- sgeevx
|
||
|
|
- sgehd2
|
||
|
|
- sgehrd
|
||
|
|
- sgejsv
|
||
|
|
- sgelq2
|
||
|
|
- sgelqf
|
||
|
|
- sgels
|
||
|
|
- sgelsd
|
||
|
|
- sgelss
|
||
|
|
- sgelsy
|
||
|
|
- sgemqrt
|
||
|
|
- sgeql2
|
||
|
|
- sgeqlf
|
||
|
|
- sgeqp3
|
||
|
|
- sgeqr2
|
||
|
|
- sgeqr2p
|
||
|
|
- sgeqrf
|
||
|
|
- sgeqrfp
|
||
|
|
- sgeqrt
|
||
|
|
- sgeqrt2
|
||
|
|
- sgeqrt3
|
||
|
|
- sgerfs
|
||
|
|
- sgerq2
|
||
|
|
- sgerqf
|
||
|
|
- sgesc2
|
||
|
|
- sgesdd
|
||
|
|
- sgesv
|
||
|
|
- sgesvd
|
||
|
|
- sgesvj
|
||
|
|
- sgesvx
|
||
|
|
- sgetc2
|
||
|
|
- sgetf2
|
||
|
|
- sgetrf
|
||
|
|
- sgetri
|
||
|
|
- sgetrs
|
||
|
|
- sggbak
|
||
|
|
- sggbal
|
||
|
|
- sgges
|
||
|
|
- sggesx
|
||
|
|
- sggev
|
||
|
|
- sggevx
|
||
|
|
- sggglm
|
||
|
|
- sgghrd
|
||
|
|
- sgglse
|
||
|
|
- sggqrf
|
||
|
|
- sggrqf
|
||
|
|
- sgsvj0
|
||
|
|
- sgsvj1
|
||
|
|
- sgtcon
|
||
|
|
- sgtrfs
|
||
|
|
- sgtsv
|
||
|
|
- sgtsvx
|
||
|
|
- sgttrf
|
||
|
|
- sgttrs
|
||
|
|
- sgtts2
|
||
|
|
- shgeqz
|
||
|
|
- shsein
|
||
|
|
- shseqr
|
||
|
|
- slabad
|
||
|
|
- slabrd
|
||
|
|
- slacn2
|
||
|
|
- slacon
|
||
|
|
- slacpy
|
||
|
|
- sladiv
|
||
|
|
- slae2
|
||
|
|
- slaebz
|
||
|
|
- slaed0
|
||
|
|
- slaed1
|
||
|
|
- slaed2
|
||
|
|
- slaed3
|
||
|
|
- slaed4
|
||
|
|
- slaed5
|
||
|
|
- slaed6
|
||
|
|
- slaed7
|
||
|
|
- slaed8
|
||
|
|
- slaed9
|
||
|
|
- slaeda
|
||
|
|
- slaein
|
||
|
|
- slaev2
|
||
|
|
- slaexc
|
||
|
|
- slag2
|
||
|
|
- slag2d
|
||
|
|
- slags2
|
||
|
|
- slagtf
|
||
|
|
- slagtm
|
||
|
|
- slagts
|
||
|
|
- slagv2
|
||
|
|
- slahqr
|
||
|
|
- slahr2
|
||
|
|
- slaic1
|
||
|
|
- slaln2
|
||
|
|
- slals0
|
||
|
|
- slalsa
|
||
|
|
- slalsd
|
||
|
|
- slamch
|
||
|
|
- slamrg
|
||
|
|
- slangb
|
||
|
|
- slange
|
||
|
|
- slangt
|
||
|
|
- slanhs
|
||
|
|
- slansb
|
||
|
|
- slansf
|
||
|
|
- slansp
|
||
|
|
- slanst
|
||
|
|
- slansy
|
||
|
|
- slantb
|
||
|
|
- slantp
|
||
|
|
- slantr
|
||
|
|
- slanv2
|
||
|
|
- slapll
|
||
|
|
- slapmr
|
||
|
|
- slapmt
|
||
|
|
- slapy2
|
||
|
|
- slapy3
|
||
|
|
- slaqgb
|
||
|
|
- slaqge
|
||
|
|
- slaqp2
|
||
|
|
- slaqps
|
||
|
|
- slaqr0
|
||
|
|
- slaqr1
|
||
|
|
- slaqr2
|
||
|
|
- slaqr3
|
||
|
|
- slaqr4
|
||
|
|
- slaqr5
|
||
|
|
- slaqsb
|
||
|
|
- slaqsp
|
||
|
|
- slaqsy
|
||
|
|
- slaqtr
|
||
|
|
- slar1v
|
||
|
|
- slar2v
|
||
|
|
- slarf
|
||
|
|
- slarfb
|
||
|
|
- slarfg
|
||
|
|
- slarfgp
|
||
|
|
- slarft
|
||
|
|
- slarfx
|
||
|
|
- slargv
|
||
|
|
- slarnv
|
||
|
|
- slarra
|
||
|
|
- slarrb
|
||
|
|
- slarrc
|
||
|
|
- slarrd
|
||
|
|
- slarre
|
||
|
|
- slarrf
|
||
|
|
- slarrj
|
||
|
|
- slarrk
|
||
|
|
- slarrr
|
||
|
|
- slarrv
|
||
|
|
- slartg
|
||
|
|
- slartgp
|
||
|
|
- slartgs
|
||
|
|
- slartv
|
||
|
|
- slaruv
|
||
|
|
- slarz
|
||
|
|
- slarzb
|
||
|
|
- slarzt
|
||
|
|
- slas2
|
||
|
|
- slascl
|
||
|
|
- slasd0
|
||
|
|
- slasd1
|
||
|
|
- slasd2
|
||
|
|
- slasd3
|
||
|
|
- slasd4
|
||
|
|
- slasd5
|
||
|
|
- slasd6
|
||
|
|
- slasd7
|
||
|
|
- slasd8
|
||
|
|
- slasda
|
||
|
|
- slasdq
|
||
|
|
- slasdt
|
||
|
|
- slaset
|
||
|
|
- slasq1
|
||
|
|
- slasq2
|
||
|
|
- slasq3
|
||
|
|
- slasq4
|
||
|
|
- slasq6
|
||
|
|
- slasr
|
||
|
|
- slasrt
|
||
|
|
- slassq
|
||
|
|
- slasv2
|
||
|
|
- slaswp
|
||
|
|
- slasy2
|
||
|
|
- slasyf
|
||
|
|
- slatbs
|
||
|
|
- slatdf
|
||
|
|
- slatps
|
||
|
|
- slatrd
|
||
|
|
- slatrs
|
||
|
|
- slatrz
|
||
|
|
- slauu2
|
||
|
|
- slauum
|
||
|
|
- sopgtr
|
||
|
|
- sopmtr
|
||
|
|
- sorbdb
|
||
|
|
- sorcsd
|
||
|
|
- sorg2l
|
||
|
|
- sorg2r
|
||
|
|
- sorgbr
|
||
|
|
- sorghr
|
||
|
|
- sorgl2
|
||
|
|
- sorglq
|
||
|
|
- sorgql
|
||
|
|
- sorgqr
|
||
|
|
- sorgr2
|
||
|
|
- sorgrq
|
||
|
|
- sorgtr
|
||
|
|
- sorm2l
|
||
|
|
- sorm2r
|
||
|
|
- sormbr
|
||
|
|
- sormhr
|
||
|
|
- sorml2
|
||
|
|
- sormlq
|
||
|
|
- sormql
|
||
|
|
- sormqr
|
||
|
|
- sormr2
|
||
|
|
- sormr3
|
||
|
|
- sormrq
|
||
|
|
- sormrz
|
||
|
|
- sormtr
|
||
|
|
- spbcon
|
||
|
|
- spbequ
|
||
|
|
- spbrfs
|
||
|
|
- spbstf
|
||
|
|
- spbsv
|
||
|
|
- spbsvx
|
||
|
|
- spbtf2
|
||
|
|
- spbtrf
|
||
|
|
- spbtrs
|
||
|
|
- spftrf
|
||
|
|
- spftri
|
||
|
|
- spftrs
|
||
|
|
- spocon
|
||
|
|
- spoequ
|
||
|
|
- spoequb
|
||
|
|
- sporfs
|
||
|
|
- sposv
|
||
|
|
- sposvx
|
||
|
|
- spotf2
|
||
|
|
- spotrf
|
||
|
|
- spotri
|
||
|
|
- spotrs
|
||
|
|
- sppcon
|
||
|
|
- sppequ
|
||
|
|
- spprfs
|
||
|
|
- sppsv
|
||
|
|
- sppsvx
|
||
|
|
- spptrf
|
||
|
|
- spptri
|
||
|
|
- spptrs
|
||
|
|
- spstf2
|
||
|
|
- spstrf
|
||
|
|
- sptcon
|
||
|
|
- spteqr
|
||
|
|
- sptrfs
|
||
|
|
- sptsv
|
||
|
|
- sptsvx
|
||
|
|
- spttrf
|
||
|
|
- spttrs
|
||
|
|
- sptts2
|
||
|
|
- srscl
|
||
|
|
- ssbev
|
||
|
|
- ssbevd
|
||
|
|
- ssbevx
|
||
|
|
- ssbgst
|
||
|
|
- ssbgv
|
||
|
|
- ssbgvd
|
||
|
|
- ssbgvx
|
||
|
|
- ssbtrd
|
||
|
|
- ssfrk
|
||
|
|
- sspcon
|
||
|
|
- sspev
|
||
|
|
- sspevd
|
||
|
|
- sspevx
|
||
|
|
- sspgst
|
||
|
|
- sspgv
|
||
|
|
- sspgvd
|
||
|
|
- sspgvx
|
||
|
|
- ssprfs
|
||
|
|
- sspsv
|
||
|
|
- sspsvx
|
||
|
|
- ssptrd
|
||
|
|
- ssptrf
|
||
|
|
- ssptri
|
||
|
|
- ssptrs
|
||
|
|
- sstebz
|
||
|
|
- sstedc
|
||
|
|
- sstegr
|
||
|
|
- sstein
|
||
|
|
- sstemr
|
||
|
|
- ssteqr
|
||
|
|
- ssterf
|
||
|
|
- sstev
|
||
|
|
- sstevd
|
||
|
|
- sstevr
|
||
|
|
- sstevx
|
||
|
|
- ssycon
|
||
|
|
- ssyconv
|
||
|
|
- ssyequb
|
||
|
|
- ssyev
|
||
|
|
- ssyevd
|
||
|
|
- ssyevr
|
||
|
|
- ssyevx
|
||
|
|
- ssygs2
|
||
|
|
- ssygst
|
||
|
|
- ssygv
|
||
|
|
- ssygvd
|
||
|
|
- ssygvx
|
||
|
|
- ssyrfs
|
||
|
|
- ssysv
|
||
|
|
- ssysvx
|
||
|
|
- ssyswapr
|
||
|
|
- ssytd2
|
||
|
|
- ssytf2
|
||
|
|
- ssytrd
|
||
|
|
- ssytrf
|
||
|
|
- ssytri
|
||
|
|
- ssytri2
|
||
|
|
- ssytri2x
|
||
|
|
- ssytrs
|
||
|
|
- ssytrs2
|
||
|
|
- stbcon
|
||
|
|
- stbrfs
|
||
|
|
- stbtrs
|
||
|
|
- stfsm
|
||
|
|
- stftri
|
||
|
|
- stfttp
|
||
|
|
- stfttr
|
||
|
|
- stgevc
|
||
|
|
- stgex2
|
||
|
|
- stgexc
|
||
|
|
- stgsen
|
||
|
|
- stgsja
|
||
|
|
- stgsna
|
||
|
|
- stgsy2
|
||
|
|
- stgsyl
|
||
|
|
- stpcon
|
||
|
|
- stpmqrt
|
||
|
|
- stpqrt
|
||
|
|
- stpqrt2
|
||
|
|
- stprfb
|
||
|
|
- stprfs
|
||
|
|
- stptri
|
||
|
|
- stptrs
|
||
|
|
- stpttf
|
||
|
|
- stpttr
|
||
|
|
- strcon
|
||
|
|
- strevc
|
||
|
|
- strexc
|
||
|
|
- strrfs
|
||
|
|
- strsen
|
||
|
|
- strsna
|
||
|
|
- strsyl
|
||
|
|
- strti2
|
||
|
|
- strtri
|
||
|
|
- strtrs
|
||
|
|
- strttf
|
||
|
|
- strttp
|
||
|
|
- stzrzf
|
||
|
|
- xerbla_array
|
||
|
|
- zbbcsd
|
||
|
|
- zbdsqr
|
||
|
|
- zcgesv
|
||
|
|
- zcposv
|
||
|
|
- zdrscl
|
||
|
|
- zgbbrd
|
||
|
|
- zgbcon
|
||
|
|
- zgbequ
|
||
|
|
- zgbequb
|
||
|
|
- zgbrfs
|
||
|
|
- zgbsv
|
||
|
|
- zgbsvx
|
||
|
|
- zgbtf2
|
||
|
|
- zgbtrf
|
||
|
|
- zgbtrs
|
||
|
|
- zgebak
|
||
|
|
- zgebal
|
||
|
|
- zgebd2
|
||
|
|
- zgebrd
|
||
|
|
- zgecon
|
||
|
|
- zgeequ
|
||
|
|
- zgeequb
|
||
|
|
- zgees
|
||
|
|
- zgeesx
|
||
|
|
- zgeev
|
||
|
|
- zgeevx
|
||
|
|
- zgehd2
|
||
|
|
- zgehrd
|
||
|
|
- zgelq2
|
||
|
|
- zgelqf
|
||
|
|
- zgels
|
||
|
|
- zgelsd
|
||
|
|
- zgelss
|
||
|
|
- zgelsy
|
||
|
|
- zgemqrt
|
||
|
|
- zgeql2
|
||
|
|
- zgeqlf
|
||
|
|
- zgeqp3
|
||
|
|
- zgeqr2
|
||
|
|
- zgeqr2p
|
||
|
|
- zgeqrf
|
||
|
|
- zgeqrfp
|
||
|
|
- zgeqrt
|
||
|
|
- zgeqrt2
|
||
|
|
- zgeqrt3
|
||
|
|
- zgerfs
|
||
|
|
- zgerq2
|
||
|
|
- zgerqf
|
||
|
|
- zgesc2
|
||
|
|
- zgesdd
|
||
|
|
- zgesv
|
||
|
|
- zgesvd
|
||
|
|
- zgesvx
|
||
|
|
- zgetc2
|
||
|
|
- zgetf2
|
||
|
|
- zgetrf
|
||
|
|
- zgetri
|
||
|
|
- zgetrs
|
||
|
|
- zggbak
|
||
|
|
- zggbal
|
||
|
|
- zgges
|
||
|
|
- zggesx
|
||
|
|
- zggev
|
||
|
|
- zggevx
|
||
|
|
- zggglm
|
||
|
|
- zgghrd
|
||
|
|
- zgglse
|
||
|
|
- zggqrf
|
||
|
|
- zggrqf
|
||
|
|
- zgtcon
|
||
|
|
- zgtrfs
|
||
|
|
- zgtsv
|
||
|
|
- zgtsvx
|
||
|
|
- zgttrf
|
||
|
|
- zgttrs
|
||
|
|
- zgtts2
|
||
|
|
- zhbev
|
||
|
|
- zhbevd
|
||
|
|
- zhbevx
|
||
|
|
- zhbgst
|
||
|
|
- zhbgv
|
||
|
|
- zhbgvd
|
||
|
|
- zhbgvx
|
||
|
|
- zhbtrd
|
||
|
|
- zhecon
|
||
|
|
- zheequb
|
||
|
|
- zheev
|
||
|
|
- zheevd
|
||
|
|
- zheevr
|
||
|
|
- zheevx
|
||
|
|
- zhegs2
|
||
|
|
- zhegst
|
||
|
|
- zhegv
|
||
|
|
- zhegvd
|
||
|
|
- zhegvx
|
||
|
|
- zherfs
|
||
|
|
- zhesv
|
||
|
|
- zhesvx
|
||
|
|
- zheswapr
|
||
|
|
- zhetd2
|
||
|
|
- zhetf2
|
||
|
|
- zhetrd
|
||
|
|
- zhetrf
|
||
|
|
- zhetri
|
||
|
|
- zhetri2
|
||
|
|
- zhetri2x
|
||
|
|
- zhetrs
|
||
|
|
- zhetrs2
|
||
|
|
- zhfrk
|
||
|
|
- zhgeqz
|
||
|
|
- zhpcon
|
||
|
|
- zhpev
|
||
|
|
- zhpevd
|
||
|
|
- zhpevx
|
||
|
|
- zhpgst
|
||
|
|
- zhpgv
|
||
|
|
- zhpgvd
|
||
|
|
- zhpgvx
|
||
|
|
- zhprfs
|
||
|
|
- zhpsv
|
||
|
|
- zhpsvx
|
||
|
|
- zhptrd
|
||
|
|
- zhptrf
|
||
|
|
- zhptri
|
||
|
|
- zhptrs
|
||
|
|
- zhsein
|
||
|
|
- zhseqr
|
||
|
|
- zlabrd
|
||
|
|
- zlacgv
|
||
|
|
- zlacn2
|
||
|
|
- zlacon
|
||
|
|
- zlacp2
|
||
|
|
- zlacpy
|
||
|
|
- zlacrm
|
||
|
|
- zlacrt
|
||
|
|
- zladiv
|
||
|
|
- zlaed0
|
||
|
|
- zlaed7
|
||
|
|
- zlaed8
|
||
|
|
- zlaein
|
||
|
|
- zlaesy
|
||
|
|
- zlaev2
|
||
|
|
- zlag2c
|
||
|
|
- zlags2
|
||
|
|
- zlagtm
|
||
|
|
- zlahef
|
||
|
|
- zlahqr
|
||
|
|
- zlahr2
|
||
|
|
- zlaic1
|
||
|
|
- zlals0
|
||
|
|
- zlalsa
|
||
|
|
- zlalsd
|
||
|
|
- zlangb
|
||
|
|
- zlange
|
||
|
|
- zlangt
|
||
|
|
- zlanhb
|
||
|
|
- zlanhe
|
||
|
|
- zlanhf
|
||
|
|
- zlanhp
|
||
|
|
- zlanhs
|
||
|
|
- zlanht
|
||
|
|
- zlansb
|
||
|
|
- zlansp
|
||
|
|
- zlansy
|
||
|
|
- zlantb
|
||
|
|
- zlantp
|
||
|
|
- zlantr
|
||
|
|
- zlapll
|
||
|
|
- zlapmr
|
||
|
|
- zlapmt
|
||
|
|
- zlaqgb
|
||
|
|
- zlaqge
|
||
|
|
- zlaqhb
|
||
|
|
- zlaqhe
|
||
|
|
- zlaqhp
|
||
|
|
- zlaqp2
|
||
|
|
- zlaqps
|
||
|
|
- zlaqr0
|
||
|
|
- zlaqr1
|
||
|
|
- zlaqr2
|
||
|
|
- zlaqr3
|
||
|
|
- zlaqr4
|
||
|
|
- zlaqr5
|
||
|
|
- zlaqsb
|
||
|
|
- zlaqsp
|
||
|
|
- zlaqsy
|
||
|
|
- zlar1v
|
||
|
|
- zlar2v
|
||
|
|
- zlarcm
|
||
|
|
- zlarf
|
||
|
|
- zlarfb
|
||
|
|
- zlarfg
|
||
|
|
- zlarfgp
|
||
|
|
- zlarft
|
||
|
|
- zlarfx
|
||
|
|
- zlargv
|
||
|
|
- zlarnv
|
||
|
|
- zlarrv
|
||
|
|
- zlartg
|
||
|
|
- zlartv
|
||
|
|
- zlarz
|
||
|
|
- zlarzb
|
||
|
|
- zlarzt
|
||
|
|
- zlascl
|
||
|
|
- zlaset
|
||
|
|
- zlasr
|
||
|
|
- zlassq
|
||
|
|
- zlaswp
|
||
|
|
- zlasyf
|
||
|
|
- zlat2c
|
||
|
|
- zlatbs
|
||
|
|
- zlatdf
|
||
|
|
- zlatps
|
||
|
|
- zlatrd
|
||
|
|
- zlatrs
|
||
|
|
- zlatrz
|
||
|
|
- zlauu2
|
||
|
|
- zlauum
|
||
|
|
- zpbcon
|
||
|
|
- zpbequ
|
||
|
|
- zpbrfs
|
||
|
|
- zpbstf
|
||
|
|
- zpbsv
|
||
|
|
- zpbsvx
|
||
|
|
- zpbtf2
|
||
|
|
- zpbtrf
|
||
|
|
- zpbtrs
|
||
|
|
- zpftrf
|
||
|
|
- zpftri
|
||
|
|
- zpftrs
|
||
|
|
- zpocon
|
||
|
|
- zpoequ
|
||
|
|
- zpoequb
|
||
|
|
- zporfs
|
||
|
|
- zposv
|
||
|
|
- zposvx
|
||
|
|
- zpotf2
|
||
|
|
- zpotrf
|
||
|
|
- zpotri
|
||
|
|
- zpotrs
|
||
|
|
- zppcon
|
||
|
|
- zppequ
|
||
|
|
- zpprfs
|
||
|
|
- zppsv
|
||
|
|
- zppsvx
|
||
|
|
- zpptrf
|
||
|
|
- zpptri
|
||
|
|
- zpptrs
|
||
|
|
- zpstf2
|
||
|
|
- zpstrf
|
||
|
|
- zptcon
|
||
|
|
- zpteqr
|
||
|
|
- zptrfs
|
||
|
|
- zptsv
|
||
|
|
- zptsvx
|
||
|
|
- zpttrf
|
||
|
|
- zpttrs
|
||
|
|
- zptts2
|
||
|
|
- zrot
|
||
|
|
- zspcon
|
||
|
|
- zspmv
|
||
|
|
- zspr
|
||
|
|
- zsprfs
|
||
|
|
- zspsv
|
||
|
|
- zspsvx
|
||
|
|
- zsptrf
|
||
|
|
- zsptri
|
||
|
|
- zsptrs
|
||
|
|
- zstedc
|
||
|
|
- zstegr
|
||
|
|
- zstein
|
||
|
|
- zstemr
|
||
|
|
- zsteqr
|
||
|
|
- zsycon
|
||
|
|
- zsyconv
|
||
|
|
- zsyequb
|
||
|
|
- zsymv
|
||
|
|
- zsyr
|
||
|
|
- zsyrfs
|
||
|
|
- zsysv
|
||
|
|
- zsysvx
|
||
|
|
- zsyswapr
|
||
|
|
- zsytf2
|
||
|
|
- zsytrf
|
||
|
|
- zsytri
|
||
|
|
- zsytri2
|
||
|
|
- zsytri2x
|
||
|
|
- zsytrs
|
||
|
|
- zsytrs2
|
||
|
|
- ztbcon
|
||
|
|
- ztbrfs
|
||
|
|
- ztbtrs
|
||
|
|
- ztfsm
|
||
|
|
- ztftri
|
||
|
|
- ztfttp
|
||
|
|
- ztfttr
|
||
|
|
- ztgevc
|
||
|
|
- ztgex2
|
||
|
|
- ztgexc
|
||
|
|
- ztgsen
|
||
|
|
- ztgsja
|
||
|
|
- ztgsna
|
||
|
|
- ztgsy2
|
||
|
|
- ztgsyl
|
||
|
|
- ztpcon
|
||
|
|
- ztpmqrt
|
||
|
|
- ztpqrt
|
||
|
|
- ztpqrt2
|
||
|
|
- ztprfb
|
||
|
|
- ztprfs
|
||
|
|
- ztptri
|
||
|
|
- ztptrs
|
||
|
|
- ztpttf
|
||
|
|
- ztpttr
|
||
|
|
- ztrcon
|
||
|
|
- ztrevc
|
||
|
|
- ztrexc
|
||
|
|
- ztrrfs
|
||
|
|
- ztrsen
|
||
|
|
- ztrsna
|
||
|
|
- ztrsyl
|
||
|
|
- ztrti2
|
||
|
|
- ztrtri
|
||
|
|
- ztrtrs
|
||
|
|
- ztrttf
|
||
|
|
- ztrttp
|
||
|
|
- ztzrzf
|
||
|
|
- zunbdb
|
||
|
|
- zuncsd
|
||
|
|
- zung2l
|
||
|
|
- zung2r
|
||
|
|
- zungbr
|
||
|
|
- zunghr
|
||
|
|
- zungl2
|
||
|
|
- zunglq
|
||
|
|
- zungql
|
||
|
|
- zungqr
|
||
|
|
- zungr2
|
||
|
|
- zungrq
|
||
|
|
- zungtr
|
||
|
|
- zunm2l
|
||
|
|
- zunm2r
|
||
|
|
- zunmbr
|
||
|
|
- zunmhr
|
||
|
|
- zunml2
|
||
|
|
- zunmlq
|
||
|
|
- zunmql
|
||
|
|
- zunmqr
|
||
|
|
- zunmr2
|
||
|
|
- zunmr3
|
||
|
|
- zunmrq
|
||
|
|
- zunmrz
|
||
|
|
- zunmtr
|
||
|
|
- zupgtr
|
||
|
|
- zupmtr
|
||
|
|
|
||
|
|
|
||
|
|
"""
|
||
|
|
|
||
|
|
# Within SciPy, these wrappers can be used via relative or absolute cimport.
|
||
|
|
# Examples:
|
||
|
|
# from ..linalg cimport cython_lapack
|
||
|
|
# from scipy.linalg cimport cython_lapack
|
||
|
|
# cimport scipy.linalg.cython_lapack as cython_lapack
|
||
|
|
# cimport ..linalg.cython_lapack as cython_lapack
|
||
|
|
|
||
|
|
# Within SciPy, if LAPACK functions are needed in C/C++/Fortran,
|
||
|
|
# these wrappers should not be used.
|
||
|
|
# The original libraries should be linked directly.
|
||
|
|
|
||
|
|
cdef extern from "fortran_defs.h":
|
||
|
|
pass
|
||
|
|
|
||
|
|
from numpy cimport npy_complex64, npy_complex128
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
# Function pointer type declarations for
|
||
|
|
# gees and gges families of functions.
|
||
|
|
ctypedef bint _cselect1(npy_complex64*)
|
||
|
|
ctypedef bint _cselect2(npy_complex64*, npy_complex64*)
|
||
|
|
ctypedef bint _dselect2(d*, d*)
|
||
|
|
ctypedef bint _dselect3(d*, d*, d*)
|
||
|
|
ctypedef bint _sselect2(s*, s*)
|
||
|
|
ctypedef bint _sselect3(s*, s*, s*)
|
||
|
|
ctypedef bint _zselect1(npy_complex128*)
|
||
|
|
ctypedef bint _zselect2(npy_complex128*, npy_complex128*)
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chla_transtype "F_FUNC(chla_transtypewrp, CHLA_TRANSTYPEWRP)"(char *out, int *trans) nogil
|
||
|
|
cdef char chla_transtype(int *trans) nogil:
|
||
|
|
cdef char out
|
||
|
|
_fortran_chla_transtype(&out, trans)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cladiv "F_FUNC(cladivwrp, CLADIVWRP)"(c *out, npy_complex64 *x, npy_complex64 *y) nogil
|
||
|
|
cdef c cladiv(c *x, c *y) nogil:
|
||
|
|
cdef c out
|
||
|
|
_fortran_cladiv(&out, <npy_complex64*>x, <npy_complex64*>y)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clangb "F_FUNC(clangbwrp, CLANGBWRP)"(s *out, char *norm, int *n, int *kl, int *ku, npy_complex64 *ab, int *ldab, s *work) nogil
|
||
|
|
cdef s clangb(char *norm, int *n, int *kl, int *ku, c *ab, int *ldab, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clangb(&out, norm, n, kl, ku, <npy_complex64*>ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clange "F_FUNC(clangewrp, CLANGEWRP)"(s *out, char *norm, int *m, int *n, npy_complex64 *a, int *lda, s *work) nogil
|
||
|
|
cdef s clange(char *norm, int *m, int *n, c *a, int *lda, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clange(&out, norm, m, n, <npy_complex64*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clangt "F_FUNC(clangtwrp, CLANGTWRP)"(s *out, char *norm, int *n, npy_complex64 *dl, npy_complex64 *d, npy_complex64 *du) nogil
|
||
|
|
cdef s clangt(char *norm, int *n, c *dl, c *d, c *du) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clangt(&out, norm, n, <npy_complex64*>dl, <npy_complex64*>d, <npy_complex64*>du)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clanhb "F_FUNC(clanhbwrp, CLANHBWRP)"(s *out, char *norm, char *uplo, int *n, int *k, npy_complex64 *ab, int *ldab, s *work) nogil
|
||
|
|
cdef s clanhb(char *norm, char *uplo, int *n, int *k, c *ab, int *ldab, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clanhb(&out, norm, uplo, n, k, <npy_complex64*>ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clanhe "F_FUNC(clanhewrp, CLANHEWRP)"(s *out, char *norm, char *uplo, int *n, npy_complex64 *a, int *lda, s *work) nogil
|
||
|
|
cdef s clanhe(char *norm, char *uplo, int *n, c *a, int *lda, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clanhe(&out, norm, uplo, n, <npy_complex64*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clanhf "F_FUNC(clanhfwrp, CLANHFWRP)"(s *out, char *norm, char *transr, char *uplo, int *n, npy_complex64 *a, s *work) nogil
|
||
|
|
cdef s clanhf(char *norm, char *transr, char *uplo, int *n, c *a, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clanhf(&out, norm, transr, uplo, n, <npy_complex64*>a, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clanhp "F_FUNC(clanhpwrp, CLANHPWRP)"(s *out, char *norm, char *uplo, int *n, npy_complex64 *ap, s *work) nogil
|
||
|
|
cdef s clanhp(char *norm, char *uplo, int *n, c *ap, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clanhp(&out, norm, uplo, n, <npy_complex64*>ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clanhs "F_FUNC(clanhswrp, CLANHSWRP)"(s *out, char *norm, int *n, npy_complex64 *a, int *lda, s *work) nogil
|
||
|
|
cdef s clanhs(char *norm, int *n, c *a, int *lda, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clanhs(&out, norm, n, <npy_complex64*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clanht "F_FUNC(clanhtwrp, CLANHTWRP)"(s *out, char *norm, int *n, s *d, npy_complex64 *e) nogil
|
||
|
|
cdef s clanht(char *norm, int *n, s *d, c *e) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clanht(&out, norm, n, d, <npy_complex64*>e)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clansb "F_FUNC(clansbwrp, CLANSBWRP)"(s *out, char *norm, char *uplo, int *n, int *k, npy_complex64 *ab, int *ldab, s *work) nogil
|
||
|
|
cdef s clansb(char *norm, char *uplo, int *n, int *k, c *ab, int *ldab, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clansb(&out, norm, uplo, n, k, <npy_complex64*>ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clansp "F_FUNC(clanspwrp, CLANSPWRP)"(s *out, char *norm, char *uplo, int *n, npy_complex64 *ap, s *work) nogil
|
||
|
|
cdef s clansp(char *norm, char *uplo, int *n, c *ap, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clansp(&out, norm, uplo, n, <npy_complex64*>ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clansy "F_FUNC(clansywrp, CLANSYWRP)"(s *out, char *norm, char *uplo, int *n, npy_complex64 *a, int *lda, s *work) nogil
|
||
|
|
cdef s clansy(char *norm, char *uplo, int *n, c *a, int *lda, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clansy(&out, norm, uplo, n, <npy_complex64*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clantb "F_FUNC(clantbwrp, CLANTBWRP)"(s *out, char *norm, char *uplo, char *diag, int *n, int *k, npy_complex64 *ab, int *ldab, s *work) nogil
|
||
|
|
cdef s clantb(char *norm, char *uplo, char *diag, int *n, int *k, c *ab, int *ldab, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clantb(&out, norm, uplo, diag, n, k, <npy_complex64*>ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clantp "F_FUNC(clantpwrp, CLANTPWRP)"(s *out, char *norm, char *uplo, char *diag, int *n, npy_complex64 *ap, s *work) nogil
|
||
|
|
cdef s clantp(char *norm, char *uplo, char *diag, int *n, c *ap, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clantp(&out, norm, uplo, diag, n, <npy_complex64*>ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clantr "F_FUNC(clantrwrp, CLANTRWRP)"(s *out, char *norm, char *uplo, char *diag, int *m, int *n, npy_complex64 *a, int *lda, s *work) nogil
|
||
|
|
cdef s clantr(char *norm, char *uplo, char *diag, int *m, int *n, c *a, int *lda, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_clantr(&out, norm, uplo, diag, m, n, <npy_complex64*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_disnan "F_FUNC(disnanwrp, DISNANWRP)"(bint *out, d *din) nogil
|
||
|
|
cdef bint disnan(d *din) nogil:
|
||
|
|
cdef bint out
|
||
|
|
_fortran_disnan(&out, din)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlamch "F_FUNC(dlamchwrp, DLAMCHWRP)"(d *out, char *cmach) nogil
|
||
|
|
cdef d dlamch(char *cmach) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlamch(&out, cmach)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaneg "F_FUNC(dlanegwrp, DLANEGWRP)"(int *out, int *n, d *d, d *lld, d *sigma, d *pivmin, int *r) nogil
|
||
|
|
cdef int dlaneg(int *n, d *d, d *lld, d *sigma, d *pivmin, int *r) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_dlaneg(&out, n, d, lld, sigma, pivmin, r)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlangb "F_FUNC(dlangbwrp, DLANGBWRP)"(d *out, char *norm, int *n, int *kl, int *ku, d *ab, int *ldab, d *work) nogil
|
||
|
|
cdef d dlangb(char *norm, int *n, int *kl, int *ku, d *ab, int *ldab, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlangb(&out, norm, n, kl, ku, ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlange "F_FUNC(dlangewrp, DLANGEWRP)"(d *out, char *norm, int *m, int *n, d *a, int *lda, d *work) nogil
|
||
|
|
cdef d dlange(char *norm, int *m, int *n, d *a, int *lda, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlange(&out, norm, m, n, a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlangt "F_FUNC(dlangtwrp, DLANGTWRP)"(d *out, char *norm, int *n, d *dl, d *d_, d *du) nogil
|
||
|
|
cdef d dlangt(char *norm, int *n, d *dl, d *d_, d *du) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlangt(&out, norm, n, dl, d_, du)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlanhs "F_FUNC(dlanhswrp, DLANHSWRP)"(d *out, char *norm, int *n, d *a, int *lda, d *work) nogil
|
||
|
|
cdef d dlanhs(char *norm, int *n, d *a, int *lda, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlanhs(&out, norm, n, a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlansb "F_FUNC(dlansbwrp, DLANSBWRP)"(d *out, char *norm, char *uplo, int *n, int *k, d *ab, int *ldab, d *work) nogil
|
||
|
|
cdef d dlansb(char *norm, char *uplo, int *n, int *k, d *ab, int *ldab, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlansb(&out, norm, uplo, n, k, ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlansf "F_FUNC(dlansfwrp, DLANSFWRP)"(d *out, char *norm, char *transr, char *uplo, int *n, d *a, d *work) nogil
|
||
|
|
cdef d dlansf(char *norm, char *transr, char *uplo, int *n, d *a, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlansf(&out, norm, transr, uplo, n, a, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlansp "F_FUNC(dlanspwrp, DLANSPWRP)"(d *out, char *norm, char *uplo, int *n, d *ap, d *work) nogil
|
||
|
|
cdef d dlansp(char *norm, char *uplo, int *n, d *ap, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlansp(&out, norm, uplo, n, ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlanst "F_FUNC(dlanstwrp, DLANSTWRP)"(d *out, char *norm, int *n, d *d_, d *e) nogil
|
||
|
|
cdef d dlanst(char *norm, int *n, d *d_, d *e) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlanst(&out, norm, n, d_, e)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlansy "F_FUNC(dlansywrp, DLANSYWRP)"(d *out, char *norm, char *uplo, int *n, d *a, int *lda, d *work) nogil
|
||
|
|
cdef d dlansy(char *norm, char *uplo, int *n, d *a, int *lda, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlansy(&out, norm, uplo, n, a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlantb "F_FUNC(dlantbwrp, DLANTBWRP)"(d *out, char *norm, char *uplo, char *diag, int *n, int *k, d *ab, int *ldab, d *work) nogil
|
||
|
|
cdef d dlantb(char *norm, char *uplo, char *diag, int *n, int *k, d *ab, int *ldab, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlantb(&out, norm, uplo, diag, n, k, ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlantp "F_FUNC(dlantpwrp, DLANTPWRP)"(d *out, char *norm, char *uplo, char *diag, int *n, d *ap, d *work) nogil
|
||
|
|
cdef d dlantp(char *norm, char *uplo, char *diag, int *n, d *ap, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlantp(&out, norm, uplo, diag, n, ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlantr "F_FUNC(dlantrwrp, DLANTRWRP)"(d *out, char *norm, char *uplo, char *diag, int *m, int *n, d *a, int *lda, d *work) nogil
|
||
|
|
cdef d dlantr(char *norm, char *uplo, char *diag, int *m, int *n, d *a, int *lda, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlantr(&out, norm, uplo, diag, m, n, a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlapy2 "F_FUNC(dlapy2wrp, DLAPY2WRP)"(d *out, d *x, d *y) nogil
|
||
|
|
cdef d dlapy2(d *x, d *y) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlapy2(&out, x, y)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlapy3 "F_FUNC(dlapy3wrp, DLAPY3WRP)"(d *out, d *x, d *y, d *z) nogil
|
||
|
|
cdef d dlapy3(d *x, d *y, d *z) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dlapy3(&out, x, y, z)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dzsum1 "F_FUNC(dzsum1wrp, DZSUM1WRP)"(d *out, int *n, npy_complex128 *cx, int *incx) nogil
|
||
|
|
cdef d dzsum1(int *n, z *cx, int *incx) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_dzsum1(&out, n, <npy_complex128*>cx, incx)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_icmax1 "F_FUNC(icmax1wrp, ICMAX1WRP)"(int *out, int *n, npy_complex64 *cx, int *incx) nogil
|
||
|
|
cdef int icmax1(int *n, c *cx, int *incx) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_icmax1(&out, n, <npy_complex64*>cx, incx)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ieeeck "F_FUNC(ieeeckwrp, IEEECKWRP)"(int *out, int *ispec, s *zero, s *one) nogil
|
||
|
|
cdef int ieeeck(int *ispec, s *zero, s *one) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ieeeck(&out, ispec, zero, one)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilaclc "F_FUNC(ilaclcwrp, ILACLCWRP)"(int *out, int *m, int *n, npy_complex64 *a, int *lda) nogil
|
||
|
|
cdef int ilaclc(int *m, int *n, c *a, int *lda) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ilaclc(&out, m, n, <npy_complex64*>a, lda)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilaclr "F_FUNC(ilaclrwrp, ILACLRWRP)"(int *out, int *m, int *n, npy_complex64 *a, int *lda) nogil
|
||
|
|
cdef int ilaclr(int *m, int *n, c *a, int *lda) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ilaclr(&out, m, n, <npy_complex64*>a, lda)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_iladiag "F_FUNC(iladiagwrp, ILADIAGWRP)"(int *out, char *diag) nogil
|
||
|
|
cdef int iladiag(char *diag) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_iladiag(&out, diag)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_iladlc "F_FUNC(iladlcwrp, ILADLCWRP)"(int *out, int *m, int *n, d *a, int *lda) nogil
|
||
|
|
cdef int iladlc(int *m, int *n, d *a, int *lda) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_iladlc(&out, m, n, a, lda)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_iladlr "F_FUNC(iladlrwrp, ILADLRWRP)"(int *out, int *m, int *n, d *a, int *lda) nogil
|
||
|
|
cdef int iladlr(int *m, int *n, d *a, int *lda) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_iladlr(&out, m, n, a, lda)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilaprec "F_FUNC(ilaprecwrp, ILAPRECWRP)"(int *out, char *prec) nogil
|
||
|
|
cdef int ilaprec(char *prec) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ilaprec(&out, prec)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilaslc "F_FUNC(ilaslcwrp, ILASLCWRP)"(int *out, int *m, int *n, s *a, int *lda) nogil
|
||
|
|
cdef int ilaslc(int *m, int *n, s *a, int *lda) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ilaslc(&out, m, n, a, lda)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilaslr "F_FUNC(ilaslrwrp, ILASLRWRP)"(int *out, int *m, int *n, s *a, int *lda) nogil
|
||
|
|
cdef int ilaslr(int *m, int *n, s *a, int *lda) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ilaslr(&out, m, n, a, lda)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilatrans "F_FUNC(ilatranswrp, ILATRANSWRP)"(int *out, char *trans) nogil
|
||
|
|
cdef int ilatrans(char *trans) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ilatrans(&out, trans)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilauplo "F_FUNC(ilauplowrp, ILAUPLOWRP)"(int *out, char *uplo) nogil
|
||
|
|
cdef int ilauplo(char *uplo) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ilauplo(&out, uplo)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilazlc "F_FUNC(ilazlcwrp, ILAZLCWRP)"(int *out, int *m, int *n, npy_complex128 *a, int *lda) nogil
|
||
|
|
cdef int ilazlc(int *m, int *n, z *a, int *lda) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ilazlc(&out, m, n, <npy_complex128*>a, lda)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilazlr "F_FUNC(ilazlrwrp, ILAZLRWRP)"(int *out, int *m, int *n, npy_complex128 *a, int *lda) nogil
|
||
|
|
cdef int ilazlr(int *m, int *n, z *a, int *lda) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_ilazlr(&out, m, n, <npy_complex128*>a, lda)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_izmax1 "F_FUNC(izmax1wrp, IZMAX1WRP)"(int *out, int *n, npy_complex128 *cx, int *incx) nogil
|
||
|
|
cdef int izmax1(int *n, z *cx, int *incx) nogil:
|
||
|
|
cdef int out
|
||
|
|
_fortran_izmax1(&out, n, <npy_complex128*>cx, incx)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_scsum1 "F_FUNC(scsum1wrp, SCSUM1WRP)"(s *out, int *n, npy_complex64 *cx, int *incx) nogil
|
||
|
|
cdef s scsum1(int *n, c *cx, int *incx) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_scsum1(&out, n, <npy_complex64*>cx, incx)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slamch "F_FUNC(slamchwrp, SLAMCHWRP)"(s *out, char *cmach) nogil
|
||
|
|
cdef s slamch(char *cmach) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slamch(&out, cmach)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slangb "F_FUNC(slangbwrp, SLANGBWRP)"(s *out, char *norm, int *n, int *kl, int *ku, s *ab, int *ldab, s *work) nogil
|
||
|
|
cdef s slangb(char *norm, int *n, int *kl, int *ku, s *ab, int *ldab, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slangb(&out, norm, n, kl, ku, ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slange "F_FUNC(slangewrp, SLANGEWRP)"(s *out, char *norm, int *m, int *n, s *a, int *lda, s *work) nogil
|
||
|
|
cdef s slange(char *norm, int *m, int *n, s *a, int *lda, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slange(&out, norm, m, n, a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slangt "F_FUNC(slangtwrp, SLANGTWRP)"(s *out, char *norm, int *n, s *dl, s *d, s *du) nogil
|
||
|
|
cdef s slangt(char *norm, int *n, s *dl, s *d, s *du) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slangt(&out, norm, n, dl, d, du)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slanhs "F_FUNC(slanhswrp, SLANHSWRP)"(s *out, char *norm, int *n, s *a, int *lda, s *work) nogil
|
||
|
|
cdef s slanhs(char *norm, int *n, s *a, int *lda, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slanhs(&out, norm, n, a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slansb "F_FUNC(slansbwrp, SLANSBWRP)"(s *out, char *norm, char *uplo, int *n, int *k, s *ab, int *ldab, s *work) nogil
|
||
|
|
cdef s slansb(char *norm, char *uplo, int *n, int *k, s *ab, int *ldab, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slansb(&out, norm, uplo, n, k, ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slansf "F_FUNC(slansfwrp, SLANSFWRP)"(s *out, char *norm, char *transr, char *uplo, int *n, s *a, s *work) nogil
|
||
|
|
cdef s slansf(char *norm, char *transr, char *uplo, int *n, s *a, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slansf(&out, norm, transr, uplo, n, a, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slansp "F_FUNC(slanspwrp, SLANSPWRP)"(s *out, char *norm, char *uplo, int *n, s *ap, s *work) nogil
|
||
|
|
cdef s slansp(char *norm, char *uplo, int *n, s *ap, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slansp(&out, norm, uplo, n, ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slanst "F_FUNC(slanstwrp, SLANSTWRP)"(s *out, char *norm, int *n, s *d, s *e) nogil
|
||
|
|
cdef s slanst(char *norm, int *n, s *d, s *e) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slanst(&out, norm, n, d, e)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slansy "F_FUNC(slansywrp, SLANSYWRP)"(s *out, char *norm, char *uplo, int *n, s *a, int *lda, s *work) nogil
|
||
|
|
cdef s slansy(char *norm, char *uplo, int *n, s *a, int *lda, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slansy(&out, norm, uplo, n, a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slantb "F_FUNC(slantbwrp, SLANTBWRP)"(s *out, char *norm, char *uplo, char *diag, int *n, int *k, s *ab, int *ldab, s *work) nogil
|
||
|
|
cdef s slantb(char *norm, char *uplo, char *diag, int *n, int *k, s *ab, int *ldab, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slantb(&out, norm, uplo, diag, n, k, ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slantp "F_FUNC(slantpwrp, SLANTPWRP)"(s *out, char *norm, char *uplo, char *diag, int *n, s *ap, s *work) nogil
|
||
|
|
cdef s slantp(char *norm, char *uplo, char *diag, int *n, s *ap, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slantp(&out, norm, uplo, diag, n, ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slantr "F_FUNC(slantrwrp, SLANTRWRP)"(s *out, char *norm, char *uplo, char *diag, int *m, int *n, s *a, int *lda, s *work) nogil
|
||
|
|
cdef s slantr(char *norm, char *uplo, char *diag, int *m, int *n, s *a, int *lda, s *work) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slantr(&out, norm, uplo, diag, m, n, a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slapy2 "F_FUNC(slapy2wrp, SLAPY2WRP)"(s *out, s *x, s *y) nogil
|
||
|
|
cdef s slapy2(s *x, s *y) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slapy2(&out, x, y)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slapy3 "F_FUNC(slapy3wrp, SLAPY3WRP)"(s *out, s *x, s *y, s *z) nogil
|
||
|
|
cdef s slapy3(s *x, s *y, s *z) nogil:
|
||
|
|
cdef s out
|
||
|
|
_fortran_slapy3(&out, x, y, z)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zladiv "F_FUNC(zladivwrp, ZLADIVWRP)"(z *out, npy_complex128 *x, npy_complex128 *y) nogil
|
||
|
|
cdef z zladiv(z *x, z *y) nogil:
|
||
|
|
cdef z out
|
||
|
|
_fortran_zladiv(&out, <npy_complex128*>x, <npy_complex128*>y)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlangb "F_FUNC(zlangbwrp, ZLANGBWRP)"(d *out, char *norm, int *n, int *kl, int *ku, npy_complex128 *ab, int *ldab, d *work) nogil
|
||
|
|
cdef d zlangb(char *norm, int *n, int *kl, int *ku, z *ab, int *ldab, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlangb(&out, norm, n, kl, ku, <npy_complex128*>ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlange "F_FUNC(zlangewrp, ZLANGEWRP)"(d *out, char *norm, int *m, int *n, npy_complex128 *a, int *lda, d *work) nogil
|
||
|
|
cdef d zlange(char *norm, int *m, int *n, z *a, int *lda, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlange(&out, norm, m, n, <npy_complex128*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlangt "F_FUNC(zlangtwrp, ZLANGTWRP)"(d *out, char *norm, int *n, npy_complex128 *dl, npy_complex128 *d_, npy_complex128 *du) nogil
|
||
|
|
cdef d zlangt(char *norm, int *n, z *dl, z *d_, z *du) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlangt(&out, norm, n, <npy_complex128*>dl, <npy_complex128*>d_, <npy_complex128*>du)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlanhb "F_FUNC(zlanhbwrp, ZLANHBWRP)"(d *out, char *norm, char *uplo, int *n, int *k, npy_complex128 *ab, int *ldab, d *work) nogil
|
||
|
|
cdef d zlanhb(char *norm, char *uplo, int *n, int *k, z *ab, int *ldab, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlanhb(&out, norm, uplo, n, k, <npy_complex128*>ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlanhe "F_FUNC(zlanhewrp, ZLANHEWRP)"(d *out, char *norm, char *uplo, int *n, npy_complex128 *a, int *lda, d *work) nogil
|
||
|
|
cdef d zlanhe(char *norm, char *uplo, int *n, z *a, int *lda, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlanhe(&out, norm, uplo, n, <npy_complex128*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlanhf "F_FUNC(zlanhfwrp, ZLANHFWRP)"(d *out, char *norm, char *transr, char *uplo, int *n, npy_complex128 *a, d *work) nogil
|
||
|
|
cdef d zlanhf(char *norm, char *transr, char *uplo, int *n, z *a, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlanhf(&out, norm, transr, uplo, n, <npy_complex128*>a, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlanhp "F_FUNC(zlanhpwrp, ZLANHPWRP)"(d *out, char *norm, char *uplo, int *n, npy_complex128 *ap, d *work) nogil
|
||
|
|
cdef d zlanhp(char *norm, char *uplo, int *n, z *ap, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlanhp(&out, norm, uplo, n, <npy_complex128*>ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlanhs "F_FUNC(zlanhswrp, ZLANHSWRP)"(d *out, char *norm, int *n, npy_complex128 *a, int *lda, d *work) nogil
|
||
|
|
cdef d zlanhs(char *norm, int *n, z *a, int *lda, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlanhs(&out, norm, n, <npy_complex128*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlanht "F_FUNC(zlanhtwrp, ZLANHTWRP)"(d *out, char *norm, int *n, d *d_, npy_complex128 *e) nogil
|
||
|
|
cdef d zlanht(char *norm, int *n, d *d_, z *e) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlanht(&out, norm, n, d_, <npy_complex128*>e)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlansb "F_FUNC(zlansbwrp, ZLANSBWRP)"(d *out, char *norm, char *uplo, int *n, int *k, npy_complex128 *ab, int *ldab, d *work) nogil
|
||
|
|
cdef d zlansb(char *norm, char *uplo, int *n, int *k, z *ab, int *ldab, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlansb(&out, norm, uplo, n, k, <npy_complex128*>ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlansp "F_FUNC(zlanspwrp, ZLANSPWRP)"(d *out, char *norm, char *uplo, int *n, npy_complex128 *ap, d *work) nogil
|
||
|
|
cdef d zlansp(char *norm, char *uplo, int *n, z *ap, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlansp(&out, norm, uplo, n, <npy_complex128*>ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlansy "F_FUNC(zlansywrp, ZLANSYWRP)"(d *out, char *norm, char *uplo, int *n, npy_complex128 *a, int *lda, d *work) nogil
|
||
|
|
cdef d zlansy(char *norm, char *uplo, int *n, z *a, int *lda, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlansy(&out, norm, uplo, n, <npy_complex128*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlantb "F_FUNC(zlantbwrp, ZLANTBWRP)"(d *out, char *norm, char *uplo, char *diag, int *n, int *k, npy_complex128 *ab, int *ldab, d *work) nogil
|
||
|
|
cdef d zlantb(char *norm, char *uplo, char *diag, int *n, int *k, z *ab, int *ldab, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlantb(&out, norm, uplo, diag, n, k, <npy_complex128*>ab, ldab, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlantp "F_FUNC(zlantpwrp, ZLANTPWRP)"(d *out, char *norm, char *uplo, char *diag, int *n, npy_complex128 *ap, d *work) nogil
|
||
|
|
cdef d zlantp(char *norm, char *uplo, char *diag, int *n, z *ap, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlantp(&out, norm, uplo, diag, n, <npy_complex128*>ap, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlantr "F_FUNC(zlantrwrp, ZLANTRWRP)"(d *out, char *norm, char *uplo, char *diag, int *m, int *n, npy_complex128 *a, int *lda, d *work) nogil
|
||
|
|
cdef d zlantr(char *norm, char *uplo, char *diag, int *m, int *n, z *a, int *lda, d *work) nogil:
|
||
|
|
cdef d out
|
||
|
|
_fortran_zlantr(&out, norm, uplo, diag, m, n, <npy_complex128*>a, lda, work)
|
||
|
|
return out
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cbbcsd "F_FUNC(cbbcsd,CBBCSD)"(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, int *m, int *p, int *q, s *theta, s *phi, npy_complex64 *u1, int *ldu1, npy_complex64 *u2, int *ldu2, npy_complex64 *v1t, int *ldv1t, npy_complex64 *v2t, int *ldv2t, s *b11d, s *b11e, s *b12d, s *b12e, s *b21d, s *b21e, s *b22d, s *b22e, s *rwork, int *lrwork, int *info) nogil
|
||
|
|
cdef void cbbcsd(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, int *m, int *p, int *q, s *theta, s *phi, c *u1, int *ldu1, c *u2, int *ldu2, c *v1t, int *ldv1t, c *v2t, int *ldv2t, s *b11d, s *b11e, s *b12d, s *b12e, s *b21d, s *b21e, s *b22d, s *b22e, s *rwork, int *lrwork, int *info) nogil:
|
||
|
|
_fortran_cbbcsd(jobu1, jobu2, jobv1t, jobv2t, trans, m, p, q, theta, phi, <npy_complex64*>u1, ldu1, <npy_complex64*>u2, ldu2, <npy_complex64*>v1t, ldv1t, <npy_complex64*>v2t, ldv2t, b11d, b11e, b12d, b12e, b21d, b21e, b22d, b22e, rwork, lrwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cbdsqr "F_FUNC(cbdsqr,CBDSQR)"(char *uplo, int *n, int *ncvt, int *nru, int *ncc, s *d, s *e, npy_complex64 *vt, int *ldvt, npy_complex64 *u, int *ldu, npy_complex64 *c, int *ldc, s *rwork, int *info) nogil
|
||
|
|
cdef void cbdsqr(char *uplo, int *n, int *ncvt, int *nru, int *ncc, s *d, s *e, c *vt, int *ldvt, c *u, int *ldu, c *c, int *ldc, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cbdsqr(uplo, n, ncvt, nru, ncc, d, e, <npy_complex64*>vt, ldvt, <npy_complex64*>u, ldu, <npy_complex64*>c, ldc, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbbrd "F_FUNC(cgbbrd,CGBBRD)"(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, npy_complex64 *ab, int *ldab, s *d, s *e, npy_complex64 *q, int *ldq, npy_complex64 *pt, int *ldpt, npy_complex64 *c, int *ldc, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cgbbrd(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, c *ab, int *ldab, s *d, s *e, c *q, int *ldq, c *pt, int *ldpt, c *c, int *ldc, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgbbrd(vect, m, n, ncc, kl, ku, <npy_complex64*>ab, ldab, d, e, <npy_complex64*>q, ldq, <npy_complex64*>pt, ldpt, <npy_complex64*>c, ldc, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbcon "F_FUNC(cgbcon,CGBCON)"(char *norm, int *n, int *kl, int *ku, npy_complex64 *ab, int *ldab, int *ipiv, s *anorm, s *rcond, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cgbcon(char *norm, int *n, int *kl, int *ku, c *ab, int *ldab, int *ipiv, s *anorm, s *rcond, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgbcon(norm, n, kl, ku, <npy_complex64*>ab, ldab, ipiv, anorm, rcond, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbequ "F_FUNC(cgbequ,CGBEQU)"(int *m, int *n, int *kl, int *ku, npy_complex64 *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil
|
||
|
|
cdef void cgbequ(int *m, int *n, int *kl, int *ku, c *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil:
|
||
|
|
_fortran_cgbequ(m, n, kl, ku, <npy_complex64*>ab, ldab, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbequb "F_FUNC(cgbequb,CGBEQUB)"(int *m, int *n, int *kl, int *ku, npy_complex64 *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil
|
||
|
|
cdef void cgbequb(int *m, int *n, int *kl, int *ku, c *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil:
|
||
|
|
_fortran_cgbequb(m, n, kl, ku, <npy_complex64*>ab, ldab, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbrfs "F_FUNC(cgbrfs,CGBRFS)"(char *trans, int *n, int *kl, int *ku, int *nrhs, npy_complex64 *ab, int *ldab, npy_complex64 *afb, int *ldafb, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cgbrfs(char *trans, int *n, int *kl, int *ku, int *nrhs, c *ab, int *ldab, c *afb, int *ldafb, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgbrfs(trans, n, kl, ku, nrhs, <npy_complex64*>ab, ldab, <npy_complex64*>afb, ldafb, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbsv "F_FUNC(cgbsv,CGBSV)"(int *n, int *kl, int *ku, int *nrhs, npy_complex64 *ab, int *ldab, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cgbsv(int *n, int *kl, int *ku, int *nrhs, c *ab, int *ldab, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cgbsv(n, kl, ku, nrhs, <npy_complex64*>ab, ldab, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbsvx "F_FUNC(cgbsvx,CGBSVX)"(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, npy_complex64 *ab, int *ldab, npy_complex64 *afb, int *ldafb, int *ipiv, char *equed, s *r, s *c, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cgbsvx(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, c *ab, int *ldab, c *afb, int *ldafb, int *ipiv, char *equed, s *r, s *c, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgbsvx(fact, trans, n, kl, ku, nrhs, <npy_complex64*>ab, ldab, <npy_complex64*>afb, ldafb, ipiv, equed, r, c, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbtf2 "F_FUNC(cgbtf2,CGBTF2)"(int *m, int *n, int *kl, int *ku, npy_complex64 *ab, int *ldab, int *ipiv, int *info) nogil
|
||
|
|
cdef void cgbtf2(int *m, int *n, int *kl, int *ku, c *ab, int *ldab, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_cgbtf2(m, n, kl, ku, <npy_complex64*>ab, ldab, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbtrf "F_FUNC(cgbtrf,CGBTRF)"(int *m, int *n, int *kl, int *ku, npy_complex64 *ab, int *ldab, int *ipiv, int *info) nogil
|
||
|
|
cdef void cgbtrf(int *m, int *n, int *kl, int *ku, c *ab, int *ldab, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_cgbtrf(m, n, kl, ku, <npy_complex64*>ab, ldab, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgbtrs "F_FUNC(cgbtrs,CGBTRS)"(char *trans, int *n, int *kl, int *ku, int *nrhs, npy_complex64 *ab, int *ldab, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cgbtrs(char *trans, int *n, int *kl, int *ku, int *nrhs, c *ab, int *ldab, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cgbtrs(trans, n, kl, ku, nrhs, <npy_complex64*>ab, ldab, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgebak "F_FUNC(cgebak,CGEBAK)"(char *job, char *side, int *n, int *ilo, int *ihi, s *scale, int *m, npy_complex64 *v, int *ldv, int *info) nogil
|
||
|
|
cdef void cgebak(char *job, char *side, int *n, int *ilo, int *ihi, s *scale, int *m, c *v, int *ldv, int *info) nogil:
|
||
|
|
_fortran_cgebak(job, side, n, ilo, ihi, scale, m, <npy_complex64*>v, ldv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgebal "F_FUNC(cgebal,CGEBAL)"(char *job, int *n, npy_complex64 *a, int *lda, int *ilo, int *ihi, s *scale, int *info) nogil
|
||
|
|
cdef void cgebal(char *job, int *n, c *a, int *lda, int *ilo, int *ihi, s *scale, int *info) nogil:
|
||
|
|
_fortran_cgebal(job, n, <npy_complex64*>a, lda, ilo, ihi, scale, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgebd2 "F_FUNC(cgebd2,CGEBD2)"(int *m, int *n, npy_complex64 *a, int *lda, s *d, s *e, npy_complex64 *tauq, npy_complex64 *taup, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgebd2(int *m, int *n, c *a, int *lda, s *d, s *e, c *tauq, c *taup, c *work, int *info) nogil:
|
||
|
|
_fortran_cgebd2(m, n, <npy_complex64*>a, lda, d, e, <npy_complex64*>tauq, <npy_complex64*>taup, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgebrd "F_FUNC(cgebrd,CGEBRD)"(int *m, int *n, npy_complex64 *a, int *lda, s *d, s *e, npy_complex64 *tauq, npy_complex64 *taup, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgebrd(int *m, int *n, c *a, int *lda, s *d, s *e, c *tauq, c *taup, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgebrd(m, n, <npy_complex64*>a, lda, d, e, <npy_complex64*>tauq, <npy_complex64*>taup, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgecon "F_FUNC(cgecon,CGECON)"(char *norm, int *n, npy_complex64 *a, int *lda, s *anorm, s *rcond, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cgecon(char *norm, int *n, c *a, int *lda, s *anorm, s *rcond, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgecon(norm, n, <npy_complex64*>a, lda, anorm, rcond, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeequ "F_FUNC(cgeequ,CGEEQU)"(int *m, int *n, npy_complex64 *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil
|
||
|
|
cdef void cgeequ(int *m, int *n, c *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil:
|
||
|
|
_fortran_cgeequ(m, n, <npy_complex64*>a, lda, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeequb "F_FUNC(cgeequb,CGEEQUB)"(int *m, int *n, npy_complex64 *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil
|
||
|
|
cdef void cgeequb(int *m, int *n, c *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil:
|
||
|
|
_fortran_cgeequb(m, n, <npy_complex64*>a, lda, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgees "F_FUNC(cgees,CGEES)"(char *jobvs, char *sort, _cselect1 *select, int *n, npy_complex64 *a, int *lda, int *sdim, npy_complex64 *w, npy_complex64 *vs, int *ldvs, npy_complex64 *work, int *lwork, s *rwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void cgees(char *jobvs, char *sort, cselect1 *select, int *n, c *a, int *lda, int *sdim, c *w, c *vs, int *ldvs, c *work, int *lwork, s *rwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_cgees(jobvs, sort, <_cselect1*>select, n, <npy_complex64*>a, lda, sdim, <npy_complex64*>w, <npy_complex64*>vs, ldvs, <npy_complex64*>work, lwork, rwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeesx "F_FUNC(cgeesx,CGEESX)"(char *jobvs, char *sort, _cselect1 *select, char *sense, int *n, npy_complex64 *a, int *lda, int *sdim, npy_complex64 *w, npy_complex64 *vs, int *ldvs, s *rconde, s *rcondv, npy_complex64 *work, int *lwork, s *rwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void cgeesx(char *jobvs, char *sort, cselect1 *select, char *sense, int *n, c *a, int *lda, int *sdim, c *w, c *vs, int *ldvs, s *rconde, s *rcondv, c *work, int *lwork, s *rwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_cgeesx(jobvs, sort, <_cselect1*>select, sense, n, <npy_complex64*>a, lda, sdim, <npy_complex64*>w, <npy_complex64*>vs, ldvs, rconde, rcondv, <npy_complex64*>work, lwork, rwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeev "F_FUNC(cgeev,CGEEV)"(char *jobvl, char *jobvr, int *n, npy_complex64 *a, int *lda, npy_complex64 *w, npy_complex64 *vl, int *ldvl, npy_complex64 *vr, int *ldvr, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void cgeev(char *jobvl, char *jobvr, int *n, c *a, int *lda, c *w, c *vl, int *ldvl, c *vr, int *ldvr, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgeev(jobvl, jobvr, n, <npy_complex64*>a, lda, <npy_complex64*>w, <npy_complex64*>vl, ldvl, <npy_complex64*>vr, ldvr, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeevx "F_FUNC(cgeevx,CGEEVX)"(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, npy_complex64 *a, int *lda, npy_complex64 *w, npy_complex64 *vl, int *ldvl, npy_complex64 *vr, int *ldvr, int *ilo, int *ihi, s *scale, s *abnrm, s *rconde, s *rcondv, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void cgeevx(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, c *a, int *lda, c *w, c *vl, int *ldvl, c *vr, int *ldvr, int *ilo, int *ihi, s *scale, s *abnrm, s *rconde, s *rcondv, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgeevx(balanc, jobvl, jobvr, sense, n, <npy_complex64*>a, lda, <npy_complex64*>w, <npy_complex64*>vl, ldvl, <npy_complex64*>vr, ldvr, ilo, ihi, scale, abnrm, rconde, rcondv, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgehd2 "F_FUNC(cgehd2,CGEHD2)"(int *n, int *ilo, int *ihi, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgehd2(int *n, int *ilo, int *ihi, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cgehd2(n, ilo, ihi, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgehrd "F_FUNC(cgehrd,CGEHRD)"(int *n, int *ilo, int *ihi, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgehrd(int *n, int *ilo, int *ihi, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgehrd(n, ilo, ihi, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgelq2 "F_FUNC(cgelq2,CGELQ2)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgelq2(int *m, int *n, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cgelq2(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgelqf "F_FUNC(cgelqf,CGELQF)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgelqf(int *m, int *n, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgelqf(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgels "F_FUNC(cgels,CGELS)"(char *trans, int *m, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgels(char *trans, int *m, int *n, int *nrhs, c *a, int *lda, c *b, int *ldb, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgels(trans, m, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgelsd "F_FUNC(cgelsd,CGELSD)"(int *m, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, s *s, s *rcond, int *rank, npy_complex64 *work, int *lwork, s *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void cgelsd(int *m, int *n, int *nrhs, c *a, int *lda, c *b, int *ldb, s *s, s *rcond, int *rank, c *work, int *lwork, s *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_cgelsd(m, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, s, rcond, rank, <npy_complex64*>work, lwork, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgelss "F_FUNC(cgelss,CGELSS)"(int *m, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, s *s, s *rcond, int *rank, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void cgelss(int *m, int *n, int *nrhs, c *a, int *lda, c *b, int *ldb, s *s, s *rcond, int *rank, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgelss(m, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, s, rcond, rank, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgelsy "F_FUNC(cgelsy,CGELSY)"(int *m, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, int *jpvt, s *rcond, int *rank, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void cgelsy(int *m, int *n, int *nrhs, c *a, int *lda, c *b, int *ldb, int *jpvt, s *rcond, int *rank, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgelsy(m, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, jpvt, rcond, rank, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgemqrt "F_FUNC(cgemqrt,CGEMQRT)"(char *side, char *trans, int *m, int *n, int *k, int *nb, npy_complex64 *v, int *ldv, npy_complex64 *t, int *ldt, npy_complex64 *c, int *ldc, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgemqrt(char *side, char *trans, int *m, int *n, int *k, int *nb, c *v, int *ldv, c *t, int *ldt, c *c, int *ldc, c *work, int *info) nogil:
|
||
|
|
_fortran_cgemqrt(side, trans, m, n, k, nb, <npy_complex64*>v, ldv, <npy_complex64*>t, ldt, <npy_complex64*>c, ldc, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeql2 "F_FUNC(cgeql2,CGEQL2)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgeql2(int *m, int *n, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cgeql2(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeqlf "F_FUNC(cgeqlf,CGEQLF)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgeqlf(int *m, int *n, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgeqlf(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeqp3 "F_FUNC(cgeqp3,CGEQP3)"(int *m, int *n, npy_complex64 *a, int *lda, int *jpvt, npy_complex64 *tau, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void cgeqp3(int *m, int *n, c *a, int *lda, int *jpvt, c *tau, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgeqp3(m, n, <npy_complex64*>a, lda, jpvt, <npy_complex64*>tau, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeqr2 "F_FUNC(cgeqr2,CGEQR2)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgeqr2(int *m, int *n, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cgeqr2(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeqr2p "F_FUNC(cgeqr2p,CGEQR2P)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgeqr2p(int *m, int *n, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cgeqr2p(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeqrf "F_FUNC(cgeqrf,CGEQRF)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgeqrf(int *m, int *n, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgeqrf(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeqrfp "F_FUNC(cgeqrfp,CGEQRFP)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgeqrfp(int *m, int *n, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgeqrfp(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeqrt "F_FUNC(cgeqrt,CGEQRT)"(int *m, int *n, int *nb, npy_complex64 *a, int *lda, npy_complex64 *t, int *ldt, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgeqrt(int *m, int *n, int *nb, c *a, int *lda, c *t, int *ldt, c *work, int *info) nogil:
|
||
|
|
_fortran_cgeqrt(m, n, nb, <npy_complex64*>a, lda, <npy_complex64*>t, ldt, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeqrt2 "F_FUNC(cgeqrt2,CGEQRT2)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *t, int *ldt, int *info) nogil
|
||
|
|
cdef void cgeqrt2(int *m, int *n, c *a, int *lda, c *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_cgeqrt2(m, n, <npy_complex64*>a, lda, <npy_complex64*>t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgeqrt3 "F_FUNC(cgeqrt3,CGEQRT3)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *t, int *ldt, int *info) nogil
|
||
|
|
cdef void cgeqrt3(int *m, int *n, c *a, int *lda, c *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_cgeqrt3(m, n, <npy_complex64*>a, lda, <npy_complex64*>t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgerfs "F_FUNC(cgerfs,CGERFS)"(char *trans, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *af, int *ldaf, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cgerfs(char *trans, int *n, int *nrhs, c *a, int *lda, c *af, int *ldaf, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgerfs(trans, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>af, ldaf, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgerq2 "F_FUNC(cgerq2,CGERQ2)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgerq2(int *m, int *n, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cgerq2(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgerqf "F_FUNC(cgerqf,CGERQF)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgerqf(int *m, int *n, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgerqf(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgesc2 "F_FUNC(cgesc2,CGESC2)"(int *n, npy_complex64 *a, int *lda, npy_complex64 *rhs, int *ipiv, int *jpiv, s *scale) nogil
|
||
|
|
cdef void cgesc2(int *n, c *a, int *lda, c *rhs, int *ipiv, int *jpiv, s *scale) nogil:
|
||
|
|
_fortran_cgesc2(n, <npy_complex64*>a, lda, <npy_complex64*>rhs, ipiv, jpiv, scale)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgesdd "F_FUNC(cgesdd,CGESDD)"(char *jobz, int *m, int *n, npy_complex64 *a, int *lda, s *s, npy_complex64 *u, int *ldu, npy_complex64 *vt, int *ldvt, npy_complex64 *work, int *lwork, s *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void cgesdd(char *jobz, int *m, int *n, c *a, int *lda, s *s, c *u, int *ldu, c *vt, int *ldvt, c *work, int *lwork, s *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_cgesdd(jobz, m, n, <npy_complex64*>a, lda, s, <npy_complex64*>u, ldu, <npy_complex64*>vt, ldvt, <npy_complex64*>work, lwork, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgesv "F_FUNC(cgesv,CGESV)"(int *n, int *nrhs, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cgesv(int *n, int *nrhs, c *a, int *lda, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cgesv(n, nrhs, <npy_complex64*>a, lda, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgesvd "F_FUNC(cgesvd,CGESVD)"(char *jobu, char *jobvt, int *m, int *n, npy_complex64 *a, int *lda, s *s, npy_complex64 *u, int *ldu, npy_complex64 *vt, int *ldvt, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void cgesvd(char *jobu, char *jobvt, int *m, int *n, c *a, int *lda, s *s, c *u, int *ldu, c *vt, int *ldvt, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgesvd(jobu, jobvt, m, n, <npy_complex64*>a, lda, s, <npy_complex64*>u, ldu, <npy_complex64*>vt, ldvt, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgesvx "F_FUNC(cgesvx,CGESVX)"(char *fact, char *trans, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *af, int *ldaf, int *ipiv, char *equed, s *r, s *c, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cgesvx(char *fact, char *trans, int *n, int *nrhs, c *a, int *lda, c *af, int *ldaf, int *ipiv, char *equed, s *r, s *c, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgesvx(fact, trans, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>af, ldaf, ipiv, equed, r, c, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgetc2 "F_FUNC(cgetc2,CGETC2)"(int *n, npy_complex64 *a, int *lda, int *ipiv, int *jpiv, int *info) nogil
|
||
|
|
cdef void cgetc2(int *n, c *a, int *lda, int *ipiv, int *jpiv, int *info) nogil:
|
||
|
|
_fortran_cgetc2(n, <npy_complex64*>a, lda, ipiv, jpiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgetf2 "F_FUNC(cgetf2,CGETF2)"(int *m, int *n, npy_complex64 *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void cgetf2(int *m, int *n, c *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_cgetf2(m, n, <npy_complex64*>a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgetrf "F_FUNC(cgetrf,CGETRF)"(int *m, int *n, npy_complex64 *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void cgetrf(int *m, int *n, c *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_cgetrf(m, n, <npy_complex64*>a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgetri "F_FUNC(cgetri,CGETRI)"(int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgetri(int *n, c *a, int *lda, int *ipiv, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgetri(n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgetrs "F_FUNC(cgetrs,CGETRS)"(char *trans, int *n, int *nrhs, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cgetrs(char *trans, int *n, int *nrhs, c *a, int *lda, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cgetrs(trans, n, nrhs, <npy_complex64*>a, lda, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cggbak "F_FUNC(cggbak,CGGBAK)"(char *job, char *side, int *n, int *ilo, int *ihi, s *lscale, s *rscale, int *m, npy_complex64 *v, int *ldv, int *info) nogil
|
||
|
|
cdef void cggbak(char *job, char *side, int *n, int *ilo, int *ihi, s *lscale, s *rscale, int *m, c *v, int *ldv, int *info) nogil:
|
||
|
|
_fortran_cggbak(job, side, n, ilo, ihi, lscale, rscale, m, <npy_complex64*>v, ldv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cggbal "F_FUNC(cggbal,CGGBAL)"(char *job, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, int *ilo, int *ihi, s *lscale, s *rscale, s *work, int *info) nogil
|
||
|
|
cdef void cggbal(char *job, int *n, c *a, int *lda, c *b, int *ldb, int *ilo, int *ihi, s *lscale, s *rscale, s *work, int *info) nogil:
|
||
|
|
_fortran_cggbal(job, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, ilo, ihi, lscale, rscale, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgges "F_FUNC(cgges,CGGES)"(char *jobvsl, char *jobvsr, char *sort, _cselect2 *selctg, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, int *sdim, npy_complex64 *alpha, npy_complex64 *beta, npy_complex64 *vsl, int *ldvsl, npy_complex64 *vsr, int *ldvsr, npy_complex64 *work, int *lwork, s *rwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void cgges(char *jobvsl, char *jobvsr, char *sort, cselect2 *selctg, int *n, c *a, int *lda, c *b, int *ldb, int *sdim, c *alpha, c *beta, c *vsl, int *ldvsl, c *vsr, int *ldvsr, c *work, int *lwork, s *rwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_cgges(jobvsl, jobvsr, sort, <_cselect2*>selctg, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, sdim, <npy_complex64*>alpha, <npy_complex64*>beta, <npy_complex64*>vsl, ldvsl, <npy_complex64*>vsr, ldvsr, <npy_complex64*>work, lwork, rwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cggesx "F_FUNC(cggesx,CGGESX)"(char *jobvsl, char *jobvsr, char *sort, _cselect2 *selctg, char *sense, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, int *sdim, npy_complex64 *alpha, npy_complex64 *beta, npy_complex64 *vsl, int *ldvsl, npy_complex64 *vsr, int *ldvsr, s *rconde, s *rcondv, npy_complex64 *work, int *lwork, s *rwork, int *iwork, int *liwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void cggesx(char *jobvsl, char *jobvsr, char *sort, cselect2 *selctg, char *sense, int *n, c *a, int *lda, c *b, int *ldb, int *sdim, c *alpha, c *beta, c *vsl, int *ldvsl, c *vsr, int *ldvsr, s *rconde, s *rcondv, c *work, int *lwork, s *rwork, int *iwork, int *liwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_cggesx(jobvsl, jobvsr, sort, <_cselect2*>selctg, sense, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, sdim, <npy_complex64*>alpha, <npy_complex64*>beta, <npy_complex64*>vsl, ldvsl, <npy_complex64*>vsr, ldvsr, rconde, rcondv, <npy_complex64*>work, lwork, rwork, iwork, liwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cggev "F_FUNC(cggev,CGGEV)"(char *jobvl, char *jobvr, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *alpha, npy_complex64 *beta, npy_complex64 *vl, int *ldvl, npy_complex64 *vr, int *ldvr, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void cggev(char *jobvl, char *jobvr, int *n, c *a, int *lda, c *b, int *ldb, c *alpha, c *beta, c *vl, int *ldvl, c *vr, int *ldvr, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cggev(jobvl, jobvr, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>alpha, <npy_complex64*>beta, <npy_complex64*>vl, ldvl, <npy_complex64*>vr, ldvr, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cggevx "F_FUNC(cggevx,CGGEVX)"(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *alpha, npy_complex64 *beta, npy_complex64 *vl, int *ldvl, npy_complex64 *vr, int *ldvr, int *ilo, int *ihi, s *lscale, s *rscale, s *abnrm, s *bbnrm, s *rconde, s *rcondv, npy_complex64 *work, int *lwork, s *rwork, int *iwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void cggevx(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, c *a, int *lda, c *b, int *ldb, c *alpha, c *beta, c *vl, int *ldvl, c *vr, int *ldvr, int *ilo, int *ihi, s *lscale, s *rscale, s *abnrm, s *bbnrm, s *rconde, s *rcondv, c *work, int *lwork, s *rwork, int *iwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_cggevx(balanc, jobvl, jobvr, sense, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>alpha, <npy_complex64*>beta, <npy_complex64*>vl, ldvl, <npy_complex64*>vr, ldvr, ilo, ihi, lscale, rscale, abnrm, bbnrm, rconde, rcondv, <npy_complex64*>work, lwork, rwork, iwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cggglm "F_FUNC(cggglm,CGGGLM)"(int *n, int *m, int *p, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *d, npy_complex64 *x, npy_complex64 *y, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cggglm(int *n, int *m, int *p, c *a, int *lda, c *b, int *ldb, c *d, c *x, c *y, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cggglm(n, m, p, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>d, <npy_complex64*>x, <npy_complex64*>y, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgghrd "F_FUNC(cgghrd,CGGHRD)"(char *compq, char *compz, int *n, int *ilo, int *ihi, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *q, int *ldq, npy_complex64 *z, int *ldz, int *info) nogil
|
||
|
|
cdef void cgghrd(char *compq, char *compz, int *n, int *ilo, int *ihi, c *a, int *lda, c *b, int *ldb, c *q, int *ldq, c *z, int *ldz, int *info) nogil:
|
||
|
|
_fortran_cgghrd(compq, compz, n, ilo, ihi, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>q, ldq, <npy_complex64*>z, ldz, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgglse "F_FUNC(cgglse,CGGLSE)"(int *m, int *n, int *p, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *c, npy_complex64 *d, npy_complex64 *x, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cgglse(int *m, int *n, int *p, c *a, int *lda, c *b, int *ldb, c *c, c *d, c *x, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cgglse(m, n, p, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>c, <npy_complex64*>d, <npy_complex64*>x, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cggqrf "F_FUNC(cggqrf,CGGQRF)"(int *n, int *m, int *p, npy_complex64 *a, int *lda, npy_complex64 *taua, npy_complex64 *b, int *ldb, npy_complex64 *taub, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cggqrf(int *n, int *m, int *p, c *a, int *lda, c *taua, c *b, int *ldb, c *taub, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cggqrf(n, m, p, <npy_complex64*>a, lda, <npy_complex64*>taua, <npy_complex64*>b, ldb, <npy_complex64*>taub, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cggrqf "F_FUNC(cggrqf,CGGRQF)"(int *m, int *p, int *n, npy_complex64 *a, int *lda, npy_complex64 *taua, npy_complex64 *b, int *ldb, npy_complex64 *taub, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cggrqf(int *m, int *p, int *n, c *a, int *lda, c *taua, c *b, int *ldb, c *taub, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cggrqf(m, p, n, <npy_complex64*>a, lda, <npy_complex64*>taua, <npy_complex64*>b, ldb, <npy_complex64*>taub, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgtcon "F_FUNC(cgtcon,CGTCON)"(char *norm, int *n, npy_complex64 *dl, npy_complex64 *d, npy_complex64 *du, npy_complex64 *du2, int *ipiv, s *anorm, s *rcond, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cgtcon(char *norm, int *n, c *dl, c *d, c *du, c *du2, int *ipiv, s *anorm, s *rcond, c *work, int *info) nogil:
|
||
|
|
_fortran_cgtcon(norm, n, <npy_complex64*>dl, <npy_complex64*>d, <npy_complex64*>du, <npy_complex64*>du2, ipiv, anorm, rcond, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgtrfs "F_FUNC(cgtrfs,CGTRFS)"(char *trans, int *n, int *nrhs, npy_complex64 *dl, npy_complex64 *d, npy_complex64 *du, npy_complex64 *dlf, npy_complex64 *df, npy_complex64 *duf, npy_complex64 *du2, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cgtrfs(char *trans, int *n, int *nrhs, c *dl, c *d, c *du, c *dlf, c *df, c *duf, c *du2, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgtrfs(trans, n, nrhs, <npy_complex64*>dl, <npy_complex64*>d, <npy_complex64*>du, <npy_complex64*>dlf, <npy_complex64*>df, <npy_complex64*>duf, <npy_complex64*>du2, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgtsv "F_FUNC(cgtsv,CGTSV)"(int *n, int *nrhs, npy_complex64 *dl, npy_complex64 *d, npy_complex64 *du, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cgtsv(int *n, int *nrhs, c *dl, c *d, c *du, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cgtsv(n, nrhs, <npy_complex64*>dl, <npy_complex64*>d, <npy_complex64*>du, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgtsvx "F_FUNC(cgtsvx,CGTSVX)"(char *fact, char *trans, int *n, int *nrhs, npy_complex64 *dl, npy_complex64 *d, npy_complex64 *du, npy_complex64 *dlf, npy_complex64 *df, npy_complex64 *duf, npy_complex64 *du2, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cgtsvx(char *fact, char *trans, int *n, int *nrhs, c *dl, c *d, c *du, c *dlf, c *df, c *duf, c *du2, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cgtsvx(fact, trans, n, nrhs, <npy_complex64*>dl, <npy_complex64*>d, <npy_complex64*>du, <npy_complex64*>dlf, <npy_complex64*>df, <npy_complex64*>duf, <npy_complex64*>du2, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgttrf "F_FUNC(cgttrf,CGTTRF)"(int *n, npy_complex64 *dl, npy_complex64 *d, npy_complex64 *du, npy_complex64 *du2, int *ipiv, int *info) nogil
|
||
|
|
cdef void cgttrf(int *n, c *dl, c *d, c *du, c *du2, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_cgttrf(n, <npy_complex64*>dl, <npy_complex64*>d, <npy_complex64*>du, <npy_complex64*>du2, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgttrs "F_FUNC(cgttrs,CGTTRS)"(char *trans, int *n, int *nrhs, npy_complex64 *dl, npy_complex64 *d, npy_complex64 *du, npy_complex64 *du2, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cgttrs(char *trans, int *n, int *nrhs, c *dl, c *d, c *du, c *du2, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cgttrs(trans, n, nrhs, <npy_complex64*>dl, <npy_complex64*>d, <npy_complex64*>du, <npy_complex64*>du2, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cgtts2 "F_FUNC(cgtts2,CGTTS2)"(int *itrans, int *n, int *nrhs, npy_complex64 *dl, npy_complex64 *d, npy_complex64 *du, npy_complex64 *du2, int *ipiv, npy_complex64 *b, int *ldb) nogil
|
||
|
|
cdef void cgtts2(int *itrans, int *n, int *nrhs, c *dl, c *d, c *du, c *du2, int *ipiv, c *b, int *ldb) nogil:
|
||
|
|
_fortran_cgtts2(itrans, n, nrhs, <npy_complex64*>dl, <npy_complex64*>d, <npy_complex64*>du, <npy_complex64*>du2, ipiv, <npy_complex64*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chbev "F_FUNC(chbev,CHBEV)"(char *jobz, char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void chbev(char *jobz, char *uplo, int *n, int *kd, c *ab, int *ldab, s *w, c *z, int *ldz, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chbev(jobz, uplo, n, kd, <npy_complex64*>ab, ldab, w, <npy_complex64*>z, ldz, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chbevd "F_FUNC(chbevd,CHBEVD)"(char *jobz, char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void chbevd(char *jobz, char *uplo, int *n, int *kd, c *ab, int *ldab, s *w, c *z, int *ldz, c *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_chbevd(jobz, uplo, n, kd, <npy_complex64*>ab, ldab, w, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chbevx "F_FUNC(chbevx,CHBEVX)"(char *jobz, char *range, char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, npy_complex64 *q, int *ldq, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, s *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void chbevx(char *jobz, char *range, char *uplo, int *n, int *kd, c *ab, int *ldab, c *q, int *ldq, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, c *z, int *ldz, c *work, s *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_chbevx(jobz, range, uplo, n, kd, <npy_complex64*>ab, ldab, <npy_complex64*>q, ldq, vl, vu, il, iu, abstol, m, w, <npy_complex64*>z, ldz, <npy_complex64*>work, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chbgst "F_FUNC(chbgst,CHBGST)"(char *vect, char *uplo, int *n, int *ka, int *kb, npy_complex64 *ab, int *ldab, npy_complex64 *bb, int *ldbb, npy_complex64 *x, int *ldx, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void chbgst(char *vect, char *uplo, int *n, int *ka, int *kb, c *ab, int *ldab, c *bb, int *ldbb, c *x, int *ldx, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chbgst(vect, uplo, n, ka, kb, <npy_complex64*>ab, ldab, <npy_complex64*>bb, ldbb, <npy_complex64*>x, ldx, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chbgv "F_FUNC(chbgv,CHBGV)"(char *jobz, char *uplo, int *n, int *ka, int *kb, npy_complex64 *ab, int *ldab, npy_complex64 *bb, int *ldbb, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void chbgv(char *jobz, char *uplo, int *n, int *ka, int *kb, c *ab, int *ldab, c *bb, int *ldbb, s *w, c *z, int *ldz, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chbgv(jobz, uplo, n, ka, kb, <npy_complex64*>ab, ldab, <npy_complex64*>bb, ldbb, w, <npy_complex64*>z, ldz, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chbgvd "F_FUNC(chbgvd,CHBGVD)"(char *jobz, char *uplo, int *n, int *ka, int *kb, npy_complex64 *ab, int *ldab, npy_complex64 *bb, int *ldbb, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void chbgvd(char *jobz, char *uplo, int *n, int *ka, int *kb, c *ab, int *ldab, c *bb, int *ldbb, s *w, c *z, int *ldz, c *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_chbgvd(jobz, uplo, n, ka, kb, <npy_complex64*>ab, ldab, <npy_complex64*>bb, ldbb, w, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chbgvx "F_FUNC(chbgvx,CHBGVX)"(char *jobz, char *range, char *uplo, int *n, int *ka, int *kb, npy_complex64 *ab, int *ldab, npy_complex64 *bb, int *ldbb, npy_complex64 *q, int *ldq, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, s *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void chbgvx(char *jobz, char *range, char *uplo, int *n, int *ka, int *kb, c *ab, int *ldab, c *bb, int *ldbb, c *q, int *ldq, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, c *z, int *ldz, c *work, s *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_chbgvx(jobz, range, uplo, n, ka, kb, <npy_complex64*>ab, ldab, <npy_complex64*>bb, ldbb, <npy_complex64*>q, ldq, vl, vu, il, iu, abstol, m, w, <npy_complex64*>z, ldz, <npy_complex64*>work, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chbtrd "F_FUNC(chbtrd,CHBTRD)"(char *vect, char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, s *d, s *e, npy_complex64 *q, int *ldq, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void chbtrd(char *vect, char *uplo, int *n, int *kd, c *ab, int *ldab, s *d, s *e, c *q, int *ldq, c *work, int *info) nogil:
|
||
|
|
_fortran_chbtrd(vect, uplo, n, kd, <npy_complex64*>ab, ldab, d, e, <npy_complex64*>q, ldq, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_checon "F_FUNC(checon,CHECON)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, s *anorm, s *rcond, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void checon(char *uplo, int *n, c *a, int *lda, int *ipiv, s *anorm, s *rcond, c *work, int *info) nogil:
|
||
|
|
_fortran_checon(uplo, n, <npy_complex64*>a, lda, ipiv, anorm, rcond, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cheequb "F_FUNC(cheequb,CHEEQUB)"(char *uplo, int *n, npy_complex64 *a, int *lda, s *s, s *scond, s *amax, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cheequb(char *uplo, int *n, c *a, int *lda, s *s, s *scond, s *amax, c *work, int *info) nogil:
|
||
|
|
_fortran_cheequb(uplo, n, <npy_complex64*>a, lda, s, scond, amax, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cheev "F_FUNC(cheev,CHEEV)"(char *jobz, char *uplo, int *n, npy_complex64 *a, int *lda, s *w, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void cheev(char *jobz, char *uplo, int *n, c *a, int *lda, s *w, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cheev(jobz, uplo, n, <npy_complex64*>a, lda, w, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cheevd "F_FUNC(cheevd,CHEEVD)"(char *jobz, char *uplo, int *n, npy_complex64 *a, int *lda, s *w, npy_complex64 *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void cheevd(char *jobz, char *uplo, int *n, c *a, int *lda, s *w, c *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_cheevd(jobz, uplo, n, <npy_complex64*>a, lda, w, <npy_complex64*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cheevr "F_FUNC(cheevr,CHEEVR)"(char *jobz, char *range, char *uplo, int *n, npy_complex64 *a, int *lda, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, npy_complex64 *z, int *ldz, int *isuppz, npy_complex64 *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void cheevr(char *jobz, char *range, char *uplo, int *n, c *a, int *lda, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, c *z, int *ldz, int *isuppz, c *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_cheevr(jobz, range, uplo, n, <npy_complex64*>a, lda, vl, vu, il, iu, abstol, m, w, <npy_complex64*>z, ldz, isuppz, <npy_complex64*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cheevx "F_FUNC(cheevx,CHEEVX)"(char *jobz, char *range, char *uplo, int *n, npy_complex64 *a, int *lda, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, s *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void cheevx(char *jobz, char *range, char *uplo, int *n, c *a, int *lda, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, c *z, int *ldz, c *work, int *lwork, s *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_cheevx(jobz, range, uplo, n, <npy_complex64*>a, lda, vl, vu, il, iu, abstol, m, w, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chegs2 "F_FUNC(chegs2,CHEGS2)"(int *itype, char *uplo, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void chegs2(int *itype, char *uplo, int *n, c *a, int *lda, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_chegs2(itype, uplo, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chegst "F_FUNC(chegst,CHEGST)"(int *itype, char *uplo, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void chegst(int *itype, char *uplo, int *n, c *a, int *lda, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_chegst(itype, uplo, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chegv "F_FUNC(chegv,CHEGV)"(int *itype, char *jobz, char *uplo, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, s *w, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void chegv(int *itype, char *jobz, char *uplo, int *n, c *a, int *lda, c *b, int *ldb, s *w, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chegv(itype, jobz, uplo, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, w, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chegvd "F_FUNC(chegvd,CHEGVD)"(int *itype, char *jobz, char *uplo, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, s *w, npy_complex64 *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void chegvd(int *itype, char *jobz, char *uplo, int *n, c *a, int *lda, c *b, int *ldb, s *w, c *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_chegvd(itype, jobz, uplo, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, w, <npy_complex64*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chegvx "F_FUNC(chegvx,CHEGVX)"(int *itype, char *jobz, char *range, char *uplo, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, s *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void chegvx(int *itype, char *jobz, char *range, char *uplo, int *n, c *a, int *lda, c *b, int *ldb, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, c *z, int *ldz, c *work, int *lwork, s *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_chegvx(itype, jobz, range, uplo, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, vl, vu, il, iu, abstol, m, w, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cherfs "F_FUNC(cherfs,CHERFS)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *af, int *ldaf, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cherfs(char *uplo, int *n, int *nrhs, c *a, int *lda, c *af, int *ldaf, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cherfs(uplo, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>af, ldaf, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chesv "F_FUNC(chesv,CHESV)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void chesv(char *uplo, int *n, int *nrhs, c *a, int *lda, int *ipiv, c *b, int *ldb, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_chesv(uplo, n, nrhs, <npy_complex64*>a, lda, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chesvx "F_FUNC(chesvx,CHESVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *af, int *ldaf, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void chesvx(char *fact, char *uplo, int *n, int *nrhs, c *a, int *lda, c *af, int *ldaf, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chesvx(fact, uplo, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>af, ldaf, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cheswapr "F_FUNC(cheswapr,CHESWAPR)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *i1, int *i2) nogil
|
||
|
|
cdef void cheswapr(char *uplo, int *n, c *a, int *lda, int *i1, int *i2) nogil:
|
||
|
|
_fortran_cheswapr(uplo, n, <npy_complex64*>a, lda, i1, i2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chetd2 "F_FUNC(chetd2,CHETD2)"(char *uplo, int *n, npy_complex64 *a, int *lda, s *d, s *e, npy_complex64 *tau, int *info) nogil
|
||
|
|
cdef void chetd2(char *uplo, int *n, c *a, int *lda, s *d, s *e, c *tau, int *info) nogil:
|
||
|
|
_fortran_chetd2(uplo, n, <npy_complex64*>a, lda, d, e, <npy_complex64*>tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chetf2 "F_FUNC(chetf2,CHETF2)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void chetf2(char *uplo, int *n, c *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_chetf2(uplo, n, <npy_complex64*>a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chetrd "F_FUNC(chetrd,CHETRD)"(char *uplo, int *n, npy_complex64 *a, int *lda, s *d, s *e, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void chetrd(char *uplo, int *n, c *a, int *lda, s *d, s *e, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_chetrd(uplo, n, <npy_complex64*>a, lda, d, e, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chetrf "F_FUNC(chetrf,CHETRF)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void chetrf(char *uplo, int *n, c *a, int *lda, int *ipiv, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_chetrf(uplo, n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chetri "F_FUNC(chetri,CHETRI)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void chetri(char *uplo, int *n, c *a, int *lda, int *ipiv, c *work, int *info) nogil:
|
||
|
|
_fortran_chetri(uplo, n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chetri2 "F_FUNC(chetri2,CHETRI2)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void chetri2(char *uplo, int *n, c *a, int *lda, int *ipiv, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_chetri2(uplo, n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chetri2x "F_FUNC(chetri2x,CHETRI2X)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *nb, int *info) nogil
|
||
|
|
cdef void chetri2x(char *uplo, int *n, c *a, int *lda, int *ipiv, c *work, int *nb, int *info) nogil:
|
||
|
|
_fortran_chetri2x(uplo, n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, nb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chetrs "F_FUNC(chetrs,CHETRS)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void chetrs(char *uplo, int *n, int *nrhs, c *a, int *lda, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_chetrs(uplo, n, nrhs, <npy_complex64*>a, lda, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chetrs2 "F_FUNC(chetrs2,CHETRS2)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void chetrs2(char *uplo, int *n, int *nrhs, c *a, int *lda, int *ipiv, c *b, int *ldb, c *work, int *info) nogil:
|
||
|
|
_fortran_chetrs2(uplo, n, nrhs, <npy_complex64*>a, lda, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chfrk "F_FUNC(chfrk,CHFRK)"(char *transr, char *uplo, char *trans, int *n, int *k, s *alpha, npy_complex64 *a, int *lda, s *beta, npy_complex64 *c) nogil
|
||
|
|
cdef void chfrk(char *transr, char *uplo, char *trans, int *n, int *k, s *alpha, c *a, int *lda, s *beta, c *c) nogil:
|
||
|
|
_fortran_chfrk(transr, uplo, trans, n, k, alpha, <npy_complex64*>a, lda, beta, <npy_complex64*>c)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chgeqz "F_FUNC(chgeqz,CHGEQZ)"(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, npy_complex64 *h, int *ldh, npy_complex64 *t, int *ldt, npy_complex64 *alpha, npy_complex64 *beta, npy_complex64 *q, int *ldq, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void chgeqz(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, c *h, int *ldh, c *t, int *ldt, c *alpha, c *beta, c *q, int *ldq, c *z, int *ldz, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chgeqz(job, compq, compz, n, ilo, ihi, <npy_complex64*>h, ldh, <npy_complex64*>t, ldt, <npy_complex64*>alpha, <npy_complex64*>beta, <npy_complex64*>q, ldq, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpcon "F_FUNC(chpcon,CHPCON)"(char *uplo, int *n, npy_complex64 *ap, int *ipiv, s *anorm, s *rcond, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void chpcon(char *uplo, int *n, c *ap, int *ipiv, s *anorm, s *rcond, c *work, int *info) nogil:
|
||
|
|
_fortran_chpcon(uplo, n, <npy_complex64*>ap, ipiv, anorm, rcond, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpev "F_FUNC(chpev,CHPEV)"(char *jobz, char *uplo, int *n, npy_complex64 *ap, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void chpev(char *jobz, char *uplo, int *n, c *ap, s *w, c *z, int *ldz, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chpev(jobz, uplo, n, <npy_complex64*>ap, w, <npy_complex64*>z, ldz, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpevd "F_FUNC(chpevd,CHPEVD)"(char *jobz, char *uplo, int *n, npy_complex64 *ap, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void chpevd(char *jobz, char *uplo, int *n, c *ap, s *w, c *z, int *ldz, c *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_chpevd(jobz, uplo, n, <npy_complex64*>ap, w, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpevx "F_FUNC(chpevx,CHPEVX)"(char *jobz, char *range, char *uplo, int *n, npy_complex64 *ap, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, s *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void chpevx(char *jobz, char *range, char *uplo, int *n, c *ap, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, c *z, int *ldz, c *work, s *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_chpevx(jobz, range, uplo, n, <npy_complex64*>ap, vl, vu, il, iu, abstol, m, w, <npy_complex64*>z, ldz, <npy_complex64*>work, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpgst "F_FUNC(chpgst,CHPGST)"(int *itype, char *uplo, int *n, npy_complex64 *ap, npy_complex64 *bp, int *info) nogil
|
||
|
|
cdef void chpgst(int *itype, char *uplo, int *n, c *ap, c *bp, int *info) nogil:
|
||
|
|
_fortran_chpgst(itype, uplo, n, <npy_complex64*>ap, <npy_complex64*>bp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpgv "F_FUNC(chpgv,CHPGV)"(int *itype, char *jobz, char *uplo, int *n, npy_complex64 *ap, npy_complex64 *bp, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void chpgv(int *itype, char *jobz, char *uplo, int *n, c *ap, c *bp, s *w, c *z, int *ldz, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chpgv(itype, jobz, uplo, n, <npy_complex64*>ap, <npy_complex64*>bp, w, <npy_complex64*>z, ldz, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpgvd "F_FUNC(chpgvd,CHPGVD)"(int *itype, char *jobz, char *uplo, int *n, npy_complex64 *ap, npy_complex64 *bp, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void chpgvd(int *itype, char *jobz, char *uplo, int *n, c *ap, c *bp, s *w, c *z, int *ldz, c *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_chpgvd(itype, jobz, uplo, n, <npy_complex64*>ap, <npy_complex64*>bp, w, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpgvx "F_FUNC(chpgvx,CHPGVX)"(int *itype, char *jobz, char *range, char *uplo, int *n, npy_complex64 *ap, npy_complex64 *bp, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, npy_complex64 *z, int *ldz, npy_complex64 *work, s *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void chpgvx(int *itype, char *jobz, char *range, char *uplo, int *n, c *ap, c *bp, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, c *z, int *ldz, c *work, s *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_chpgvx(itype, jobz, range, uplo, n, <npy_complex64*>ap, <npy_complex64*>bp, vl, vu, il, iu, abstol, m, w, <npy_complex64*>z, ldz, <npy_complex64*>work, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chprfs "F_FUNC(chprfs,CHPRFS)"(char *uplo, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *afp, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void chprfs(char *uplo, int *n, int *nrhs, c *ap, c *afp, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chprfs(uplo, n, nrhs, <npy_complex64*>ap, <npy_complex64*>afp, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpsv "F_FUNC(chpsv,CHPSV)"(char *uplo, int *n, int *nrhs, npy_complex64 *ap, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void chpsv(char *uplo, int *n, int *nrhs, c *ap, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_chpsv(uplo, n, nrhs, <npy_complex64*>ap, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chpsvx "F_FUNC(chpsvx,CHPSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *afp, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void chpsvx(char *fact, char *uplo, int *n, int *nrhs, c *ap, c *afp, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_chpsvx(fact, uplo, n, nrhs, <npy_complex64*>ap, <npy_complex64*>afp, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chptrd "F_FUNC(chptrd,CHPTRD)"(char *uplo, int *n, npy_complex64 *ap, s *d, s *e, npy_complex64 *tau, int *info) nogil
|
||
|
|
cdef void chptrd(char *uplo, int *n, c *ap, s *d, s *e, c *tau, int *info) nogil:
|
||
|
|
_fortran_chptrd(uplo, n, <npy_complex64*>ap, d, e, <npy_complex64*>tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chptrf "F_FUNC(chptrf,CHPTRF)"(char *uplo, int *n, npy_complex64 *ap, int *ipiv, int *info) nogil
|
||
|
|
cdef void chptrf(char *uplo, int *n, c *ap, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_chptrf(uplo, n, <npy_complex64*>ap, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chptri "F_FUNC(chptri,CHPTRI)"(char *uplo, int *n, npy_complex64 *ap, int *ipiv, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void chptri(char *uplo, int *n, c *ap, int *ipiv, c *work, int *info) nogil:
|
||
|
|
_fortran_chptri(uplo, n, <npy_complex64*>ap, ipiv, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chptrs "F_FUNC(chptrs,CHPTRS)"(char *uplo, int *n, int *nrhs, npy_complex64 *ap, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void chptrs(char *uplo, int *n, int *nrhs, c *ap, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_chptrs(uplo, n, nrhs, <npy_complex64*>ap, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chsein "F_FUNC(chsein,CHSEIN)"(char *side, char *eigsrc, char *initv, bint *select, int *n, npy_complex64 *h, int *ldh, npy_complex64 *w, npy_complex64 *vl, int *ldvl, npy_complex64 *vr, int *ldvr, int *mm, int *m, npy_complex64 *work, s *rwork, int *ifaill, int *ifailr, int *info) nogil
|
||
|
|
cdef void chsein(char *side, char *eigsrc, char *initv, bint *select, int *n, c *h, int *ldh, c *w, c *vl, int *ldvl, c *vr, int *ldvr, int *mm, int *m, c *work, s *rwork, int *ifaill, int *ifailr, int *info) nogil:
|
||
|
|
_fortran_chsein(side, eigsrc, initv, select, n, <npy_complex64*>h, ldh, <npy_complex64*>w, <npy_complex64*>vl, ldvl, <npy_complex64*>vr, ldvr, mm, m, <npy_complex64*>work, rwork, ifaill, ifailr, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_chseqr "F_FUNC(chseqr,CHSEQR)"(char *job, char *compz, int *n, int *ilo, int *ihi, npy_complex64 *h, int *ldh, npy_complex64 *w, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void chseqr(char *job, char *compz, int *n, int *ilo, int *ihi, c *h, int *ldh, c *w, c *z, int *ldz, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_chseqr(job, compz, n, ilo, ihi, <npy_complex64*>h, ldh, <npy_complex64*>w, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clabrd "F_FUNC(clabrd,CLABRD)"(int *m, int *n, int *nb, npy_complex64 *a, int *lda, s *d, s *e, npy_complex64 *tauq, npy_complex64 *taup, npy_complex64 *x, int *ldx, npy_complex64 *y, int *ldy) nogil
|
||
|
|
cdef void clabrd(int *m, int *n, int *nb, c *a, int *lda, s *d, s *e, c *tauq, c *taup, c *x, int *ldx, c *y, int *ldy) nogil:
|
||
|
|
_fortran_clabrd(m, n, nb, <npy_complex64*>a, lda, d, e, <npy_complex64*>tauq, <npy_complex64*>taup, <npy_complex64*>x, ldx, <npy_complex64*>y, ldy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clacgv "F_FUNC(clacgv,CLACGV)"(int *n, npy_complex64 *x, int *incx) nogil
|
||
|
|
cdef void clacgv(int *n, c *x, int *incx) nogil:
|
||
|
|
_fortran_clacgv(n, <npy_complex64*>x, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clacn2 "F_FUNC(clacn2,CLACN2)"(int *n, npy_complex64 *v, npy_complex64 *x, s *est, int *kase, int *isave) nogil
|
||
|
|
cdef void clacn2(int *n, c *v, c *x, s *est, int *kase, int *isave) nogil:
|
||
|
|
_fortran_clacn2(n, <npy_complex64*>v, <npy_complex64*>x, est, kase, isave)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clacon "F_FUNC(clacon,CLACON)"(int *n, npy_complex64 *v, npy_complex64 *x, s *est, int *kase) nogil
|
||
|
|
cdef void clacon(int *n, c *v, c *x, s *est, int *kase) nogil:
|
||
|
|
_fortran_clacon(n, <npy_complex64*>v, <npy_complex64*>x, est, kase)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clacp2 "F_FUNC(clacp2,CLACP2)"(char *uplo, int *m, int *n, s *a, int *lda, npy_complex64 *b, int *ldb) nogil
|
||
|
|
cdef void clacp2(char *uplo, int *m, int *n, s *a, int *lda, c *b, int *ldb) nogil:
|
||
|
|
_fortran_clacp2(uplo, m, n, a, lda, <npy_complex64*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clacpy "F_FUNC(clacpy,CLACPY)"(char *uplo, int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb) nogil
|
||
|
|
cdef void clacpy(char *uplo, int *m, int *n, c *a, int *lda, c *b, int *ldb) nogil:
|
||
|
|
_fortran_clacpy(uplo, m, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clacrm "F_FUNC(clacrm,CLACRM)"(int *m, int *n, npy_complex64 *a, int *lda, s *b, int *ldb, npy_complex64 *c, int *ldc, s *rwork) nogil
|
||
|
|
cdef void clacrm(int *m, int *n, c *a, int *lda, s *b, int *ldb, c *c, int *ldc, s *rwork) nogil:
|
||
|
|
_fortran_clacrm(m, n, <npy_complex64*>a, lda, b, ldb, <npy_complex64*>c, ldc, rwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clacrt "F_FUNC(clacrt,CLACRT)"(int *n, npy_complex64 *cx, int *incx, npy_complex64 *cy, int *incy, npy_complex64 *c, npy_complex64 *s) nogil
|
||
|
|
cdef void clacrt(int *n, c *cx, int *incx, c *cy, int *incy, c *c, c *s) nogil:
|
||
|
|
_fortran_clacrt(n, <npy_complex64*>cx, incx, <npy_complex64*>cy, incy, <npy_complex64*>c, <npy_complex64*>s)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claed0 "F_FUNC(claed0,CLAED0)"(int *qsiz, int *n, s *d, s *e, npy_complex64 *q, int *ldq, npy_complex64 *qstore, int *ldqs, s *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void claed0(int *qsiz, int *n, s *d, s *e, c *q, int *ldq, c *qstore, int *ldqs, s *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_claed0(qsiz, n, d, e, <npy_complex64*>q, ldq, <npy_complex64*>qstore, ldqs, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claed7 "F_FUNC(claed7,CLAED7)"(int *n, int *cutpnt, int *qsiz, int *tlvls, int *curlvl, int *curpbm, s *d, npy_complex64 *q, int *ldq, s *rho, int *indxq, s *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, s *givnum, npy_complex64 *work, s *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void claed7(int *n, int *cutpnt, int *qsiz, int *tlvls, int *curlvl, int *curpbm, s *d, c *q, int *ldq, s *rho, int *indxq, s *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, s *givnum, c *work, s *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_claed7(n, cutpnt, qsiz, tlvls, curlvl, curpbm, d, <npy_complex64*>q, ldq, rho, indxq, qstore, qptr, prmptr, perm, givptr, givcol, givnum, <npy_complex64*>work, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claed8 "F_FUNC(claed8,CLAED8)"(int *k, int *n, int *qsiz, npy_complex64 *q, int *ldq, s *d, s *rho, int *cutpnt, s *z, s *dlamda, npy_complex64 *q2, int *ldq2, s *w, int *indxp, int *indx, int *indxq, int *perm, int *givptr, int *givcol, s *givnum, int *info) nogil
|
||
|
|
cdef void claed8(int *k, int *n, int *qsiz, c *q, int *ldq, s *d, s *rho, int *cutpnt, s *z, s *dlamda, c *q2, int *ldq2, s *w, int *indxp, int *indx, int *indxq, int *perm, int *givptr, int *givcol, s *givnum, int *info) nogil:
|
||
|
|
_fortran_claed8(k, n, qsiz, <npy_complex64*>q, ldq, d, rho, cutpnt, z, dlamda, <npy_complex64*>q2, ldq2, w, indxp, indx, indxq, perm, givptr, givcol, givnum, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claein "F_FUNC(claein,CLAEIN)"(bint *rightv, bint *noinit, int *n, npy_complex64 *h, int *ldh, npy_complex64 *w, npy_complex64 *v, npy_complex64 *b, int *ldb, s *rwork, s *eps3, s *smlnum, int *info) nogil
|
||
|
|
cdef void claein(bint *rightv, bint *noinit, int *n, c *h, int *ldh, c *w, c *v, c *b, int *ldb, s *rwork, s *eps3, s *smlnum, int *info) nogil:
|
||
|
|
_fortran_claein(rightv, noinit, n, <npy_complex64*>h, ldh, <npy_complex64*>w, <npy_complex64*>v, <npy_complex64*>b, ldb, rwork, eps3, smlnum, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claesy "F_FUNC(claesy,CLAESY)"(npy_complex64 *a, npy_complex64 *b, npy_complex64 *c, npy_complex64 *rt1, npy_complex64 *rt2, npy_complex64 *evscal, npy_complex64 *cs1, npy_complex64 *sn1) nogil
|
||
|
|
cdef void claesy(c *a, c *b, c *c, c *rt1, c *rt2, c *evscal, c *cs1, c *sn1) nogil:
|
||
|
|
_fortran_claesy(<npy_complex64*>a, <npy_complex64*>b, <npy_complex64*>c, <npy_complex64*>rt1, <npy_complex64*>rt2, <npy_complex64*>evscal, <npy_complex64*>cs1, <npy_complex64*>sn1)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claev2 "F_FUNC(claev2,CLAEV2)"(npy_complex64 *a, npy_complex64 *b, npy_complex64 *c, s *rt1, s *rt2, s *cs1, npy_complex64 *sn1) nogil
|
||
|
|
cdef void claev2(c *a, c *b, c *c, s *rt1, s *rt2, s *cs1, c *sn1) nogil:
|
||
|
|
_fortran_claev2(<npy_complex64*>a, <npy_complex64*>b, <npy_complex64*>c, rt1, rt2, cs1, <npy_complex64*>sn1)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clag2z "F_FUNC(clag2z,CLAG2Z)"(int *m, int *n, npy_complex64 *sa, int *ldsa, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void clag2z(int *m, int *n, c *sa, int *ldsa, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_clag2z(m, n, <npy_complex64*>sa, ldsa, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clags2 "F_FUNC(clags2,CLAGS2)"(bint *upper, s *a1, npy_complex64 *a2, s *a3, s *b1, npy_complex64 *b2, s *b3, s *csu, npy_complex64 *snu, s *csv, npy_complex64 *snv, s *csq, npy_complex64 *snq) nogil
|
||
|
|
cdef void clags2(bint *upper, s *a1, c *a2, s *a3, s *b1, c *b2, s *b3, s *csu, c *snu, s *csv, c *snv, s *csq, c *snq) nogil:
|
||
|
|
_fortran_clags2(upper, a1, <npy_complex64*>a2, a3, b1, <npy_complex64*>b2, b3, csu, <npy_complex64*>snu, csv, <npy_complex64*>snv, csq, <npy_complex64*>snq)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clagtm "F_FUNC(clagtm,CLAGTM)"(char *trans, int *n, int *nrhs, s *alpha, npy_complex64 *dl, npy_complex64 *d, npy_complex64 *du, npy_complex64 *x, int *ldx, s *beta, npy_complex64 *b, int *ldb) nogil
|
||
|
|
cdef void clagtm(char *trans, int *n, int *nrhs, s *alpha, c *dl, c *d, c *du, c *x, int *ldx, s *beta, c *b, int *ldb) nogil:
|
||
|
|
_fortran_clagtm(trans, n, nrhs, alpha, <npy_complex64*>dl, <npy_complex64*>d, <npy_complex64*>du, <npy_complex64*>x, ldx, beta, <npy_complex64*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clahef "F_FUNC(clahef,CLAHEF)"(char *uplo, int *n, int *nb, int *kb, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *w, int *ldw, int *info) nogil
|
||
|
|
cdef void clahef(char *uplo, int *n, int *nb, int *kb, c *a, int *lda, int *ipiv, c *w, int *ldw, int *info) nogil:
|
||
|
|
_fortran_clahef(uplo, n, nb, kb, <npy_complex64*>a, lda, ipiv, <npy_complex64*>w, ldw, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clahqr "F_FUNC(clahqr,CLAHQR)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, npy_complex64 *h, int *ldh, npy_complex64 *w, int *iloz, int *ihiz, npy_complex64 *z, int *ldz, int *info) nogil
|
||
|
|
cdef void clahqr(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, c *h, int *ldh, c *w, int *iloz, int *ihiz, c *z, int *ldz, int *info) nogil:
|
||
|
|
_fortran_clahqr(wantt, wantz, n, ilo, ihi, <npy_complex64*>h, ldh, <npy_complex64*>w, iloz, ihiz, <npy_complex64*>z, ldz, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clahr2 "F_FUNC(clahr2,CLAHR2)"(int *n, int *k, int *nb, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *t, int *ldt, npy_complex64 *y, int *ldy) nogil
|
||
|
|
cdef void clahr2(int *n, int *k, int *nb, c *a, int *lda, c *tau, c *t, int *ldt, c *y, int *ldy) nogil:
|
||
|
|
_fortran_clahr2(n, k, nb, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>t, ldt, <npy_complex64*>y, ldy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claic1 "F_FUNC(claic1,CLAIC1)"(int *job, int *j, npy_complex64 *x, s *sest, npy_complex64 *w, npy_complex64 *gamma, s *sestpr, npy_complex64 *s, npy_complex64 *c) nogil
|
||
|
|
cdef void claic1(int *job, int *j, c *x, s *sest, c *w, c *gamma, s *sestpr, c *s, c *c) nogil:
|
||
|
|
_fortran_claic1(job, j, <npy_complex64*>x, sest, <npy_complex64*>w, <npy_complex64*>gamma, sestpr, <npy_complex64*>s, <npy_complex64*>c)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clals0 "F_FUNC(clals0,CLALS0)"(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, npy_complex64 *b, int *ldb, npy_complex64 *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, s *givnum, int *ldgnum, s *poles, s *difl, s *difr, s *z, int *k, s *c, s *s, s *rwork, int *info) nogil
|
||
|
|
cdef void clals0(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, c *b, int *ldb, c *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, s *givnum, int *ldgnum, s *poles, s *difl, s *difr, s *z, int *k, s *c, s *s, s *rwork, int *info) nogil:
|
||
|
|
_fortran_clals0(icompq, nl, nr, sqre, nrhs, <npy_complex64*>b, ldb, <npy_complex64*>bx, ldbx, perm, givptr, givcol, ldgcol, givnum, ldgnum, poles, difl, difr, z, k, c, s, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clalsa "F_FUNC(clalsa,CLALSA)"(int *icompq, int *smlsiz, int *n, int *nrhs, npy_complex64 *b, int *ldb, npy_complex64 *bx, int *ldbx, s *u, int *ldu, s *vt, int *k, s *difl, s *difr, s *z, s *poles, int *givptr, int *givcol, int *ldgcol, int *perm, s *givnum, s *c, s *s, s *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void clalsa(int *icompq, int *smlsiz, int *n, int *nrhs, c *b, int *ldb, c *bx, int *ldbx, s *u, int *ldu, s *vt, int *k, s *difl, s *difr, s *z, s *poles, int *givptr, int *givcol, int *ldgcol, int *perm, s *givnum, s *c, s *s, s *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_clalsa(icompq, smlsiz, n, nrhs, <npy_complex64*>b, ldb, <npy_complex64*>bx, ldbx, u, ldu, vt, k, difl, difr, z, poles, givptr, givcol, ldgcol, perm, givnum, c, s, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clalsd "F_FUNC(clalsd,CLALSD)"(char *uplo, int *smlsiz, int *n, int *nrhs, s *d, s *e, npy_complex64 *b, int *ldb, s *rcond, int *rank, npy_complex64 *work, s *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void clalsd(char *uplo, int *smlsiz, int *n, int *nrhs, s *d, s *e, c *b, int *ldb, s *rcond, int *rank, c *work, s *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_clalsd(uplo, smlsiz, n, nrhs, d, e, <npy_complex64*>b, ldb, rcond, rank, <npy_complex64*>work, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clapll "F_FUNC(clapll,CLAPLL)"(int *n, npy_complex64 *x, int *incx, npy_complex64 *y, int *incy, s *ssmin) nogil
|
||
|
|
cdef void clapll(int *n, c *x, int *incx, c *y, int *incy, s *ssmin) nogil:
|
||
|
|
_fortran_clapll(n, <npy_complex64*>x, incx, <npy_complex64*>y, incy, ssmin)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clapmr "F_FUNC(clapmr,CLAPMR)"(bint *forwrd, int *m, int *n, npy_complex64 *x, int *ldx, int *k) nogil
|
||
|
|
cdef void clapmr(bint *forwrd, int *m, int *n, c *x, int *ldx, int *k) nogil:
|
||
|
|
_fortran_clapmr(forwrd, m, n, <npy_complex64*>x, ldx, k)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clapmt "F_FUNC(clapmt,CLAPMT)"(bint *forwrd, int *m, int *n, npy_complex64 *x, int *ldx, int *k) nogil
|
||
|
|
cdef void clapmt(bint *forwrd, int *m, int *n, c *x, int *ldx, int *k) nogil:
|
||
|
|
_fortran_clapmt(forwrd, m, n, <npy_complex64*>x, ldx, k)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqgb "F_FUNC(claqgb,CLAQGB)"(int *m, int *n, int *kl, int *ku, npy_complex64 *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, char *equed) nogil
|
||
|
|
cdef void claqgb(int *m, int *n, int *kl, int *ku, c *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, char *equed) nogil:
|
||
|
|
_fortran_claqgb(m, n, kl, ku, <npy_complex64*>ab, ldab, r, c, rowcnd, colcnd, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqge "F_FUNC(claqge,CLAQGE)"(int *m, int *n, npy_complex64 *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, char *equed) nogil
|
||
|
|
cdef void claqge(int *m, int *n, c *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, char *equed) nogil:
|
||
|
|
_fortran_claqge(m, n, <npy_complex64*>a, lda, r, c, rowcnd, colcnd, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqhb "F_FUNC(claqhb,CLAQHB)"(char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, s *s, s *scond, s *amax, char *equed) nogil
|
||
|
|
cdef void claqhb(char *uplo, int *n, int *kd, c *ab, int *ldab, s *s, s *scond, s *amax, char *equed) nogil:
|
||
|
|
_fortran_claqhb(uplo, n, kd, <npy_complex64*>ab, ldab, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqhe "F_FUNC(claqhe,CLAQHE)"(char *uplo, int *n, npy_complex64 *a, int *lda, s *s, s *scond, s *amax, char *equed) nogil
|
||
|
|
cdef void claqhe(char *uplo, int *n, c *a, int *lda, s *s, s *scond, s *amax, char *equed) nogil:
|
||
|
|
_fortran_claqhe(uplo, n, <npy_complex64*>a, lda, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqhp "F_FUNC(claqhp,CLAQHP)"(char *uplo, int *n, npy_complex64 *ap, s *s, s *scond, s *amax, char *equed) nogil
|
||
|
|
cdef void claqhp(char *uplo, int *n, c *ap, s *s, s *scond, s *amax, char *equed) nogil:
|
||
|
|
_fortran_claqhp(uplo, n, <npy_complex64*>ap, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqp2 "F_FUNC(claqp2,CLAQP2)"(int *m, int *n, int *offset, npy_complex64 *a, int *lda, int *jpvt, npy_complex64 *tau, s *vn1, s *vn2, npy_complex64 *work) nogil
|
||
|
|
cdef void claqp2(int *m, int *n, int *offset, c *a, int *lda, int *jpvt, c *tau, s *vn1, s *vn2, c *work) nogil:
|
||
|
|
_fortran_claqp2(m, n, offset, <npy_complex64*>a, lda, jpvt, <npy_complex64*>tau, vn1, vn2, <npy_complex64*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqps "F_FUNC(claqps,CLAQPS)"(int *m, int *n, int *offset, int *nb, int *kb, npy_complex64 *a, int *lda, int *jpvt, npy_complex64 *tau, s *vn1, s *vn2, npy_complex64 *auxv, npy_complex64 *f, int *ldf) nogil
|
||
|
|
cdef void claqps(int *m, int *n, int *offset, int *nb, int *kb, c *a, int *lda, int *jpvt, c *tau, s *vn1, s *vn2, c *auxv, c *f, int *ldf) nogil:
|
||
|
|
_fortran_claqps(m, n, offset, nb, kb, <npy_complex64*>a, lda, jpvt, <npy_complex64*>tau, vn1, vn2, <npy_complex64*>auxv, <npy_complex64*>f, ldf)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqr0 "F_FUNC(claqr0,CLAQR0)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, npy_complex64 *h, int *ldh, npy_complex64 *w, int *iloz, int *ihiz, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void claqr0(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, c *h, int *ldh, c *w, int *iloz, int *ihiz, c *z, int *ldz, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_claqr0(wantt, wantz, n, ilo, ihi, <npy_complex64*>h, ldh, <npy_complex64*>w, iloz, ihiz, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqr1 "F_FUNC(claqr1,CLAQR1)"(int *n, npy_complex64 *h, int *ldh, npy_complex64 *s1, npy_complex64 *s2, npy_complex64 *v) nogil
|
||
|
|
cdef void claqr1(int *n, c *h, int *ldh, c *s1, c *s2, c *v) nogil:
|
||
|
|
_fortran_claqr1(n, <npy_complex64*>h, ldh, <npy_complex64*>s1, <npy_complex64*>s2, <npy_complex64*>v)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqr2 "F_FUNC(claqr2,CLAQR2)"(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, npy_complex64 *h, int *ldh, int *iloz, int *ihiz, npy_complex64 *z, int *ldz, int *ns, int *nd, npy_complex64 *sh, npy_complex64 *v, int *ldv, int *nh, npy_complex64 *t, int *ldt, int *nv, npy_complex64 *wv, int *ldwv, npy_complex64 *work, int *lwork) nogil
|
||
|
|
cdef void claqr2(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, c *h, int *ldh, int *iloz, int *ihiz, c *z, int *ldz, int *ns, int *nd, c *sh, c *v, int *ldv, int *nh, c *t, int *ldt, int *nv, c *wv, int *ldwv, c *work, int *lwork) nogil:
|
||
|
|
_fortran_claqr2(wantt, wantz, n, ktop, kbot, nw, <npy_complex64*>h, ldh, iloz, ihiz, <npy_complex64*>z, ldz, ns, nd, <npy_complex64*>sh, <npy_complex64*>v, ldv, nh, <npy_complex64*>t, ldt, nv, <npy_complex64*>wv, ldwv, <npy_complex64*>work, lwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqr3 "F_FUNC(claqr3,CLAQR3)"(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, npy_complex64 *h, int *ldh, int *iloz, int *ihiz, npy_complex64 *z, int *ldz, int *ns, int *nd, npy_complex64 *sh, npy_complex64 *v, int *ldv, int *nh, npy_complex64 *t, int *ldt, int *nv, npy_complex64 *wv, int *ldwv, npy_complex64 *work, int *lwork) nogil
|
||
|
|
cdef void claqr3(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, c *h, int *ldh, int *iloz, int *ihiz, c *z, int *ldz, int *ns, int *nd, c *sh, c *v, int *ldv, int *nh, c *t, int *ldt, int *nv, c *wv, int *ldwv, c *work, int *lwork) nogil:
|
||
|
|
_fortran_claqr3(wantt, wantz, n, ktop, kbot, nw, <npy_complex64*>h, ldh, iloz, ihiz, <npy_complex64*>z, ldz, ns, nd, <npy_complex64*>sh, <npy_complex64*>v, ldv, nh, <npy_complex64*>t, ldt, nv, <npy_complex64*>wv, ldwv, <npy_complex64*>work, lwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqr4 "F_FUNC(claqr4,CLAQR4)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, npy_complex64 *h, int *ldh, npy_complex64 *w, int *iloz, int *ihiz, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void claqr4(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, c *h, int *ldh, c *w, int *iloz, int *ihiz, c *z, int *ldz, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_claqr4(wantt, wantz, n, ilo, ihi, <npy_complex64*>h, ldh, <npy_complex64*>w, iloz, ihiz, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqr5 "F_FUNC(claqr5,CLAQR5)"(bint *wantt, bint *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, npy_complex64 *s, npy_complex64 *h, int *ldh, int *iloz, int *ihiz, npy_complex64 *z, int *ldz, npy_complex64 *v, int *ldv, npy_complex64 *u, int *ldu, int *nv, npy_complex64 *wv, int *ldwv, int *nh, npy_complex64 *wh, int *ldwh) nogil
|
||
|
|
cdef void claqr5(bint *wantt, bint *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, c *s, c *h, int *ldh, int *iloz, int *ihiz, c *z, int *ldz, c *v, int *ldv, c *u, int *ldu, int *nv, c *wv, int *ldwv, int *nh, c *wh, int *ldwh) nogil:
|
||
|
|
_fortran_claqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, <npy_complex64*>s, <npy_complex64*>h, ldh, iloz, ihiz, <npy_complex64*>z, ldz, <npy_complex64*>v, ldv, <npy_complex64*>u, ldu, nv, <npy_complex64*>wv, ldwv, nh, <npy_complex64*>wh, ldwh)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqsb "F_FUNC(claqsb,CLAQSB)"(char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, s *s, s *scond, s *amax, char *equed) nogil
|
||
|
|
cdef void claqsb(char *uplo, int *n, int *kd, c *ab, int *ldab, s *s, s *scond, s *amax, char *equed) nogil:
|
||
|
|
_fortran_claqsb(uplo, n, kd, <npy_complex64*>ab, ldab, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqsp "F_FUNC(claqsp,CLAQSP)"(char *uplo, int *n, npy_complex64 *ap, s *s, s *scond, s *amax, char *equed) nogil
|
||
|
|
cdef void claqsp(char *uplo, int *n, c *ap, s *s, s *scond, s *amax, char *equed) nogil:
|
||
|
|
_fortran_claqsp(uplo, n, <npy_complex64*>ap, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claqsy "F_FUNC(claqsy,CLAQSY)"(char *uplo, int *n, npy_complex64 *a, int *lda, s *s, s *scond, s *amax, char *equed) nogil
|
||
|
|
cdef void claqsy(char *uplo, int *n, c *a, int *lda, s *s, s *scond, s *amax, char *equed) nogil:
|
||
|
|
_fortran_claqsy(uplo, n, <npy_complex64*>a, lda, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clar1v "F_FUNC(clar1v,CLAR1V)"(int *n, int *b1, int *bn, s *lambda_, s *d, s *l, s *ld, s *lld, s *pivmin, s *gaptol, npy_complex64 *z, bint *wantnc, int *negcnt, s *ztz, s *mingma, int *r, int *isuppz, s *nrminv, s *resid, s *rqcorr, s *work) nogil
|
||
|
|
cdef void clar1v(int *n, int *b1, int *bn, s *lambda_, s *d, s *l, s *ld, s *lld, s *pivmin, s *gaptol, c *z, bint *wantnc, int *negcnt, s *ztz, s *mingma, int *r, int *isuppz, s *nrminv, s *resid, s *rqcorr, s *work) nogil:
|
||
|
|
_fortran_clar1v(n, b1, bn, lambda_, d, l, ld, lld, pivmin, gaptol, <npy_complex64*>z, wantnc, negcnt, ztz, mingma, r, isuppz, nrminv, resid, rqcorr, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clar2v "F_FUNC(clar2v,CLAR2V)"(int *n, npy_complex64 *x, npy_complex64 *y, npy_complex64 *z, int *incx, s *c, npy_complex64 *s, int *incc) nogil
|
||
|
|
cdef void clar2v(int *n, c *x, c *y, c *z, int *incx, s *c, c *s, int *incc) nogil:
|
||
|
|
_fortran_clar2v(n, <npy_complex64*>x, <npy_complex64*>y, <npy_complex64*>z, incx, c, <npy_complex64*>s, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarcm "F_FUNC(clarcm,CLARCM)"(int *m, int *n, s *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *c, int *ldc, s *rwork) nogil
|
||
|
|
cdef void clarcm(int *m, int *n, s *a, int *lda, c *b, int *ldb, c *c, int *ldc, s *rwork) nogil:
|
||
|
|
_fortran_clarcm(m, n, a, lda, <npy_complex64*>b, ldb, <npy_complex64*>c, ldc, rwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarf "F_FUNC(clarf,CLARF)"(char *side, int *m, int *n, npy_complex64 *v, int *incv, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work) nogil
|
||
|
|
cdef void clarf(char *side, int *m, int *n, c *v, int *incv, c *tau, c *c, int *ldc, c *work) nogil:
|
||
|
|
_fortran_clarf(side, m, n, <npy_complex64*>v, incv, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarfb "F_FUNC(clarfb,CLARFB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, npy_complex64 *v, int *ldv, npy_complex64 *t, int *ldt, npy_complex64 *c, int *ldc, npy_complex64 *work, int *ldwork) nogil
|
||
|
|
cdef void clarfb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, c *v, int *ldv, c *t, int *ldt, c *c, int *ldc, c *work, int *ldwork) nogil:
|
||
|
|
_fortran_clarfb(side, trans, direct, storev, m, n, k, <npy_complex64*>v, ldv, <npy_complex64*>t, ldt, <npy_complex64*>c, ldc, <npy_complex64*>work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarfg "F_FUNC(clarfg,CLARFG)"(int *n, npy_complex64 *alpha, npy_complex64 *x, int *incx, npy_complex64 *tau) nogil
|
||
|
|
cdef void clarfg(int *n, c *alpha, c *x, int *incx, c *tau) nogil:
|
||
|
|
_fortran_clarfg(n, <npy_complex64*>alpha, <npy_complex64*>x, incx, <npy_complex64*>tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarfgp "F_FUNC(clarfgp,CLARFGP)"(int *n, npy_complex64 *alpha, npy_complex64 *x, int *incx, npy_complex64 *tau) nogil
|
||
|
|
cdef void clarfgp(int *n, c *alpha, c *x, int *incx, c *tau) nogil:
|
||
|
|
_fortran_clarfgp(n, <npy_complex64*>alpha, <npy_complex64*>x, incx, <npy_complex64*>tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarft "F_FUNC(clarft,CLARFT)"(char *direct, char *storev, int *n, int *k, npy_complex64 *v, int *ldv, npy_complex64 *tau, npy_complex64 *t, int *ldt) nogil
|
||
|
|
cdef void clarft(char *direct, char *storev, int *n, int *k, c *v, int *ldv, c *tau, c *t, int *ldt) nogil:
|
||
|
|
_fortran_clarft(direct, storev, n, k, <npy_complex64*>v, ldv, <npy_complex64*>tau, <npy_complex64*>t, ldt)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarfx "F_FUNC(clarfx,CLARFX)"(char *side, int *m, int *n, npy_complex64 *v, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work) nogil
|
||
|
|
cdef void clarfx(char *side, int *m, int *n, c *v, c *tau, c *c, int *ldc, c *work) nogil:
|
||
|
|
_fortran_clarfx(side, m, n, <npy_complex64*>v, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clargv "F_FUNC(clargv,CLARGV)"(int *n, npy_complex64 *x, int *incx, npy_complex64 *y, int *incy, s *c, int *incc) nogil
|
||
|
|
cdef void clargv(int *n, c *x, int *incx, c *y, int *incy, s *c, int *incc) nogil:
|
||
|
|
_fortran_clargv(n, <npy_complex64*>x, incx, <npy_complex64*>y, incy, c, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarnv "F_FUNC(clarnv,CLARNV)"(int *idist, int *iseed, int *n, npy_complex64 *x) nogil
|
||
|
|
cdef void clarnv(int *idist, int *iseed, int *n, c *x) nogil:
|
||
|
|
_fortran_clarnv(idist, iseed, n, <npy_complex64*>x)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarrv "F_FUNC(clarrv,CLARRV)"(int *n, s *vl, s *vu, s *d, s *l, s *pivmin, int *isplit, int *m, int *dol, int *dou, s *minrgp, s *rtol1, s *rtol2, s *w, s *werr, s *wgap, int *iblock, int *indexw, s *gers, npy_complex64 *z, int *ldz, int *isuppz, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void clarrv(int *n, s *vl, s *vu, s *d, s *l, s *pivmin, int *isplit, int *m, int *dol, int *dou, s *minrgp, s *rtol1, s *rtol2, s *w, s *werr, s *wgap, int *iblock, int *indexw, s *gers, c *z, int *ldz, int *isuppz, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_clarrv(n, vl, vu, d, l, pivmin, isplit, m, dol, dou, minrgp, rtol1, rtol2, w, werr, wgap, iblock, indexw, gers, <npy_complex64*>z, ldz, isuppz, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clartg "F_FUNC(clartg,CLARTG)"(npy_complex64 *f, npy_complex64 *g, s *cs, npy_complex64 *sn, npy_complex64 *r) nogil
|
||
|
|
cdef void clartg(c *f, c *g, s *cs, c *sn, c *r) nogil:
|
||
|
|
_fortran_clartg(<npy_complex64*>f, <npy_complex64*>g, cs, <npy_complex64*>sn, <npy_complex64*>r)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clartv "F_FUNC(clartv,CLARTV)"(int *n, npy_complex64 *x, int *incx, npy_complex64 *y, int *incy, s *c, npy_complex64 *s, int *incc) nogil
|
||
|
|
cdef void clartv(int *n, c *x, int *incx, c *y, int *incy, s *c, c *s, int *incc) nogil:
|
||
|
|
_fortran_clartv(n, <npy_complex64*>x, incx, <npy_complex64*>y, incy, c, <npy_complex64*>s, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarz "F_FUNC(clarz,CLARZ)"(char *side, int *m, int *n, int *l, npy_complex64 *v, int *incv, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work) nogil
|
||
|
|
cdef void clarz(char *side, int *m, int *n, int *l, c *v, int *incv, c *tau, c *c, int *ldc, c *work) nogil:
|
||
|
|
_fortran_clarz(side, m, n, l, <npy_complex64*>v, incv, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarzb "F_FUNC(clarzb,CLARZB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, npy_complex64 *v, int *ldv, npy_complex64 *t, int *ldt, npy_complex64 *c, int *ldc, npy_complex64 *work, int *ldwork) nogil
|
||
|
|
cdef void clarzb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, c *v, int *ldv, c *t, int *ldt, c *c, int *ldc, c *work, int *ldwork) nogil:
|
||
|
|
_fortran_clarzb(side, trans, direct, storev, m, n, k, l, <npy_complex64*>v, ldv, <npy_complex64*>t, ldt, <npy_complex64*>c, ldc, <npy_complex64*>work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clarzt "F_FUNC(clarzt,CLARZT)"(char *direct, char *storev, int *n, int *k, npy_complex64 *v, int *ldv, npy_complex64 *tau, npy_complex64 *t, int *ldt) nogil
|
||
|
|
cdef void clarzt(char *direct, char *storev, int *n, int *k, c *v, int *ldv, c *tau, c *t, int *ldt) nogil:
|
||
|
|
_fortran_clarzt(direct, storev, n, k, <npy_complex64*>v, ldv, <npy_complex64*>tau, <npy_complex64*>t, ldt)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clascl "F_FUNC(clascl,CLASCL)"(char *type_bn, int *kl, int *ku, s *cfrom, s *cto, int *m, int *n, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void clascl(char *type_bn, int *kl, int *ku, s *cfrom, s *cto, int *m, int *n, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_clascl(type_bn, kl, ku, cfrom, cto, m, n, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claset "F_FUNC(claset,CLASET)"(char *uplo, int *m, int *n, npy_complex64 *alpha, npy_complex64 *beta, npy_complex64 *a, int *lda) nogil
|
||
|
|
cdef void claset(char *uplo, int *m, int *n, c *alpha, c *beta, c *a, int *lda) nogil:
|
||
|
|
_fortran_claset(uplo, m, n, <npy_complex64*>alpha, <npy_complex64*>beta, <npy_complex64*>a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clasr "F_FUNC(clasr,CLASR)"(char *side, char *pivot, char *direct, int *m, int *n, s *c, s *s, npy_complex64 *a, int *lda) nogil
|
||
|
|
cdef void clasr(char *side, char *pivot, char *direct, int *m, int *n, s *c, s *s, c *a, int *lda) nogil:
|
||
|
|
_fortran_clasr(side, pivot, direct, m, n, c, s, <npy_complex64*>a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_classq "F_FUNC(classq,CLASSQ)"(int *n, npy_complex64 *x, int *incx, s *scale, s *sumsq) nogil
|
||
|
|
cdef void classq(int *n, c *x, int *incx, s *scale, s *sumsq) nogil:
|
||
|
|
_fortran_classq(n, <npy_complex64*>x, incx, scale, sumsq)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_claswp "F_FUNC(claswp,CLASWP)"(int *n, npy_complex64 *a, int *lda, int *k1, int *k2, int *ipiv, int *incx) nogil
|
||
|
|
cdef void claswp(int *n, c *a, int *lda, int *k1, int *k2, int *ipiv, int *incx) nogil:
|
||
|
|
_fortran_claswp(n, <npy_complex64*>a, lda, k1, k2, ipiv, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clasyf "F_FUNC(clasyf,CLASYF)"(char *uplo, int *n, int *nb, int *kb, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *w, int *ldw, int *info) nogil
|
||
|
|
cdef void clasyf(char *uplo, int *n, int *nb, int *kb, c *a, int *lda, int *ipiv, c *w, int *ldw, int *info) nogil:
|
||
|
|
_fortran_clasyf(uplo, n, nb, kb, <npy_complex64*>a, lda, ipiv, <npy_complex64*>w, ldw, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clatbs "F_FUNC(clatbs,CLATBS)"(char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, npy_complex64 *ab, int *ldab, npy_complex64 *x, s *scale, s *cnorm, int *info) nogil
|
||
|
|
cdef void clatbs(char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, c *ab, int *ldab, c *x, s *scale, s *cnorm, int *info) nogil:
|
||
|
|
_fortran_clatbs(uplo, trans, diag, normin, n, kd, <npy_complex64*>ab, ldab, <npy_complex64*>x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clatdf "F_FUNC(clatdf,CLATDF)"(int *ijob, int *n, npy_complex64 *z, int *ldz, npy_complex64 *rhs, s *rdsum, s *rdscal, int *ipiv, int *jpiv) nogil
|
||
|
|
cdef void clatdf(int *ijob, int *n, c *z, int *ldz, c *rhs, s *rdsum, s *rdscal, int *ipiv, int *jpiv) nogil:
|
||
|
|
_fortran_clatdf(ijob, n, <npy_complex64*>z, ldz, <npy_complex64*>rhs, rdsum, rdscal, ipiv, jpiv)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clatps "F_FUNC(clatps,CLATPS)"(char *uplo, char *trans, char *diag, char *normin, int *n, npy_complex64 *ap, npy_complex64 *x, s *scale, s *cnorm, int *info) nogil
|
||
|
|
cdef void clatps(char *uplo, char *trans, char *diag, char *normin, int *n, c *ap, c *x, s *scale, s *cnorm, int *info) nogil:
|
||
|
|
_fortran_clatps(uplo, trans, diag, normin, n, <npy_complex64*>ap, <npy_complex64*>x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clatrd "F_FUNC(clatrd,CLATRD)"(char *uplo, int *n, int *nb, npy_complex64 *a, int *lda, s *e, npy_complex64 *tau, npy_complex64 *w, int *ldw) nogil
|
||
|
|
cdef void clatrd(char *uplo, int *n, int *nb, c *a, int *lda, s *e, c *tau, c *w, int *ldw) nogil:
|
||
|
|
_fortran_clatrd(uplo, n, nb, <npy_complex64*>a, lda, e, <npy_complex64*>tau, <npy_complex64*>w, ldw)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clatrs "F_FUNC(clatrs,CLATRS)"(char *uplo, char *trans, char *diag, char *normin, int *n, npy_complex64 *a, int *lda, npy_complex64 *x, s *scale, s *cnorm, int *info) nogil
|
||
|
|
cdef void clatrs(char *uplo, char *trans, char *diag, char *normin, int *n, c *a, int *lda, c *x, s *scale, s *cnorm, int *info) nogil:
|
||
|
|
_fortran_clatrs(uplo, trans, diag, normin, n, <npy_complex64*>a, lda, <npy_complex64*>x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clatrz "F_FUNC(clatrz,CLATRZ)"(int *m, int *n, int *l, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work) nogil
|
||
|
|
cdef void clatrz(int *m, int *n, int *l, c *a, int *lda, c *tau, c *work) nogil:
|
||
|
|
_fortran_clatrz(m, n, l, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clauu2 "F_FUNC(clauu2,CLAUU2)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void clauu2(char *uplo, int *n, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_clauu2(uplo, n, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_clauum "F_FUNC(clauum,CLAUUM)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void clauum(char *uplo, int *n, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_clauum(uplo, n, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpbcon "F_FUNC(cpbcon,CPBCON)"(char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, s *anorm, s *rcond, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cpbcon(char *uplo, int *n, int *kd, c *ab, int *ldab, s *anorm, s *rcond, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cpbcon(uplo, n, kd, <npy_complex64*>ab, ldab, anorm, rcond, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpbequ "F_FUNC(cpbequ,CPBEQU)"(char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, s *s, s *scond, s *amax, int *info) nogil
|
||
|
|
cdef void cpbequ(char *uplo, int *n, int *kd, c *ab, int *ldab, s *s, s *scond, s *amax, int *info) nogil:
|
||
|
|
_fortran_cpbequ(uplo, n, kd, <npy_complex64*>ab, ldab, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpbrfs "F_FUNC(cpbrfs,CPBRFS)"(char *uplo, int *n, int *kd, int *nrhs, npy_complex64 *ab, int *ldab, npy_complex64 *afb, int *ldafb, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cpbrfs(char *uplo, int *n, int *kd, int *nrhs, c *ab, int *ldab, c *afb, int *ldafb, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cpbrfs(uplo, n, kd, nrhs, <npy_complex64*>ab, ldab, <npy_complex64*>afb, ldafb, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpbstf "F_FUNC(cpbstf,CPBSTF)"(char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void cpbstf(char *uplo, int *n, int *kd, c *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_cpbstf(uplo, n, kd, <npy_complex64*>ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpbsv "F_FUNC(cpbsv,CPBSV)"(char *uplo, int *n, int *kd, int *nrhs, npy_complex64 *ab, int *ldab, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cpbsv(char *uplo, int *n, int *kd, int *nrhs, c *ab, int *ldab, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cpbsv(uplo, n, kd, nrhs, <npy_complex64*>ab, ldab, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpbsvx "F_FUNC(cpbsvx,CPBSVX)"(char *fact, char *uplo, int *n, int *kd, int *nrhs, npy_complex64 *ab, int *ldab, npy_complex64 *afb, int *ldafb, char *equed, s *s, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cpbsvx(char *fact, char *uplo, int *n, int *kd, int *nrhs, c *ab, int *ldab, c *afb, int *ldafb, char *equed, s *s, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cpbsvx(fact, uplo, n, kd, nrhs, <npy_complex64*>ab, ldab, <npy_complex64*>afb, ldafb, equed, s, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpbtf2 "F_FUNC(cpbtf2,CPBTF2)"(char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void cpbtf2(char *uplo, int *n, int *kd, c *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_cpbtf2(uplo, n, kd, <npy_complex64*>ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpbtrf "F_FUNC(cpbtrf,CPBTRF)"(char *uplo, int *n, int *kd, npy_complex64 *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void cpbtrf(char *uplo, int *n, int *kd, c *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_cpbtrf(uplo, n, kd, <npy_complex64*>ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpbtrs "F_FUNC(cpbtrs,CPBTRS)"(char *uplo, int *n, int *kd, int *nrhs, npy_complex64 *ab, int *ldab, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cpbtrs(char *uplo, int *n, int *kd, int *nrhs, c *ab, int *ldab, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cpbtrs(uplo, n, kd, nrhs, <npy_complex64*>ab, ldab, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpftrf "F_FUNC(cpftrf,CPFTRF)"(char *transr, char *uplo, int *n, npy_complex64 *a, int *info) nogil
|
||
|
|
cdef void cpftrf(char *transr, char *uplo, int *n, c *a, int *info) nogil:
|
||
|
|
_fortran_cpftrf(transr, uplo, n, <npy_complex64*>a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpftri "F_FUNC(cpftri,CPFTRI)"(char *transr, char *uplo, int *n, npy_complex64 *a, int *info) nogil
|
||
|
|
cdef void cpftri(char *transr, char *uplo, int *n, c *a, int *info) nogil:
|
||
|
|
_fortran_cpftri(transr, uplo, n, <npy_complex64*>a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpftrs "F_FUNC(cpftrs,CPFTRS)"(char *transr, char *uplo, int *n, int *nrhs, npy_complex64 *a, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cpftrs(char *transr, char *uplo, int *n, int *nrhs, c *a, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cpftrs(transr, uplo, n, nrhs, <npy_complex64*>a, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpocon "F_FUNC(cpocon,CPOCON)"(char *uplo, int *n, npy_complex64 *a, int *lda, s *anorm, s *rcond, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cpocon(char *uplo, int *n, c *a, int *lda, s *anorm, s *rcond, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cpocon(uplo, n, <npy_complex64*>a, lda, anorm, rcond, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpoequ "F_FUNC(cpoequ,CPOEQU)"(int *n, npy_complex64 *a, int *lda, s *s, s *scond, s *amax, int *info) nogil
|
||
|
|
cdef void cpoequ(int *n, c *a, int *lda, s *s, s *scond, s *amax, int *info) nogil:
|
||
|
|
_fortran_cpoequ(n, <npy_complex64*>a, lda, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpoequb "F_FUNC(cpoequb,CPOEQUB)"(int *n, npy_complex64 *a, int *lda, s *s, s *scond, s *amax, int *info) nogil
|
||
|
|
cdef void cpoequb(int *n, c *a, int *lda, s *s, s *scond, s *amax, int *info) nogil:
|
||
|
|
_fortran_cpoequb(n, <npy_complex64*>a, lda, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cporfs "F_FUNC(cporfs,CPORFS)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *af, int *ldaf, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cporfs(char *uplo, int *n, int *nrhs, c *a, int *lda, c *af, int *ldaf, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cporfs(uplo, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>af, ldaf, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cposv "F_FUNC(cposv,CPOSV)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cposv(char *uplo, int *n, int *nrhs, c *a, int *lda, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cposv(uplo, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cposvx "F_FUNC(cposvx,CPOSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *af, int *ldaf, char *equed, s *s, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cposvx(char *fact, char *uplo, int *n, int *nrhs, c *a, int *lda, c *af, int *ldaf, char *equed, s *s, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cposvx(fact, uplo, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>af, ldaf, equed, s, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpotf2 "F_FUNC(cpotf2,CPOTF2)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void cpotf2(char *uplo, int *n, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_cpotf2(uplo, n, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpotrf "F_FUNC(cpotrf,CPOTRF)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void cpotrf(char *uplo, int *n, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_cpotrf(uplo, n, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpotri "F_FUNC(cpotri,CPOTRI)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void cpotri(char *uplo, int *n, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_cpotri(uplo, n, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpotrs "F_FUNC(cpotrs,CPOTRS)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cpotrs(char *uplo, int *n, int *nrhs, c *a, int *lda, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cpotrs(uplo, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cppcon "F_FUNC(cppcon,CPPCON)"(char *uplo, int *n, npy_complex64 *ap, s *anorm, s *rcond, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cppcon(char *uplo, int *n, c *ap, s *anorm, s *rcond, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cppcon(uplo, n, <npy_complex64*>ap, anorm, rcond, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cppequ "F_FUNC(cppequ,CPPEQU)"(char *uplo, int *n, npy_complex64 *ap, s *s, s *scond, s *amax, int *info) nogil
|
||
|
|
cdef void cppequ(char *uplo, int *n, c *ap, s *s, s *scond, s *amax, int *info) nogil:
|
||
|
|
_fortran_cppequ(uplo, n, <npy_complex64*>ap, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpprfs "F_FUNC(cpprfs,CPPRFS)"(char *uplo, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *afp, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cpprfs(char *uplo, int *n, int *nrhs, c *ap, c *afp, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cpprfs(uplo, n, nrhs, <npy_complex64*>ap, <npy_complex64*>afp, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cppsv "F_FUNC(cppsv,CPPSV)"(char *uplo, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cppsv(char *uplo, int *n, int *nrhs, c *ap, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cppsv(uplo, n, nrhs, <npy_complex64*>ap, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cppsvx "F_FUNC(cppsvx,CPPSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *afp, char *equed, s *s, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cppsvx(char *fact, char *uplo, int *n, int *nrhs, c *ap, c *afp, char *equed, s *s, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cppsvx(fact, uplo, n, nrhs, <npy_complex64*>ap, <npy_complex64*>afp, equed, s, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpptrf "F_FUNC(cpptrf,CPPTRF)"(char *uplo, int *n, npy_complex64 *ap, int *info) nogil
|
||
|
|
cdef void cpptrf(char *uplo, int *n, c *ap, int *info) nogil:
|
||
|
|
_fortran_cpptrf(uplo, n, <npy_complex64*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpptri "F_FUNC(cpptri,CPPTRI)"(char *uplo, int *n, npy_complex64 *ap, int *info) nogil
|
||
|
|
cdef void cpptri(char *uplo, int *n, c *ap, int *info) nogil:
|
||
|
|
_fortran_cpptri(uplo, n, <npy_complex64*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpptrs "F_FUNC(cpptrs,CPPTRS)"(char *uplo, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cpptrs(char *uplo, int *n, int *nrhs, c *ap, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cpptrs(uplo, n, nrhs, <npy_complex64*>ap, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpstf2 "F_FUNC(cpstf2,CPSTF2)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *piv, int *rank, s *tol, s *work, int *info) nogil
|
||
|
|
cdef void cpstf2(char *uplo, int *n, c *a, int *lda, int *piv, int *rank, s *tol, s *work, int *info) nogil:
|
||
|
|
_fortran_cpstf2(uplo, n, <npy_complex64*>a, lda, piv, rank, tol, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpstrf "F_FUNC(cpstrf,CPSTRF)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *piv, int *rank, s *tol, s *work, int *info) nogil
|
||
|
|
cdef void cpstrf(char *uplo, int *n, c *a, int *lda, int *piv, int *rank, s *tol, s *work, int *info) nogil:
|
||
|
|
_fortran_cpstrf(uplo, n, <npy_complex64*>a, lda, piv, rank, tol, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cptcon "F_FUNC(cptcon,CPTCON)"(int *n, s *d, npy_complex64 *e, s *anorm, s *rcond, s *rwork, int *info) nogil
|
||
|
|
cdef void cptcon(int *n, s *d, c *e, s *anorm, s *rcond, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cptcon(n, d, <npy_complex64*>e, anorm, rcond, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpteqr "F_FUNC(cpteqr,CPTEQR)"(char *compz, int *n, s *d, s *e, npy_complex64 *z, int *ldz, s *work, int *info) nogil
|
||
|
|
cdef void cpteqr(char *compz, int *n, s *d, s *e, c *z, int *ldz, s *work, int *info) nogil:
|
||
|
|
_fortran_cpteqr(compz, n, d, e, <npy_complex64*>z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cptrfs "F_FUNC(cptrfs,CPTRFS)"(char *uplo, int *n, int *nrhs, s *d, npy_complex64 *e, s *df, npy_complex64 *ef, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cptrfs(char *uplo, int *n, int *nrhs, s *d, c *e, s *df, c *ef, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cptrfs(uplo, n, nrhs, d, <npy_complex64*>e, df, <npy_complex64*>ef, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cptsv "F_FUNC(cptsv,CPTSV)"(int *n, int *nrhs, s *d, npy_complex64 *e, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cptsv(int *n, int *nrhs, s *d, c *e, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cptsv(n, nrhs, d, <npy_complex64*>e, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cptsvx "F_FUNC(cptsvx,CPTSVX)"(char *fact, int *n, int *nrhs, s *d, npy_complex64 *e, s *df, npy_complex64 *ef, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cptsvx(char *fact, int *n, int *nrhs, s *d, c *e, s *df, c *ef, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cptsvx(fact, n, nrhs, d, <npy_complex64*>e, df, <npy_complex64*>ef, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpttrf "F_FUNC(cpttrf,CPTTRF)"(int *n, s *d, npy_complex64 *e, int *info) nogil
|
||
|
|
cdef void cpttrf(int *n, s *d, c *e, int *info) nogil:
|
||
|
|
_fortran_cpttrf(n, d, <npy_complex64*>e, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cpttrs "F_FUNC(cpttrs,CPTTRS)"(char *uplo, int *n, int *nrhs, s *d, npy_complex64 *e, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cpttrs(char *uplo, int *n, int *nrhs, s *d, c *e, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cpttrs(uplo, n, nrhs, d, <npy_complex64*>e, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cptts2 "F_FUNC(cptts2,CPTTS2)"(int *iuplo, int *n, int *nrhs, s *d, npy_complex64 *e, npy_complex64 *b, int *ldb) nogil
|
||
|
|
cdef void cptts2(int *iuplo, int *n, int *nrhs, s *d, c *e, c *b, int *ldb) nogil:
|
||
|
|
_fortran_cptts2(iuplo, n, nrhs, d, <npy_complex64*>e, <npy_complex64*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_crot "F_FUNC(crot,CROT)"(int *n, npy_complex64 *cx, int *incx, npy_complex64 *cy, int *incy, s *c, npy_complex64 *s) nogil
|
||
|
|
cdef void crot(int *n, c *cx, int *incx, c *cy, int *incy, s *c, c *s) nogil:
|
||
|
|
_fortran_crot(n, <npy_complex64*>cx, incx, <npy_complex64*>cy, incy, c, <npy_complex64*>s)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cspcon "F_FUNC(cspcon,CSPCON)"(char *uplo, int *n, npy_complex64 *ap, int *ipiv, s *anorm, s *rcond, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cspcon(char *uplo, int *n, c *ap, int *ipiv, s *anorm, s *rcond, c *work, int *info) nogil:
|
||
|
|
_fortran_cspcon(uplo, n, <npy_complex64*>ap, ipiv, anorm, rcond, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cspmv "F_FUNC(cspmv,CSPMV)"(char *uplo, int *n, npy_complex64 *alpha, npy_complex64 *ap, npy_complex64 *x, int *incx, npy_complex64 *beta, npy_complex64 *y, int *incy) nogil
|
||
|
|
cdef void cspmv(char *uplo, int *n, c *alpha, c *ap, c *x, int *incx, c *beta, c *y, int *incy) nogil:
|
||
|
|
_fortran_cspmv(uplo, n, <npy_complex64*>alpha, <npy_complex64*>ap, <npy_complex64*>x, incx, <npy_complex64*>beta, <npy_complex64*>y, incy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cspr "F_FUNC(cspr,CSPR)"(char *uplo, int *n, npy_complex64 *alpha, npy_complex64 *x, int *incx, npy_complex64 *ap) nogil
|
||
|
|
cdef void cspr(char *uplo, int *n, c *alpha, c *x, int *incx, c *ap) nogil:
|
||
|
|
_fortran_cspr(uplo, n, <npy_complex64*>alpha, <npy_complex64*>x, incx, <npy_complex64*>ap)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csprfs "F_FUNC(csprfs,CSPRFS)"(char *uplo, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *afp, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void csprfs(char *uplo, int *n, int *nrhs, c *ap, c *afp, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_csprfs(uplo, n, nrhs, <npy_complex64*>ap, <npy_complex64*>afp, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cspsv "F_FUNC(cspsv,CSPSV)"(char *uplo, int *n, int *nrhs, npy_complex64 *ap, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void cspsv(char *uplo, int *n, int *nrhs, c *ap, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_cspsv(uplo, n, nrhs, <npy_complex64*>ap, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cspsvx "F_FUNC(cspsvx,CSPSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *afp, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void cspsvx(char *fact, char *uplo, int *n, int *nrhs, c *ap, c *afp, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_cspsvx(fact, uplo, n, nrhs, <npy_complex64*>ap, <npy_complex64*>afp, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csptrf "F_FUNC(csptrf,CSPTRF)"(char *uplo, int *n, npy_complex64 *ap, int *ipiv, int *info) nogil
|
||
|
|
cdef void csptrf(char *uplo, int *n, c *ap, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_csptrf(uplo, n, <npy_complex64*>ap, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csptri "F_FUNC(csptri,CSPTRI)"(char *uplo, int *n, npy_complex64 *ap, int *ipiv, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void csptri(char *uplo, int *n, c *ap, int *ipiv, c *work, int *info) nogil:
|
||
|
|
_fortran_csptri(uplo, n, <npy_complex64*>ap, ipiv, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csptrs "F_FUNC(csptrs,CSPTRS)"(char *uplo, int *n, int *nrhs, npy_complex64 *ap, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void csptrs(char *uplo, int *n, int *nrhs, c *ap, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_csptrs(uplo, n, nrhs, <npy_complex64*>ap, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csrscl "F_FUNC(csrscl,CSRSCL)"(int *n, s *sa, npy_complex64 *sx, int *incx) nogil
|
||
|
|
cdef void csrscl(int *n, s *sa, c *sx, int *incx) nogil:
|
||
|
|
_fortran_csrscl(n, sa, <npy_complex64*>sx, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cstedc "F_FUNC(cstedc,CSTEDC)"(char *compz, int *n, s *d, s *e, npy_complex64 *z, int *ldz, npy_complex64 *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void cstedc(char *compz, int *n, s *d, s *e, c *z, int *ldz, c *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_cstedc(compz, n, d, e, <npy_complex64*>z, ldz, <npy_complex64*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cstegr "F_FUNC(cstegr,CSTEGR)"(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, npy_complex64 *z, int *ldz, int *isuppz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void cstegr(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, c *z, int *ldz, int *isuppz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_cstegr(jobz, range, n, d, e, vl, vu, il, iu, abstol, m, w, <npy_complex64*>z, ldz, isuppz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cstein "F_FUNC(cstein,CSTEIN)"(int *n, s *d, s *e, int *m, s *w, int *iblock, int *isplit, npy_complex64 *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void cstein(int *n, s *d, s *e, int *m, s *w, int *iblock, int *isplit, c *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_cstein(n, d, e, m, w, iblock, isplit, <npy_complex64*>z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cstemr "F_FUNC(cstemr,CSTEMR)"(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, int *m, s *w, npy_complex64 *z, int *ldz, int *nzc, int *isuppz, bint *tryrac, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void cstemr(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, int *m, s *w, c *z, int *ldz, int *nzc, int *isuppz, bint *tryrac, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_cstemr(jobz, range, n, d, e, vl, vu, il, iu, m, w, <npy_complex64*>z, ldz, nzc, isuppz, tryrac, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csteqr "F_FUNC(csteqr,CSTEQR)"(char *compz, int *n, s *d, s *e, npy_complex64 *z, int *ldz, s *work, int *info) nogil
|
||
|
|
cdef void csteqr(char *compz, int *n, s *d, s *e, c *z, int *ldz, s *work, int *info) nogil:
|
||
|
|
_fortran_csteqr(compz, n, d, e, <npy_complex64*>z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csycon "F_FUNC(csycon,CSYCON)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, s *anorm, s *rcond, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void csycon(char *uplo, int *n, c *a, int *lda, int *ipiv, s *anorm, s *rcond, c *work, int *info) nogil:
|
||
|
|
_fortran_csycon(uplo, n, <npy_complex64*>a, lda, ipiv, anorm, rcond, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csyconv "F_FUNC(csyconv,CSYCONV)"(char *uplo, char *way, int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void csyconv(char *uplo, char *way, int *n, c *a, int *lda, int *ipiv, c *work, int *info) nogil:
|
||
|
|
_fortran_csyconv(uplo, way, n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csyequb "F_FUNC(csyequb,CSYEQUB)"(char *uplo, int *n, npy_complex64 *a, int *lda, s *s, s *scond, s *amax, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void csyequb(char *uplo, int *n, c *a, int *lda, s *s, s *scond, s *amax, c *work, int *info) nogil:
|
||
|
|
_fortran_csyequb(uplo, n, <npy_complex64*>a, lda, s, scond, amax, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csymv "F_FUNC(csymv,CSYMV)"(char *uplo, int *n, npy_complex64 *alpha, npy_complex64 *a, int *lda, npy_complex64 *x, int *incx, npy_complex64 *beta, npy_complex64 *y, int *incy) nogil
|
||
|
|
cdef void csymv(char *uplo, int *n, c *alpha, c *a, int *lda, c *x, int *incx, c *beta, c *y, int *incy) nogil:
|
||
|
|
_fortran_csymv(uplo, n, <npy_complex64*>alpha, <npy_complex64*>a, lda, <npy_complex64*>x, incx, <npy_complex64*>beta, <npy_complex64*>y, incy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csyr "F_FUNC(csyr,CSYR)"(char *uplo, int *n, npy_complex64 *alpha, npy_complex64 *x, int *incx, npy_complex64 *a, int *lda) nogil
|
||
|
|
cdef void csyr(char *uplo, int *n, c *alpha, c *x, int *incx, c *a, int *lda) nogil:
|
||
|
|
_fortran_csyr(uplo, n, <npy_complex64*>alpha, <npy_complex64*>x, incx, <npy_complex64*>a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csyrfs "F_FUNC(csyrfs,CSYRFS)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *af, int *ldaf, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void csyrfs(char *uplo, int *n, int *nrhs, c *a, int *lda, c *af, int *ldaf, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_csyrfs(uplo, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>af, ldaf, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csysv "F_FUNC(csysv,CSYSV)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void csysv(char *uplo, int *n, int *nrhs, c *a, int *lda, int *ipiv, c *b, int *ldb, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_csysv(uplo, n, nrhs, <npy_complex64*>a, lda, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csysvx "F_FUNC(csysvx,CSYSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *af, int *ldaf, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *rcond, s *ferr, s *berr, npy_complex64 *work, int *lwork, s *rwork, int *info) nogil
|
||
|
|
cdef void csysvx(char *fact, char *uplo, int *n, int *nrhs, c *a, int *lda, c *af, int *ldaf, int *ipiv, c *b, int *ldb, c *x, int *ldx, s *rcond, s *ferr, s *berr, c *work, int *lwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_csysvx(fact, uplo, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>af, ldaf, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, rcond, ferr, berr, <npy_complex64*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csyswapr "F_FUNC(csyswapr,CSYSWAPR)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *i1, int *i2) nogil
|
||
|
|
cdef void csyswapr(char *uplo, int *n, c *a, int *lda, int *i1, int *i2) nogil:
|
||
|
|
_fortran_csyswapr(uplo, n, <npy_complex64*>a, lda, i1, i2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csytf2 "F_FUNC(csytf2,CSYTF2)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void csytf2(char *uplo, int *n, c *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_csytf2(uplo, n, <npy_complex64*>a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csytrf "F_FUNC(csytrf,CSYTRF)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void csytrf(char *uplo, int *n, c *a, int *lda, int *ipiv, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_csytrf(uplo, n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csytri "F_FUNC(csytri,CSYTRI)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void csytri(char *uplo, int *n, c *a, int *lda, int *ipiv, c *work, int *info) nogil:
|
||
|
|
_fortran_csytri(uplo, n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csytri2 "F_FUNC(csytri2,CSYTRI2)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void csytri2(char *uplo, int *n, c *a, int *lda, int *ipiv, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_csytri2(uplo, n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csytri2x "F_FUNC(csytri2x,CSYTRI2X)"(char *uplo, int *n, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *work, int *nb, int *info) nogil
|
||
|
|
cdef void csytri2x(char *uplo, int *n, c *a, int *lda, int *ipiv, c *work, int *nb, int *info) nogil:
|
||
|
|
_fortran_csytri2x(uplo, n, <npy_complex64*>a, lda, ipiv, <npy_complex64*>work, nb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csytrs "F_FUNC(csytrs,CSYTRS)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void csytrs(char *uplo, int *n, int *nrhs, c *a, int *lda, int *ipiv, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_csytrs(uplo, n, nrhs, <npy_complex64*>a, lda, ipiv, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_csytrs2 "F_FUNC(csytrs2,CSYTRS2)"(char *uplo, int *n, int *nrhs, npy_complex64 *a, int *lda, int *ipiv, npy_complex64 *b, int *ldb, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void csytrs2(char *uplo, int *n, int *nrhs, c *a, int *lda, int *ipiv, c *b, int *ldb, c *work, int *info) nogil:
|
||
|
|
_fortran_csytrs2(uplo, n, nrhs, <npy_complex64*>a, lda, ipiv, <npy_complex64*>b, ldb, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctbcon "F_FUNC(ctbcon,CTBCON)"(char *norm, char *uplo, char *diag, int *n, int *kd, npy_complex64 *ab, int *ldab, s *rcond, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void ctbcon(char *norm, char *uplo, char *diag, int *n, int *kd, c *ab, int *ldab, s *rcond, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_ctbcon(norm, uplo, diag, n, kd, <npy_complex64*>ab, ldab, rcond, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctbrfs "F_FUNC(ctbrfs,CTBRFS)"(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, npy_complex64 *ab, int *ldab, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void ctbrfs(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, c *ab, int *ldab, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_ctbrfs(uplo, trans, diag, n, kd, nrhs, <npy_complex64*>ab, ldab, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctbtrs "F_FUNC(ctbtrs,CTBTRS)"(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, npy_complex64 *ab, int *ldab, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ctbtrs(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, c *ab, int *ldab, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ctbtrs(uplo, trans, diag, n, kd, nrhs, <npy_complex64*>ab, ldab, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctfsm "F_FUNC(ctfsm,CTFSM)"(char *transr, char *side, char *uplo, char *trans, char *diag, int *m, int *n, npy_complex64 *alpha, npy_complex64 *a, npy_complex64 *b, int *ldb) nogil
|
||
|
|
cdef void ctfsm(char *transr, char *side, char *uplo, char *trans, char *diag, int *m, int *n, c *alpha, c *a, c *b, int *ldb) nogil:
|
||
|
|
_fortran_ctfsm(transr, side, uplo, trans, diag, m, n, <npy_complex64*>alpha, <npy_complex64*>a, <npy_complex64*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctftri "F_FUNC(ctftri,CTFTRI)"(char *transr, char *uplo, char *diag, int *n, npy_complex64 *a, int *info) nogil
|
||
|
|
cdef void ctftri(char *transr, char *uplo, char *diag, int *n, c *a, int *info) nogil:
|
||
|
|
_fortran_ctftri(transr, uplo, diag, n, <npy_complex64*>a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctfttp "F_FUNC(ctfttp,CTFTTP)"(char *transr, char *uplo, int *n, npy_complex64 *arf, npy_complex64 *ap, int *info) nogil
|
||
|
|
cdef void ctfttp(char *transr, char *uplo, int *n, c *arf, c *ap, int *info) nogil:
|
||
|
|
_fortran_ctfttp(transr, uplo, n, <npy_complex64*>arf, <npy_complex64*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctfttr "F_FUNC(ctfttr,CTFTTR)"(char *transr, char *uplo, int *n, npy_complex64 *arf, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void ctfttr(char *transr, char *uplo, int *n, c *arf, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_ctfttr(transr, uplo, n, <npy_complex64*>arf, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctgevc "F_FUNC(ctgevc,CTGEVC)"(char *side, char *howmny, bint *select, int *n, npy_complex64 *s, int *lds, npy_complex64 *p, int *ldp, npy_complex64 *vl, int *ldvl, npy_complex64 *vr, int *ldvr, int *mm, int *m, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void ctgevc(char *side, char *howmny, bint *select, int *n, c *s, int *lds, c *p, int *ldp, c *vl, int *ldvl, c *vr, int *ldvr, int *mm, int *m, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_ctgevc(side, howmny, select, n, <npy_complex64*>s, lds, <npy_complex64*>p, ldp, <npy_complex64*>vl, ldvl, <npy_complex64*>vr, ldvr, mm, m, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctgex2 "F_FUNC(ctgex2,CTGEX2)"(bint *wantq, bint *wantz, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *q, int *ldq, npy_complex64 *z, int *ldz, int *j1, int *info) nogil
|
||
|
|
cdef void ctgex2(bint *wantq, bint *wantz, int *n, c *a, int *lda, c *b, int *ldb, c *q, int *ldq, c *z, int *ldz, int *j1, int *info) nogil:
|
||
|
|
_fortran_ctgex2(wantq, wantz, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>q, ldq, <npy_complex64*>z, ldz, j1, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctgexc "F_FUNC(ctgexc,CTGEXC)"(bint *wantq, bint *wantz, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *q, int *ldq, npy_complex64 *z, int *ldz, int *ifst, int *ilst, int *info) nogil
|
||
|
|
cdef void ctgexc(bint *wantq, bint *wantz, int *n, c *a, int *lda, c *b, int *ldb, c *q, int *ldq, c *z, int *ldz, int *ifst, int *ilst, int *info) nogil:
|
||
|
|
_fortran_ctgexc(wantq, wantz, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>q, ldq, <npy_complex64*>z, ldz, ifst, ilst, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctgsen "F_FUNC(ctgsen,CTGSEN)"(int *ijob, bint *wantq, bint *wantz, bint *select, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *alpha, npy_complex64 *beta, npy_complex64 *q, int *ldq, npy_complex64 *z, int *ldz, int *m, s *pl, s *pr, s *dif, npy_complex64 *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void ctgsen(int *ijob, bint *wantq, bint *wantz, bint *select, int *n, c *a, int *lda, c *b, int *ldb, c *alpha, c *beta, c *q, int *ldq, c *z, int *ldz, int *m, s *pl, s *pr, s *dif, c *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_ctgsen(ijob, wantq, wantz, select, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>alpha, <npy_complex64*>beta, <npy_complex64*>q, ldq, <npy_complex64*>z, ldz, m, pl, pr, dif, <npy_complex64*>work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctgsja "F_FUNC(ctgsja,CTGSJA)"(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, s *tola, s *tolb, s *alpha, s *beta, npy_complex64 *u, int *ldu, npy_complex64 *v, int *ldv, npy_complex64 *q, int *ldq, npy_complex64 *work, int *ncycle, int *info) nogil
|
||
|
|
cdef void ctgsja(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, c *a, int *lda, c *b, int *ldb, s *tola, s *tolb, s *alpha, s *beta, c *u, int *ldu, c *v, int *ldv, c *q, int *ldq, c *work, int *ncycle, int *info) nogil:
|
||
|
|
_fortran_ctgsja(jobu, jobv, jobq, m, p, n, k, l, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, tola, tolb, alpha, beta, <npy_complex64*>u, ldu, <npy_complex64*>v, ldv, <npy_complex64*>q, ldq, <npy_complex64*>work, ncycle, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctgsna "F_FUNC(ctgsna,CTGSNA)"(char *job, char *howmny, bint *select, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *vl, int *ldvl, npy_complex64 *vr, int *ldvr, s *s, s *dif, int *mm, int *m, npy_complex64 *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void ctgsna(char *job, char *howmny, bint *select, int *n, c *a, int *lda, c *b, int *ldb, c *vl, int *ldvl, c *vr, int *ldvr, s *s, s *dif, int *mm, int *m, c *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_ctgsna(job, howmny, select, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>vl, ldvl, <npy_complex64*>vr, ldvr, s, dif, mm, m, <npy_complex64*>work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctgsy2 "F_FUNC(ctgsy2,CTGSY2)"(char *trans, int *ijob, int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *c, int *ldc, npy_complex64 *d, int *ldd, npy_complex64 *e, int *lde, npy_complex64 *f, int *ldf, s *scale, s *rdsum, s *rdscal, int *info) nogil
|
||
|
|
cdef void ctgsy2(char *trans, int *ijob, int *m, int *n, c *a, int *lda, c *b, int *ldb, c *c, int *ldc, c *d, int *ldd, c *e, int *lde, c *f, int *ldf, s *scale, s *rdsum, s *rdscal, int *info) nogil:
|
||
|
|
_fortran_ctgsy2(trans, ijob, m, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>c, ldc, <npy_complex64*>d, ldd, <npy_complex64*>e, lde, <npy_complex64*>f, ldf, scale, rdsum, rdscal, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctgsyl "F_FUNC(ctgsyl,CTGSYL)"(char *trans, int *ijob, int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *c, int *ldc, npy_complex64 *d, int *ldd, npy_complex64 *e, int *lde, npy_complex64 *f, int *ldf, s *scale, s *dif, npy_complex64 *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void ctgsyl(char *trans, int *ijob, int *m, int *n, c *a, int *lda, c *b, int *ldb, c *c, int *ldc, c *d, int *ldd, c *e, int *lde, c *f, int *ldf, s *scale, s *dif, c *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_ctgsyl(trans, ijob, m, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>c, ldc, <npy_complex64*>d, ldd, <npy_complex64*>e, lde, <npy_complex64*>f, ldf, scale, dif, <npy_complex64*>work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctpcon "F_FUNC(ctpcon,CTPCON)"(char *norm, char *uplo, char *diag, int *n, npy_complex64 *ap, s *rcond, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void ctpcon(char *norm, char *uplo, char *diag, int *n, c *ap, s *rcond, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_ctpcon(norm, uplo, diag, n, <npy_complex64*>ap, rcond, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctpmqrt "F_FUNC(ctpmqrt,CTPMQRT)"(char *side, char *trans, int *m, int *n, int *k, int *l, int *nb, npy_complex64 *v, int *ldv, npy_complex64 *t, int *ldt, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void ctpmqrt(char *side, char *trans, int *m, int *n, int *k, int *l, int *nb, c *v, int *ldv, c *t, int *ldt, c *a, int *lda, c *b, int *ldb, c *work, int *info) nogil:
|
||
|
|
_fortran_ctpmqrt(side, trans, m, n, k, l, nb, <npy_complex64*>v, ldv, <npy_complex64*>t, ldt, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctpqrt "F_FUNC(ctpqrt,CTPQRT)"(int *m, int *n, int *l, int *nb, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *t, int *ldt, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void ctpqrt(int *m, int *n, int *l, int *nb, c *a, int *lda, c *b, int *ldb, c *t, int *ldt, c *work, int *info) nogil:
|
||
|
|
_fortran_ctpqrt(m, n, l, nb, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>t, ldt, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctpqrt2 "F_FUNC(ctpqrt2,CTPQRT2)"(int *m, int *n, int *l, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *t, int *ldt, int *info) nogil
|
||
|
|
cdef void ctpqrt2(int *m, int *n, int *l, c *a, int *lda, c *b, int *ldb, c *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_ctpqrt2(m, n, l, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctprfb "F_FUNC(ctprfb,CTPRFB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, npy_complex64 *v, int *ldv, npy_complex64 *t, int *ldt, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *work, int *ldwork) nogil
|
||
|
|
cdef void ctprfb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, c *v, int *ldv, c *t, int *ldt, c *a, int *lda, c *b, int *ldb, c *work, int *ldwork) nogil:
|
||
|
|
_fortran_ctprfb(side, trans, direct, storev, m, n, k, l, <npy_complex64*>v, ldv, <npy_complex64*>t, ldt, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctprfs "F_FUNC(ctprfs,CTPRFS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void ctprfs(char *uplo, char *trans, char *diag, int *n, int *nrhs, c *ap, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_ctprfs(uplo, trans, diag, n, nrhs, <npy_complex64*>ap, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctptri "F_FUNC(ctptri,CTPTRI)"(char *uplo, char *diag, int *n, npy_complex64 *ap, int *info) nogil
|
||
|
|
cdef void ctptri(char *uplo, char *diag, int *n, c *ap, int *info) nogil:
|
||
|
|
_fortran_ctptri(uplo, diag, n, <npy_complex64*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctptrs "F_FUNC(ctptrs,CTPTRS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, npy_complex64 *ap, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ctptrs(char *uplo, char *trans, char *diag, int *n, int *nrhs, c *ap, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ctptrs(uplo, trans, diag, n, nrhs, <npy_complex64*>ap, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctpttf "F_FUNC(ctpttf,CTPTTF)"(char *transr, char *uplo, int *n, npy_complex64 *ap, npy_complex64 *arf, int *info) nogil
|
||
|
|
cdef void ctpttf(char *transr, char *uplo, int *n, c *ap, c *arf, int *info) nogil:
|
||
|
|
_fortran_ctpttf(transr, uplo, n, <npy_complex64*>ap, <npy_complex64*>arf, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctpttr "F_FUNC(ctpttr,CTPTTR)"(char *uplo, int *n, npy_complex64 *ap, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void ctpttr(char *uplo, int *n, c *ap, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_ctpttr(uplo, n, <npy_complex64*>ap, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrcon "F_FUNC(ctrcon,CTRCON)"(char *norm, char *uplo, char *diag, int *n, npy_complex64 *a, int *lda, s *rcond, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void ctrcon(char *norm, char *uplo, char *diag, int *n, c *a, int *lda, s *rcond, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_ctrcon(norm, uplo, diag, n, <npy_complex64*>a, lda, rcond, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrevc "F_FUNC(ctrevc,CTREVC)"(char *side, char *howmny, bint *select, int *n, npy_complex64 *t, int *ldt, npy_complex64 *vl, int *ldvl, npy_complex64 *vr, int *ldvr, int *mm, int *m, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void ctrevc(char *side, char *howmny, bint *select, int *n, c *t, int *ldt, c *vl, int *ldvl, c *vr, int *ldvr, int *mm, int *m, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_ctrevc(side, howmny, select, n, <npy_complex64*>t, ldt, <npy_complex64*>vl, ldvl, <npy_complex64*>vr, ldvr, mm, m, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrexc "F_FUNC(ctrexc,CTREXC)"(char *compq, int *n, npy_complex64 *t, int *ldt, npy_complex64 *q, int *ldq, int *ifst, int *ilst, int *info) nogil
|
||
|
|
cdef void ctrexc(char *compq, int *n, c *t, int *ldt, c *q, int *ldq, int *ifst, int *ilst, int *info) nogil:
|
||
|
|
_fortran_ctrexc(compq, n, <npy_complex64*>t, ldt, <npy_complex64*>q, ldq, ifst, ilst, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrrfs "F_FUNC(ctrrfs,CTRRFS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *x, int *ldx, s *ferr, s *berr, npy_complex64 *work, s *rwork, int *info) nogil
|
||
|
|
cdef void ctrrfs(char *uplo, char *trans, char *diag, int *n, int *nrhs, c *a, int *lda, c *b, int *ldb, c *x, int *ldx, s *ferr, s *berr, c *work, s *rwork, int *info) nogil:
|
||
|
|
_fortran_ctrrfs(uplo, trans, diag, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>x, ldx, ferr, berr, <npy_complex64*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrsen "F_FUNC(ctrsen,CTRSEN)"(char *job, char *compq, bint *select, int *n, npy_complex64 *t, int *ldt, npy_complex64 *q, int *ldq, npy_complex64 *w, int *m, s *s, s *sep, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ctrsen(char *job, char *compq, bint *select, int *n, c *t, int *ldt, c *q, int *ldq, c *w, int *m, s *s, s *sep, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ctrsen(job, compq, select, n, <npy_complex64*>t, ldt, <npy_complex64*>q, ldq, <npy_complex64*>w, m, s, sep, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrsna "F_FUNC(ctrsna,CTRSNA)"(char *job, char *howmny, bint *select, int *n, npy_complex64 *t, int *ldt, npy_complex64 *vl, int *ldvl, npy_complex64 *vr, int *ldvr, s *s, s *sep, int *mm, int *m, npy_complex64 *work, int *ldwork, s *rwork, int *info) nogil
|
||
|
|
cdef void ctrsna(char *job, char *howmny, bint *select, int *n, c *t, int *ldt, c *vl, int *ldvl, c *vr, int *ldvr, s *s, s *sep, int *mm, int *m, c *work, int *ldwork, s *rwork, int *info) nogil:
|
||
|
|
_fortran_ctrsna(job, howmny, select, n, <npy_complex64*>t, ldt, <npy_complex64*>vl, ldvl, <npy_complex64*>vr, ldvr, s, sep, mm, m, <npy_complex64*>work, ldwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrsyl "F_FUNC(ctrsyl,CTRSYL)"(char *trana, char *tranb, int *isgn, int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, npy_complex64 *c, int *ldc, s *scale, int *info) nogil
|
||
|
|
cdef void ctrsyl(char *trana, char *tranb, int *isgn, int *m, int *n, c *a, int *lda, c *b, int *ldb, c *c, int *ldc, s *scale, int *info) nogil:
|
||
|
|
_fortran_ctrsyl(trana, tranb, isgn, m, n, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, <npy_complex64*>c, ldc, scale, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrti2 "F_FUNC(ctrti2,CTRTI2)"(char *uplo, char *diag, int *n, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void ctrti2(char *uplo, char *diag, int *n, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_ctrti2(uplo, diag, n, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrtri "F_FUNC(ctrtri,CTRTRI)"(char *uplo, char *diag, int *n, npy_complex64 *a, int *lda, int *info) nogil
|
||
|
|
cdef void ctrtri(char *uplo, char *diag, int *n, c *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_ctrtri(uplo, diag, n, <npy_complex64*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrtrs "F_FUNC(ctrtrs,CTRTRS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, npy_complex64 *a, int *lda, npy_complex64 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ctrtrs(char *uplo, char *trans, char *diag, int *n, int *nrhs, c *a, int *lda, c *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ctrtrs(uplo, trans, diag, n, nrhs, <npy_complex64*>a, lda, <npy_complex64*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrttf "F_FUNC(ctrttf,CTRTTF)"(char *transr, char *uplo, int *n, npy_complex64 *a, int *lda, npy_complex64 *arf, int *info) nogil
|
||
|
|
cdef void ctrttf(char *transr, char *uplo, int *n, c *a, int *lda, c *arf, int *info) nogil:
|
||
|
|
_fortran_ctrttf(transr, uplo, n, <npy_complex64*>a, lda, <npy_complex64*>arf, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctrttp "F_FUNC(ctrttp,CTRTTP)"(char *uplo, int *n, npy_complex64 *a, int *lda, npy_complex64 *ap, int *info) nogil
|
||
|
|
cdef void ctrttp(char *uplo, int *n, c *a, int *lda, c *ap, int *info) nogil:
|
||
|
|
_fortran_ctrttp(uplo, n, <npy_complex64*>a, lda, <npy_complex64*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ctzrzf "F_FUNC(ctzrzf,CTZRZF)"(int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ctzrzf(int *m, int *n, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ctzrzf(m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunbdb "F_FUNC(cunbdb,CUNBDB)"(char *trans, char *signs, int *m, int *p, int *q, npy_complex64 *x11, int *ldx11, npy_complex64 *x12, int *ldx12, npy_complex64 *x21, int *ldx21, npy_complex64 *x22, int *ldx22, s *theta, s *phi, npy_complex64 *taup1, npy_complex64 *taup2, npy_complex64 *tauq1, npy_complex64 *tauq2, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunbdb(char *trans, char *signs, int *m, int *p, int *q, c *x11, int *ldx11, c *x12, int *ldx12, c *x21, int *ldx21, c *x22, int *ldx22, s *theta, s *phi, c *taup1, c *taup2, c *tauq1, c *tauq2, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunbdb(trans, signs, m, p, q, <npy_complex64*>x11, ldx11, <npy_complex64*>x12, ldx12, <npy_complex64*>x21, ldx21, <npy_complex64*>x22, ldx22, theta, phi, <npy_complex64*>taup1, <npy_complex64*>taup2, <npy_complex64*>tauq1, <npy_complex64*>tauq2, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cuncsd "F_FUNC(cuncsd,CUNCSD)"(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, char *signs, int *m, int *p, int *q, npy_complex64 *x11, int *ldx11, npy_complex64 *x12, int *ldx12, npy_complex64 *x21, int *ldx21, npy_complex64 *x22, int *ldx22, s *theta, npy_complex64 *u1, int *ldu1, npy_complex64 *u2, int *ldu2, npy_complex64 *v1t, int *ldv1t, npy_complex64 *v2t, int *ldv2t, npy_complex64 *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *info) nogil
|
||
|
|
cdef void cuncsd(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, char *signs, int *m, int *p, int *q, c *x11, int *ldx11, c *x12, int *ldx12, c *x21, int *ldx21, c *x22, int *ldx22, s *theta, c *u1, int *ldu1, c *u2, int *ldu2, c *v1t, int *ldv1t, c *v2t, int *ldv2t, c *work, int *lwork, s *rwork, int *lrwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_cuncsd(jobu1, jobu2, jobv1t, jobv2t, trans, signs, m, p, q, <npy_complex64*>x11, ldx11, <npy_complex64*>x12, ldx12, <npy_complex64*>x21, ldx21, <npy_complex64*>x22, ldx22, theta, <npy_complex64*>u1, ldu1, <npy_complex64*>u2, ldu2, <npy_complex64*>v1t, ldv1t, <npy_complex64*>v2t, ldv2t, <npy_complex64*>work, lwork, rwork, lrwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cung2l "F_FUNC(cung2l,CUNG2L)"(int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cung2l(int *m, int *n, int *k, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cung2l(m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cung2r "F_FUNC(cung2r,CUNG2R)"(int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cung2r(int *m, int *n, int *k, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cung2r(m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cungbr "F_FUNC(cungbr,CUNGBR)"(char *vect, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cungbr(char *vect, int *m, int *n, int *k, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cungbr(vect, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunghr "F_FUNC(cunghr,CUNGHR)"(int *n, int *ilo, int *ihi, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunghr(int *n, int *ilo, int *ihi, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunghr(n, ilo, ihi, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cungl2 "F_FUNC(cungl2,CUNGL2)"(int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cungl2(int *m, int *n, int *k, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cungl2(m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunglq "F_FUNC(cunglq,CUNGLQ)"(int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunglq(int *m, int *n, int *k, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunglq(m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cungql "F_FUNC(cungql,CUNGQL)"(int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cungql(int *m, int *n, int *k, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cungql(m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cungqr "F_FUNC(cungqr,CUNGQR)"(int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cungqr(int *m, int *n, int *k, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cungqr(m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cungr2 "F_FUNC(cungr2,CUNGR2)"(int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cungr2(int *m, int *n, int *k, c *a, int *lda, c *tau, c *work, int *info) nogil:
|
||
|
|
_fortran_cungr2(m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cungrq "F_FUNC(cungrq,CUNGRQ)"(int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cungrq(int *m, int *n, int *k, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cungrq(m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cungtr "F_FUNC(cungtr,CUNGTR)"(char *uplo, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cungtr(char *uplo, int *n, c *a, int *lda, c *tau, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cungtr(uplo, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunm2l "F_FUNC(cunm2l,CUNM2L)"(char *side, char *trans, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cunm2l(char *side, char *trans, int *m, int *n, int *k, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *info) nogil:
|
||
|
|
_fortran_cunm2l(side, trans, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunm2r "F_FUNC(cunm2r,CUNM2R)"(char *side, char *trans, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cunm2r(char *side, char *trans, int *m, int *n, int *k, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *info) nogil:
|
||
|
|
_fortran_cunm2r(side, trans, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmbr "F_FUNC(cunmbr,CUNMBR)"(char *vect, char *side, char *trans, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunmbr(char *vect, char *side, char *trans, int *m, int *n, int *k, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunmbr(vect, side, trans, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmhr "F_FUNC(cunmhr,CUNMHR)"(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunmhr(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunmhr(side, trans, m, n, ilo, ihi, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunml2 "F_FUNC(cunml2,CUNML2)"(char *side, char *trans, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cunml2(char *side, char *trans, int *m, int *n, int *k, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *info) nogil:
|
||
|
|
_fortran_cunml2(side, trans, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmlq "F_FUNC(cunmlq,CUNMLQ)"(char *side, char *trans, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunmlq(char *side, char *trans, int *m, int *n, int *k, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunmlq(side, trans, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmql "F_FUNC(cunmql,CUNMQL)"(char *side, char *trans, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunmql(char *side, char *trans, int *m, int *n, int *k, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunmql(side, trans, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmqr "F_FUNC(cunmqr,CUNMQR)"(char *side, char *trans, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunmqr(char *side, char *trans, int *m, int *n, int *k, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunmqr(side, trans, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmr2 "F_FUNC(cunmr2,CUNMR2)"(char *side, char *trans, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cunmr2(char *side, char *trans, int *m, int *n, int *k, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *info) nogil:
|
||
|
|
_fortran_cunmr2(side, trans, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmr3 "F_FUNC(cunmr3,CUNMR3)"(char *side, char *trans, int *m, int *n, int *k, int *l, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cunmr3(char *side, char *trans, int *m, int *n, int *k, int *l, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *info) nogil:
|
||
|
|
_fortran_cunmr3(side, trans, m, n, k, l, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmrq "F_FUNC(cunmrq,CUNMRQ)"(char *side, char *trans, int *m, int *n, int *k, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunmrq(char *side, char *trans, int *m, int *n, int *k, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunmrq(side, trans, m, n, k, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmrz "F_FUNC(cunmrz,CUNMRZ)"(char *side, char *trans, int *m, int *n, int *k, int *l, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunmrz(char *side, char *trans, int *m, int *n, int *k, int *l, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunmrz(side, trans, m, n, k, l, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cunmtr "F_FUNC(cunmtr,CUNMTR)"(char *side, char *uplo, char *trans, int *m, int *n, npy_complex64 *a, int *lda, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void cunmtr(char *side, char *uplo, char *trans, int *m, int *n, c *a, int *lda, c *tau, c *c, int *ldc, c *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_cunmtr(side, uplo, trans, m, n, <npy_complex64*>a, lda, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cupgtr "F_FUNC(cupgtr,CUPGTR)"(char *uplo, int *n, npy_complex64 *ap, npy_complex64 *tau, npy_complex64 *q, int *ldq, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cupgtr(char *uplo, int *n, c *ap, c *tau, c *q, int *ldq, c *work, int *info) nogil:
|
||
|
|
_fortran_cupgtr(uplo, n, <npy_complex64*>ap, <npy_complex64*>tau, <npy_complex64*>q, ldq, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_cupmtr "F_FUNC(cupmtr,CUPMTR)"(char *side, char *uplo, char *trans, int *m, int *n, npy_complex64 *ap, npy_complex64 *tau, npy_complex64 *c, int *ldc, npy_complex64 *work, int *info) nogil
|
||
|
|
cdef void cupmtr(char *side, char *uplo, char *trans, int *m, int *n, c *ap, c *tau, c *c, int *ldc, c *work, int *info) nogil:
|
||
|
|
_fortran_cupmtr(side, uplo, trans, m, n, <npy_complex64*>ap, <npy_complex64*>tau, <npy_complex64*>c, ldc, <npy_complex64*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dbbcsd "F_FUNC(dbbcsd,DBBCSD)"(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, int *m, int *p, int *q, d *theta, d *phi, d *u1, int *ldu1, d *u2, int *ldu2, d *v1t, int *ldv1t, d *v2t, int *ldv2t, d *b11d, d *b11e, d *b12d, d *b12e, d *b21d, d *b21e, d *b22d, d *b22e, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dbbcsd(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, int *m, int *p, int *q, d *theta, d *phi, d *u1, int *ldu1, d *u2, int *ldu2, d *v1t, int *ldv1t, d *v2t, int *ldv2t, d *b11d, d *b11e, d *b12d, d *b12e, d *b21d, d *b21e, d *b22d, d *b22e, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dbbcsd(jobu1, jobu2, jobv1t, jobv2t, trans, m, p, q, theta, phi, u1, ldu1, u2, ldu2, v1t, ldv1t, v2t, ldv2t, b11d, b11e, b12d, b12e, b21d, b21e, b22d, b22e, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dbdsdc "F_FUNC(dbdsdc,DBDSDC)"(char *uplo, char *compq, int *n, d *d, d *e, d *u, int *ldu, d *vt, int *ldvt, d *q, int *iq, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dbdsdc(char *uplo, char *compq, int *n, d *d, d *e, d *u, int *ldu, d *vt, int *ldvt, d *q, int *iq, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dbdsdc(uplo, compq, n, d, e, u, ldu, vt, ldvt, q, iq, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dbdsqr "F_FUNC(dbdsqr,DBDSQR)"(char *uplo, int *n, int *ncvt, int *nru, int *ncc, d *d, d *e, d *vt, int *ldvt, d *u, int *ldu, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dbdsqr(char *uplo, int *n, int *ncvt, int *nru, int *ncc, d *d, d *e, d *vt, int *ldvt, d *u, int *ldu, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dbdsqr(uplo, n, ncvt, nru, ncc, d, e, vt, ldvt, u, ldu, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ddisna "F_FUNC(ddisna,DDISNA)"(char *job, int *m, int *n, d *d, d *sep, int *info) nogil
|
||
|
|
cdef void ddisna(char *job, int *m, int *n, d *d, d *sep, int *info) nogil:
|
||
|
|
_fortran_ddisna(job, m, n, d, sep, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbbrd "F_FUNC(dgbbrd,DGBBRD)"(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, d *ab, int *ldab, d *d, d *e, d *q, int *ldq, d *pt, int *ldpt, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dgbbrd(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, d *ab, int *ldab, d *d, d *e, d *q, int *ldq, d *pt, int *ldpt, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dgbbrd(vect, m, n, ncc, kl, ku, ab, ldab, d, e, q, ldq, pt, ldpt, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbcon "F_FUNC(dgbcon,DGBCON)"(char *norm, int *n, int *kl, int *ku, d *ab, int *ldab, int *ipiv, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dgbcon(char *norm, int *n, int *kl, int *ku, d *ab, int *ldab, int *ipiv, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgbcon(norm, n, kl, ku, ab, ldab, ipiv, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbequ "F_FUNC(dgbequ,DGBEQU)"(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil
|
||
|
|
cdef void dgbequ(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil:
|
||
|
|
_fortran_dgbequ(m, n, kl, ku, ab, ldab, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbequb "F_FUNC(dgbequb,DGBEQUB)"(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil
|
||
|
|
cdef void dgbequb(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil:
|
||
|
|
_fortran_dgbequb(m, n, kl, ku, ab, ldab, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbrfs "F_FUNC(dgbrfs,DGBRFS)"(char *trans, int *n, int *kl, int *ku, int *nrhs, d *ab, int *ldab, d *afb, int *ldafb, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dgbrfs(char *trans, int *n, int *kl, int *ku, int *nrhs, d *ab, int *ldab, d *afb, int *ldafb, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgbrfs(trans, n, kl, ku, nrhs, ab, ldab, afb, ldafb, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbsv "F_FUNC(dgbsv,DGBSV)"(int *n, int *kl, int *ku, int *nrhs, d *ab, int *ldab, int *ipiv, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dgbsv(int *n, int *kl, int *ku, int *nrhs, d *ab, int *ldab, int *ipiv, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dgbsv(n, kl, ku, nrhs, ab, ldab, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbsvx "F_FUNC(dgbsvx,DGBSVX)"(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, d *ab, int *ldab, d *afb, int *ldafb, int *ipiv, char *equed, d *r, d *c, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dgbsvx(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, d *ab, int *ldab, d *afb, int *ldafb, int *ipiv, char *equed, d *r, d *c, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgbsvx(fact, trans, n, kl, ku, nrhs, ab, ldab, afb, ldafb, ipiv, equed, r, c, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbtf2 "F_FUNC(dgbtf2,DGBTF2)"(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, int *ipiv, int *info) nogil
|
||
|
|
cdef void dgbtf2(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_dgbtf2(m, n, kl, ku, ab, ldab, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbtrf "F_FUNC(dgbtrf,DGBTRF)"(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, int *ipiv, int *info) nogil
|
||
|
|
cdef void dgbtrf(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_dgbtrf(m, n, kl, ku, ab, ldab, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgbtrs "F_FUNC(dgbtrs,DGBTRS)"(char *trans, int *n, int *kl, int *ku, int *nrhs, d *ab, int *ldab, int *ipiv, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dgbtrs(char *trans, int *n, int *kl, int *ku, int *nrhs, d *ab, int *ldab, int *ipiv, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dgbtrs(trans, n, kl, ku, nrhs, ab, ldab, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgebak "F_FUNC(dgebak,DGEBAK)"(char *job, char *side, int *n, int *ilo, int *ihi, d *scale, int *m, d *v, int *ldv, int *info) nogil
|
||
|
|
cdef void dgebak(char *job, char *side, int *n, int *ilo, int *ihi, d *scale, int *m, d *v, int *ldv, int *info) nogil:
|
||
|
|
_fortran_dgebak(job, side, n, ilo, ihi, scale, m, v, ldv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgebal "F_FUNC(dgebal,DGEBAL)"(char *job, int *n, d *a, int *lda, int *ilo, int *ihi, d *scale, int *info) nogil
|
||
|
|
cdef void dgebal(char *job, int *n, d *a, int *lda, int *ilo, int *ihi, d *scale, int *info) nogil:
|
||
|
|
_fortran_dgebal(job, n, a, lda, ilo, ihi, scale, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgebd2 "F_FUNC(dgebd2,DGEBD2)"(int *m, int *n, d *a, int *lda, d *d, d *e, d *tauq, d *taup, d *work, int *info) nogil
|
||
|
|
cdef void dgebd2(int *m, int *n, d *a, int *lda, d *d, d *e, d *tauq, d *taup, d *work, int *info) nogil:
|
||
|
|
_fortran_dgebd2(m, n, a, lda, d, e, tauq, taup, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgebrd "F_FUNC(dgebrd,DGEBRD)"(int *m, int *n, d *a, int *lda, d *d, d *e, d *tauq, d *taup, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgebrd(int *m, int *n, d *a, int *lda, d *d, d *e, d *tauq, d *taup, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgebrd(m, n, a, lda, d, e, tauq, taup, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgecon "F_FUNC(dgecon,DGECON)"(char *norm, int *n, d *a, int *lda, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dgecon(char *norm, int *n, d *a, int *lda, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgecon(norm, n, a, lda, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeequ "F_FUNC(dgeequ,DGEEQU)"(int *m, int *n, d *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil
|
||
|
|
cdef void dgeequ(int *m, int *n, d *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil:
|
||
|
|
_fortran_dgeequ(m, n, a, lda, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeequb "F_FUNC(dgeequb,DGEEQUB)"(int *m, int *n, d *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil
|
||
|
|
cdef void dgeequb(int *m, int *n, d *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil:
|
||
|
|
_fortran_dgeequb(m, n, a, lda, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgees "F_FUNC(dgees,DGEES)"(char *jobvs, char *sort, _dselect2 *select, int *n, d *a, int *lda, int *sdim, d *wr, d *wi, d *vs, int *ldvs, d *work, int *lwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void dgees(char *jobvs, char *sort, dselect2 *select, int *n, d *a, int *lda, int *sdim, d *wr, d *wi, d *vs, int *ldvs, d *work, int *lwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_dgees(jobvs, sort, <_dselect2*>select, n, a, lda, sdim, wr, wi, vs, ldvs, work, lwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeesx "F_FUNC(dgeesx,DGEESX)"(char *jobvs, char *sort, _dselect2 *select, char *sense, int *n, d *a, int *lda, int *sdim, d *wr, d *wi, d *vs, int *ldvs, d *rconde, d *rcondv, d *work, int *lwork, int *iwork, int *liwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void dgeesx(char *jobvs, char *sort, dselect2 *select, char *sense, int *n, d *a, int *lda, int *sdim, d *wr, d *wi, d *vs, int *ldvs, d *rconde, d *rcondv, d *work, int *lwork, int *iwork, int *liwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_dgeesx(jobvs, sort, <_dselect2*>select, sense, n, a, lda, sdim, wr, wi, vs, ldvs, rconde, rcondv, work, lwork, iwork, liwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeev "F_FUNC(dgeev,DGEEV)"(char *jobvl, char *jobvr, int *n, d *a, int *lda, d *wr, d *wi, d *vl, int *ldvl, d *vr, int *ldvr, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgeev(char *jobvl, char *jobvr, int *n, d *a, int *lda, d *wr, d *wi, d *vl, int *ldvl, d *vr, int *ldvr, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgeev(jobvl, jobvr, n, a, lda, wr, wi, vl, ldvl, vr, ldvr, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeevx "F_FUNC(dgeevx,DGEEVX)"(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, d *a, int *lda, d *wr, d *wi, d *vl, int *ldvl, d *vr, int *ldvr, int *ilo, int *ihi, d *scale, d *abnrm, d *rconde, d *rcondv, d *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void dgeevx(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, d *a, int *lda, d *wr, d *wi, d *vl, int *ldvl, d *vr, int *ldvr, int *ilo, int *ihi, d *scale, d *abnrm, d *rconde, d *rcondv, d *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgeevx(balanc, jobvl, jobvr, sense, n, a, lda, wr, wi, vl, ldvl, vr, ldvr, ilo, ihi, scale, abnrm, rconde, rcondv, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgehd2 "F_FUNC(dgehd2,DGEHD2)"(int *n, int *ilo, int *ihi, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dgehd2(int *n, int *ilo, int *ihi, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dgehd2(n, ilo, ihi, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgehrd "F_FUNC(dgehrd,DGEHRD)"(int *n, int *ilo, int *ihi, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgehrd(int *n, int *ilo, int *ihi, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgehrd(n, ilo, ihi, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgejsv "F_FUNC(dgejsv,DGEJSV)"(char *joba, char *jobu, char *jobv, char *jobr, char *jobt, char *jobp, int *m, int *n, d *a, int *lda, d *sva, d *u, int *ldu, d *v, int *ldv, d *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void dgejsv(char *joba, char *jobu, char *jobv, char *jobr, char *jobt, char *jobp, int *m, int *n, d *a, int *lda, d *sva, d *u, int *ldu, d *v, int *ldv, d *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgejsv(joba, jobu, jobv, jobr, jobt, jobp, m, n, a, lda, sva, u, ldu, v, ldv, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgelq2 "F_FUNC(dgelq2,DGELQ2)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dgelq2(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dgelq2(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgelqf "F_FUNC(dgelqf,DGELQF)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgelqf(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgelqf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgels "F_FUNC(dgels,DGELS)"(char *trans, int *m, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgels(char *trans, int *m, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgels(trans, m, n, nrhs, a, lda, b, ldb, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgelsd "F_FUNC(dgelsd,DGELSD)"(int *m, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *s, d *rcond, int *rank, d *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void dgelsd(int *m, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *s, d *rcond, int *rank, d *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgelsd(m, n, nrhs, a, lda, b, ldb, s, rcond, rank, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgelss "F_FUNC(dgelss,DGELSS)"(int *m, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *s, d *rcond, int *rank, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgelss(int *m, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *s, d *rcond, int *rank, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgelss(m, n, nrhs, a, lda, b, ldb, s, rcond, rank, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgelsy "F_FUNC(dgelsy,DGELSY)"(int *m, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, int *jpvt, d *rcond, int *rank, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgelsy(int *m, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, int *jpvt, d *rcond, int *rank, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgelsy(m, n, nrhs, a, lda, b, ldb, jpvt, rcond, rank, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgemqrt "F_FUNC(dgemqrt,DGEMQRT)"(char *side, char *trans, int *m, int *n, int *k, int *nb, d *v, int *ldv, d *t, int *ldt, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dgemqrt(char *side, char *trans, int *m, int *n, int *k, int *nb, d *v, int *ldv, d *t, int *ldt, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dgemqrt(side, trans, m, n, k, nb, v, ldv, t, ldt, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeql2 "F_FUNC(dgeql2,DGEQL2)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dgeql2(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dgeql2(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeqlf "F_FUNC(dgeqlf,DGEQLF)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgeqlf(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgeqlf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeqp3 "F_FUNC(dgeqp3,DGEQP3)"(int *m, int *n, d *a, int *lda, int *jpvt, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgeqp3(int *m, int *n, d *a, int *lda, int *jpvt, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgeqp3(m, n, a, lda, jpvt, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeqr2 "F_FUNC(dgeqr2,DGEQR2)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dgeqr2(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dgeqr2(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeqr2p "F_FUNC(dgeqr2p,DGEQR2P)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dgeqr2p(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dgeqr2p(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeqrf "F_FUNC(dgeqrf,DGEQRF)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgeqrf(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgeqrf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeqrfp "F_FUNC(dgeqrfp,DGEQRFP)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgeqrfp(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgeqrfp(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeqrt "F_FUNC(dgeqrt,DGEQRT)"(int *m, int *n, int *nb, d *a, int *lda, d *t, int *ldt, d *work, int *info) nogil
|
||
|
|
cdef void dgeqrt(int *m, int *n, int *nb, d *a, int *lda, d *t, int *ldt, d *work, int *info) nogil:
|
||
|
|
_fortran_dgeqrt(m, n, nb, a, lda, t, ldt, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeqrt2 "F_FUNC(dgeqrt2,DGEQRT2)"(int *m, int *n, d *a, int *lda, d *t, int *ldt, int *info) nogil
|
||
|
|
cdef void dgeqrt2(int *m, int *n, d *a, int *lda, d *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_dgeqrt2(m, n, a, lda, t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgeqrt3 "F_FUNC(dgeqrt3,DGEQRT3)"(int *m, int *n, d *a, int *lda, d *t, int *ldt, int *info) nogil
|
||
|
|
cdef void dgeqrt3(int *m, int *n, d *a, int *lda, d *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_dgeqrt3(m, n, a, lda, t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgerfs "F_FUNC(dgerfs,DGERFS)"(char *trans, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dgerfs(char *trans, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgerfs(trans, n, nrhs, a, lda, af, ldaf, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgerq2 "F_FUNC(dgerq2,DGERQ2)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dgerq2(int *m, int *n, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dgerq2(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgerqf "F_FUNC(dgerqf,DGERQF)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgerqf(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgerqf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgesc2 "F_FUNC(dgesc2,DGESC2)"(int *n, d *a, int *lda, d *rhs, int *ipiv, int *jpiv, d *scale) nogil
|
||
|
|
cdef void dgesc2(int *n, d *a, int *lda, d *rhs, int *ipiv, int *jpiv, d *scale) nogil:
|
||
|
|
_fortran_dgesc2(n, a, lda, rhs, ipiv, jpiv, scale)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgesdd "F_FUNC(dgesdd,DGESDD)"(char *jobz, int *m, int *n, d *a, int *lda, d *s, d *u, int *ldu, d *vt, int *ldvt, d *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void dgesdd(char *jobz, int *m, int *n, d *a, int *lda, d *s, d *u, int *ldu, d *vt, int *ldvt, d *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgesdd(jobz, m, n, a, lda, s, u, ldu, vt, ldvt, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgesv "F_FUNC(dgesv,DGESV)"(int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dgesv(int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dgesv(n, nrhs, a, lda, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgesvd "F_FUNC(dgesvd,DGESVD)"(char *jobu, char *jobvt, int *m, int *n, d *a, int *lda, d *s, d *u, int *ldu, d *vt, int *ldvt, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgesvd(char *jobu, char *jobvt, int *m, int *n, d *a, int *lda, d *s, d *u, int *ldu, d *vt, int *ldvt, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgesvd(jobu, jobvt, m, n, a, lda, s, u, ldu, vt, ldvt, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgesvj "F_FUNC(dgesvj,DGESVJ)"(char *joba, char *jobu, char *jobv, int *m, int *n, d *a, int *lda, d *sva, int *mv, d *v, int *ldv, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgesvj(char *joba, char *jobu, char *jobv, int *m, int *n, d *a, int *lda, d *sva, int *mv, d *v, int *ldv, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgesvj(joba, jobu, jobv, m, n, a, lda, sva, mv, v, ldv, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgesvx "F_FUNC(dgesvx,DGESVX)"(char *fact, char *trans, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, int *ipiv, char *equed, d *r, d *c, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dgesvx(char *fact, char *trans, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, int *ipiv, char *equed, d *r, d *c, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgesvx(fact, trans, n, nrhs, a, lda, af, ldaf, ipiv, equed, r, c, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgetc2 "F_FUNC(dgetc2,DGETC2)"(int *n, d *a, int *lda, int *ipiv, int *jpiv, int *info) nogil
|
||
|
|
cdef void dgetc2(int *n, d *a, int *lda, int *ipiv, int *jpiv, int *info) nogil:
|
||
|
|
_fortran_dgetc2(n, a, lda, ipiv, jpiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgetf2 "F_FUNC(dgetf2,DGETF2)"(int *m, int *n, d *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void dgetf2(int *m, int *n, d *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_dgetf2(m, n, a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgetrf "F_FUNC(dgetrf,DGETRF)"(int *m, int *n, d *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void dgetrf(int *m, int *n, d *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_dgetrf(m, n, a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgetri "F_FUNC(dgetri,DGETRI)"(int *n, d *a, int *lda, int *ipiv, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgetri(int *n, d *a, int *lda, int *ipiv, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgetri(n, a, lda, ipiv, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgetrs "F_FUNC(dgetrs,DGETRS)"(char *trans, int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dgetrs(char *trans, int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dgetrs(trans, n, nrhs, a, lda, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dggbak "F_FUNC(dggbak,DGGBAK)"(char *job, char *side, int *n, int *ilo, int *ihi, d *lscale, d *rscale, int *m, d *v, int *ldv, int *info) nogil
|
||
|
|
cdef void dggbak(char *job, char *side, int *n, int *ilo, int *ihi, d *lscale, d *rscale, int *m, d *v, int *ldv, int *info) nogil:
|
||
|
|
_fortran_dggbak(job, side, n, ilo, ihi, lscale, rscale, m, v, ldv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dggbal "F_FUNC(dggbal,DGGBAL)"(char *job, int *n, d *a, int *lda, d *b, int *ldb, int *ilo, int *ihi, d *lscale, d *rscale, d *work, int *info) nogil
|
||
|
|
cdef void dggbal(char *job, int *n, d *a, int *lda, d *b, int *ldb, int *ilo, int *ihi, d *lscale, d *rscale, d *work, int *info) nogil:
|
||
|
|
_fortran_dggbal(job, n, a, lda, b, ldb, ilo, ihi, lscale, rscale, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgges "F_FUNC(dgges,DGGES)"(char *jobvsl, char *jobvsr, char *sort, _dselect3 *selctg, int *n, d *a, int *lda, d *b, int *ldb, int *sdim, d *alphar, d *alphai, d *beta, d *vsl, int *ldvsl, d *vsr, int *ldvsr, d *work, int *lwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void dgges(char *jobvsl, char *jobvsr, char *sort, dselect3 *selctg, int *n, d *a, int *lda, d *b, int *ldb, int *sdim, d *alphar, d *alphai, d *beta, d *vsl, int *ldvsl, d *vsr, int *ldvsr, d *work, int *lwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_dgges(jobvsl, jobvsr, sort, <_dselect3*>selctg, n, a, lda, b, ldb, sdim, alphar, alphai, beta, vsl, ldvsl, vsr, ldvsr, work, lwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dggesx "F_FUNC(dggesx,DGGESX)"(char *jobvsl, char *jobvsr, char *sort, _dselect3 *selctg, char *sense, int *n, d *a, int *lda, d *b, int *ldb, int *sdim, d *alphar, d *alphai, d *beta, d *vsl, int *ldvsl, d *vsr, int *ldvsr, d *rconde, d *rcondv, d *work, int *lwork, int *iwork, int *liwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void dggesx(char *jobvsl, char *jobvsr, char *sort, dselect3 *selctg, char *sense, int *n, d *a, int *lda, d *b, int *ldb, int *sdim, d *alphar, d *alphai, d *beta, d *vsl, int *ldvsl, d *vsr, int *ldvsr, d *rconde, d *rcondv, d *work, int *lwork, int *iwork, int *liwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_dggesx(jobvsl, jobvsr, sort, <_dselect3*>selctg, sense, n, a, lda, b, ldb, sdim, alphar, alphai, beta, vsl, ldvsl, vsr, ldvsr, rconde, rcondv, work, lwork, iwork, liwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dggev "F_FUNC(dggev,DGGEV)"(char *jobvl, char *jobvr, int *n, d *a, int *lda, d *b, int *ldb, d *alphar, d *alphai, d *beta, d *vl, int *ldvl, d *vr, int *ldvr, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dggev(char *jobvl, char *jobvr, int *n, d *a, int *lda, d *b, int *ldb, d *alphar, d *alphai, d *beta, d *vl, int *ldvl, d *vr, int *ldvr, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dggev(jobvl, jobvr, n, a, lda, b, ldb, alphar, alphai, beta, vl, ldvl, vr, ldvr, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dggevx "F_FUNC(dggevx,DGGEVX)"(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, d *a, int *lda, d *b, int *ldb, d *alphar, d *alphai, d *beta, d *vl, int *ldvl, d *vr, int *ldvr, int *ilo, int *ihi, d *lscale, d *rscale, d *abnrm, d *bbnrm, d *rconde, d *rcondv, d *work, int *lwork, int *iwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void dggevx(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, d *a, int *lda, d *b, int *ldb, d *alphar, d *alphai, d *beta, d *vl, int *ldvl, d *vr, int *ldvr, int *ilo, int *ihi, d *lscale, d *rscale, d *abnrm, d *bbnrm, d *rconde, d *rcondv, d *work, int *lwork, int *iwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_dggevx(balanc, jobvl, jobvr, sense, n, a, lda, b, ldb, alphar, alphai, beta, vl, ldvl, vr, ldvr, ilo, ihi, lscale, rscale, abnrm, bbnrm, rconde, rcondv, work, lwork, iwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dggglm "F_FUNC(dggglm,DGGGLM)"(int *n, int *m, int *p, d *a, int *lda, d *b, int *ldb, d *d, d *x, d *y, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dggglm(int *n, int *m, int *p, d *a, int *lda, d *b, int *ldb, d *d, d *x, d *y, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dggglm(n, m, p, a, lda, b, ldb, d, x, y, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgghrd "F_FUNC(dgghrd,DGGHRD)"(char *compq, char *compz, int *n, int *ilo, int *ihi, d *a, int *lda, d *b, int *ldb, d *q, int *ldq, d *z, int *ldz, int *info) nogil
|
||
|
|
cdef void dgghrd(char *compq, char *compz, int *n, int *ilo, int *ihi, d *a, int *lda, d *b, int *ldb, d *q, int *ldq, d *z, int *ldz, int *info) nogil:
|
||
|
|
_fortran_dgghrd(compq, compz, n, ilo, ihi, a, lda, b, ldb, q, ldq, z, ldz, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgglse "F_FUNC(dgglse,DGGLSE)"(int *m, int *n, int *p, d *a, int *lda, d *b, int *ldb, d *c, d *d, d *x, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgglse(int *m, int *n, int *p, d *a, int *lda, d *b, int *ldb, d *c, d *d, d *x, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgglse(m, n, p, a, lda, b, ldb, c, d, x, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dggqrf "F_FUNC(dggqrf,DGGQRF)"(int *n, int *m, int *p, d *a, int *lda, d *taua, d *b, int *ldb, d *taub, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dggqrf(int *n, int *m, int *p, d *a, int *lda, d *taua, d *b, int *ldb, d *taub, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dggqrf(n, m, p, a, lda, taua, b, ldb, taub, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dggrqf "F_FUNC(dggrqf,DGGRQF)"(int *m, int *p, int *n, d *a, int *lda, d *taua, d *b, int *ldb, d *taub, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dggrqf(int *m, int *p, int *n, d *a, int *lda, d *taua, d *b, int *ldb, d *taub, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dggrqf(m, p, n, a, lda, taua, b, ldb, taub, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgsvj0 "F_FUNC(dgsvj0,DGSVJ0)"(char *jobv, int *m, int *n, d *a, int *lda, d *d, d *sva, int *mv, d *v, int *ldv, d *eps, d *sfmin, d *tol, int *nsweep, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgsvj0(char *jobv, int *m, int *n, d *a, int *lda, d *d, d *sva, int *mv, d *v, int *ldv, d *eps, d *sfmin, d *tol, int *nsweep, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgsvj0(jobv, m, n, a, lda, d, sva, mv, v, ldv, eps, sfmin, tol, nsweep, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgsvj1 "F_FUNC(dgsvj1,DGSVJ1)"(char *jobv, int *m, int *n, int *n1, d *a, int *lda, d *d, d *sva, int *mv, d *v, int *ldv, d *eps, d *sfmin, d *tol, int *nsweep, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dgsvj1(char *jobv, int *m, int *n, int *n1, d *a, int *lda, d *d, d *sva, int *mv, d *v, int *ldv, d *eps, d *sfmin, d *tol, int *nsweep, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dgsvj1(jobv, m, n, n1, a, lda, d, sva, mv, v, ldv, eps, sfmin, tol, nsweep, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgtcon "F_FUNC(dgtcon,DGTCON)"(char *norm, int *n, d *dl, d *d, d *du, d *du2, int *ipiv, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dgtcon(char *norm, int *n, d *dl, d *d, d *du, d *du2, int *ipiv, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgtcon(norm, n, dl, d, du, du2, ipiv, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgtrfs "F_FUNC(dgtrfs,DGTRFS)"(char *trans, int *n, int *nrhs, d *dl, d *d, d *du, d *dlf, d *df, d *duf, d *du2, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dgtrfs(char *trans, int *n, int *nrhs, d *dl, d *d, d *du, d *dlf, d *df, d *duf, d *du2, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgtrfs(trans, n, nrhs, dl, d, du, dlf, df, duf, du2, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgtsv "F_FUNC(dgtsv,DGTSV)"(int *n, int *nrhs, d *dl, d *d, d *du, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dgtsv(int *n, int *nrhs, d *dl, d *d, d *du, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dgtsv(n, nrhs, dl, d, du, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgtsvx "F_FUNC(dgtsvx,DGTSVX)"(char *fact, char *trans, int *n, int *nrhs, d *dl, d *d, d *du, d *dlf, d *df, d *duf, d *du2, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dgtsvx(char *fact, char *trans, int *n, int *nrhs, d *dl, d *d, d *du, d *dlf, d *df, d *duf, d *du2, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dgtsvx(fact, trans, n, nrhs, dl, d, du, dlf, df, duf, du2, ipiv, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgttrf "F_FUNC(dgttrf,DGTTRF)"(int *n, d *dl, d *d, d *du, d *du2, int *ipiv, int *info) nogil
|
||
|
|
cdef void dgttrf(int *n, d *dl, d *d, d *du, d *du2, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_dgttrf(n, dl, d, du, du2, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgttrs "F_FUNC(dgttrs,DGTTRS)"(char *trans, int *n, int *nrhs, d *dl, d *d, d *du, d *du2, int *ipiv, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dgttrs(char *trans, int *n, int *nrhs, d *dl, d *d, d *du, d *du2, int *ipiv, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dgttrs(trans, n, nrhs, dl, d, du, du2, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dgtts2 "F_FUNC(dgtts2,DGTTS2)"(int *itrans, int *n, int *nrhs, d *dl, d *d, d *du, d *du2, int *ipiv, d *b, int *ldb) nogil
|
||
|
|
cdef void dgtts2(int *itrans, int *n, int *nrhs, d *dl, d *d, d *du, d *du2, int *ipiv, d *b, int *ldb) nogil:
|
||
|
|
_fortran_dgtts2(itrans, n, nrhs, dl, d, du, du2, ipiv, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dhgeqz "F_FUNC(dhgeqz,DHGEQZ)"(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *t, int *ldt, d *alphar, d *alphai, d *beta, d *q, int *ldq, d *z, int *ldz, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dhgeqz(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *t, int *ldt, d *alphar, d *alphai, d *beta, d *q, int *ldq, d *z, int *ldz, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dhgeqz(job, compq, compz, n, ilo, ihi, h, ldh, t, ldt, alphar, alphai, beta, q, ldq, z, ldz, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dhsein "F_FUNC(dhsein,DHSEIN)"(char *side, char *eigsrc, char *initv, bint *select, int *n, d *h, int *ldh, d *wr, d *wi, d *vl, int *ldvl, d *vr, int *ldvr, int *mm, int *m, d *work, int *ifaill, int *ifailr, int *info) nogil
|
||
|
|
cdef void dhsein(char *side, char *eigsrc, char *initv, bint *select, int *n, d *h, int *ldh, d *wr, d *wi, d *vl, int *ldvl, d *vr, int *ldvr, int *mm, int *m, d *work, int *ifaill, int *ifailr, int *info) nogil:
|
||
|
|
_fortran_dhsein(side, eigsrc, initv, select, n, h, ldh, wr, wi, vl, ldvl, vr, ldvr, mm, m, work, ifaill, ifailr, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dhseqr "F_FUNC(dhseqr,DHSEQR)"(char *job, char *compz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *wr, d *wi, d *z, int *ldz, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dhseqr(char *job, char *compz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *wr, d *wi, d *z, int *ldz, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dhseqr(job, compz, n, ilo, ihi, h, ldh, wr, wi, z, ldz, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlabad "F_FUNC(dlabad,DLABAD)"(d *small, d *large) nogil
|
||
|
|
cdef void dlabad(d *small, d *large) nogil:
|
||
|
|
_fortran_dlabad(small, large)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlabrd "F_FUNC(dlabrd,DLABRD)"(int *m, int *n, int *nb, d *a, int *lda, d *d, d *e, d *tauq, d *taup, d *x, int *ldx, d *y, int *ldy) nogil
|
||
|
|
cdef void dlabrd(int *m, int *n, int *nb, d *a, int *lda, d *d, d *e, d *tauq, d *taup, d *x, int *ldx, d *y, int *ldy) nogil:
|
||
|
|
_fortran_dlabrd(m, n, nb, a, lda, d, e, tauq, taup, x, ldx, y, ldy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlacn2 "F_FUNC(dlacn2,DLACN2)"(int *n, d *v, d *x, int *isgn, d *est, int *kase, int *isave) nogil
|
||
|
|
cdef void dlacn2(int *n, d *v, d *x, int *isgn, d *est, int *kase, int *isave) nogil:
|
||
|
|
_fortran_dlacn2(n, v, x, isgn, est, kase, isave)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlacon "F_FUNC(dlacon,DLACON)"(int *n, d *v, d *x, int *isgn, d *est, int *kase) nogil
|
||
|
|
cdef void dlacon(int *n, d *v, d *x, int *isgn, d *est, int *kase) nogil:
|
||
|
|
_fortran_dlacon(n, v, x, isgn, est, kase)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlacpy "F_FUNC(dlacpy,DLACPY)"(char *uplo, int *m, int *n, d *a, int *lda, d *b, int *ldb) nogil
|
||
|
|
cdef void dlacpy(char *uplo, int *m, int *n, d *a, int *lda, d *b, int *ldb) nogil:
|
||
|
|
_fortran_dlacpy(uplo, m, n, a, lda, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dladiv "F_FUNC(dladiv,DLADIV)"(d *a, d *b, d *c, d *d, d *p, d *q) nogil
|
||
|
|
cdef void dladiv(d *a, d *b, d *c, d *d, d *p, d *q) nogil:
|
||
|
|
_fortran_dladiv(a, b, c, d, p, q)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlae2 "F_FUNC(dlae2,DLAE2)"(d *a, d *b, d *c, d *rt1, d *rt2) nogil
|
||
|
|
cdef void dlae2(d *a, d *b, d *c, d *rt1, d *rt2) nogil:
|
||
|
|
_fortran_dlae2(a, b, c, rt1, rt2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaebz "F_FUNC(dlaebz,DLAEBZ)"(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, d *abstol, d *reltol, d *pivmin, d *d, d *e, d *e2, int *nval, d *ab, d *c, int *mout, int *nab, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlaebz(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, d *abstol, d *reltol, d *pivmin, d *d, d *e, d *e2, int *nval, d *ab, d *c, int *mout, int *nab, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, e, e2, nval, ab, c, mout, nab, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed0 "F_FUNC(dlaed0,DLAED0)"(int *icompq, int *qsiz, int *n, d *d, d *e, d *q, int *ldq, d *qstore, int *ldqs, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlaed0(int *icompq, int *qsiz, int *n, d *d, d *e, d *q, int *ldq, d *qstore, int *ldqs, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlaed0(icompq, qsiz, n, d, e, q, ldq, qstore, ldqs, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed1 "F_FUNC(dlaed1,DLAED1)"(int *n, d *d, d *q, int *ldq, int *indxq, d *rho, int *cutpnt, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlaed1(int *n, d *d, d *q, int *ldq, int *indxq, d *rho, int *cutpnt, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlaed1(n, d, q, ldq, indxq, rho, cutpnt, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed2 "F_FUNC(dlaed2,DLAED2)"(int *k, int *n, int *n1, d *d, d *q, int *ldq, int *indxq, d *rho, d *z, d *dlamda, d *w, d *q2, int *indx, int *indxc, int *indxp, int *coltyp, int *info) nogil
|
||
|
|
cdef void dlaed2(int *k, int *n, int *n1, d *d, d *q, int *ldq, int *indxq, d *rho, d *z, d *dlamda, d *w, d *q2, int *indx, int *indxc, int *indxp, int *coltyp, int *info) nogil:
|
||
|
|
_fortran_dlaed2(k, n, n1, d, q, ldq, indxq, rho, z, dlamda, w, q2, indx, indxc, indxp, coltyp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed3 "F_FUNC(dlaed3,DLAED3)"(int *k, int *n, int *n1, d *d, d *q, int *ldq, d *rho, d *dlamda, d *q2, int *indx, int *ctot, d *w, d *s, int *info) nogil
|
||
|
|
cdef void dlaed3(int *k, int *n, int *n1, d *d, d *q, int *ldq, d *rho, d *dlamda, d *q2, int *indx, int *ctot, d *w, d *s, int *info) nogil:
|
||
|
|
_fortran_dlaed3(k, n, n1, d, q, ldq, rho, dlamda, q2, indx, ctot, w, s, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed4 "F_FUNC(dlaed4,DLAED4)"(int *n, int *i, d *d, d *z, d *delta, d *rho, d *dlam, int *info) nogil
|
||
|
|
cdef void dlaed4(int *n, int *i, d *d, d *z, d *delta, d *rho, d *dlam, int *info) nogil:
|
||
|
|
_fortran_dlaed4(n, i, d, z, delta, rho, dlam, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed5 "F_FUNC(dlaed5,DLAED5)"(int *i, d *d, d *z, d *delta, d *rho, d *dlam) nogil
|
||
|
|
cdef void dlaed5(int *i, d *d, d *z, d *delta, d *rho, d *dlam) nogil:
|
||
|
|
_fortran_dlaed5(i, d, z, delta, rho, dlam)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed6 "F_FUNC(dlaed6,DLAED6)"(int *kniter, bint *orgati, d *rho, d *d, d *z, d *finit, d *tau, int *info) nogil
|
||
|
|
cdef void dlaed6(int *kniter, bint *orgati, d *rho, d *d, d *z, d *finit, d *tau, int *info) nogil:
|
||
|
|
_fortran_dlaed6(kniter, orgati, rho, d, z, finit, tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed7 "F_FUNC(dlaed7,DLAED7)"(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, d *d, d *q, int *ldq, int *indxq, d *rho, int *cutpnt, d *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, d *givnum, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlaed7(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, d *d, d *q, int *ldq, int *indxq, d *rho, int *cutpnt, d *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, d *givnum, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, q, ldq, indxq, rho, cutpnt, qstore, qptr, prmptr, perm, givptr, givcol, givnum, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed8 "F_FUNC(dlaed8,DLAED8)"(int *icompq, int *k, int *n, int *qsiz, d *d, d *q, int *ldq, int *indxq, d *rho, int *cutpnt, d *z, d *dlamda, d *q2, int *ldq2, d *w, int *perm, int *givptr, int *givcol, d *givnum, int *indxp, int *indx, int *info) nogil
|
||
|
|
cdef void dlaed8(int *icompq, int *k, int *n, int *qsiz, d *d, d *q, int *ldq, int *indxq, d *rho, int *cutpnt, d *z, d *dlamda, d *q2, int *ldq2, d *w, int *perm, int *givptr, int *givcol, d *givnum, int *indxp, int *indx, int *info) nogil:
|
||
|
|
_fortran_dlaed8(icompq, k, n, qsiz, d, q, ldq, indxq, rho, cutpnt, z, dlamda, q2, ldq2, w, perm, givptr, givcol, givnum, indxp, indx, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaed9 "F_FUNC(dlaed9,DLAED9)"(int *k, int *kstart, int *kstop, int *n, d *d, d *q, int *ldq, d *rho, d *dlamda, d *w, d *s, int *lds, int *info) nogil
|
||
|
|
cdef void dlaed9(int *k, int *kstart, int *kstop, int *n, d *d, d *q, int *ldq, d *rho, d *dlamda, d *w, d *s, int *lds, int *info) nogil:
|
||
|
|
_fortran_dlaed9(k, kstart, kstop, n, d, q, ldq, rho, dlamda, w, s, lds, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaeda "F_FUNC(dlaeda,DLAEDA)"(int *n, int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, d *givnum, d *q, int *qptr, d *z, d *ztemp, int *info) nogil
|
||
|
|
cdef void dlaeda(int *n, int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, d *givnum, d *q, int *qptr, d *z, d *ztemp, int *info) nogil:
|
||
|
|
_fortran_dlaeda(n, tlvls, curlvl, curpbm, prmptr, perm, givptr, givcol, givnum, q, qptr, z, ztemp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaein "F_FUNC(dlaein,DLAEIN)"(bint *rightv, bint *noinit, int *n, d *h, int *ldh, d *wr, d *wi, d *vr, d *vi, d *b, int *ldb, d *work, d *eps3, d *smlnum, d *bignum, int *info) nogil
|
||
|
|
cdef void dlaein(bint *rightv, bint *noinit, int *n, d *h, int *ldh, d *wr, d *wi, d *vr, d *vi, d *b, int *ldb, d *work, d *eps3, d *smlnum, d *bignum, int *info) nogil:
|
||
|
|
_fortran_dlaein(rightv, noinit, n, h, ldh, wr, wi, vr, vi, b, ldb, work, eps3, smlnum, bignum, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaev2 "F_FUNC(dlaev2,DLAEV2)"(d *a, d *b, d *c, d *rt1, d *rt2, d *cs1, d *sn1) nogil
|
||
|
|
cdef void dlaev2(d *a, d *b, d *c, d *rt1, d *rt2, d *cs1, d *sn1) nogil:
|
||
|
|
_fortran_dlaev2(a, b, c, rt1, rt2, cs1, sn1)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaexc "F_FUNC(dlaexc,DLAEXC)"(bint *wantq, int *n, d *t, int *ldt, d *q, int *ldq, int *j1, int *n1, int *n2, d *work, int *info) nogil
|
||
|
|
cdef void dlaexc(bint *wantq, int *n, d *t, int *ldt, d *q, int *ldq, int *j1, int *n1, int *n2, d *work, int *info) nogil:
|
||
|
|
_fortran_dlaexc(wantq, n, t, ldt, q, ldq, j1, n1, n2, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlag2 "F_FUNC(dlag2,DLAG2)"(d *a, int *lda, d *b, int *ldb, d *safmin, d *scale1, d *scale2, d *wr1, d *wr2, d *wi) nogil
|
||
|
|
cdef void dlag2(d *a, int *lda, d *b, int *ldb, d *safmin, d *scale1, d *scale2, d *wr1, d *wr2, d *wi) nogil:
|
||
|
|
_fortran_dlag2(a, lda, b, ldb, safmin, scale1, scale2, wr1, wr2, wi)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlag2s "F_FUNC(dlag2s,DLAG2S)"(int *m, int *n, d *a, int *lda, s *sa, int *ldsa, int *info) nogil
|
||
|
|
cdef void dlag2s(int *m, int *n, d *a, int *lda, s *sa, int *ldsa, int *info) nogil:
|
||
|
|
_fortran_dlag2s(m, n, a, lda, sa, ldsa, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlags2 "F_FUNC(dlags2,DLAGS2)"(bint *upper, d *a1, d *a2, d *a3, d *b1, d *b2, d *b3, d *csu, d *snu, d *csv, d *snv, d *csq, d *snq) nogil
|
||
|
|
cdef void dlags2(bint *upper, d *a1, d *a2, d *a3, d *b1, d *b2, d *b3, d *csu, d *snu, d *csv, d *snv, d *csq, d *snq) nogil:
|
||
|
|
_fortran_dlags2(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlagtf "F_FUNC(dlagtf,DLAGTF)"(int *n, d *a, d *lambda_, d *b, d *c, d *tol, d *d, int *in_, int *info) nogil
|
||
|
|
cdef void dlagtf(int *n, d *a, d *lambda_, d *b, d *c, d *tol, d *d, int *in_, int *info) nogil:
|
||
|
|
_fortran_dlagtf(n, a, lambda_, b, c, tol, d, in_, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlagtm "F_FUNC(dlagtm,DLAGTM)"(char *trans, int *n, int *nrhs, d *alpha, d *dl, d *d, d *du, d *x, int *ldx, d *beta, d *b, int *ldb) nogil
|
||
|
|
cdef void dlagtm(char *trans, int *n, int *nrhs, d *alpha, d *dl, d *d, d *du, d *x, int *ldx, d *beta, d *b, int *ldb) nogil:
|
||
|
|
_fortran_dlagtm(trans, n, nrhs, alpha, dl, d, du, x, ldx, beta, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlagts "F_FUNC(dlagts,DLAGTS)"(int *job, int *n, d *a, d *b, d *c, d *d, int *in_, d *y, d *tol, int *info) nogil
|
||
|
|
cdef void dlagts(int *job, int *n, d *a, d *b, d *c, d *d, int *in_, d *y, d *tol, int *info) nogil:
|
||
|
|
_fortran_dlagts(job, n, a, b, c, d, in_, y, tol, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlagv2 "F_FUNC(dlagv2,DLAGV2)"(d *a, int *lda, d *b, int *ldb, d *alphar, d *alphai, d *beta, d *csl, d *snl, d *csr, d *snr) nogil
|
||
|
|
cdef void dlagv2(d *a, int *lda, d *b, int *ldb, d *alphar, d *alphai, d *beta, d *csl, d *snl, d *csr, d *snr) nogil:
|
||
|
|
_fortran_dlagv2(a, lda, b, ldb, alphar, alphai, beta, csl, snl, csr, snr)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlahqr "F_FUNC(dlahqr,DLAHQR)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *wr, d *wi, int *iloz, int *ihiz, d *z, int *ldz, int *info) nogil
|
||
|
|
cdef void dlahqr(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *wr, d *wi, int *iloz, int *ihiz, d *z, int *ldz, int *info) nogil:
|
||
|
|
_fortran_dlahqr(wantt, wantz, n, ilo, ihi, h, ldh, wr, wi, iloz, ihiz, z, ldz, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlahr2 "F_FUNC(dlahr2,DLAHR2)"(int *n, int *k, int *nb, d *a, int *lda, d *tau, d *t, int *ldt, d *y, int *ldy) nogil
|
||
|
|
cdef void dlahr2(int *n, int *k, int *nb, d *a, int *lda, d *tau, d *t, int *ldt, d *y, int *ldy) nogil:
|
||
|
|
_fortran_dlahr2(n, k, nb, a, lda, tau, t, ldt, y, ldy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaic1 "F_FUNC(dlaic1,DLAIC1)"(int *job, int *j, d *x, d *sest, d *w, d *gamma, d *sestpr, d *s, d *c) nogil
|
||
|
|
cdef void dlaic1(int *job, int *j, d *x, d *sest, d *w, d *gamma, d *sestpr, d *s, d *c) nogil:
|
||
|
|
_fortran_dlaic1(job, j, x, sest, w, gamma, sestpr, s, c)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaln2 "F_FUNC(dlaln2,DLALN2)"(bint *ltrans, int *na, int *nw, d *smin, d *ca, d *a, int *lda, d *d1, d *d2, d *b, int *ldb, d *wr, d *wi, d *x, int *ldx, d *scale, d *xnorm, int *info) nogil
|
||
|
|
cdef void dlaln2(bint *ltrans, int *na, int *nw, d *smin, d *ca, d *a, int *lda, d *d1, d *d2, d *b, int *ldb, d *wr, d *wi, d *x, int *ldx, d *scale, d *xnorm, int *info) nogil:
|
||
|
|
_fortran_dlaln2(ltrans, na, nw, smin, ca, a, lda, d1, d2, b, ldb, wr, wi, x, ldx, scale, xnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlals0 "F_FUNC(dlals0,DLALS0)"(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, d *b, int *ldb, d *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, d *givnum, int *ldgnum, d *poles, d *difl, d *difr, d *z, int *k, d *c, d *s, d *work, int *info) nogil
|
||
|
|
cdef void dlals0(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, d *b, int *ldb, d *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, d *givnum, int *ldgnum, d *poles, d *difl, d *difr, d *z, int *k, d *c, d *s, d *work, int *info) nogil:
|
||
|
|
_fortran_dlals0(icompq, nl, nr, sqre, nrhs, b, ldb, bx, ldbx, perm, givptr, givcol, ldgcol, givnum, ldgnum, poles, difl, difr, z, k, c, s, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlalsa "F_FUNC(dlalsa,DLALSA)"(int *icompq, int *smlsiz, int *n, int *nrhs, d *b, int *ldb, d *bx, int *ldbx, d *u, int *ldu, d *vt, int *k, d *difl, d *difr, d *z, d *poles, int *givptr, int *givcol, int *ldgcol, int *perm, d *givnum, d *c, d *s, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlalsa(int *icompq, int *smlsiz, int *n, int *nrhs, d *b, int *ldb, d *bx, int *ldbx, d *u, int *ldu, d *vt, int *k, d *difl, d *difr, d *z, d *poles, int *givptr, int *givcol, int *ldgcol, int *perm, d *givnum, d *c, d *s, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlalsa(icompq, smlsiz, n, nrhs, b, ldb, bx, ldbx, u, ldu, vt, k, difl, difr, z, poles, givptr, givcol, ldgcol, perm, givnum, c, s, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlalsd "F_FUNC(dlalsd,DLALSD)"(char *uplo, int *smlsiz, int *n, int *nrhs, d *d, d *e, d *b, int *ldb, d *rcond, int *rank, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlalsd(char *uplo, int *smlsiz, int *n, int *nrhs, d *d, d *e, d *b, int *ldb, d *rcond, int *rank, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlalsd(uplo, smlsiz, n, nrhs, d, e, b, ldb, rcond, rank, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlamrg "F_FUNC(dlamrg,DLAMRG)"(int *n1, int *n2, d *a, int *dtrd1, int *dtrd2, int *index_bn) nogil
|
||
|
|
cdef void dlamrg(int *n1, int *n2, d *a, int *dtrd1, int *dtrd2, int *index_bn) nogil:
|
||
|
|
_fortran_dlamrg(n1, n2, a, dtrd1, dtrd2, index_bn)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlanv2 "F_FUNC(dlanv2,DLANV2)"(d *a, d *b, d *c, d *d, d *rt1r, d *rt1i, d *rt2r, d *rt2i, d *cs, d *sn) nogil
|
||
|
|
cdef void dlanv2(d *a, d *b, d *c, d *d, d *rt1r, d *rt1i, d *rt2r, d *rt2i, d *cs, d *sn) nogil:
|
||
|
|
_fortran_dlanv2(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlapll "F_FUNC(dlapll,DLAPLL)"(int *n, d *x, int *incx, d *y, int *incy, d *ssmin) nogil
|
||
|
|
cdef void dlapll(int *n, d *x, int *incx, d *y, int *incy, d *ssmin) nogil:
|
||
|
|
_fortran_dlapll(n, x, incx, y, incy, ssmin)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlapmr "F_FUNC(dlapmr,DLAPMR)"(bint *forwrd, int *m, int *n, d *x, int *ldx, int *k) nogil
|
||
|
|
cdef void dlapmr(bint *forwrd, int *m, int *n, d *x, int *ldx, int *k) nogil:
|
||
|
|
_fortran_dlapmr(forwrd, m, n, x, ldx, k)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlapmt "F_FUNC(dlapmt,DLAPMT)"(bint *forwrd, int *m, int *n, d *x, int *ldx, int *k) nogil
|
||
|
|
cdef void dlapmt(bint *forwrd, int *m, int *n, d *x, int *ldx, int *k) nogil:
|
||
|
|
_fortran_dlapmt(forwrd, m, n, x, ldx, k)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqgb "F_FUNC(dlaqgb,DLAQGB)"(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, char *equed) nogil
|
||
|
|
cdef void dlaqgb(int *m, int *n, int *kl, int *ku, d *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, char *equed) nogil:
|
||
|
|
_fortran_dlaqgb(m, n, kl, ku, ab, ldab, r, c, rowcnd, colcnd, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqge "F_FUNC(dlaqge,DLAQGE)"(int *m, int *n, d *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, char *equed) nogil
|
||
|
|
cdef void dlaqge(int *m, int *n, d *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, char *equed) nogil:
|
||
|
|
_fortran_dlaqge(m, n, a, lda, r, c, rowcnd, colcnd, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqp2 "F_FUNC(dlaqp2,DLAQP2)"(int *m, int *n, int *offset, d *a, int *lda, int *jpvt, d *tau, d *vn1, d *vn2, d *work) nogil
|
||
|
|
cdef void dlaqp2(int *m, int *n, int *offset, d *a, int *lda, int *jpvt, d *tau, d *vn1, d *vn2, d *work) nogil:
|
||
|
|
_fortran_dlaqp2(m, n, offset, a, lda, jpvt, tau, vn1, vn2, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqps "F_FUNC(dlaqps,DLAQPS)"(int *m, int *n, int *offset, int *nb, int *kb, d *a, int *lda, int *jpvt, d *tau, d *vn1, d *vn2, d *auxv, d *f, int *ldf) nogil
|
||
|
|
cdef void dlaqps(int *m, int *n, int *offset, int *nb, int *kb, d *a, int *lda, int *jpvt, d *tau, d *vn1, d *vn2, d *auxv, d *f, int *ldf) nogil:
|
||
|
|
_fortran_dlaqps(m, n, offset, nb, kb, a, lda, jpvt, tau, vn1, vn2, auxv, f, ldf)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqr0 "F_FUNC(dlaqr0,DLAQR0)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *wr, d *wi, int *iloz, int *ihiz, d *z, int *ldz, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dlaqr0(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *wr, d *wi, int *iloz, int *ihiz, d *z, int *ldz, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dlaqr0(wantt, wantz, n, ilo, ihi, h, ldh, wr, wi, iloz, ihiz, z, ldz, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqr1 "F_FUNC(dlaqr1,DLAQR1)"(int *n, d *h, int *ldh, d *sr1, d *si1, d *sr2, d *si2, d *v) nogil
|
||
|
|
cdef void dlaqr1(int *n, d *h, int *ldh, d *sr1, d *si1, d *sr2, d *si2, d *v) nogil:
|
||
|
|
_fortran_dlaqr1(n, h, ldh, sr1, si1, sr2, si2, v)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqr2 "F_FUNC(dlaqr2,DLAQR2)"(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, d *h, int *ldh, int *iloz, int *ihiz, d *z, int *ldz, int *ns, int *nd, d *sr, d *si, d *v, int *ldv, int *nh, d *t, int *ldt, int *nv, d *wv, int *ldwv, d *work, int *lwork) nogil
|
||
|
|
cdef void dlaqr2(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, d *h, int *ldh, int *iloz, int *ihiz, d *z, int *ldz, int *ns, int *nd, d *sr, d *si, d *v, int *ldv, int *nh, d *t, int *ldt, int *nv, d *wv, int *ldwv, d *work, int *lwork) nogil:
|
||
|
|
_fortran_dlaqr2(wantt, wantz, n, ktop, kbot, nw, h, ldh, iloz, ihiz, z, ldz, ns, nd, sr, si, v, ldv, nh, t, ldt, nv, wv, ldwv, work, lwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqr3 "F_FUNC(dlaqr3,DLAQR3)"(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, d *h, int *ldh, int *iloz, int *ihiz, d *z, int *ldz, int *ns, int *nd, d *sr, d *si, d *v, int *ldv, int *nh, d *t, int *ldt, int *nv, d *wv, int *ldwv, d *work, int *lwork) nogil
|
||
|
|
cdef void dlaqr3(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, d *h, int *ldh, int *iloz, int *ihiz, d *z, int *ldz, int *ns, int *nd, d *sr, d *si, d *v, int *ldv, int *nh, d *t, int *ldt, int *nv, d *wv, int *ldwv, d *work, int *lwork) nogil:
|
||
|
|
_fortran_dlaqr3(wantt, wantz, n, ktop, kbot, nw, h, ldh, iloz, ihiz, z, ldz, ns, nd, sr, si, v, ldv, nh, t, ldt, nv, wv, ldwv, work, lwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqr4 "F_FUNC(dlaqr4,DLAQR4)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *wr, d *wi, int *iloz, int *ihiz, d *z, int *ldz, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dlaqr4(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, d *h, int *ldh, d *wr, d *wi, int *iloz, int *ihiz, d *z, int *ldz, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dlaqr4(wantt, wantz, n, ilo, ihi, h, ldh, wr, wi, iloz, ihiz, z, ldz, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqr5 "F_FUNC(dlaqr5,DLAQR5)"(bint *wantt, bint *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, d *sr, d *si, d *h, int *ldh, int *iloz, int *ihiz, d *z, int *ldz, d *v, int *ldv, d *u, int *ldu, int *nv, d *wv, int *ldwv, int *nh, d *wh, int *ldwh) nogil
|
||
|
|
cdef void dlaqr5(bint *wantt, bint *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, d *sr, d *si, d *h, int *ldh, int *iloz, int *ihiz, d *z, int *ldz, d *v, int *ldv, d *u, int *ldu, int *nv, d *wv, int *ldwv, int *nh, d *wh, int *ldwh) nogil:
|
||
|
|
_fortran_dlaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, si, h, ldh, iloz, ihiz, z, ldz, v, ldv, u, ldu, nv, wv, ldwv, nh, wh, ldwh)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqsb "F_FUNC(dlaqsb,DLAQSB)"(char *uplo, int *n, int *kd, d *ab, int *ldab, d *s, d *scond, d *amax, char *equed) nogil
|
||
|
|
cdef void dlaqsb(char *uplo, int *n, int *kd, d *ab, int *ldab, d *s, d *scond, d *amax, char *equed) nogil:
|
||
|
|
_fortran_dlaqsb(uplo, n, kd, ab, ldab, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqsp "F_FUNC(dlaqsp,DLAQSP)"(char *uplo, int *n, d *ap, d *s, d *scond, d *amax, char *equed) nogil
|
||
|
|
cdef void dlaqsp(char *uplo, int *n, d *ap, d *s, d *scond, d *amax, char *equed) nogil:
|
||
|
|
_fortran_dlaqsp(uplo, n, ap, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqsy "F_FUNC(dlaqsy,DLAQSY)"(char *uplo, int *n, d *a, int *lda, d *s, d *scond, d *amax, char *equed) nogil
|
||
|
|
cdef void dlaqsy(char *uplo, int *n, d *a, int *lda, d *s, d *scond, d *amax, char *equed) nogil:
|
||
|
|
_fortran_dlaqsy(uplo, n, a, lda, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaqtr "F_FUNC(dlaqtr,DLAQTR)"(bint *ltran, bint *lreal, int *n, d *t, int *ldt, d *b, d *w, d *scale, d *x, d *work, int *info) nogil
|
||
|
|
cdef void dlaqtr(bint *ltran, bint *lreal, int *n, d *t, int *ldt, d *b, d *w, d *scale, d *x, d *work, int *info) nogil:
|
||
|
|
_fortran_dlaqtr(ltran, lreal, n, t, ldt, b, w, scale, x, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlar1v "F_FUNC(dlar1v,DLAR1V)"(int *n, int *b1, int *bn, d *lambda_, d *d, d *l, d *ld, d *lld, d *pivmin, d *gaptol, d *z, bint *wantnc, int *negcnt, d *ztz, d *mingma, int *r, int *isuppz, d *nrminv, d *resid, d *rqcorr, d *work) nogil
|
||
|
|
cdef void dlar1v(int *n, int *b1, int *bn, d *lambda_, d *d, d *l, d *ld, d *lld, d *pivmin, d *gaptol, d *z, bint *wantnc, int *negcnt, d *ztz, d *mingma, int *r, int *isuppz, d *nrminv, d *resid, d *rqcorr, d *work) nogil:
|
||
|
|
_fortran_dlar1v(n, b1, bn, lambda_, d, l, ld, lld, pivmin, gaptol, z, wantnc, negcnt, ztz, mingma, r, isuppz, nrminv, resid, rqcorr, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlar2v "F_FUNC(dlar2v,DLAR2V)"(int *n, d *x, d *y, d *z, int *incx, d *c, d *s, int *incc) nogil
|
||
|
|
cdef void dlar2v(int *n, d *x, d *y, d *z, int *incx, d *c, d *s, int *incc) nogil:
|
||
|
|
_fortran_dlar2v(n, x, y, z, incx, c, s, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarf "F_FUNC(dlarf,DLARF)"(char *side, int *m, int *n, d *v, int *incv, d *tau, d *c, int *ldc, d *work) nogil
|
||
|
|
cdef void dlarf(char *side, int *m, int *n, d *v, int *incv, d *tau, d *c, int *ldc, d *work) nogil:
|
||
|
|
_fortran_dlarf(side, m, n, v, incv, tau, c, ldc, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarfb "F_FUNC(dlarfb,DLARFB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, d *v, int *ldv, d *t, int *ldt, d *c, int *ldc, d *work, int *ldwork) nogil
|
||
|
|
cdef void dlarfb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, d *v, int *ldv, d *t, int *ldt, d *c, int *ldc, d *work, int *ldwork) nogil:
|
||
|
|
_fortran_dlarfb(side, trans, direct, storev, m, n, k, v, ldv, t, ldt, c, ldc, work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarfg "F_FUNC(dlarfg,DLARFG)"(int *n, d *alpha, d *x, int *incx, d *tau) nogil
|
||
|
|
cdef void dlarfg(int *n, d *alpha, d *x, int *incx, d *tau) nogil:
|
||
|
|
_fortran_dlarfg(n, alpha, x, incx, tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarfgp "F_FUNC(dlarfgp,DLARFGP)"(int *n, d *alpha, d *x, int *incx, d *tau) nogil
|
||
|
|
cdef void dlarfgp(int *n, d *alpha, d *x, int *incx, d *tau) nogil:
|
||
|
|
_fortran_dlarfgp(n, alpha, x, incx, tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarft "F_FUNC(dlarft,DLARFT)"(char *direct, char *storev, int *n, int *k, d *v, int *ldv, d *tau, d *t, int *ldt) nogil
|
||
|
|
cdef void dlarft(char *direct, char *storev, int *n, int *k, d *v, int *ldv, d *tau, d *t, int *ldt) nogil:
|
||
|
|
_fortran_dlarft(direct, storev, n, k, v, ldv, tau, t, ldt)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarfx "F_FUNC(dlarfx,DLARFX)"(char *side, int *m, int *n, d *v, d *tau, d *c, int *ldc, d *work) nogil
|
||
|
|
cdef void dlarfx(char *side, int *m, int *n, d *v, d *tau, d *c, int *ldc, d *work) nogil:
|
||
|
|
_fortran_dlarfx(side, m, n, v, tau, c, ldc, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlargv "F_FUNC(dlargv,DLARGV)"(int *n, d *x, int *incx, d *y, int *incy, d *c, int *incc) nogil
|
||
|
|
cdef void dlargv(int *n, d *x, int *incx, d *y, int *incy, d *c, int *incc) nogil:
|
||
|
|
_fortran_dlargv(n, x, incx, y, incy, c, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarnv "F_FUNC(dlarnv,DLARNV)"(int *idist, int *iseed, int *n, d *x) nogil
|
||
|
|
cdef void dlarnv(int *idist, int *iseed, int *n, d *x) nogil:
|
||
|
|
_fortran_dlarnv(idist, iseed, n, x)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarra "F_FUNC(dlarra,DLARRA)"(int *n, d *d, d *e, d *e2, d *spltol, d *tnrm, int *nsplit, int *isplit, int *info) nogil
|
||
|
|
cdef void dlarra(int *n, d *d, d *e, d *e2, d *spltol, d *tnrm, int *nsplit, int *isplit, int *info) nogil:
|
||
|
|
_fortran_dlarra(n, d, e, e2, spltol, tnrm, nsplit, isplit, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarrb "F_FUNC(dlarrb,DLARRB)"(int *n, d *d, d *lld, int *ifirst, int *ilast, d *rtol1, d *rtol2, int *offset, d *w, d *wgap, d *werr, d *work, int *iwork, d *pivmin, d *spdiam, int *twist, int *info) nogil
|
||
|
|
cdef void dlarrb(int *n, d *d, d *lld, int *ifirst, int *ilast, d *rtol1, d *rtol2, int *offset, d *w, d *wgap, d *werr, d *work, int *iwork, d *pivmin, d *spdiam, int *twist, int *info) nogil:
|
||
|
|
_fortran_dlarrb(n, d, lld, ifirst, ilast, rtol1, rtol2, offset, w, wgap, werr, work, iwork, pivmin, spdiam, twist, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarrc "F_FUNC(dlarrc,DLARRC)"(char *jobt, int *n, d *vl, d *vu, d *d, d *e, d *pivmin, int *eigcnt, int *lcnt, int *rcnt, int *info) nogil
|
||
|
|
cdef void dlarrc(char *jobt, int *n, d *vl, d *vu, d *d, d *e, d *pivmin, int *eigcnt, int *lcnt, int *rcnt, int *info) nogil:
|
||
|
|
_fortran_dlarrc(jobt, n, vl, vu, d, e, pivmin, eigcnt, lcnt, rcnt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarrd "F_FUNC(dlarrd,DLARRD)"(char *range, char *order, int *n, d *vl, d *vu, int *il, int *iu, d *gers, d *reltol, d *d, d *e, d *e2, d *pivmin, int *nsplit, int *isplit, int *m, d *w, d *werr, d *wl, d *wu, int *iblock, int *indexw, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlarrd(char *range, char *order, int *n, d *vl, d *vu, int *il, int *iu, d *gers, d *reltol, d *d, d *e, d *e2, d *pivmin, int *nsplit, int *isplit, int *m, d *w, d *werr, d *wl, d *wu, int *iblock, int *indexw, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlarrd(range, order, n, vl, vu, il, iu, gers, reltol, d, e, e2, pivmin, nsplit, isplit, m, w, werr, wl, wu, iblock, indexw, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarre "F_FUNC(dlarre,DLARRE)"(char *range, int *n, d *vl, d *vu, int *il, int *iu, d *d, d *e, d *e2, d *rtol1, d *rtol2, d *spltol, int *nsplit, int *isplit, int *m, d *w, d *werr, d *wgap, int *iblock, int *indexw, d *gers, d *pivmin, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlarre(char *range, int *n, d *vl, d *vu, int *il, int *iu, d *d, d *e, d *e2, d *rtol1, d *rtol2, d *spltol, int *nsplit, int *isplit, int *m, d *w, d *werr, d *wgap, int *iblock, int *indexw, d *gers, d *pivmin, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlarre(range, n, vl, vu, il, iu, d, e, e2, rtol1, rtol2, spltol, nsplit, isplit, m, w, werr, wgap, iblock, indexw, gers, pivmin, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarrf "F_FUNC(dlarrf,DLARRF)"(int *n, d *d, d *l, d *ld, int *clstrt, int *clend, d *w, d *wgap, d *werr, d *spdiam, d *clgapl, d *clgapr, d *pivmin, d *sigma, d *dplus, d *lplus, d *work, int *info) nogil
|
||
|
|
cdef void dlarrf(int *n, d *d, d *l, d *ld, int *clstrt, int *clend, d *w, d *wgap, d *werr, d *spdiam, d *clgapl, d *clgapr, d *pivmin, d *sigma, d *dplus, d *lplus, d *work, int *info) nogil:
|
||
|
|
_fortran_dlarrf(n, d, l, ld, clstrt, clend, w, wgap, werr, spdiam, clgapl, clgapr, pivmin, sigma, dplus, lplus, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarrj "F_FUNC(dlarrj,DLARRJ)"(int *n, d *d, d *e2, int *ifirst, int *ilast, d *rtol, int *offset, d *w, d *werr, d *work, int *iwork, d *pivmin, d *spdiam, int *info) nogil
|
||
|
|
cdef void dlarrj(int *n, d *d, d *e2, int *ifirst, int *ilast, d *rtol, int *offset, d *w, d *werr, d *work, int *iwork, d *pivmin, d *spdiam, int *info) nogil:
|
||
|
|
_fortran_dlarrj(n, d, e2, ifirst, ilast, rtol, offset, w, werr, work, iwork, pivmin, spdiam, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarrk "F_FUNC(dlarrk,DLARRK)"(int *n, int *iw, d *gl, d *gu, d *d, d *e2, d *pivmin, d *reltol, d *w, d *werr, int *info) nogil
|
||
|
|
cdef void dlarrk(int *n, int *iw, d *gl, d *gu, d *d, d *e2, d *pivmin, d *reltol, d *w, d *werr, int *info) nogil:
|
||
|
|
_fortran_dlarrk(n, iw, gl, gu, d, e2, pivmin, reltol, w, werr, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarrr "F_FUNC(dlarrr,DLARRR)"(int *n, d *d, d *e, int *info) nogil
|
||
|
|
cdef void dlarrr(int *n, d *d, d *e, int *info) nogil:
|
||
|
|
_fortran_dlarrr(n, d, e, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarrv "F_FUNC(dlarrv,DLARRV)"(int *n, d *vl, d *vu, d *d, d *l, d *pivmin, int *isplit, int *m, int *dol, int *dou, d *minrgp, d *rtol1, d *rtol2, d *w, d *werr, d *wgap, int *iblock, int *indexw, d *gers, d *z, int *ldz, int *isuppz, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlarrv(int *n, d *vl, d *vu, d *d, d *l, d *pivmin, int *isplit, int *m, int *dol, int *dou, d *minrgp, d *rtol1, d *rtol2, d *w, d *werr, d *wgap, int *iblock, int *indexw, d *gers, d *z, int *ldz, int *isuppz, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlarrv(n, vl, vu, d, l, pivmin, isplit, m, dol, dou, minrgp, rtol1, rtol2, w, werr, wgap, iblock, indexw, gers, z, ldz, isuppz, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlartg "F_FUNC(dlartg,DLARTG)"(d *f, d *g, d *cs, d *sn, d *r) nogil
|
||
|
|
cdef void dlartg(d *f, d *g, d *cs, d *sn, d *r) nogil:
|
||
|
|
_fortran_dlartg(f, g, cs, sn, r)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlartgp "F_FUNC(dlartgp,DLARTGP)"(d *f, d *g, d *cs, d *sn, d *r) nogil
|
||
|
|
cdef void dlartgp(d *f, d *g, d *cs, d *sn, d *r) nogil:
|
||
|
|
_fortran_dlartgp(f, g, cs, sn, r)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlartgs "F_FUNC(dlartgs,DLARTGS)"(d *x, d *y, d *sigma, d *cs, d *sn) nogil
|
||
|
|
cdef void dlartgs(d *x, d *y, d *sigma, d *cs, d *sn) nogil:
|
||
|
|
_fortran_dlartgs(x, y, sigma, cs, sn)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlartv "F_FUNC(dlartv,DLARTV)"(int *n, d *x, int *incx, d *y, int *incy, d *c, d *s, int *incc) nogil
|
||
|
|
cdef void dlartv(int *n, d *x, int *incx, d *y, int *incy, d *c, d *s, int *incc) nogil:
|
||
|
|
_fortran_dlartv(n, x, incx, y, incy, c, s, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaruv "F_FUNC(dlaruv,DLARUV)"(int *iseed, int *n, d *x) nogil
|
||
|
|
cdef void dlaruv(int *iseed, int *n, d *x) nogil:
|
||
|
|
_fortran_dlaruv(iseed, n, x)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarz "F_FUNC(dlarz,DLARZ)"(char *side, int *m, int *n, int *l, d *v, int *incv, d *tau, d *c, int *ldc, d *work) nogil
|
||
|
|
cdef void dlarz(char *side, int *m, int *n, int *l, d *v, int *incv, d *tau, d *c, int *ldc, d *work) nogil:
|
||
|
|
_fortran_dlarz(side, m, n, l, v, incv, tau, c, ldc, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarzb "F_FUNC(dlarzb,DLARZB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, d *v, int *ldv, d *t, int *ldt, d *c, int *ldc, d *work, int *ldwork) nogil
|
||
|
|
cdef void dlarzb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, d *v, int *ldv, d *t, int *ldt, d *c, int *ldc, d *work, int *ldwork) nogil:
|
||
|
|
_fortran_dlarzb(side, trans, direct, storev, m, n, k, l, v, ldv, t, ldt, c, ldc, work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlarzt "F_FUNC(dlarzt,DLARZT)"(char *direct, char *storev, int *n, int *k, d *v, int *ldv, d *tau, d *t, int *ldt) nogil
|
||
|
|
cdef void dlarzt(char *direct, char *storev, int *n, int *k, d *v, int *ldv, d *tau, d *t, int *ldt) nogil:
|
||
|
|
_fortran_dlarzt(direct, storev, n, k, v, ldv, tau, t, ldt)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlas2 "F_FUNC(dlas2,DLAS2)"(d *f, d *g, d *h, d *ssmin, d *ssmax) nogil
|
||
|
|
cdef void dlas2(d *f, d *g, d *h, d *ssmin, d *ssmax) nogil:
|
||
|
|
_fortran_dlas2(f, g, h, ssmin, ssmax)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlascl "F_FUNC(dlascl,DLASCL)"(char *type_bn, int *kl, int *ku, d *cfrom, d *cto, int *m, int *n, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dlascl(char *type_bn, int *kl, int *ku, d *cfrom, d *cto, int *m, int *n, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dlascl(type_bn, kl, ku, cfrom, cto, m, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasd0 "F_FUNC(dlasd0,DLASD0)"(int *n, int *sqre, d *d, d *e, d *u, int *ldu, d *vt, int *ldvt, int *smlsiz, int *iwork, d *work, int *info) nogil
|
||
|
|
cdef void dlasd0(int *n, int *sqre, d *d, d *e, d *u, int *ldu, d *vt, int *ldvt, int *smlsiz, int *iwork, d *work, int *info) nogil:
|
||
|
|
_fortran_dlasd0(n, sqre, d, e, u, ldu, vt, ldvt, smlsiz, iwork, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasd1 "F_FUNC(dlasd1,DLASD1)"(int *nl, int *nr, int *sqre, d *d, d *alpha, d *beta, d *u, int *ldu, d *vt, int *ldvt, int *idxq, int *iwork, d *work, int *info) nogil
|
||
|
|
cdef void dlasd1(int *nl, int *nr, int *sqre, d *d, d *alpha, d *beta, d *u, int *ldu, d *vt, int *ldvt, int *idxq, int *iwork, d *work, int *info) nogil:
|
||
|
|
_fortran_dlasd1(nl, nr, sqre, d, alpha, beta, u, ldu, vt, ldvt, idxq, iwork, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasd2 "F_FUNC(dlasd2,DLASD2)"(int *nl, int *nr, int *sqre, int *k, d *d, d *z, d *alpha, d *beta, d *u, int *ldu, d *vt, int *ldvt, d *dsigma, d *u2, int *ldu2, d *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, int *info) nogil
|
||
|
|
cdef void dlasd2(int *nl, int *nr, int *sqre, int *k, d *d, d *z, d *alpha, d *beta, d *u, int *ldu, d *vt, int *ldvt, d *dsigma, d *u2, int *ldu2, d *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, int *info) nogil:
|
||
|
|
_fortran_dlasd2(nl, nr, sqre, k, d, z, alpha, beta, u, ldu, vt, ldvt, dsigma, u2, ldu2, vt2, ldvt2, idxp, idx, idxc, idxq, coltyp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasd3 "F_FUNC(dlasd3,DLASD3)"(int *nl, int *nr, int *sqre, int *k, d *d, d *q, int *ldq, d *dsigma, d *u, int *ldu, d *u2, int *ldu2, d *vt, int *ldvt, d *vt2, int *ldvt2, int *idxc, int *ctot, d *z, int *info) nogil
|
||
|
|
cdef void dlasd3(int *nl, int *nr, int *sqre, int *k, d *d, d *q, int *ldq, d *dsigma, d *u, int *ldu, d *u2, int *ldu2, d *vt, int *ldvt, d *vt2, int *ldvt2, int *idxc, int *ctot, d *z, int *info) nogil:
|
||
|
|
_fortran_dlasd3(nl, nr, sqre, k, d, q, ldq, dsigma, u, ldu, u2, ldu2, vt, ldvt, vt2, ldvt2, idxc, ctot, z, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasd4 "F_FUNC(dlasd4,DLASD4)"(int *n, int *i, d *d, d *z, d *delta, d *rho, d *sigma, d *work, int *info) nogil
|
||
|
|
cdef void dlasd4(int *n, int *i, d *d, d *z, d *delta, d *rho, d *sigma, d *work, int *info) nogil:
|
||
|
|
_fortran_dlasd4(n, i, d, z, delta, rho, sigma, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasd5 "F_FUNC(dlasd5,DLASD5)"(int *i, d *d, d *z, d *delta, d *rho, d *dsigma, d *work) nogil
|
||
|
|
cdef void dlasd5(int *i, d *d, d *z, d *delta, d *rho, d *dsigma, d *work) nogil:
|
||
|
|
_fortran_dlasd5(i, d, z, delta, rho, dsigma, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasd6 "F_FUNC(dlasd6,DLASD6)"(int *icompq, int *nl, int *nr, int *sqre, d *d, d *vf, d *vl, d *alpha, d *beta, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, d *givnum, int *ldgnum, d *poles, d *difl, d *difr, d *z, int *k, d *c, d *s, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlasd6(int *icompq, int *nl, int *nr, int *sqre, d *d, d *vf, d *vl, d *alpha, d *beta, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, d *givnum, int *ldgnum, d *poles, d *difl, d *difr, d *z, int *k, d *c, d *s, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlasd6(icompq, nl, nr, sqre, d, vf, vl, alpha, beta, idxq, perm, givptr, givcol, ldgcol, givnum, ldgnum, poles, difl, difr, z, k, c, s, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasd7 "F_FUNC(dlasd7,DLASD7)"(int *icompq, int *nl, int *nr, int *sqre, int *k, d *d, d *z, d *zw, d *vf, d *vfw, d *vl, d *vlw, d *alpha, d *beta, d *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, d *givnum, int *ldgnum, d *c, d *s, int *info) nogil
|
||
|
|
cdef void dlasd7(int *icompq, int *nl, int *nr, int *sqre, int *k, d *d, d *z, d *zw, d *vf, d *vfw, d *vl, d *vlw, d *alpha, d *beta, d *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, d *givnum, int *ldgnum, d *c, d *s, int *info) nogil:
|
||
|
|
_fortran_dlasd7(icompq, nl, nr, sqre, k, d, z, zw, vf, vfw, vl, vlw, alpha, beta, dsigma, idx, idxp, idxq, perm, givptr, givcol, ldgcol, givnum, ldgnum, c, s, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasd8 "F_FUNC(dlasd8,DLASD8)"(int *icompq, int *k, d *d, d *z, d *vf, d *vl, d *difl, d *difr, int *lddifr, d *dsigma, d *work, int *info) nogil
|
||
|
|
cdef void dlasd8(int *icompq, int *k, d *d, d *z, d *vf, d *vl, d *difl, d *difr, int *lddifr, d *dsigma, d *work, int *info) nogil:
|
||
|
|
_fortran_dlasd8(icompq, k, d, z, vf, vl, difl, difr, lddifr, dsigma, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasda "F_FUNC(dlasda,DLASDA)"(int *icompq, int *smlsiz, int *n, int *sqre, d *d, d *e, d *u, int *ldu, d *vt, int *k, d *difl, d *difr, d *z, d *poles, int *givptr, int *givcol, int *ldgcol, int *perm, d *givnum, d *c, d *s, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dlasda(int *icompq, int *smlsiz, int *n, int *sqre, d *d, d *e, d *u, int *ldu, d *vt, int *k, d *difl, d *difr, d *z, d *poles, int *givptr, int *givcol, int *ldgcol, int *perm, d *givnum, d *c, d *s, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dlasda(icompq, smlsiz, n, sqre, d, e, u, ldu, vt, k, difl, difr, z, poles, givptr, givcol, ldgcol, perm, givnum, c, s, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasdq "F_FUNC(dlasdq,DLASDQ)"(char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, d *d, d *e, d *vt, int *ldvt, d *u, int *ldu, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dlasdq(char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, d *d, d *e, d *vt, int *ldvt, d *u, int *ldu, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dlasdq(uplo, sqre, n, ncvt, nru, ncc, d, e, vt, ldvt, u, ldu, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasdt "F_FUNC(dlasdt,DLASDT)"(int *n, int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub) nogil
|
||
|
|
cdef void dlasdt(int *n, int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub) nogil:
|
||
|
|
_fortran_dlasdt(n, lvl, nd, inode, ndiml, ndimr, msub)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaset "F_FUNC(dlaset,DLASET)"(char *uplo, int *m, int *n, d *alpha, d *beta, d *a, int *lda) nogil
|
||
|
|
cdef void dlaset(char *uplo, int *m, int *n, d *alpha, d *beta, d *a, int *lda) nogil:
|
||
|
|
_fortran_dlaset(uplo, m, n, alpha, beta, a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasq1 "F_FUNC(dlasq1,DLASQ1)"(int *n, d *d, d *e, d *work, int *info) nogil
|
||
|
|
cdef void dlasq1(int *n, d *d, d *e, d *work, int *info) nogil:
|
||
|
|
_fortran_dlasq1(n, d, e, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasq2 "F_FUNC(dlasq2,DLASQ2)"(int *n, d *z, int *info) nogil
|
||
|
|
cdef void dlasq2(int *n, d *z, int *info) nogil:
|
||
|
|
_fortran_dlasq2(n, z, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasq3 "F_FUNC(dlasq3,DLASQ3)"(int *i0, int *n0, d *z, int *pp, d *dmin, d *sigma, d *desig, d *qmax, int *nfail, int *iter, int *ndiv, bint *ieee, int *ttype, d *dmin1, d *dmin2, d *dn, d *dn1, d *dn2, d *g, d *tau) nogil
|
||
|
|
cdef void dlasq3(int *i0, int *n0, d *z, int *pp, d *dmin, d *sigma, d *desig, d *qmax, int *nfail, int *iter, int *ndiv, bint *ieee, int *ttype, d *dmin1, d *dmin2, d *dn, d *dn1, d *dn2, d *g, d *tau) nogil:
|
||
|
|
_fortran_dlasq3(i0, n0, z, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, g, tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasq4 "F_FUNC(dlasq4,DLASQ4)"(int *i0, int *n0, d *z, int *pp, int *n0in, d *dmin, d *dmin1, d *dmin2, d *dn, d *dn1, d *dn2, d *tau, int *ttype, d *g) nogil
|
||
|
|
cdef void dlasq4(int *i0, int *n0, d *z, int *pp, int *n0in, d *dmin, d *dmin1, d *dmin2, d *dn, d *dn1, d *dn2, d *tau, int *ttype, d *g) nogil:
|
||
|
|
_fortran_dlasq4(i0, n0, z, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasq6 "F_FUNC(dlasq6,DLASQ6)"(int *i0, int *n0, d *z, int *pp, d *dmin, d *dmin1, d *dmin2, d *dn, d *dnm1, d *dnm2) nogil
|
||
|
|
cdef void dlasq6(int *i0, int *n0, d *z, int *pp, d *dmin, d *dmin1, d *dmin2, d *dn, d *dnm1, d *dnm2) nogil:
|
||
|
|
_fortran_dlasq6(i0, n0, z, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasr "F_FUNC(dlasr,DLASR)"(char *side, char *pivot, char *direct, int *m, int *n, d *c, d *s, d *a, int *lda) nogil
|
||
|
|
cdef void dlasr(char *side, char *pivot, char *direct, int *m, int *n, d *c, d *s, d *a, int *lda) nogil:
|
||
|
|
_fortran_dlasr(side, pivot, direct, m, n, c, s, a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasrt "F_FUNC(dlasrt,DLASRT)"(char *id, int *n, d *d, int *info) nogil
|
||
|
|
cdef void dlasrt(char *id, int *n, d *d, int *info) nogil:
|
||
|
|
_fortran_dlasrt(id, n, d, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlassq "F_FUNC(dlassq,DLASSQ)"(int *n, d *x, int *incx, d *scale, d *sumsq) nogil
|
||
|
|
cdef void dlassq(int *n, d *x, int *incx, d *scale, d *sumsq) nogil:
|
||
|
|
_fortran_dlassq(n, x, incx, scale, sumsq)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasv2 "F_FUNC(dlasv2,DLASV2)"(d *f, d *g, d *h, d *ssmin, d *ssmax, d *snr, d *csr, d *snl, d *csl) nogil
|
||
|
|
cdef void dlasv2(d *f, d *g, d *h, d *ssmin, d *ssmax, d *snr, d *csr, d *snl, d *csl) nogil:
|
||
|
|
_fortran_dlasv2(f, g, h, ssmin, ssmax, snr, csr, snl, csl)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlaswp "F_FUNC(dlaswp,DLASWP)"(int *n, d *a, int *lda, int *k1, int *k2, int *ipiv, int *incx) nogil
|
||
|
|
cdef void dlaswp(int *n, d *a, int *lda, int *k1, int *k2, int *ipiv, int *incx) nogil:
|
||
|
|
_fortran_dlaswp(n, a, lda, k1, k2, ipiv, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasy2 "F_FUNC(dlasy2,DLASY2)"(bint *ltranl, bint *ltranr, int *isgn, int *n1, int *n2, d *tl, int *ldtl, d *tr, int *ldtr, d *b, int *ldb, d *scale, d *x, int *ldx, d *xnorm, int *info) nogil
|
||
|
|
cdef void dlasy2(bint *ltranl, bint *ltranr, int *isgn, int *n1, int *n2, d *tl, int *ldtl, d *tr, int *ldtr, d *b, int *ldb, d *scale, d *x, int *ldx, d *xnorm, int *info) nogil:
|
||
|
|
_fortran_dlasy2(ltranl, ltranr, isgn, n1, n2, tl, ldtl, tr, ldtr, b, ldb, scale, x, ldx, xnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlasyf "F_FUNC(dlasyf,DLASYF)"(char *uplo, int *n, int *nb, int *kb, d *a, int *lda, int *ipiv, d *w, int *ldw, int *info) nogil
|
||
|
|
cdef void dlasyf(char *uplo, int *n, int *nb, int *kb, d *a, int *lda, int *ipiv, d *w, int *ldw, int *info) nogil:
|
||
|
|
_fortran_dlasyf(uplo, n, nb, kb, a, lda, ipiv, w, ldw, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlat2s "F_FUNC(dlat2s,DLAT2S)"(char *uplo, int *n, d *a, int *lda, s *sa, int *ldsa, int *info) nogil
|
||
|
|
cdef void dlat2s(char *uplo, int *n, d *a, int *lda, s *sa, int *ldsa, int *info) nogil:
|
||
|
|
_fortran_dlat2s(uplo, n, a, lda, sa, ldsa, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlatbs "F_FUNC(dlatbs,DLATBS)"(char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, d *ab, int *ldab, d *x, d *scale, d *cnorm, int *info) nogil
|
||
|
|
cdef void dlatbs(char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, d *ab, int *ldab, d *x, d *scale, d *cnorm, int *info) nogil:
|
||
|
|
_fortran_dlatbs(uplo, trans, diag, normin, n, kd, ab, ldab, x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlatdf "F_FUNC(dlatdf,DLATDF)"(int *ijob, int *n, d *z, int *ldz, d *rhs, d *rdsum, d *rdscal, int *ipiv, int *jpiv) nogil
|
||
|
|
cdef void dlatdf(int *ijob, int *n, d *z, int *ldz, d *rhs, d *rdsum, d *rdscal, int *ipiv, int *jpiv) nogil:
|
||
|
|
_fortran_dlatdf(ijob, n, z, ldz, rhs, rdsum, rdscal, ipiv, jpiv)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlatps "F_FUNC(dlatps,DLATPS)"(char *uplo, char *trans, char *diag, char *normin, int *n, d *ap, d *x, d *scale, d *cnorm, int *info) nogil
|
||
|
|
cdef void dlatps(char *uplo, char *trans, char *diag, char *normin, int *n, d *ap, d *x, d *scale, d *cnorm, int *info) nogil:
|
||
|
|
_fortran_dlatps(uplo, trans, diag, normin, n, ap, x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlatrd "F_FUNC(dlatrd,DLATRD)"(char *uplo, int *n, int *nb, d *a, int *lda, d *e, d *tau, d *w, int *ldw) nogil
|
||
|
|
cdef void dlatrd(char *uplo, int *n, int *nb, d *a, int *lda, d *e, d *tau, d *w, int *ldw) nogil:
|
||
|
|
_fortran_dlatrd(uplo, n, nb, a, lda, e, tau, w, ldw)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlatrs "F_FUNC(dlatrs,DLATRS)"(char *uplo, char *trans, char *diag, char *normin, int *n, d *a, int *lda, d *x, d *scale, d *cnorm, int *info) nogil
|
||
|
|
cdef void dlatrs(char *uplo, char *trans, char *diag, char *normin, int *n, d *a, int *lda, d *x, d *scale, d *cnorm, int *info) nogil:
|
||
|
|
_fortran_dlatrs(uplo, trans, diag, normin, n, a, lda, x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlatrz "F_FUNC(dlatrz,DLATRZ)"(int *m, int *n, int *l, d *a, int *lda, d *tau, d *work) nogil
|
||
|
|
cdef void dlatrz(int *m, int *n, int *l, d *a, int *lda, d *tau, d *work) nogil:
|
||
|
|
_fortran_dlatrz(m, n, l, a, lda, tau, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlauu2 "F_FUNC(dlauu2,DLAUU2)"(char *uplo, int *n, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dlauu2(char *uplo, int *n, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dlauu2(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dlauum "F_FUNC(dlauum,DLAUUM)"(char *uplo, int *n, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dlauum(char *uplo, int *n, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dlauum(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dopgtr "F_FUNC(dopgtr,DOPGTR)"(char *uplo, int *n, d *ap, d *tau, d *q, int *ldq, d *work, int *info) nogil
|
||
|
|
cdef void dopgtr(char *uplo, int *n, d *ap, d *tau, d *q, int *ldq, d *work, int *info) nogil:
|
||
|
|
_fortran_dopgtr(uplo, n, ap, tau, q, ldq, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dopmtr "F_FUNC(dopmtr,DOPMTR)"(char *side, char *uplo, char *trans, int *m, int *n, d *ap, d *tau, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dopmtr(char *side, char *uplo, char *trans, int *m, int *n, d *ap, d *tau, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dopmtr(side, uplo, trans, m, n, ap, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorbdb "F_FUNC(dorbdb,DORBDB)"(char *trans, char *signs, int *m, int *p, int *q, d *x11, int *ldx11, d *x12, int *ldx12, d *x21, int *ldx21, d *x22, int *ldx22, d *theta, d *phi, d *taup1, d *taup2, d *tauq1, d *tauq2, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dorbdb(char *trans, char *signs, int *m, int *p, int *q, d *x11, int *ldx11, d *x12, int *ldx12, d *x21, int *ldx21, d *x22, int *ldx22, d *theta, d *phi, d *taup1, d *taup2, d *tauq1, d *tauq2, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dorbdb(trans, signs, m, p, q, x11, ldx11, x12, ldx12, x21, ldx21, x22, ldx22, theta, phi, taup1, taup2, tauq1, tauq2, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorcsd "F_FUNC(dorcsd,DORCSD)"(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, char *signs, int *m, int *p, int *q, d *x11, int *ldx11, d *x12, int *ldx12, d *x21, int *ldx21, d *x22, int *ldx22, d *theta, d *u1, int *ldu1, d *u2, int *ldu2, d *v1t, int *ldv1t, d *v2t, int *ldv2t, d *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void dorcsd(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, char *signs, int *m, int *p, int *q, d *x11, int *ldx11, d *x12, int *ldx12, d *x21, int *ldx21, d *x22, int *ldx22, d *theta, d *u1, int *ldu1, d *u2, int *ldu2, d *v1t, int *ldv1t, d *v2t, int *ldv2t, d *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dorcsd(jobu1, jobu2, jobv1t, jobv2t, trans, signs, m, p, q, x11, ldx11, x12, ldx12, x21, ldx21, x22, ldx22, theta, u1, ldu1, u2, ldu2, v1t, ldv1t, v2t, ldv2t, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorg2l "F_FUNC(dorg2l,DORG2L)"(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dorg2l(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dorg2l(m, n, k, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorg2r "F_FUNC(dorg2r,DORG2R)"(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dorg2r(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dorg2r(m, n, k, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorgbr "F_FUNC(dorgbr,DORGBR)"(char *vect, int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dorgbr(char *vect, int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dorgbr(vect, m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorghr "F_FUNC(dorghr,DORGHR)"(int *n, int *ilo, int *ihi, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dorghr(int *n, int *ilo, int *ihi, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dorghr(n, ilo, ihi, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorgl2 "F_FUNC(dorgl2,DORGL2)"(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dorgl2(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dorgl2(m, n, k, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorglq "F_FUNC(dorglq,DORGLQ)"(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dorglq(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dorglq(m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorgql "F_FUNC(dorgql,DORGQL)"(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dorgql(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dorgql(m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorgqr "F_FUNC(dorgqr,DORGQR)"(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dorgqr(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dorgqr(m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorgr2 "F_FUNC(dorgr2,DORGR2)"(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *info) nogil
|
||
|
|
cdef void dorgr2(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *info) nogil:
|
||
|
|
_fortran_dorgr2(m, n, k, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorgrq "F_FUNC(dorgrq,DORGRQ)"(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dorgrq(int *m, int *n, int *k, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dorgrq(m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorgtr "F_FUNC(dorgtr,DORGTR)"(char *uplo, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dorgtr(char *uplo, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dorgtr(uplo, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorm2l "F_FUNC(dorm2l,DORM2L)"(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dorm2l(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dorm2l(side, trans, m, n, k, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorm2r "F_FUNC(dorm2r,DORM2R)"(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dorm2r(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dorm2r(side, trans, m, n, k, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormbr "F_FUNC(dormbr,DORMBR)"(char *vect, char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dormbr(char *vect, char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dormbr(vect, side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormhr "F_FUNC(dormhr,DORMHR)"(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dormhr(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dormhr(side, trans, m, n, ilo, ihi, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dorml2 "F_FUNC(dorml2,DORML2)"(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dorml2(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dorml2(side, trans, m, n, k, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormlq "F_FUNC(dormlq,DORMLQ)"(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dormlq(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dormlq(side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormql "F_FUNC(dormql,DORMQL)"(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dormql(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dormql(side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormqr "F_FUNC(dormqr,DORMQR)"(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dormqr(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dormqr(side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormr2 "F_FUNC(dormr2,DORMR2)"(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dormr2(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dormr2(side, trans, m, n, k, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormr3 "F_FUNC(dormr3,DORMR3)"(char *side, char *trans, int *m, int *n, int *k, int *l, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil
|
||
|
|
cdef void dormr3(char *side, char *trans, int *m, int *n, int *k, int *l, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *info) nogil:
|
||
|
|
_fortran_dormr3(side, trans, m, n, k, l, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormrq "F_FUNC(dormrq,DORMRQ)"(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dormrq(char *side, char *trans, int *m, int *n, int *k, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dormrq(side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormrz "F_FUNC(dormrz,DORMRZ)"(char *side, char *trans, int *m, int *n, int *k, int *l, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dormrz(char *side, char *trans, int *m, int *n, int *k, int *l, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dormrz(side, trans, m, n, k, l, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dormtr "F_FUNC(dormtr,DORMTR)"(char *side, char *uplo, char *trans, int *m, int *n, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dormtr(char *side, char *uplo, char *trans, int *m, int *n, d *a, int *lda, d *tau, d *c, int *ldc, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dormtr(side, uplo, trans, m, n, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpbcon "F_FUNC(dpbcon,DPBCON)"(char *uplo, int *n, int *kd, d *ab, int *ldab, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dpbcon(char *uplo, int *n, int *kd, d *ab, int *ldab, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dpbcon(uplo, n, kd, ab, ldab, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpbequ "F_FUNC(dpbequ,DPBEQU)"(char *uplo, int *n, int *kd, d *ab, int *ldab, d *s, d *scond, d *amax, int *info) nogil
|
||
|
|
cdef void dpbequ(char *uplo, int *n, int *kd, d *ab, int *ldab, d *s, d *scond, d *amax, int *info) nogil:
|
||
|
|
_fortran_dpbequ(uplo, n, kd, ab, ldab, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpbrfs "F_FUNC(dpbrfs,DPBRFS)"(char *uplo, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *afb, int *ldafb, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dpbrfs(char *uplo, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *afb, int *ldafb, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dpbrfs(uplo, n, kd, nrhs, ab, ldab, afb, ldafb, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpbstf "F_FUNC(dpbstf,DPBSTF)"(char *uplo, int *n, int *kd, d *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void dpbstf(char *uplo, int *n, int *kd, d *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_dpbstf(uplo, n, kd, ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpbsv "F_FUNC(dpbsv,DPBSV)"(char *uplo, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dpbsv(char *uplo, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dpbsv(uplo, n, kd, nrhs, ab, ldab, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpbsvx "F_FUNC(dpbsvx,DPBSVX)"(char *fact, char *uplo, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *afb, int *ldafb, char *equed, d *s, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dpbsvx(char *fact, char *uplo, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *afb, int *ldafb, char *equed, d *s, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dpbsvx(fact, uplo, n, kd, nrhs, ab, ldab, afb, ldafb, equed, s, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpbtf2 "F_FUNC(dpbtf2,DPBTF2)"(char *uplo, int *n, int *kd, d *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void dpbtf2(char *uplo, int *n, int *kd, d *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_dpbtf2(uplo, n, kd, ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpbtrf "F_FUNC(dpbtrf,DPBTRF)"(char *uplo, int *n, int *kd, d *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void dpbtrf(char *uplo, int *n, int *kd, d *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_dpbtrf(uplo, n, kd, ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpbtrs "F_FUNC(dpbtrs,DPBTRS)"(char *uplo, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dpbtrs(char *uplo, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dpbtrs(uplo, n, kd, nrhs, ab, ldab, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpftrf "F_FUNC(dpftrf,DPFTRF)"(char *transr, char *uplo, int *n, d *a, int *info) nogil
|
||
|
|
cdef void dpftrf(char *transr, char *uplo, int *n, d *a, int *info) nogil:
|
||
|
|
_fortran_dpftrf(transr, uplo, n, a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpftri "F_FUNC(dpftri,DPFTRI)"(char *transr, char *uplo, int *n, d *a, int *info) nogil
|
||
|
|
cdef void dpftri(char *transr, char *uplo, int *n, d *a, int *info) nogil:
|
||
|
|
_fortran_dpftri(transr, uplo, n, a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpftrs "F_FUNC(dpftrs,DPFTRS)"(char *transr, char *uplo, int *n, int *nrhs, d *a, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dpftrs(char *transr, char *uplo, int *n, int *nrhs, d *a, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dpftrs(transr, uplo, n, nrhs, a, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpocon "F_FUNC(dpocon,DPOCON)"(char *uplo, int *n, d *a, int *lda, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dpocon(char *uplo, int *n, d *a, int *lda, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dpocon(uplo, n, a, lda, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpoequ "F_FUNC(dpoequ,DPOEQU)"(int *n, d *a, int *lda, d *s, d *scond, d *amax, int *info) nogil
|
||
|
|
cdef void dpoequ(int *n, d *a, int *lda, d *s, d *scond, d *amax, int *info) nogil:
|
||
|
|
_fortran_dpoequ(n, a, lda, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpoequb "F_FUNC(dpoequb,DPOEQUB)"(int *n, d *a, int *lda, d *s, d *scond, d *amax, int *info) nogil
|
||
|
|
cdef void dpoequb(int *n, d *a, int *lda, d *s, d *scond, d *amax, int *info) nogil:
|
||
|
|
_fortran_dpoequb(n, a, lda, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dporfs "F_FUNC(dporfs,DPORFS)"(char *uplo, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dporfs(char *uplo, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dporfs(uplo, n, nrhs, a, lda, af, ldaf, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dposv "F_FUNC(dposv,DPOSV)"(char *uplo, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dposv(char *uplo, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dposv(uplo, n, nrhs, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dposvx "F_FUNC(dposvx,DPOSVX)"(char *fact, char *uplo, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, char *equed, d *s, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dposvx(char *fact, char *uplo, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, char *equed, d *s, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dposvx(fact, uplo, n, nrhs, a, lda, af, ldaf, equed, s, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpotf2 "F_FUNC(dpotf2,DPOTF2)"(char *uplo, int *n, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dpotf2(char *uplo, int *n, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dpotf2(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpotrf "F_FUNC(dpotrf,DPOTRF)"(char *uplo, int *n, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dpotrf(char *uplo, int *n, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dpotrf(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpotri "F_FUNC(dpotri,DPOTRI)"(char *uplo, int *n, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dpotri(char *uplo, int *n, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dpotri(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpotrs "F_FUNC(dpotrs,DPOTRS)"(char *uplo, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dpotrs(char *uplo, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dpotrs(uplo, n, nrhs, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dppcon "F_FUNC(dppcon,DPPCON)"(char *uplo, int *n, d *ap, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dppcon(char *uplo, int *n, d *ap, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dppcon(uplo, n, ap, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dppequ "F_FUNC(dppequ,DPPEQU)"(char *uplo, int *n, d *ap, d *s, d *scond, d *amax, int *info) nogil
|
||
|
|
cdef void dppequ(char *uplo, int *n, d *ap, d *s, d *scond, d *amax, int *info) nogil:
|
||
|
|
_fortran_dppequ(uplo, n, ap, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpprfs "F_FUNC(dpprfs,DPPRFS)"(char *uplo, int *n, int *nrhs, d *ap, d *afp, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dpprfs(char *uplo, int *n, int *nrhs, d *ap, d *afp, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dpprfs(uplo, n, nrhs, ap, afp, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dppsv "F_FUNC(dppsv,DPPSV)"(char *uplo, int *n, int *nrhs, d *ap, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dppsv(char *uplo, int *n, int *nrhs, d *ap, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dppsv(uplo, n, nrhs, ap, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dppsvx "F_FUNC(dppsvx,DPPSVX)"(char *fact, char *uplo, int *n, int *nrhs, d *ap, d *afp, char *equed, d *s, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dppsvx(char *fact, char *uplo, int *n, int *nrhs, d *ap, d *afp, char *equed, d *s, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dppsvx(fact, uplo, n, nrhs, ap, afp, equed, s, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpptrf "F_FUNC(dpptrf,DPPTRF)"(char *uplo, int *n, d *ap, int *info) nogil
|
||
|
|
cdef void dpptrf(char *uplo, int *n, d *ap, int *info) nogil:
|
||
|
|
_fortran_dpptrf(uplo, n, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpptri "F_FUNC(dpptri,DPPTRI)"(char *uplo, int *n, d *ap, int *info) nogil
|
||
|
|
cdef void dpptri(char *uplo, int *n, d *ap, int *info) nogil:
|
||
|
|
_fortran_dpptri(uplo, n, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpptrs "F_FUNC(dpptrs,DPPTRS)"(char *uplo, int *n, int *nrhs, d *ap, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dpptrs(char *uplo, int *n, int *nrhs, d *ap, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dpptrs(uplo, n, nrhs, ap, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpstf2 "F_FUNC(dpstf2,DPSTF2)"(char *uplo, int *n, d *a, int *lda, int *piv, int *rank, d *tol, d *work, int *info) nogil
|
||
|
|
cdef void dpstf2(char *uplo, int *n, d *a, int *lda, int *piv, int *rank, d *tol, d *work, int *info) nogil:
|
||
|
|
_fortran_dpstf2(uplo, n, a, lda, piv, rank, tol, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpstrf "F_FUNC(dpstrf,DPSTRF)"(char *uplo, int *n, d *a, int *lda, int *piv, int *rank, d *tol, d *work, int *info) nogil
|
||
|
|
cdef void dpstrf(char *uplo, int *n, d *a, int *lda, int *piv, int *rank, d *tol, d *work, int *info) nogil:
|
||
|
|
_fortran_dpstrf(uplo, n, a, lda, piv, rank, tol, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dptcon "F_FUNC(dptcon,DPTCON)"(int *n, d *d, d *e, d *anorm, d *rcond, d *work, int *info) nogil
|
||
|
|
cdef void dptcon(int *n, d *d, d *e, d *anorm, d *rcond, d *work, int *info) nogil:
|
||
|
|
_fortran_dptcon(n, d, e, anorm, rcond, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpteqr "F_FUNC(dpteqr,DPTEQR)"(char *compz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *info) nogil
|
||
|
|
cdef void dpteqr(char *compz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *info) nogil:
|
||
|
|
_fortran_dpteqr(compz, n, d, e, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dptrfs "F_FUNC(dptrfs,DPTRFS)"(int *n, int *nrhs, d *d, d *e, d *df, d *ef, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *info) nogil
|
||
|
|
cdef void dptrfs(int *n, int *nrhs, d *d, d *e, d *df, d *ef, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *info) nogil:
|
||
|
|
_fortran_dptrfs(n, nrhs, d, e, df, ef, b, ldb, x, ldx, ferr, berr, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dptsv "F_FUNC(dptsv,DPTSV)"(int *n, int *nrhs, d *d, d *e, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dptsv(int *n, int *nrhs, d *d, d *e, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dptsv(n, nrhs, d, e, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dptsvx "F_FUNC(dptsvx,DPTSVX)"(char *fact, int *n, int *nrhs, d *d, d *e, d *df, d *ef, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *info) nogil
|
||
|
|
cdef void dptsvx(char *fact, int *n, int *nrhs, d *d, d *e, d *df, d *ef, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *info) nogil:
|
||
|
|
_fortran_dptsvx(fact, n, nrhs, d, e, df, ef, b, ldb, x, ldx, rcond, ferr, berr, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpttrf "F_FUNC(dpttrf,DPTTRF)"(int *n, d *d, d *e, int *info) nogil
|
||
|
|
cdef void dpttrf(int *n, d *d, d *e, int *info) nogil:
|
||
|
|
_fortran_dpttrf(n, d, e, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dpttrs "F_FUNC(dpttrs,DPTTRS)"(int *n, int *nrhs, d *d, d *e, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dpttrs(int *n, int *nrhs, d *d, d *e, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dpttrs(n, nrhs, d, e, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dptts2 "F_FUNC(dptts2,DPTTS2)"(int *n, int *nrhs, d *d, d *e, d *b, int *ldb) nogil
|
||
|
|
cdef void dptts2(int *n, int *nrhs, d *d, d *e, d *b, int *ldb) nogil:
|
||
|
|
_fortran_dptts2(n, nrhs, d, e, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_drscl "F_FUNC(drscl,DRSCL)"(int *n, d *sa, d *sx, int *incx) nogil
|
||
|
|
cdef void drscl(int *n, d *sa, d *sx, int *incx) nogil:
|
||
|
|
_fortran_drscl(n, sa, sx, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsbev "F_FUNC(dsbev,DSBEV)"(char *jobz, char *uplo, int *n, int *kd, d *ab, int *ldab, d *w, d *z, int *ldz, d *work, int *info) nogil
|
||
|
|
cdef void dsbev(char *jobz, char *uplo, int *n, int *kd, d *ab, int *ldab, d *w, d *z, int *ldz, d *work, int *info) nogil:
|
||
|
|
_fortran_dsbev(jobz, uplo, n, kd, ab, ldab, w, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsbevd "F_FUNC(dsbevd,DSBEVD)"(char *jobz, char *uplo, int *n, int *kd, d *ab, int *ldab, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dsbevd(char *jobz, char *uplo, int *n, int *kd, d *ab, int *ldab, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dsbevd(jobz, uplo, n, kd, ab, ldab, w, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsbevx "F_FUNC(dsbevx,DSBEVX)"(char *jobz, char *range, char *uplo, int *n, int *kd, d *ab, int *ldab, d *q, int *ldq, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void dsbevx(char *jobz, char *range, char *uplo, int *n, int *kd, d *ab, int *ldab, d *q, int *ldq, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_dsbevx(jobz, range, uplo, n, kd, ab, ldab, q, ldq, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsbgst "F_FUNC(dsbgst,DSBGST)"(char *vect, char *uplo, int *n, int *ka, int *kb, d *ab, int *ldab, d *bb, int *ldbb, d *x, int *ldx, d *work, int *info) nogil
|
||
|
|
cdef void dsbgst(char *vect, char *uplo, int *n, int *ka, int *kb, d *ab, int *ldab, d *bb, int *ldbb, d *x, int *ldx, d *work, int *info) nogil:
|
||
|
|
_fortran_dsbgst(vect, uplo, n, ka, kb, ab, ldab, bb, ldbb, x, ldx, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsbgv "F_FUNC(dsbgv,DSBGV)"(char *jobz, char *uplo, int *n, int *ka, int *kb, d *ab, int *ldab, d *bb, int *ldbb, d *w, d *z, int *ldz, d *work, int *info) nogil
|
||
|
|
cdef void dsbgv(char *jobz, char *uplo, int *n, int *ka, int *kb, d *ab, int *ldab, d *bb, int *ldbb, d *w, d *z, int *ldz, d *work, int *info) nogil:
|
||
|
|
_fortran_dsbgv(jobz, uplo, n, ka, kb, ab, ldab, bb, ldbb, w, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsbgvd "F_FUNC(dsbgvd,DSBGVD)"(char *jobz, char *uplo, int *n, int *ka, int *kb, d *ab, int *ldab, d *bb, int *ldbb, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dsbgvd(char *jobz, char *uplo, int *n, int *ka, int *kb, d *ab, int *ldab, d *bb, int *ldbb, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dsbgvd(jobz, uplo, n, ka, kb, ab, ldab, bb, ldbb, w, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsbgvx "F_FUNC(dsbgvx,DSBGVX)"(char *jobz, char *range, char *uplo, int *n, int *ka, int *kb, d *ab, int *ldab, d *bb, int *ldbb, d *q, int *ldq, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void dsbgvx(char *jobz, char *range, char *uplo, int *n, int *ka, int *kb, d *ab, int *ldab, d *bb, int *ldbb, d *q, int *ldq, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_dsbgvx(jobz, range, uplo, n, ka, kb, ab, ldab, bb, ldbb, q, ldq, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsbtrd "F_FUNC(dsbtrd,DSBTRD)"(char *vect, char *uplo, int *n, int *kd, d *ab, int *ldab, d *d, d *e, d *q, int *ldq, d *work, int *info) nogil
|
||
|
|
cdef void dsbtrd(char *vect, char *uplo, int *n, int *kd, d *ab, int *ldab, d *d, d *e, d *q, int *ldq, d *work, int *info) nogil:
|
||
|
|
_fortran_dsbtrd(vect, uplo, n, kd, ab, ldab, d, e, q, ldq, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsfrk "F_FUNC(dsfrk,DSFRK)"(char *transr, char *uplo, char *trans, int *n, int *k, d *alpha, d *a, int *lda, d *beta, d *c) nogil
|
||
|
|
cdef void dsfrk(char *transr, char *uplo, char *trans, int *n, int *k, d *alpha, d *a, int *lda, d *beta, d *c) nogil:
|
||
|
|
_fortran_dsfrk(transr, uplo, trans, n, k, alpha, a, lda, beta, c)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsgesv "F_FUNC(dsgesv,DSGESV)"(int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *work, s *swork, int *iter, int *info) nogil
|
||
|
|
cdef void dsgesv(int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *work, s *swork, int *iter, int *info) nogil:
|
||
|
|
_fortran_dsgesv(n, nrhs, a, lda, ipiv, b, ldb, x, ldx, work, swork, iter, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspcon "F_FUNC(dspcon,DSPCON)"(char *uplo, int *n, d *ap, int *ipiv, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dspcon(char *uplo, int *n, d *ap, int *ipiv, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dspcon(uplo, n, ap, ipiv, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspev "F_FUNC(dspev,DSPEV)"(char *jobz, char *uplo, int *n, d *ap, d *w, d *z, int *ldz, d *work, int *info) nogil
|
||
|
|
cdef void dspev(char *jobz, char *uplo, int *n, d *ap, d *w, d *z, int *ldz, d *work, int *info) nogil:
|
||
|
|
_fortran_dspev(jobz, uplo, n, ap, w, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspevd "F_FUNC(dspevd,DSPEVD)"(char *jobz, char *uplo, int *n, d *ap, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dspevd(char *jobz, char *uplo, int *n, d *ap, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dspevd(jobz, uplo, n, ap, w, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspevx "F_FUNC(dspevx,DSPEVX)"(char *jobz, char *range, char *uplo, int *n, d *ap, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void dspevx(char *jobz, char *range, char *uplo, int *n, d *ap, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_dspevx(jobz, range, uplo, n, ap, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspgst "F_FUNC(dspgst,DSPGST)"(int *itype, char *uplo, int *n, d *ap, d *bp, int *info) nogil
|
||
|
|
cdef void dspgst(int *itype, char *uplo, int *n, d *ap, d *bp, int *info) nogil:
|
||
|
|
_fortran_dspgst(itype, uplo, n, ap, bp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspgv "F_FUNC(dspgv,DSPGV)"(int *itype, char *jobz, char *uplo, int *n, d *ap, d *bp, d *w, d *z, int *ldz, d *work, int *info) nogil
|
||
|
|
cdef void dspgv(int *itype, char *jobz, char *uplo, int *n, d *ap, d *bp, d *w, d *z, int *ldz, d *work, int *info) nogil:
|
||
|
|
_fortran_dspgv(itype, jobz, uplo, n, ap, bp, w, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspgvd "F_FUNC(dspgvd,DSPGVD)"(int *itype, char *jobz, char *uplo, int *n, d *ap, d *bp, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dspgvd(int *itype, char *jobz, char *uplo, int *n, d *ap, d *bp, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dspgvd(itype, jobz, uplo, n, ap, bp, w, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspgvx "F_FUNC(dspgvx,DSPGVX)"(int *itype, char *jobz, char *range, char *uplo, int *n, d *ap, d *bp, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void dspgvx(int *itype, char *jobz, char *range, char *uplo, int *n, d *ap, d *bp, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_dspgvx(itype, jobz, range, uplo, n, ap, bp, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsposv "F_FUNC(dsposv,DSPOSV)"(char *uplo, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *x, int *ldx, d *work, s *swork, int *iter, int *info) nogil
|
||
|
|
cdef void dsposv(char *uplo, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *x, int *ldx, d *work, s *swork, int *iter, int *info) nogil:
|
||
|
|
_fortran_dsposv(uplo, n, nrhs, a, lda, b, ldb, x, ldx, work, swork, iter, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsprfs "F_FUNC(dsprfs,DSPRFS)"(char *uplo, int *n, int *nrhs, d *ap, d *afp, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dsprfs(char *uplo, int *n, int *nrhs, d *ap, d *afp, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dsprfs(uplo, n, nrhs, ap, afp, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspsv "F_FUNC(dspsv,DSPSV)"(char *uplo, int *n, int *nrhs, d *ap, int *ipiv, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dspsv(char *uplo, int *n, int *nrhs, d *ap, int *ipiv, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dspsv(uplo, n, nrhs, ap, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dspsvx "F_FUNC(dspsvx,DSPSVX)"(char *fact, char *uplo, int *n, int *nrhs, d *ap, d *afp, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dspsvx(char *fact, char *uplo, int *n, int *nrhs, d *ap, d *afp, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dspsvx(fact, uplo, n, nrhs, ap, afp, ipiv, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsptrd "F_FUNC(dsptrd,DSPTRD)"(char *uplo, int *n, d *ap, d *d, d *e, d *tau, int *info) nogil
|
||
|
|
cdef void dsptrd(char *uplo, int *n, d *ap, d *d, d *e, d *tau, int *info) nogil:
|
||
|
|
_fortran_dsptrd(uplo, n, ap, d, e, tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsptrf "F_FUNC(dsptrf,DSPTRF)"(char *uplo, int *n, d *ap, int *ipiv, int *info) nogil
|
||
|
|
cdef void dsptrf(char *uplo, int *n, d *ap, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_dsptrf(uplo, n, ap, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsptri "F_FUNC(dsptri,DSPTRI)"(char *uplo, int *n, d *ap, int *ipiv, d *work, int *info) nogil
|
||
|
|
cdef void dsptri(char *uplo, int *n, d *ap, int *ipiv, d *work, int *info) nogil:
|
||
|
|
_fortran_dsptri(uplo, n, ap, ipiv, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsptrs "F_FUNC(dsptrs,DSPTRS)"(char *uplo, int *n, int *nrhs, d *ap, int *ipiv, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dsptrs(char *uplo, int *n, int *nrhs, d *ap, int *ipiv, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dsptrs(uplo, n, nrhs, ap, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dstebz "F_FUNC(dstebz,DSTEBZ)"(char *range, char *order, int *n, d *vl, d *vu, int *il, int *iu, d *abstol, d *d, d *e, int *m, int *nsplit, d *w, int *iblock, int *isplit, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dstebz(char *range, char *order, int *n, d *vl, d *vu, int *il, int *iu, d *abstol, d *d, d *e, int *m, int *nsplit, d *w, int *iblock, int *isplit, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dstebz(range, order, n, vl, vu, il, iu, abstol, d, e, m, nsplit, w, iblock, isplit, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dstedc "F_FUNC(dstedc,DSTEDC)"(char *compz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dstedc(char *compz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dstedc(compz, n, d, e, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dstegr "F_FUNC(dstegr,DSTEGR)"(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, int *isuppz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dstegr(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, int *isuppz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dstegr(jobz, range, n, d, e, vl, vu, il, iu, abstol, m, w, z, ldz, isuppz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dstein "F_FUNC(dstein,DSTEIN)"(int *n, d *d, d *e, int *m, d *w, int *iblock, int *isplit, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void dstein(int *n, d *d, d *e, int *m, d *w, int *iblock, int *isplit, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_dstein(n, d, e, m, w, iblock, isplit, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dstemr "F_FUNC(dstemr,DSTEMR)"(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, int *m, d *w, d *z, int *ldz, int *nzc, int *isuppz, bint *tryrac, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dstemr(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, int *m, d *w, d *z, int *ldz, int *nzc, int *isuppz, bint *tryrac, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dstemr(jobz, range, n, d, e, vl, vu, il, iu, m, w, z, ldz, nzc, isuppz, tryrac, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsteqr "F_FUNC(dsteqr,DSTEQR)"(char *compz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *info) nogil
|
||
|
|
cdef void dsteqr(char *compz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *info) nogil:
|
||
|
|
_fortran_dsteqr(compz, n, d, e, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsterf "F_FUNC(dsterf,DSTERF)"(int *n, d *d, d *e, int *info) nogil
|
||
|
|
cdef void dsterf(int *n, d *d, d *e, int *info) nogil:
|
||
|
|
_fortran_dsterf(n, d, e, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dstev "F_FUNC(dstev,DSTEV)"(char *jobz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *info) nogil
|
||
|
|
cdef void dstev(char *jobz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *info) nogil:
|
||
|
|
_fortran_dstev(jobz, n, d, e, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dstevd "F_FUNC(dstevd,DSTEVD)"(char *jobz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dstevd(char *jobz, int *n, d *d, d *e, d *z, int *ldz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dstevd(jobz, n, d, e, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dstevr "F_FUNC(dstevr,DSTEVR)"(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, int *isuppz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dstevr(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, int *isuppz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dstevr(jobz, range, n, d, e, vl, vu, il, iu, abstol, m, w, z, ldz, isuppz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dstevx "F_FUNC(dstevx,DSTEVX)"(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void dstevx(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_dstevx(jobz, range, n, d, e, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsycon "F_FUNC(dsycon,DSYCON)"(char *uplo, int *n, d *a, int *lda, int *ipiv, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dsycon(char *uplo, int *n, d *a, int *lda, int *ipiv, d *anorm, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dsycon(uplo, n, a, lda, ipiv, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsyconv "F_FUNC(dsyconv,DSYCONV)"(char *uplo, char *way, int *n, d *a, int *lda, int *ipiv, d *work, int *info) nogil
|
||
|
|
cdef void dsyconv(char *uplo, char *way, int *n, d *a, int *lda, int *ipiv, d *work, int *info) nogil:
|
||
|
|
_fortran_dsyconv(uplo, way, n, a, lda, ipiv, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsyequb "F_FUNC(dsyequb,DSYEQUB)"(char *uplo, int *n, d *a, int *lda, d *s, d *scond, d *amax, d *work, int *info) nogil
|
||
|
|
cdef void dsyequb(char *uplo, int *n, d *a, int *lda, d *s, d *scond, d *amax, d *work, int *info) nogil:
|
||
|
|
_fortran_dsyequb(uplo, n, a, lda, s, scond, amax, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsyev "F_FUNC(dsyev,DSYEV)"(char *jobz, char *uplo, int *n, d *a, int *lda, d *w, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dsyev(char *jobz, char *uplo, int *n, d *a, int *lda, d *w, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dsyev(jobz, uplo, n, a, lda, w, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsyevd "F_FUNC(dsyevd,DSYEVD)"(char *jobz, char *uplo, int *n, d *a, int *lda, d *w, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dsyevd(char *jobz, char *uplo, int *n, d *a, int *lda, d *w, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dsyevd(jobz, uplo, n, a, lda, w, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsyevr "F_FUNC(dsyevr,DSYEVR)"(char *jobz, char *range, char *uplo, int *n, d *a, int *lda, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, int *isuppz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dsyevr(char *jobz, char *range, char *uplo, int *n, d *a, int *lda, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, int *isuppz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dsyevr(jobz, range, uplo, n, a, lda, vl, vu, il, iu, abstol, m, w, z, ldz, isuppz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsyevx "F_FUNC(dsyevx,DSYEVX)"(char *jobz, char *range, char *uplo, int *n, d *a, int *lda, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void dsyevx(char *jobz, char *range, char *uplo, int *n, d *a, int *lda, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_dsyevx(jobz, range, uplo, n, a, lda, vl, vu, il, iu, abstol, m, w, z, ldz, work, lwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsygs2 "F_FUNC(dsygs2,DSYGS2)"(int *itype, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dsygs2(int *itype, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dsygs2(itype, uplo, n, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsygst "F_FUNC(dsygst,DSYGST)"(int *itype, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dsygst(int *itype, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dsygst(itype, uplo, n, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsygv "F_FUNC(dsygv,DSYGV)"(int *itype, char *jobz, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, d *w, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dsygv(int *itype, char *jobz, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, d *w, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dsygv(itype, jobz, uplo, n, a, lda, b, ldb, w, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsygvd "F_FUNC(dsygvd,DSYGVD)"(int *itype, char *jobz, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, d *w, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dsygvd(int *itype, char *jobz, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, d *w, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dsygvd(itype, jobz, uplo, n, a, lda, b, ldb, w, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsygvx "F_FUNC(dsygvx,DSYGVX)"(int *itype, char *jobz, char *range, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void dsygvx(int *itype, char *jobz, char *range, char *uplo, int *n, d *a, int *lda, d *b, int *ldb, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, d *z, int *ldz, d *work, int *lwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_dsygvx(itype, jobz, range, uplo, n, a, lda, b, ldb, vl, vu, il, iu, abstol, m, w, z, ldz, work, lwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsyrfs "F_FUNC(dsyrfs,DSYRFS)"(char *uplo, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dsyrfs(char *uplo, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dsyrfs(uplo, n, nrhs, a, lda, af, ldaf, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsysv "F_FUNC(dsysv,DSYSV)"(char *uplo, int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dsysv(char *uplo, int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dsysv(uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsysvx "F_FUNC(dsysvx,DSYSVX)"(char *fact, char *uplo, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void dsysvx(char *fact, char *uplo, int *n, int *nrhs, d *a, int *lda, d *af, int *ldaf, int *ipiv, d *b, int *ldb, d *x, int *ldx, d *rcond, d *ferr, d *berr, d *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dsysvx(fact, uplo, n, nrhs, a, lda, af, ldaf, ipiv, b, ldb, x, ldx, rcond, ferr, berr, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsyswapr "F_FUNC(dsyswapr,DSYSWAPR)"(char *uplo, int *n, d *a, int *lda, int *i1, int *i2) nogil
|
||
|
|
cdef void dsyswapr(char *uplo, int *n, d *a, int *lda, int *i1, int *i2) nogil:
|
||
|
|
_fortran_dsyswapr(uplo, n, a, lda, i1, i2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsytd2 "F_FUNC(dsytd2,DSYTD2)"(char *uplo, int *n, d *a, int *lda, d *d, d *e, d *tau, int *info) nogil
|
||
|
|
cdef void dsytd2(char *uplo, int *n, d *a, int *lda, d *d, d *e, d *tau, int *info) nogil:
|
||
|
|
_fortran_dsytd2(uplo, n, a, lda, d, e, tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsytf2 "F_FUNC(dsytf2,DSYTF2)"(char *uplo, int *n, d *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void dsytf2(char *uplo, int *n, d *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_dsytf2(uplo, n, a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsytrd "F_FUNC(dsytrd,DSYTRD)"(char *uplo, int *n, d *a, int *lda, d *d, d *e, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dsytrd(char *uplo, int *n, d *a, int *lda, d *d, d *e, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dsytrd(uplo, n, a, lda, d, e, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsytrf "F_FUNC(dsytrf,DSYTRF)"(char *uplo, int *n, d *a, int *lda, int *ipiv, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dsytrf(char *uplo, int *n, d *a, int *lda, int *ipiv, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dsytrf(uplo, n, a, lda, ipiv, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsytri "F_FUNC(dsytri,DSYTRI)"(char *uplo, int *n, d *a, int *lda, int *ipiv, d *work, int *info) nogil
|
||
|
|
cdef void dsytri(char *uplo, int *n, d *a, int *lda, int *ipiv, d *work, int *info) nogil:
|
||
|
|
_fortran_dsytri(uplo, n, a, lda, ipiv, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsytri2 "F_FUNC(dsytri2,DSYTRI2)"(char *uplo, int *n, d *a, int *lda, int *ipiv, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dsytri2(char *uplo, int *n, d *a, int *lda, int *ipiv, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dsytri2(uplo, n, a, lda, ipiv, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsytri2x "F_FUNC(dsytri2x,DSYTRI2X)"(char *uplo, int *n, d *a, int *lda, int *ipiv, d *work, int *nb, int *info) nogil
|
||
|
|
cdef void dsytri2x(char *uplo, int *n, d *a, int *lda, int *ipiv, d *work, int *nb, int *info) nogil:
|
||
|
|
_fortran_dsytri2x(uplo, n, a, lda, ipiv, work, nb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsytrs "F_FUNC(dsytrs,DSYTRS)"(char *uplo, int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dsytrs(char *uplo, int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dsytrs(uplo, n, nrhs, a, lda, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dsytrs2 "F_FUNC(dsytrs2,DSYTRS2)"(char *uplo, int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, d *work, int *info) nogil
|
||
|
|
cdef void dsytrs2(char *uplo, int *n, int *nrhs, d *a, int *lda, int *ipiv, d *b, int *ldb, d *work, int *info) nogil:
|
||
|
|
_fortran_dsytrs2(uplo, n, nrhs, a, lda, ipiv, b, ldb, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtbcon "F_FUNC(dtbcon,DTBCON)"(char *norm, char *uplo, char *diag, int *n, int *kd, d *ab, int *ldab, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dtbcon(char *norm, char *uplo, char *diag, int *n, int *kd, d *ab, int *ldab, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dtbcon(norm, uplo, diag, n, kd, ab, ldab, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtbrfs "F_FUNC(dtbrfs,DTBRFS)"(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dtbrfs(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dtbrfs(uplo, trans, diag, n, kd, nrhs, ab, ldab, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtbtrs "F_FUNC(dtbtrs,DTBTRS)"(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dtbtrs(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, d *ab, int *ldab, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dtbtrs(uplo, trans, diag, n, kd, nrhs, ab, ldab, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtfsm "F_FUNC(dtfsm,DTFSM)"(char *transr, char *side, char *uplo, char *trans, char *diag, int *m, int *n, d *alpha, d *a, d *b, int *ldb) nogil
|
||
|
|
cdef void dtfsm(char *transr, char *side, char *uplo, char *trans, char *diag, int *m, int *n, d *alpha, d *a, d *b, int *ldb) nogil:
|
||
|
|
_fortran_dtfsm(transr, side, uplo, trans, diag, m, n, alpha, a, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtftri "F_FUNC(dtftri,DTFTRI)"(char *transr, char *uplo, char *diag, int *n, d *a, int *info) nogil
|
||
|
|
cdef void dtftri(char *transr, char *uplo, char *diag, int *n, d *a, int *info) nogil:
|
||
|
|
_fortran_dtftri(transr, uplo, diag, n, a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtfttp "F_FUNC(dtfttp,DTFTTP)"(char *transr, char *uplo, int *n, d *arf, d *ap, int *info) nogil
|
||
|
|
cdef void dtfttp(char *transr, char *uplo, int *n, d *arf, d *ap, int *info) nogil:
|
||
|
|
_fortran_dtfttp(transr, uplo, n, arf, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtfttr "F_FUNC(dtfttr,DTFTTR)"(char *transr, char *uplo, int *n, d *arf, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dtfttr(char *transr, char *uplo, int *n, d *arf, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dtfttr(transr, uplo, n, arf, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtgevc "F_FUNC(dtgevc,DTGEVC)"(char *side, char *howmny, bint *select, int *n, d *s, int *lds, d *p, int *ldp, d *vl, int *ldvl, d *vr, int *ldvr, int *mm, int *m, d *work, int *info) nogil
|
||
|
|
cdef void dtgevc(char *side, char *howmny, bint *select, int *n, d *s, int *lds, d *p, int *ldp, d *vl, int *ldvl, d *vr, int *ldvr, int *mm, int *m, d *work, int *info) nogil:
|
||
|
|
_fortran_dtgevc(side, howmny, select, n, s, lds, p, ldp, vl, ldvl, vr, ldvr, mm, m, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtgex2 "F_FUNC(dtgex2,DTGEX2)"(bint *wantq, bint *wantz, int *n, d *a, int *lda, d *b, int *ldb, d *q, int *ldq, d *z, int *ldz, int *j1, int *n1, int *n2, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dtgex2(bint *wantq, bint *wantz, int *n, d *a, int *lda, d *b, int *ldb, d *q, int *ldq, d *z, int *ldz, int *j1, int *n1, int *n2, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dtgex2(wantq, wantz, n, a, lda, b, ldb, q, ldq, z, ldz, j1, n1, n2, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtgexc "F_FUNC(dtgexc,DTGEXC)"(bint *wantq, bint *wantz, int *n, d *a, int *lda, d *b, int *ldb, d *q, int *ldq, d *z, int *ldz, int *ifst, int *ilst, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dtgexc(bint *wantq, bint *wantz, int *n, d *a, int *lda, d *b, int *ldb, d *q, int *ldq, d *z, int *ldz, int *ifst, int *ilst, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dtgexc(wantq, wantz, n, a, lda, b, ldb, q, ldq, z, ldz, ifst, ilst, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtgsen "F_FUNC(dtgsen,DTGSEN)"(int *ijob, bint *wantq, bint *wantz, bint *select, int *n, d *a, int *lda, d *b, int *ldb, d *alphar, d *alphai, d *beta, d *q, int *ldq, d *z, int *ldz, int *m, d *pl, d *pr, d *dif, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dtgsen(int *ijob, bint *wantq, bint *wantz, bint *select, int *n, d *a, int *lda, d *b, int *ldb, d *alphar, d *alphai, d *beta, d *q, int *ldq, d *z, int *ldz, int *m, d *pl, d *pr, d *dif, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dtgsen(ijob, wantq, wantz, select, n, a, lda, b, ldb, alphar, alphai, beta, q, ldq, z, ldz, m, pl, pr, dif, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtgsja "F_FUNC(dtgsja,DTGSJA)"(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, d *a, int *lda, d *b, int *ldb, d *tola, d *tolb, d *alpha, d *beta, d *u, int *ldu, d *v, int *ldv, d *q, int *ldq, d *work, int *ncycle, int *info) nogil
|
||
|
|
cdef void dtgsja(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, d *a, int *lda, d *b, int *ldb, d *tola, d *tolb, d *alpha, d *beta, d *u, int *ldu, d *v, int *ldv, d *q, int *ldq, d *work, int *ncycle, int *info) nogil:
|
||
|
|
_fortran_dtgsja(jobu, jobv, jobq, m, p, n, k, l, a, lda, b, ldb, tola, tolb, alpha, beta, u, ldu, v, ldv, q, ldq, work, ncycle, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtgsna "F_FUNC(dtgsna,DTGSNA)"(char *job, char *howmny, bint *select, int *n, d *a, int *lda, d *b, int *ldb, d *vl, int *ldvl, d *vr, int *ldvr, d *s, d *dif, int *mm, int *m, d *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void dtgsna(char *job, char *howmny, bint *select, int *n, d *a, int *lda, d *b, int *ldb, d *vl, int *ldvl, d *vr, int *ldvr, d *s, d *dif, int *mm, int *m, d *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dtgsna(job, howmny, select, n, a, lda, b, ldb, vl, ldvl, vr, ldvr, s, dif, mm, m, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtgsy2 "F_FUNC(dtgsy2,DTGSY2)"(char *trans, int *ijob, int *m, int *n, d *a, int *lda, d *b, int *ldb, d *c, int *ldc, d *d, int *ldd, d *e, int *lde, d *f, int *ldf, d *scale, d *rdsum, d *rdscal, int *iwork, int *pq, int *info) nogil
|
||
|
|
cdef void dtgsy2(char *trans, int *ijob, int *m, int *n, d *a, int *lda, d *b, int *ldb, d *c, int *ldc, d *d, int *ldd, d *e, int *lde, d *f, int *ldf, d *scale, d *rdsum, d *rdscal, int *iwork, int *pq, int *info) nogil:
|
||
|
|
_fortran_dtgsy2(trans, ijob, m, n, a, lda, b, ldb, c, ldc, d, ldd, e, lde, f, ldf, scale, rdsum, rdscal, iwork, pq, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtgsyl "F_FUNC(dtgsyl,DTGSYL)"(char *trans, int *ijob, int *m, int *n, d *a, int *lda, d *b, int *ldb, d *c, int *ldc, d *d, int *ldd, d *e, int *lde, d *f, int *ldf, d *scale, d *dif, d *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void dtgsyl(char *trans, int *ijob, int *m, int *n, d *a, int *lda, d *b, int *ldb, d *c, int *ldc, d *d, int *ldd, d *e, int *lde, d *f, int *ldf, d *scale, d *dif, d *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dtgsyl(trans, ijob, m, n, a, lda, b, ldb, c, ldc, d, ldd, e, lde, f, ldf, scale, dif, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtpcon "F_FUNC(dtpcon,DTPCON)"(char *norm, char *uplo, char *diag, int *n, d *ap, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dtpcon(char *norm, char *uplo, char *diag, int *n, d *ap, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dtpcon(norm, uplo, diag, n, ap, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtpmqrt "F_FUNC(dtpmqrt,DTPMQRT)"(char *side, char *trans, int *m, int *n, int *k, int *l, int *nb, d *v, int *ldv, d *t, int *ldt, d *a, int *lda, d *b, int *ldb, d *work, int *info) nogil
|
||
|
|
cdef void dtpmqrt(char *side, char *trans, int *m, int *n, int *k, int *l, int *nb, d *v, int *ldv, d *t, int *ldt, d *a, int *lda, d *b, int *ldb, d *work, int *info) nogil:
|
||
|
|
_fortran_dtpmqrt(side, trans, m, n, k, l, nb, v, ldv, t, ldt, a, lda, b, ldb, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtpqrt "F_FUNC(dtpqrt,DTPQRT)"(int *m, int *n, int *l, int *nb, d *a, int *lda, d *b, int *ldb, d *t, int *ldt, d *work, int *info) nogil
|
||
|
|
cdef void dtpqrt(int *m, int *n, int *l, int *nb, d *a, int *lda, d *b, int *ldb, d *t, int *ldt, d *work, int *info) nogil:
|
||
|
|
_fortran_dtpqrt(m, n, l, nb, a, lda, b, ldb, t, ldt, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtpqrt2 "F_FUNC(dtpqrt2,DTPQRT2)"(int *m, int *n, int *l, d *a, int *lda, d *b, int *ldb, d *t, int *ldt, int *info) nogil
|
||
|
|
cdef void dtpqrt2(int *m, int *n, int *l, d *a, int *lda, d *b, int *ldb, d *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_dtpqrt2(m, n, l, a, lda, b, ldb, t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtprfb "F_FUNC(dtprfb,DTPRFB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, d *v, int *ldv, d *t, int *ldt, d *a, int *lda, d *b, int *ldb, d *work, int *ldwork) nogil
|
||
|
|
cdef void dtprfb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, d *v, int *ldv, d *t, int *ldt, d *a, int *lda, d *b, int *ldb, d *work, int *ldwork) nogil:
|
||
|
|
_fortran_dtprfb(side, trans, direct, storev, m, n, k, l, v, ldv, t, ldt, a, lda, b, ldb, work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtprfs "F_FUNC(dtprfs,DTPRFS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, d *ap, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dtprfs(char *uplo, char *trans, char *diag, int *n, int *nrhs, d *ap, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dtprfs(uplo, trans, diag, n, nrhs, ap, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtptri "F_FUNC(dtptri,DTPTRI)"(char *uplo, char *diag, int *n, d *ap, int *info) nogil
|
||
|
|
cdef void dtptri(char *uplo, char *diag, int *n, d *ap, int *info) nogil:
|
||
|
|
_fortran_dtptri(uplo, diag, n, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtptrs "F_FUNC(dtptrs,DTPTRS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, d *ap, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dtptrs(char *uplo, char *trans, char *diag, int *n, int *nrhs, d *ap, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dtptrs(uplo, trans, diag, n, nrhs, ap, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtpttf "F_FUNC(dtpttf,DTPTTF)"(char *transr, char *uplo, int *n, d *ap, d *arf, int *info) nogil
|
||
|
|
cdef void dtpttf(char *transr, char *uplo, int *n, d *ap, d *arf, int *info) nogil:
|
||
|
|
_fortran_dtpttf(transr, uplo, n, ap, arf, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtpttr "F_FUNC(dtpttr,DTPTTR)"(char *uplo, int *n, d *ap, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dtpttr(char *uplo, int *n, d *ap, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dtpttr(uplo, n, ap, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrcon "F_FUNC(dtrcon,DTRCON)"(char *norm, char *uplo, char *diag, int *n, d *a, int *lda, d *rcond, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dtrcon(char *norm, char *uplo, char *diag, int *n, d *a, int *lda, d *rcond, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dtrcon(norm, uplo, diag, n, a, lda, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrevc "F_FUNC(dtrevc,DTREVC)"(char *side, char *howmny, bint *select, int *n, d *t, int *ldt, d *vl, int *ldvl, d *vr, int *ldvr, int *mm, int *m, d *work, int *info) nogil
|
||
|
|
cdef void dtrevc(char *side, char *howmny, bint *select, int *n, d *t, int *ldt, d *vl, int *ldvl, d *vr, int *ldvr, int *mm, int *m, d *work, int *info) nogil:
|
||
|
|
_fortran_dtrevc(side, howmny, select, n, t, ldt, vl, ldvl, vr, ldvr, mm, m, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrexc "F_FUNC(dtrexc,DTREXC)"(char *compq, int *n, d *t, int *ldt, d *q, int *ldq, int *ifst, int *ilst, d *work, int *info) nogil
|
||
|
|
cdef void dtrexc(char *compq, int *n, d *t, int *ldt, d *q, int *ldq, int *ifst, int *ilst, d *work, int *info) nogil:
|
||
|
|
_fortran_dtrexc(compq, n, t, ldt, q, ldq, ifst, ilst, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrrfs "F_FUNC(dtrrfs,DTRRFS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void dtrrfs(char *uplo, char *trans, char *diag, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, d *x, int *ldx, d *ferr, d *berr, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dtrrfs(uplo, trans, diag, n, nrhs, a, lda, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrsen "F_FUNC(dtrsen,DTRSEN)"(char *job, char *compq, bint *select, int *n, d *t, int *ldt, d *q, int *ldq, d *wr, d *wi, int *m, d *s, d *sep, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void dtrsen(char *job, char *compq, bint *select, int *n, d *t, int *ldt, d *q, int *ldq, d *wr, d *wi, int *m, d *s, d *sep, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_dtrsen(job, compq, select, n, t, ldt, q, ldq, wr, wi, m, s, sep, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrsna "F_FUNC(dtrsna,DTRSNA)"(char *job, char *howmny, bint *select, int *n, d *t, int *ldt, d *vl, int *ldvl, d *vr, int *ldvr, d *s, d *sep, int *mm, int *m, d *work, int *ldwork, int *iwork, int *info) nogil
|
||
|
|
cdef void dtrsna(char *job, char *howmny, bint *select, int *n, d *t, int *ldt, d *vl, int *ldvl, d *vr, int *ldvr, d *s, d *sep, int *mm, int *m, d *work, int *ldwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_dtrsna(job, howmny, select, n, t, ldt, vl, ldvl, vr, ldvr, s, sep, mm, m, work, ldwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrsyl "F_FUNC(dtrsyl,DTRSYL)"(char *trana, char *tranb, int *isgn, int *m, int *n, d *a, int *lda, d *b, int *ldb, d *c, int *ldc, d *scale, int *info) nogil
|
||
|
|
cdef void dtrsyl(char *trana, char *tranb, int *isgn, int *m, int *n, d *a, int *lda, d *b, int *ldb, d *c, int *ldc, d *scale, int *info) nogil:
|
||
|
|
_fortran_dtrsyl(trana, tranb, isgn, m, n, a, lda, b, ldb, c, ldc, scale, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrti2 "F_FUNC(dtrti2,DTRTI2)"(char *uplo, char *diag, int *n, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dtrti2(char *uplo, char *diag, int *n, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dtrti2(uplo, diag, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrtri "F_FUNC(dtrtri,DTRTRI)"(char *uplo, char *diag, int *n, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void dtrtri(char *uplo, char *diag, int *n, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_dtrtri(uplo, diag, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrtrs "F_FUNC(dtrtrs,DTRTRS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, int *info) nogil
|
||
|
|
cdef void dtrtrs(char *uplo, char *trans, char *diag, int *n, int *nrhs, d *a, int *lda, d *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_dtrtrs(uplo, trans, diag, n, nrhs, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrttf "F_FUNC(dtrttf,DTRTTF)"(char *transr, char *uplo, int *n, d *a, int *lda, d *arf, int *info) nogil
|
||
|
|
cdef void dtrttf(char *transr, char *uplo, int *n, d *a, int *lda, d *arf, int *info) nogil:
|
||
|
|
_fortran_dtrttf(transr, uplo, n, a, lda, arf, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtrttp "F_FUNC(dtrttp,DTRTTP)"(char *uplo, int *n, d *a, int *lda, d *ap, int *info) nogil
|
||
|
|
cdef void dtrttp(char *uplo, int *n, d *a, int *lda, d *ap, int *info) nogil:
|
||
|
|
_fortran_dtrttp(uplo, n, a, lda, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_dtzrzf "F_FUNC(dtzrzf,DTZRZF)"(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil
|
||
|
|
cdef void dtzrzf(int *m, int *n, d *a, int *lda, d *tau, d *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_dtzrzf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ilaver "F_FUNC(ilaver,ILAVER)"(int *vers_major, int *vers_minor, int *vers_patch) nogil
|
||
|
|
cdef void ilaver(int *vers_major, int *vers_minor, int *vers_patch) nogil:
|
||
|
|
_fortran_ilaver(vers_major, vers_minor, vers_patch)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sbbcsd "F_FUNC(sbbcsd,SBBCSD)"(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, int *m, int *p, int *q, s *theta, s *phi, s *u1, int *ldu1, s *u2, int *ldu2, s *v1t, int *ldv1t, s *v2t, int *ldv2t, s *b11d, s *b11e, s *b12d, s *b12e, s *b21d, s *b21e, s *b22d, s *b22e, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sbbcsd(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, int *m, int *p, int *q, s *theta, s *phi, s *u1, int *ldu1, s *u2, int *ldu2, s *v1t, int *ldv1t, s *v2t, int *ldv2t, s *b11d, s *b11e, s *b12d, s *b12e, s *b21d, s *b21e, s *b22d, s *b22e, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sbbcsd(jobu1, jobu2, jobv1t, jobv2t, trans, m, p, q, theta, phi, u1, ldu1, u2, ldu2, v1t, ldv1t, v2t, ldv2t, b11d, b11e, b12d, b12e, b21d, b21e, b22d, b22e, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sbdsdc "F_FUNC(sbdsdc,SBDSDC)"(char *uplo, char *compq, int *n, s *d, s *e, s *u, int *ldu, s *vt, int *ldvt, s *q, int *iq, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sbdsdc(char *uplo, char *compq, int *n, s *d, s *e, s *u, int *ldu, s *vt, int *ldvt, s *q, int *iq, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sbdsdc(uplo, compq, n, d, e, u, ldu, vt, ldvt, q, iq, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sbdsqr "F_FUNC(sbdsqr,SBDSQR)"(char *uplo, int *n, int *ncvt, int *nru, int *ncc, s *d, s *e, s *vt, int *ldvt, s *u, int *ldu, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void sbdsqr(char *uplo, int *n, int *ncvt, int *nru, int *ncc, s *d, s *e, s *vt, int *ldvt, s *u, int *ldu, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_sbdsqr(uplo, n, ncvt, nru, ncc, d, e, vt, ldvt, u, ldu, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sdisna "F_FUNC(sdisna,SDISNA)"(char *job, int *m, int *n, s *d, s *sep, int *info) nogil
|
||
|
|
cdef void sdisna(char *job, int *m, int *n, s *d, s *sep, int *info) nogil:
|
||
|
|
_fortran_sdisna(job, m, n, d, sep, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbbrd "F_FUNC(sgbbrd,SGBBRD)"(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, s *ab, int *ldab, s *d, s *e, s *q, int *ldq, s *pt, int *ldpt, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void sgbbrd(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, s *ab, int *ldab, s *d, s *e, s *q, int *ldq, s *pt, int *ldpt, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_sgbbrd(vect, m, n, ncc, kl, ku, ab, ldab, d, e, q, ldq, pt, ldpt, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbcon "F_FUNC(sgbcon,SGBCON)"(char *norm, int *n, int *kl, int *ku, s *ab, int *ldab, int *ipiv, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sgbcon(char *norm, int *n, int *kl, int *ku, s *ab, int *ldab, int *ipiv, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgbcon(norm, n, kl, ku, ab, ldab, ipiv, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbequ "F_FUNC(sgbequ,SGBEQU)"(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil
|
||
|
|
cdef void sgbequ(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil:
|
||
|
|
_fortran_sgbequ(m, n, kl, ku, ab, ldab, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbequb "F_FUNC(sgbequb,SGBEQUB)"(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil
|
||
|
|
cdef void sgbequb(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil:
|
||
|
|
_fortran_sgbequb(m, n, kl, ku, ab, ldab, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbrfs "F_FUNC(sgbrfs,SGBRFS)"(char *trans, int *n, int *kl, int *ku, int *nrhs, s *ab, int *ldab, s *afb, int *ldafb, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sgbrfs(char *trans, int *n, int *kl, int *ku, int *nrhs, s *ab, int *ldab, s *afb, int *ldafb, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgbrfs(trans, n, kl, ku, nrhs, ab, ldab, afb, ldafb, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbsv "F_FUNC(sgbsv,SGBSV)"(int *n, int *kl, int *ku, int *nrhs, s *ab, int *ldab, int *ipiv, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sgbsv(int *n, int *kl, int *ku, int *nrhs, s *ab, int *ldab, int *ipiv, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sgbsv(n, kl, ku, nrhs, ab, ldab, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbsvx "F_FUNC(sgbsvx,SGBSVX)"(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, s *ab, int *ldab, s *afb, int *ldafb, int *ipiv, char *equed, s *r, s *c, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sgbsvx(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, s *ab, int *ldab, s *afb, int *ldafb, int *ipiv, char *equed, s *r, s *c, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgbsvx(fact, trans, n, kl, ku, nrhs, ab, ldab, afb, ldafb, ipiv, equed, r, c, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbtf2 "F_FUNC(sgbtf2,SGBTF2)"(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, int *ipiv, int *info) nogil
|
||
|
|
cdef void sgbtf2(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_sgbtf2(m, n, kl, ku, ab, ldab, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbtrf "F_FUNC(sgbtrf,SGBTRF)"(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, int *ipiv, int *info) nogil
|
||
|
|
cdef void sgbtrf(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_sgbtrf(m, n, kl, ku, ab, ldab, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgbtrs "F_FUNC(sgbtrs,SGBTRS)"(char *trans, int *n, int *kl, int *ku, int *nrhs, s *ab, int *ldab, int *ipiv, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sgbtrs(char *trans, int *n, int *kl, int *ku, int *nrhs, s *ab, int *ldab, int *ipiv, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sgbtrs(trans, n, kl, ku, nrhs, ab, ldab, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgebak "F_FUNC(sgebak,SGEBAK)"(char *job, char *side, int *n, int *ilo, int *ihi, s *scale, int *m, s *v, int *ldv, int *info) nogil
|
||
|
|
cdef void sgebak(char *job, char *side, int *n, int *ilo, int *ihi, s *scale, int *m, s *v, int *ldv, int *info) nogil:
|
||
|
|
_fortran_sgebak(job, side, n, ilo, ihi, scale, m, v, ldv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgebal "F_FUNC(sgebal,SGEBAL)"(char *job, int *n, s *a, int *lda, int *ilo, int *ihi, s *scale, int *info) nogil
|
||
|
|
cdef void sgebal(char *job, int *n, s *a, int *lda, int *ilo, int *ihi, s *scale, int *info) nogil:
|
||
|
|
_fortran_sgebal(job, n, a, lda, ilo, ihi, scale, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgebd2 "F_FUNC(sgebd2,SGEBD2)"(int *m, int *n, s *a, int *lda, s *d, s *e, s *tauq, s *taup, s *work, int *info) nogil
|
||
|
|
cdef void sgebd2(int *m, int *n, s *a, int *lda, s *d, s *e, s *tauq, s *taup, s *work, int *info) nogil:
|
||
|
|
_fortran_sgebd2(m, n, a, lda, d, e, tauq, taup, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgebrd "F_FUNC(sgebrd,SGEBRD)"(int *m, int *n, s *a, int *lda, s *d, s *e, s *tauq, s *taup, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgebrd(int *m, int *n, s *a, int *lda, s *d, s *e, s *tauq, s *taup, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgebrd(m, n, a, lda, d, e, tauq, taup, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgecon "F_FUNC(sgecon,SGECON)"(char *norm, int *n, s *a, int *lda, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sgecon(char *norm, int *n, s *a, int *lda, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgecon(norm, n, a, lda, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeequ "F_FUNC(sgeequ,SGEEQU)"(int *m, int *n, s *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil
|
||
|
|
cdef void sgeequ(int *m, int *n, s *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil:
|
||
|
|
_fortran_sgeequ(m, n, a, lda, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeequb "F_FUNC(sgeequb,SGEEQUB)"(int *m, int *n, s *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil
|
||
|
|
cdef void sgeequb(int *m, int *n, s *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, int *info) nogil:
|
||
|
|
_fortran_sgeequb(m, n, a, lda, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgees "F_FUNC(sgees,SGEES)"(char *jobvs, char *sort, _sselect2 *select, int *n, s *a, int *lda, int *sdim, s *wr, s *wi, s *vs, int *ldvs, s *work, int *lwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void sgees(char *jobvs, char *sort, sselect2 *select, int *n, s *a, int *lda, int *sdim, s *wr, s *wi, s *vs, int *ldvs, s *work, int *lwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_sgees(jobvs, sort, <_sselect2*>select, n, a, lda, sdim, wr, wi, vs, ldvs, work, lwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeesx "F_FUNC(sgeesx,SGEESX)"(char *jobvs, char *sort, _sselect2 *select, char *sense, int *n, s *a, int *lda, int *sdim, s *wr, s *wi, s *vs, int *ldvs, s *rconde, s *rcondv, s *work, int *lwork, int *iwork, int *liwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void sgeesx(char *jobvs, char *sort, sselect2 *select, char *sense, int *n, s *a, int *lda, int *sdim, s *wr, s *wi, s *vs, int *ldvs, s *rconde, s *rcondv, s *work, int *lwork, int *iwork, int *liwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_sgeesx(jobvs, sort, <_sselect2*>select, sense, n, a, lda, sdim, wr, wi, vs, ldvs, rconde, rcondv, work, lwork, iwork, liwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeev "F_FUNC(sgeev,SGEEV)"(char *jobvl, char *jobvr, int *n, s *a, int *lda, s *wr, s *wi, s *vl, int *ldvl, s *vr, int *ldvr, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgeev(char *jobvl, char *jobvr, int *n, s *a, int *lda, s *wr, s *wi, s *vl, int *ldvl, s *vr, int *ldvr, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgeev(jobvl, jobvr, n, a, lda, wr, wi, vl, ldvl, vr, ldvr, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeevx "F_FUNC(sgeevx,SGEEVX)"(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, s *a, int *lda, s *wr, s *wi, s *vl, int *ldvl, s *vr, int *ldvr, int *ilo, int *ihi, s *scale, s *abnrm, s *rconde, s *rcondv, s *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void sgeevx(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, s *a, int *lda, s *wr, s *wi, s *vl, int *ldvl, s *vr, int *ldvr, int *ilo, int *ihi, s *scale, s *abnrm, s *rconde, s *rcondv, s *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgeevx(balanc, jobvl, jobvr, sense, n, a, lda, wr, wi, vl, ldvl, vr, ldvr, ilo, ihi, scale, abnrm, rconde, rcondv, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgehd2 "F_FUNC(sgehd2,SGEHD2)"(int *n, int *ilo, int *ihi, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sgehd2(int *n, int *ilo, int *ihi, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sgehd2(n, ilo, ihi, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgehrd "F_FUNC(sgehrd,SGEHRD)"(int *n, int *ilo, int *ihi, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgehrd(int *n, int *ilo, int *ihi, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgehrd(n, ilo, ihi, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgejsv "F_FUNC(sgejsv,SGEJSV)"(char *joba, char *jobu, char *jobv, char *jobr, char *jobt, char *jobp, int *m, int *n, s *a, int *lda, s *sva, s *u, int *ldu, s *v, int *ldv, s *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void sgejsv(char *joba, char *jobu, char *jobv, char *jobr, char *jobt, char *jobp, int *m, int *n, s *a, int *lda, s *sva, s *u, int *ldu, s *v, int *ldv, s *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgejsv(joba, jobu, jobv, jobr, jobt, jobp, m, n, a, lda, sva, u, ldu, v, ldv, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgelq2 "F_FUNC(sgelq2,SGELQ2)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sgelq2(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sgelq2(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgelqf "F_FUNC(sgelqf,SGELQF)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgelqf(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgelqf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgels "F_FUNC(sgels,SGELS)"(char *trans, int *m, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgels(char *trans, int *m, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgels(trans, m, n, nrhs, a, lda, b, ldb, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgelsd "F_FUNC(sgelsd,SGELSD)"(int *m, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, s *s, s *rcond, int *rank, s *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void sgelsd(int *m, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, s *s, s *rcond, int *rank, s *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgelsd(m, n, nrhs, a, lda, b, ldb, s, rcond, rank, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgelss "F_FUNC(sgelss,SGELSS)"(int *m, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, s *s, s *rcond, int *rank, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgelss(int *m, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, s *s, s *rcond, int *rank, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgelss(m, n, nrhs, a, lda, b, ldb, s, rcond, rank, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgelsy "F_FUNC(sgelsy,SGELSY)"(int *m, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, int *jpvt, s *rcond, int *rank, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgelsy(int *m, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, int *jpvt, s *rcond, int *rank, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgelsy(m, n, nrhs, a, lda, b, ldb, jpvt, rcond, rank, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgemqrt "F_FUNC(sgemqrt,SGEMQRT)"(char *side, char *trans, int *m, int *n, int *k, int *nb, s *v, int *ldv, s *t, int *ldt, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void sgemqrt(char *side, char *trans, int *m, int *n, int *k, int *nb, s *v, int *ldv, s *t, int *ldt, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_sgemqrt(side, trans, m, n, k, nb, v, ldv, t, ldt, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeql2 "F_FUNC(sgeql2,SGEQL2)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sgeql2(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sgeql2(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeqlf "F_FUNC(sgeqlf,SGEQLF)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgeqlf(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgeqlf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeqp3 "F_FUNC(sgeqp3,SGEQP3)"(int *m, int *n, s *a, int *lda, int *jpvt, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgeqp3(int *m, int *n, s *a, int *lda, int *jpvt, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgeqp3(m, n, a, lda, jpvt, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeqr2 "F_FUNC(sgeqr2,SGEQR2)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sgeqr2(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sgeqr2(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeqr2p "F_FUNC(sgeqr2p,SGEQR2P)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sgeqr2p(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sgeqr2p(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeqrf "F_FUNC(sgeqrf,SGEQRF)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgeqrf(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgeqrf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeqrfp "F_FUNC(sgeqrfp,SGEQRFP)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgeqrfp(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgeqrfp(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeqrt "F_FUNC(sgeqrt,SGEQRT)"(int *m, int *n, int *nb, s *a, int *lda, s *t, int *ldt, s *work, int *info) nogil
|
||
|
|
cdef void sgeqrt(int *m, int *n, int *nb, s *a, int *lda, s *t, int *ldt, s *work, int *info) nogil:
|
||
|
|
_fortran_sgeqrt(m, n, nb, a, lda, t, ldt, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeqrt2 "F_FUNC(sgeqrt2,SGEQRT2)"(int *m, int *n, s *a, int *lda, s *t, int *ldt, int *info) nogil
|
||
|
|
cdef void sgeqrt2(int *m, int *n, s *a, int *lda, s *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_sgeqrt2(m, n, a, lda, t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgeqrt3 "F_FUNC(sgeqrt3,SGEQRT3)"(int *m, int *n, s *a, int *lda, s *t, int *ldt, int *info) nogil
|
||
|
|
cdef void sgeqrt3(int *m, int *n, s *a, int *lda, s *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_sgeqrt3(m, n, a, lda, t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgerfs "F_FUNC(sgerfs,SGERFS)"(char *trans, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sgerfs(char *trans, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgerfs(trans, n, nrhs, a, lda, af, ldaf, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgerq2 "F_FUNC(sgerq2,SGERQ2)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sgerq2(int *m, int *n, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sgerq2(m, n, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgerqf "F_FUNC(sgerqf,SGERQF)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgerqf(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgerqf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgesc2 "F_FUNC(sgesc2,SGESC2)"(int *n, s *a, int *lda, s *rhs, int *ipiv, int *jpiv, s *scale) nogil
|
||
|
|
cdef void sgesc2(int *n, s *a, int *lda, s *rhs, int *ipiv, int *jpiv, s *scale) nogil:
|
||
|
|
_fortran_sgesc2(n, a, lda, rhs, ipiv, jpiv, scale)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgesdd "F_FUNC(sgesdd,SGESDD)"(char *jobz, int *m, int *n, s *a, int *lda, s *s, s *u, int *ldu, s *vt, int *ldvt, s *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void sgesdd(char *jobz, int *m, int *n, s *a, int *lda, s *s, s *u, int *ldu, s *vt, int *ldvt, s *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgesdd(jobz, m, n, a, lda, s, u, ldu, vt, ldvt, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgesv "F_FUNC(sgesv,SGESV)"(int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sgesv(int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sgesv(n, nrhs, a, lda, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgesvd "F_FUNC(sgesvd,SGESVD)"(char *jobu, char *jobvt, int *m, int *n, s *a, int *lda, s *s, s *u, int *ldu, s *vt, int *ldvt, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgesvd(char *jobu, char *jobvt, int *m, int *n, s *a, int *lda, s *s, s *u, int *ldu, s *vt, int *ldvt, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgesvd(jobu, jobvt, m, n, a, lda, s, u, ldu, vt, ldvt, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgesvj "F_FUNC(sgesvj,SGESVJ)"(char *joba, char *jobu, char *jobv, int *m, int *n, s *a, int *lda, s *sva, int *mv, s *v, int *ldv, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgesvj(char *joba, char *jobu, char *jobv, int *m, int *n, s *a, int *lda, s *sva, int *mv, s *v, int *ldv, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgesvj(joba, jobu, jobv, m, n, a, lda, sva, mv, v, ldv, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgesvx "F_FUNC(sgesvx,SGESVX)"(char *fact, char *trans, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, int *ipiv, char *equed, s *r, s *c, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sgesvx(char *fact, char *trans, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, int *ipiv, char *equed, s *r, s *c, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgesvx(fact, trans, n, nrhs, a, lda, af, ldaf, ipiv, equed, r, c, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgetc2 "F_FUNC(sgetc2,SGETC2)"(int *n, s *a, int *lda, int *ipiv, int *jpiv, int *info) nogil
|
||
|
|
cdef void sgetc2(int *n, s *a, int *lda, int *ipiv, int *jpiv, int *info) nogil:
|
||
|
|
_fortran_sgetc2(n, a, lda, ipiv, jpiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgetf2 "F_FUNC(sgetf2,SGETF2)"(int *m, int *n, s *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void sgetf2(int *m, int *n, s *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_sgetf2(m, n, a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgetrf "F_FUNC(sgetrf,SGETRF)"(int *m, int *n, s *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void sgetrf(int *m, int *n, s *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_sgetrf(m, n, a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgetri "F_FUNC(sgetri,SGETRI)"(int *n, s *a, int *lda, int *ipiv, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgetri(int *n, s *a, int *lda, int *ipiv, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgetri(n, a, lda, ipiv, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgetrs "F_FUNC(sgetrs,SGETRS)"(char *trans, int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sgetrs(char *trans, int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sgetrs(trans, n, nrhs, a, lda, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sggbak "F_FUNC(sggbak,SGGBAK)"(char *job, char *side, int *n, int *ilo, int *ihi, s *lscale, s *rscale, int *m, s *v, int *ldv, int *info) nogil
|
||
|
|
cdef void sggbak(char *job, char *side, int *n, int *ilo, int *ihi, s *lscale, s *rscale, int *m, s *v, int *ldv, int *info) nogil:
|
||
|
|
_fortran_sggbak(job, side, n, ilo, ihi, lscale, rscale, m, v, ldv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sggbal "F_FUNC(sggbal,SGGBAL)"(char *job, int *n, s *a, int *lda, s *b, int *ldb, int *ilo, int *ihi, s *lscale, s *rscale, s *work, int *info) nogil
|
||
|
|
cdef void sggbal(char *job, int *n, s *a, int *lda, s *b, int *ldb, int *ilo, int *ihi, s *lscale, s *rscale, s *work, int *info) nogil:
|
||
|
|
_fortran_sggbal(job, n, a, lda, b, ldb, ilo, ihi, lscale, rscale, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgges "F_FUNC(sgges,SGGES)"(char *jobvsl, char *jobvsr, char *sort, _sselect3 *selctg, int *n, s *a, int *lda, s *b, int *ldb, int *sdim, s *alphar, s *alphai, s *beta, s *vsl, int *ldvsl, s *vsr, int *ldvsr, s *work, int *lwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void sgges(char *jobvsl, char *jobvsr, char *sort, sselect3 *selctg, int *n, s *a, int *lda, s *b, int *ldb, int *sdim, s *alphar, s *alphai, s *beta, s *vsl, int *ldvsl, s *vsr, int *ldvsr, s *work, int *lwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_sgges(jobvsl, jobvsr, sort, <_sselect3*>selctg, n, a, lda, b, ldb, sdim, alphar, alphai, beta, vsl, ldvsl, vsr, ldvsr, work, lwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sggesx "F_FUNC(sggesx,SGGESX)"(char *jobvsl, char *jobvsr, char *sort, _sselect3 *selctg, char *sense, int *n, s *a, int *lda, s *b, int *ldb, int *sdim, s *alphar, s *alphai, s *beta, s *vsl, int *ldvsl, s *vsr, int *ldvsr, s *rconde, s *rcondv, s *work, int *lwork, int *iwork, int *liwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void sggesx(char *jobvsl, char *jobvsr, char *sort, sselect3 *selctg, char *sense, int *n, s *a, int *lda, s *b, int *ldb, int *sdim, s *alphar, s *alphai, s *beta, s *vsl, int *ldvsl, s *vsr, int *ldvsr, s *rconde, s *rcondv, s *work, int *lwork, int *iwork, int *liwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_sggesx(jobvsl, jobvsr, sort, <_sselect3*>selctg, sense, n, a, lda, b, ldb, sdim, alphar, alphai, beta, vsl, ldvsl, vsr, ldvsr, rconde, rcondv, work, lwork, iwork, liwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sggev "F_FUNC(sggev,SGGEV)"(char *jobvl, char *jobvr, int *n, s *a, int *lda, s *b, int *ldb, s *alphar, s *alphai, s *beta, s *vl, int *ldvl, s *vr, int *ldvr, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sggev(char *jobvl, char *jobvr, int *n, s *a, int *lda, s *b, int *ldb, s *alphar, s *alphai, s *beta, s *vl, int *ldvl, s *vr, int *ldvr, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sggev(jobvl, jobvr, n, a, lda, b, ldb, alphar, alphai, beta, vl, ldvl, vr, ldvr, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sggevx "F_FUNC(sggevx,SGGEVX)"(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, s *a, int *lda, s *b, int *ldb, s *alphar, s *alphai, s *beta, s *vl, int *ldvl, s *vr, int *ldvr, int *ilo, int *ihi, s *lscale, s *rscale, s *abnrm, s *bbnrm, s *rconde, s *rcondv, s *work, int *lwork, int *iwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void sggevx(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, s *a, int *lda, s *b, int *ldb, s *alphar, s *alphai, s *beta, s *vl, int *ldvl, s *vr, int *ldvr, int *ilo, int *ihi, s *lscale, s *rscale, s *abnrm, s *bbnrm, s *rconde, s *rcondv, s *work, int *lwork, int *iwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_sggevx(balanc, jobvl, jobvr, sense, n, a, lda, b, ldb, alphar, alphai, beta, vl, ldvl, vr, ldvr, ilo, ihi, lscale, rscale, abnrm, bbnrm, rconde, rcondv, work, lwork, iwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sggglm "F_FUNC(sggglm,SGGGLM)"(int *n, int *m, int *p, s *a, int *lda, s *b, int *ldb, s *d, s *x, s *y, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sggglm(int *n, int *m, int *p, s *a, int *lda, s *b, int *ldb, s *d, s *x, s *y, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sggglm(n, m, p, a, lda, b, ldb, d, x, y, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgghrd "F_FUNC(sgghrd,SGGHRD)"(char *compq, char *compz, int *n, int *ilo, int *ihi, s *a, int *lda, s *b, int *ldb, s *q, int *ldq, s *z, int *ldz, int *info) nogil
|
||
|
|
cdef void sgghrd(char *compq, char *compz, int *n, int *ilo, int *ihi, s *a, int *lda, s *b, int *ldb, s *q, int *ldq, s *z, int *ldz, int *info) nogil:
|
||
|
|
_fortran_sgghrd(compq, compz, n, ilo, ihi, a, lda, b, ldb, q, ldq, z, ldz, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgglse "F_FUNC(sgglse,SGGLSE)"(int *m, int *n, int *p, s *a, int *lda, s *b, int *ldb, s *c, s *d, s *x, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgglse(int *m, int *n, int *p, s *a, int *lda, s *b, int *ldb, s *c, s *d, s *x, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgglse(m, n, p, a, lda, b, ldb, c, d, x, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sggqrf "F_FUNC(sggqrf,SGGQRF)"(int *n, int *m, int *p, s *a, int *lda, s *taua, s *b, int *ldb, s *taub, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sggqrf(int *n, int *m, int *p, s *a, int *lda, s *taua, s *b, int *ldb, s *taub, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sggqrf(n, m, p, a, lda, taua, b, ldb, taub, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sggrqf "F_FUNC(sggrqf,SGGRQF)"(int *m, int *p, int *n, s *a, int *lda, s *taua, s *b, int *ldb, s *taub, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sggrqf(int *m, int *p, int *n, s *a, int *lda, s *taua, s *b, int *ldb, s *taub, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sggrqf(m, p, n, a, lda, taua, b, ldb, taub, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgsvj0 "F_FUNC(sgsvj0,SGSVJ0)"(char *jobv, int *m, int *n, s *a, int *lda, s *d, s *sva, int *mv, s *v, int *ldv, s *eps, s *sfmin, s *tol, int *nsweep, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgsvj0(char *jobv, int *m, int *n, s *a, int *lda, s *d, s *sva, int *mv, s *v, int *ldv, s *eps, s *sfmin, s *tol, int *nsweep, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgsvj0(jobv, m, n, a, lda, d, sva, mv, v, ldv, eps, sfmin, tol, nsweep, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgsvj1 "F_FUNC(sgsvj1,SGSVJ1)"(char *jobv, int *m, int *n, int *n1, s *a, int *lda, s *d, s *sva, int *mv, s *v, int *ldv, s *eps, s *sfmin, s *tol, int *nsweep, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sgsvj1(char *jobv, int *m, int *n, int *n1, s *a, int *lda, s *d, s *sva, int *mv, s *v, int *ldv, s *eps, s *sfmin, s *tol, int *nsweep, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sgsvj1(jobv, m, n, n1, a, lda, d, sva, mv, v, ldv, eps, sfmin, tol, nsweep, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgtcon "F_FUNC(sgtcon,SGTCON)"(char *norm, int *n, s *dl, s *d, s *du, s *du2, int *ipiv, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sgtcon(char *norm, int *n, s *dl, s *d, s *du, s *du2, int *ipiv, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgtcon(norm, n, dl, d, du, du2, ipiv, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgtrfs "F_FUNC(sgtrfs,SGTRFS)"(char *trans, int *n, int *nrhs, s *dl, s *d, s *du, s *dlf, s *df, s *duf, s *du2, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sgtrfs(char *trans, int *n, int *nrhs, s *dl, s *d, s *du, s *dlf, s *df, s *duf, s *du2, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgtrfs(trans, n, nrhs, dl, d, du, dlf, df, duf, du2, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgtsv "F_FUNC(sgtsv,SGTSV)"(int *n, int *nrhs, s *dl, s *d, s *du, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sgtsv(int *n, int *nrhs, s *dl, s *d, s *du, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sgtsv(n, nrhs, dl, d, du, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgtsvx "F_FUNC(sgtsvx,SGTSVX)"(char *fact, char *trans, int *n, int *nrhs, s *dl, s *d, s *du, s *dlf, s *df, s *duf, s *du2, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sgtsvx(char *fact, char *trans, int *n, int *nrhs, s *dl, s *d, s *du, s *dlf, s *df, s *duf, s *du2, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sgtsvx(fact, trans, n, nrhs, dl, d, du, dlf, df, duf, du2, ipiv, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgttrf "F_FUNC(sgttrf,SGTTRF)"(int *n, s *dl, s *d, s *du, s *du2, int *ipiv, int *info) nogil
|
||
|
|
cdef void sgttrf(int *n, s *dl, s *d, s *du, s *du2, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_sgttrf(n, dl, d, du, du2, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgttrs "F_FUNC(sgttrs,SGTTRS)"(char *trans, int *n, int *nrhs, s *dl, s *d, s *du, s *du2, int *ipiv, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sgttrs(char *trans, int *n, int *nrhs, s *dl, s *d, s *du, s *du2, int *ipiv, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sgttrs(trans, n, nrhs, dl, d, du, du2, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sgtts2 "F_FUNC(sgtts2,SGTTS2)"(int *itrans, int *n, int *nrhs, s *dl, s *d, s *du, s *du2, int *ipiv, s *b, int *ldb) nogil
|
||
|
|
cdef void sgtts2(int *itrans, int *n, int *nrhs, s *dl, s *d, s *du, s *du2, int *ipiv, s *b, int *ldb) nogil:
|
||
|
|
_fortran_sgtts2(itrans, n, nrhs, dl, d, du, du2, ipiv, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_shgeqz "F_FUNC(shgeqz,SHGEQZ)"(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *t, int *ldt, s *alphar, s *alphai, s *beta, s *q, int *ldq, s *z, int *ldz, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void shgeqz(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *t, int *ldt, s *alphar, s *alphai, s *beta, s *q, int *ldq, s *z, int *ldz, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_shgeqz(job, compq, compz, n, ilo, ihi, h, ldh, t, ldt, alphar, alphai, beta, q, ldq, z, ldz, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_shsein "F_FUNC(shsein,SHSEIN)"(char *side, char *eigsrc, char *initv, bint *select, int *n, s *h, int *ldh, s *wr, s *wi, s *vl, int *ldvl, s *vr, int *ldvr, int *mm, int *m, s *work, int *ifaill, int *ifailr, int *info) nogil
|
||
|
|
cdef void shsein(char *side, char *eigsrc, char *initv, bint *select, int *n, s *h, int *ldh, s *wr, s *wi, s *vl, int *ldvl, s *vr, int *ldvr, int *mm, int *m, s *work, int *ifaill, int *ifailr, int *info) nogil:
|
||
|
|
_fortran_shsein(side, eigsrc, initv, select, n, h, ldh, wr, wi, vl, ldvl, vr, ldvr, mm, m, work, ifaill, ifailr, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_shseqr "F_FUNC(shseqr,SHSEQR)"(char *job, char *compz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *wr, s *wi, s *z, int *ldz, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void shseqr(char *job, char *compz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *wr, s *wi, s *z, int *ldz, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_shseqr(job, compz, n, ilo, ihi, h, ldh, wr, wi, z, ldz, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slabad "F_FUNC(slabad,SLABAD)"(s *small, s *large) nogil
|
||
|
|
cdef void slabad(s *small, s *large) nogil:
|
||
|
|
_fortran_slabad(small, large)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slabrd "F_FUNC(slabrd,SLABRD)"(int *m, int *n, int *nb, s *a, int *lda, s *d, s *e, s *tauq, s *taup, s *x, int *ldx, s *y, int *ldy) nogil
|
||
|
|
cdef void slabrd(int *m, int *n, int *nb, s *a, int *lda, s *d, s *e, s *tauq, s *taup, s *x, int *ldx, s *y, int *ldy) nogil:
|
||
|
|
_fortran_slabrd(m, n, nb, a, lda, d, e, tauq, taup, x, ldx, y, ldy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slacn2 "F_FUNC(slacn2,SLACN2)"(int *n, s *v, s *x, int *isgn, s *est, int *kase, int *isave) nogil
|
||
|
|
cdef void slacn2(int *n, s *v, s *x, int *isgn, s *est, int *kase, int *isave) nogil:
|
||
|
|
_fortran_slacn2(n, v, x, isgn, est, kase, isave)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slacon "F_FUNC(slacon,SLACON)"(int *n, s *v, s *x, int *isgn, s *est, int *kase) nogil
|
||
|
|
cdef void slacon(int *n, s *v, s *x, int *isgn, s *est, int *kase) nogil:
|
||
|
|
_fortran_slacon(n, v, x, isgn, est, kase)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slacpy "F_FUNC(slacpy,SLACPY)"(char *uplo, int *m, int *n, s *a, int *lda, s *b, int *ldb) nogil
|
||
|
|
cdef void slacpy(char *uplo, int *m, int *n, s *a, int *lda, s *b, int *ldb) nogil:
|
||
|
|
_fortran_slacpy(uplo, m, n, a, lda, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sladiv "F_FUNC(sladiv,SLADIV)"(s *a, s *b, s *c, s *d, s *p, s *q) nogil
|
||
|
|
cdef void sladiv(s *a, s *b, s *c, s *d, s *p, s *q) nogil:
|
||
|
|
_fortran_sladiv(a, b, c, d, p, q)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slae2 "F_FUNC(slae2,SLAE2)"(s *a, s *b, s *c, s *rt1, s *rt2) nogil
|
||
|
|
cdef void slae2(s *a, s *b, s *c, s *rt1, s *rt2) nogil:
|
||
|
|
_fortran_slae2(a, b, c, rt1, rt2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaebz "F_FUNC(slaebz,SLAEBZ)"(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, s *abstol, s *reltol, s *pivmin, s *d, s *e, s *e2, int *nval, s *ab, s *c, int *mout, int *nab, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slaebz(int *ijob, int *nitmax, int *n, int *mmax, int *minp, int *nbmin, s *abstol, s *reltol, s *pivmin, s *d, s *e, s *e2, int *nval, s *ab, s *c, int *mout, int *nab, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slaebz(ijob, nitmax, n, mmax, minp, nbmin, abstol, reltol, pivmin, d, e, e2, nval, ab, c, mout, nab, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed0 "F_FUNC(slaed0,SLAED0)"(int *icompq, int *qsiz, int *n, s *d, s *e, s *q, int *ldq, s *qstore, int *ldqs, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slaed0(int *icompq, int *qsiz, int *n, s *d, s *e, s *q, int *ldq, s *qstore, int *ldqs, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slaed0(icompq, qsiz, n, d, e, q, ldq, qstore, ldqs, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed1 "F_FUNC(slaed1,SLAED1)"(int *n, s *d, s *q, int *ldq, int *indxq, s *rho, int *cutpnt, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slaed1(int *n, s *d, s *q, int *ldq, int *indxq, s *rho, int *cutpnt, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slaed1(n, d, q, ldq, indxq, rho, cutpnt, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed2 "F_FUNC(slaed2,SLAED2)"(int *k, int *n, int *n1, s *d, s *q, int *ldq, int *indxq, s *rho, s *z, s *dlamda, s *w, s *q2, int *indx, int *indxc, int *indxp, int *coltyp, int *info) nogil
|
||
|
|
cdef void slaed2(int *k, int *n, int *n1, s *d, s *q, int *ldq, int *indxq, s *rho, s *z, s *dlamda, s *w, s *q2, int *indx, int *indxc, int *indxp, int *coltyp, int *info) nogil:
|
||
|
|
_fortran_slaed2(k, n, n1, d, q, ldq, indxq, rho, z, dlamda, w, q2, indx, indxc, indxp, coltyp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed3 "F_FUNC(slaed3,SLAED3)"(int *k, int *n, int *n1, s *d, s *q, int *ldq, s *rho, s *dlamda, s *q2, int *indx, int *ctot, s *w, s *s, int *info) nogil
|
||
|
|
cdef void slaed3(int *k, int *n, int *n1, s *d, s *q, int *ldq, s *rho, s *dlamda, s *q2, int *indx, int *ctot, s *w, s *s, int *info) nogil:
|
||
|
|
_fortran_slaed3(k, n, n1, d, q, ldq, rho, dlamda, q2, indx, ctot, w, s, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed4 "F_FUNC(slaed4,SLAED4)"(int *n, int *i, s *d, s *z, s *delta, s *rho, s *dlam, int *info) nogil
|
||
|
|
cdef void slaed4(int *n, int *i, s *d, s *z, s *delta, s *rho, s *dlam, int *info) nogil:
|
||
|
|
_fortran_slaed4(n, i, d, z, delta, rho, dlam, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed5 "F_FUNC(slaed5,SLAED5)"(int *i, s *d, s *z, s *delta, s *rho, s *dlam) nogil
|
||
|
|
cdef void slaed5(int *i, s *d, s *z, s *delta, s *rho, s *dlam) nogil:
|
||
|
|
_fortran_slaed5(i, d, z, delta, rho, dlam)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed6 "F_FUNC(slaed6,SLAED6)"(int *kniter, bint *orgati, s *rho, s *d, s *z, s *finit, s *tau, int *info) nogil
|
||
|
|
cdef void slaed6(int *kniter, bint *orgati, s *rho, s *d, s *z, s *finit, s *tau, int *info) nogil:
|
||
|
|
_fortran_slaed6(kniter, orgati, rho, d, z, finit, tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed7 "F_FUNC(slaed7,SLAED7)"(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, s *d, s *q, int *ldq, int *indxq, s *rho, int *cutpnt, s *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, s *givnum, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slaed7(int *icompq, int *n, int *qsiz, int *tlvls, int *curlvl, int *curpbm, s *d, s *q, int *ldq, int *indxq, s *rho, int *cutpnt, s *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, s *givnum, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slaed7(icompq, n, qsiz, tlvls, curlvl, curpbm, d, q, ldq, indxq, rho, cutpnt, qstore, qptr, prmptr, perm, givptr, givcol, givnum, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed8 "F_FUNC(slaed8,SLAED8)"(int *icompq, int *k, int *n, int *qsiz, s *d, s *q, int *ldq, int *indxq, s *rho, int *cutpnt, s *z, s *dlamda, s *q2, int *ldq2, s *w, int *perm, int *givptr, int *givcol, s *givnum, int *indxp, int *indx, int *info) nogil
|
||
|
|
cdef void slaed8(int *icompq, int *k, int *n, int *qsiz, s *d, s *q, int *ldq, int *indxq, s *rho, int *cutpnt, s *z, s *dlamda, s *q2, int *ldq2, s *w, int *perm, int *givptr, int *givcol, s *givnum, int *indxp, int *indx, int *info) nogil:
|
||
|
|
_fortran_slaed8(icompq, k, n, qsiz, d, q, ldq, indxq, rho, cutpnt, z, dlamda, q2, ldq2, w, perm, givptr, givcol, givnum, indxp, indx, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaed9 "F_FUNC(slaed9,SLAED9)"(int *k, int *kstart, int *kstop, int *n, s *d, s *q, int *ldq, s *rho, s *dlamda, s *w, s *s, int *lds, int *info) nogil
|
||
|
|
cdef void slaed9(int *k, int *kstart, int *kstop, int *n, s *d, s *q, int *ldq, s *rho, s *dlamda, s *w, s *s, int *lds, int *info) nogil:
|
||
|
|
_fortran_slaed9(k, kstart, kstop, n, d, q, ldq, rho, dlamda, w, s, lds, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaeda "F_FUNC(slaeda,SLAEDA)"(int *n, int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, s *givnum, s *q, int *qptr, s *z, s *ztemp, int *info) nogil
|
||
|
|
cdef void slaeda(int *n, int *tlvls, int *curlvl, int *curpbm, int *prmptr, int *perm, int *givptr, int *givcol, s *givnum, s *q, int *qptr, s *z, s *ztemp, int *info) nogil:
|
||
|
|
_fortran_slaeda(n, tlvls, curlvl, curpbm, prmptr, perm, givptr, givcol, givnum, q, qptr, z, ztemp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaein "F_FUNC(slaein,SLAEIN)"(bint *rightv, bint *noinit, int *n, s *h, int *ldh, s *wr, s *wi, s *vr, s *vi, s *b, int *ldb, s *work, s *eps3, s *smlnum, s *bignum, int *info) nogil
|
||
|
|
cdef void slaein(bint *rightv, bint *noinit, int *n, s *h, int *ldh, s *wr, s *wi, s *vr, s *vi, s *b, int *ldb, s *work, s *eps3, s *smlnum, s *bignum, int *info) nogil:
|
||
|
|
_fortran_slaein(rightv, noinit, n, h, ldh, wr, wi, vr, vi, b, ldb, work, eps3, smlnum, bignum, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaev2 "F_FUNC(slaev2,SLAEV2)"(s *a, s *b, s *c, s *rt1, s *rt2, s *cs1, s *sn1) nogil
|
||
|
|
cdef void slaev2(s *a, s *b, s *c, s *rt1, s *rt2, s *cs1, s *sn1) nogil:
|
||
|
|
_fortran_slaev2(a, b, c, rt1, rt2, cs1, sn1)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaexc "F_FUNC(slaexc,SLAEXC)"(bint *wantq, int *n, s *t, int *ldt, s *q, int *ldq, int *j1, int *n1, int *n2, s *work, int *info) nogil
|
||
|
|
cdef void slaexc(bint *wantq, int *n, s *t, int *ldt, s *q, int *ldq, int *j1, int *n1, int *n2, s *work, int *info) nogil:
|
||
|
|
_fortran_slaexc(wantq, n, t, ldt, q, ldq, j1, n1, n2, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slag2 "F_FUNC(slag2,SLAG2)"(s *a, int *lda, s *b, int *ldb, s *safmin, s *scale1, s *scale2, s *wr1, s *wr2, s *wi) nogil
|
||
|
|
cdef void slag2(s *a, int *lda, s *b, int *ldb, s *safmin, s *scale1, s *scale2, s *wr1, s *wr2, s *wi) nogil:
|
||
|
|
_fortran_slag2(a, lda, b, ldb, safmin, scale1, scale2, wr1, wr2, wi)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slag2d "F_FUNC(slag2d,SLAG2D)"(int *m, int *n, s *sa, int *ldsa, d *a, int *lda, int *info) nogil
|
||
|
|
cdef void slag2d(int *m, int *n, s *sa, int *ldsa, d *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_slag2d(m, n, sa, ldsa, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slags2 "F_FUNC(slags2,SLAGS2)"(bint *upper, s *a1, s *a2, s *a3, s *b1, s *b2, s *b3, s *csu, s *snu, s *csv, s *snv, s *csq, s *snq) nogil
|
||
|
|
cdef void slags2(bint *upper, s *a1, s *a2, s *a3, s *b1, s *b2, s *b3, s *csu, s *snu, s *csv, s *snv, s *csq, s *snq) nogil:
|
||
|
|
_fortran_slags2(upper, a1, a2, a3, b1, b2, b3, csu, snu, csv, snv, csq, snq)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slagtf "F_FUNC(slagtf,SLAGTF)"(int *n, s *a, s *lambda_, s *b, s *c, s *tol, s *d, int *in_, int *info) nogil
|
||
|
|
cdef void slagtf(int *n, s *a, s *lambda_, s *b, s *c, s *tol, s *d, int *in_, int *info) nogil:
|
||
|
|
_fortran_slagtf(n, a, lambda_, b, c, tol, d, in_, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slagtm "F_FUNC(slagtm,SLAGTM)"(char *trans, int *n, int *nrhs, s *alpha, s *dl, s *d, s *du, s *x, int *ldx, s *beta, s *b, int *ldb) nogil
|
||
|
|
cdef void slagtm(char *trans, int *n, int *nrhs, s *alpha, s *dl, s *d, s *du, s *x, int *ldx, s *beta, s *b, int *ldb) nogil:
|
||
|
|
_fortran_slagtm(trans, n, nrhs, alpha, dl, d, du, x, ldx, beta, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slagts "F_FUNC(slagts,SLAGTS)"(int *job, int *n, s *a, s *b, s *c, s *d, int *in_, s *y, s *tol, int *info) nogil
|
||
|
|
cdef void slagts(int *job, int *n, s *a, s *b, s *c, s *d, int *in_, s *y, s *tol, int *info) nogil:
|
||
|
|
_fortran_slagts(job, n, a, b, c, d, in_, y, tol, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slagv2 "F_FUNC(slagv2,SLAGV2)"(s *a, int *lda, s *b, int *ldb, s *alphar, s *alphai, s *beta, s *csl, s *snl, s *csr, s *snr) nogil
|
||
|
|
cdef void slagv2(s *a, int *lda, s *b, int *ldb, s *alphar, s *alphai, s *beta, s *csl, s *snl, s *csr, s *snr) nogil:
|
||
|
|
_fortran_slagv2(a, lda, b, ldb, alphar, alphai, beta, csl, snl, csr, snr)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slahqr "F_FUNC(slahqr,SLAHQR)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *wr, s *wi, int *iloz, int *ihiz, s *z, int *ldz, int *info) nogil
|
||
|
|
cdef void slahqr(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *wr, s *wi, int *iloz, int *ihiz, s *z, int *ldz, int *info) nogil:
|
||
|
|
_fortran_slahqr(wantt, wantz, n, ilo, ihi, h, ldh, wr, wi, iloz, ihiz, z, ldz, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slahr2 "F_FUNC(slahr2,SLAHR2)"(int *n, int *k, int *nb, s *a, int *lda, s *tau, s *t, int *ldt, s *y, int *ldy) nogil
|
||
|
|
cdef void slahr2(int *n, int *k, int *nb, s *a, int *lda, s *tau, s *t, int *ldt, s *y, int *ldy) nogil:
|
||
|
|
_fortran_slahr2(n, k, nb, a, lda, tau, t, ldt, y, ldy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaic1 "F_FUNC(slaic1,SLAIC1)"(int *job, int *j, s *x, s *sest, s *w, s *gamma, s *sestpr, s *s, s *c) nogil
|
||
|
|
cdef void slaic1(int *job, int *j, s *x, s *sest, s *w, s *gamma, s *sestpr, s *s, s *c) nogil:
|
||
|
|
_fortran_slaic1(job, j, x, sest, w, gamma, sestpr, s, c)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaln2 "F_FUNC(slaln2,SLALN2)"(bint *ltrans, int *na, int *nw, s *smin, s *ca, s *a, int *lda, s *d1, s *d2, s *b, int *ldb, s *wr, s *wi, s *x, int *ldx, s *scale, s *xnorm, int *info) nogil
|
||
|
|
cdef void slaln2(bint *ltrans, int *na, int *nw, s *smin, s *ca, s *a, int *lda, s *d1, s *d2, s *b, int *ldb, s *wr, s *wi, s *x, int *ldx, s *scale, s *xnorm, int *info) nogil:
|
||
|
|
_fortran_slaln2(ltrans, na, nw, smin, ca, a, lda, d1, d2, b, ldb, wr, wi, x, ldx, scale, xnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slals0 "F_FUNC(slals0,SLALS0)"(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, s *b, int *ldb, s *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, s *givnum, int *ldgnum, s *poles, s *difl, s *difr, s *z, int *k, s *c, s *s, s *work, int *info) nogil
|
||
|
|
cdef void slals0(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, s *b, int *ldb, s *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, s *givnum, int *ldgnum, s *poles, s *difl, s *difr, s *z, int *k, s *c, s *s, s *work, int *info) nogil:
|
||
|
|
_fortran_slals0(icompq, nl, nr, sqre, nrhs, b, ldb, bx, ldbx, perm, givptr, givcol, ldgcol, givnum, ldgnum, poles, difl, difr, z, k, c, s, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slalsa "F_FUNC(slalsa,SLALSA)"(int *icompq, int *smlsiz, int *n, int *nrhs, s *b, int *ldb, s *bx, int *ldbx, s *u, int *ldu, s *vt, int *k, s *difl, s *difr, s *z, s *poles, int *givptr, int *givcol, int *ldgcol, int *perm, s *givnum, s *c, s *s, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slalsa(int *icompq, int *smlsiz, int *n, int *nrhs, s *b, int *ldb, s *bx, int *ldbx, s *u, int *ldu, s *vt, int *k, s *difl, s *difr, s *z, s *poles, int *givptr, int *givcol, int *ldgcol, int *perm, s *givnum, s *c, s *s, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slalsa(icompq, smlsiz, n, nrhs, b, ldb, bx, ldbx, u, ldu, vt, k, difl, difr, z, poles, givptr, givcol, ldgcol, perm, givnum, c, s, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slalsd "F_FUNC(slalsd,SLALSD)"(char *uplo, int *smlsiz, int *n, int *nrhs, s *d, s *e, s *b, int *ldb, s *rcond, int *rank, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slalsd(char *uplo, int *smlsiz, int *n, int *nrhs, s *d, s *e, s *b, int *ldb, s *rcond, int *rank, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slalsd(uplo, smlsiz, n, nrhs, d, e, b, ldb, rcond, rank, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slamrg "F_FUNC(slamrg,SLAMRG)"(int *n1, int *n2, s *a, int *strd1, int *strd2, int *index_bn) nogil
|
||
|
|
cdef void slamrg(int *n1, int *n2, s *a, int *strd1, int *strd2, int *index_bn) nogil:
|
||
|
|
_fortran_slamrg(n1, n2, a, strd1, strd2, index_bn)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slanv2 "F_FUNC(slanv2,SLANV2)"(s *a, s *b, s *c, s *d, s *rt1r, s *rt1i, s *rt2r, s *rt2i, s *cs, s *sn) nogil
|
||
|
|
cdef void slanv2(s *a, s *b, s *c, s *d, s *rt1r, s *rt1i, s *rt2r, s *rt2i, s *cs, s *sn) nogil:
|
||
|
|
_fortran_slanv2(a, b, c, d, rt1r, rt1i, rt2r, rt2i, cs, sn)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slapll "F_FUNC(slapll,SLAPLL)"(int *n, s *x, int *incx, s *y, int *incy, s *ssmin) nogil
|
||
|
|
cdef void slapll(int *n, s *x, int *incx, s *y, int *incy, s *ssmin) nogil:
|
||
|
|
_fortran_slapll(n, x, incx, y, incy, ssmin)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slapmr "F_FUNC(slapmr,SLAPMR)"(bint *forwrd, int *m, int *n, s *x, int *ldx, int *k) nogil
|
||
|
|
cdef void slapmr(bint *forwrd, int *m, int *n, s *x, int *ldx, int *k) nogil:
|
||
|
|
_fortran_slapmr(forwrd, m, n, x, ldx, k)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slapmt "F_FUNC(slapmt,SLAPMT)"(bint *forwrd, int *m, int *n, s *x, int *ldx, int *k) nogil
|
||
|
|
cdef void slapmt(bint *forwrd, int *m, int *n, s *x, int *ldx, int *k) nogil:
|
||
|
|
_fortran_slapmt(forwrd, m, n, x, ldx, k)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqgb "F_FUNC(slaqgb,SLAQGB)"(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, char *equed) nogil
|
||
|
|
cdef void slaqgb(int *m, int *n, int *kl, int *ku, s *ab, int *ldab, s *r, s *c, s *rowcnd, s *colcnd, s *amax, char *equed) nogil:
|
||
|
|
_fortran_slaqgb(m, n, kl, ku, ab, ldab, r, c, rowcnd, colcnd, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqge "F_FUNC(slaqge,SLAQGE)"(int *m, int *n, s *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, char *equed) nogil
|
||
|
|
cdef void slaqge(int *m, int *n, s *a, int *lda, s *r, s *c, s *rowcnd, s *colcnd, s *amax, char *equed) nogil:
|
||
|
|
_fortran_slaqge(m, n, a, lda, r, c, rowcnd, colcnd, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqp2 "F_FUNC(slaqp2,SLAQP2)"(int *m, int *n, int *offset, s *a, int *lda, int *jpvt, s *tau, s *vn1, s *vn2, s *work) nogil
|
||
|
|
cdef void slaqp2(int *m, int *n, int *offset, s *a, int *lda, int *jpvt, s *tau, s *vn1, s *vn2, s *work) nogil:
|
||
|
|
_fortran_slaqp2(m, n, offset, a, lda, jpvt, tau, vn1, vn2, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqps "F_FUNC(slaqps,SLAQPS)"(int *m, int *n, int *offset, int *nb, int *kb, s *a, int *lda, int *jpvt, s *tau, s *vn1, s *vn2, s *auxv, s *f, int *ldf) nogil
|
||
|
|
cdef void slaqps(int *m, int *n, int *offset, int *nb, int *kb, s *a, int *lda, int *jpvt, s *tau, s *vn1, s *vn2, s *auxv, s *f, int *ldf) nogil:
|
||
|
|
_fortran_slaqps(m, n, offset, nb, kb, a, lda, jpvt, tau, vn1, vn2, auxv, f, ldf)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqr0 "F_FUNC(slaqr0,SLAQR0)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *wr, s *wi, int *iloz, int *ihiz, s *z, int *ldz, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void slaqr0(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *wr, s *wi, int *iloz, int *ihiz, s *z, int *ldz, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_slaqr0(wantt, wantz, n, ilo, ihi, h, ldh, wr, wi, iloz, ihiz, z, ldz, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqr1 "F_FUNC(slaqr1,SLAQR1)"(int *n, s *h, int *ldh, s *sr1, s *si1, s *sr2, s *si2, s *v) nogil
|
||
|
|
cdef void slaqr1(int *n, s *h, int *ldh, s *sr1, s *si1, s *sr2, s *si2, s *v) nogil:
|
||
|
|
_fortran_slaqr1(n, h, ldh, sr1, si1, sr2, si2, v)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqr2 "F_FUNC(slaqr2,SLAQR2)"(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, s *h, int *ldh, int *iloz, int *ihiz, s *z, int *ldz, int *ns, int *nd, s *sr, s *si, s *v, int *ldv, int *nh, s *t, int *ldt, int *nv, s *wv, int *ldwv, s *work, int *lwork) nogil
|
||
|
|
cdef void slaqr2(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, s *h, int *ldh, int *iloz, int *ihiz, s *z, int *ldz, int *ns, int *nd, s *sr, s *si, s *v, int *ldv, int *nh, s *t, int *ldt, int *nv, s *wv, int *ldwv, s *work, int *lwork) nogil:
|
||
|
|
_fortran_slaqr2(wantt, wantz, n, ktop, kbot, nw, h, ldh, iloz, ihiz, z, ldz, ns, nd, sr, si, v, ldv, nh, t, ldt, nv, wv, ldwv, work, lwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqr3 "F_FUNC(slaqr3,SLAQR3)"(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, s *h, int *ldh, int *iloz, int *ihiz, s *z, int *ldz, int *ns, int *nd, s *sr, s *si, s *v, int *ldv, int *nh, s *t, int *ldt, int *nv, s *wv, int *ldwv, s *work, int *lwork) nogil
|
||
|
|
cdef void slaqr3(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, s *h, int *ldh, int *iloz, int *ihiz, s *z, int *ldz, int *ns, int *nd, s *sr, s *si, s *v, int *ldv, int *nh, s *t, int *ldt, int *nv, s *wv, int *ldwv, s *work, int *lwork) nogil:
|
||
|
|
_fortran_slaqr3(wantt, wantz, n, ktop, kbot, nw, h, ldh, iloz, ihiz, z, ldz, ns, nd, sr, si, v, ldv, nh, t, ldt, nv, wv, ldwv, work, lwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqr4 "F_FUNC(slaqr4,SLAQR4)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *wr, s *wi, int *iloz, int *ihiz, s *z, int *ldz, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void slaqr4(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, s *h, int *ldh, s *wr, s *wi, int *iloz, int *ihiz, s *z, int *ldz, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_slaqr4(wantt, wantz, n, ilo, ihi, h, ldh, wr, wi, iloz, ihiz, z, ldz, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqr5 "F_FUNC(slaqr5,SLAQR5)"(bint *wantt, bint *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, s *sr, s *si, s *h, int *ldh, int *iloz, int *ihiz, s *z, int *ldz, s *v, int *ldv, s *u, int *ldu, int *nv, s *wv, int *ldwv, int *nh, s *wh, int *ldwh) nogil
|
||
|
|
cdef void slaqr5(bint *wantt, bint *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, s *sr, s *si, s *h, int *ldh, int *iloz, int *ihiz, s *z, int *ldz, s *v, int *ldv, s *u, int *ldu, int *nv, s *wv, int *ldwv, int *nh, s *wh, int *ldwh) nogil:
|
||
|
|
_fortran_slaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, sr, si, h, ldh, iloz, ihiz, z, ldz, v, ldv, u, ldu, nv, wv, ldwv, nh, wh, ldwh)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqsb "F_FUNC(slaqsb,SLAQSB)"(char *uplo, int *n, int *kd, s *ab, int *ldab, s *s, s *scond, s *amax, char *equed) nogil
|
||
|
|
cdef void slaqsb(char *uplo, int *n, int *kd, s *ab, int *ldab, s *s, s *scond, s *amax, char *equed) nogil:
|
||
|
|
_fortran_slaqsb(uplo, n, kd, ab, ldab, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqsp "F_FUNC(slaqsp,SLAQSP)"(char *uplo, int *n, s *ap, s *s, s *scond, s *amax, char *equed) nogil
|
||
|
|
cdef void slaqsp(char *uplo, int *n, s *ap, s *s, s *scond, s *amax, char *equed) nogil:
|
||
|
|
_fortran_slaqsp(uplo, n, ap, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqsy "F_FUNC(slaqsy,SLAQSY)"(char *uplo, int *n, s *a, int *lda, s *s, s *scond, s *amax, char *equed) nogil
|
||
|
|
cdef void slaqsy(char *uplo, int *n, s *a, int *lda, s *s, s *scond, s *amax, char *equed) nogil:
|
||
|
|
_fortran_slaqsy(uplo, n, a, lda, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaqtr "F_FUNC(slaqtr,SLAQTR)"(bint *ltran, bint *lreal, int *n, s *t, int *ldt, s *b, s *w, s *scale, s *x, s *work, int *info) nogil
|
||
|
|
cdef void slaqtr(bint *ltran, bint *lreal, int *n, s *t, int *ldt, s *b, s *w, s *scale, s *x, s *work, int *info) nogil:
|
||
|
|
_fortran_slaqtr(ltran, lreal, n, t, ldt, b, w, scale, x, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slar1v "F_FUNC(slar1v,SLAR1V)"(int *n, int *b1, int *bn, s *lambda_, s *d, s *l, s *ld, s *lld, s *pivmin, s *gaptol, s *z, bint *wantnc, int *negcnt, s *ztz, s *mingma, int *r, int *isuppz, s *nrminv, s *resid, s *rqcorr, s *work) nogil
|
||
|
|
cdef void slar1v(int *n, int *b1, int *bn, s *lambda_, s *d, s *l, s *ld, s *lld, s *pivmin, s *gaptol, s *z, bint *wantnc, int *negcnt, s *ztz, s *mingma, int *r, int *isuppz, s *nrminv, s *resid, s *rqcorr, s *work) nogil:
|
||
|
|
_fortran_slar1v(n, b1, bn, lambda_, d, l, ld, lld, pivmin, gaptol, z, wantnc, negcnt, ztz, mingma, r, isuppz, nrminv, resid, rqcorr, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slar2v "F_FUNC(slar2v,SLAR2V)"(int *n, s *x, s *y, s *z, int *incx, s *c, s *s, int *incc) nogil
|
||
|
|
cdef void slar2v(int *n, s *x, s *y, s *z, int *incx, s *c, s *s, int *incc) nogil:
|
||
|
|
_fortran_slar2v(n, x, y, z, incx, c, s, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarf "F_FUNC(slarf,SLARF)"(char *side, int *m, int *n, s *v, int *incv, s *tau, s *c, int *ldc, s *work) nogil
|
||
|
|
cdef void slarf(char *side, int *m, int *n, s *v, int *incv, s *tau, s *c, int *ldc, s *work) nogil:
|
||
|
|
_fortran_slarf(side, m, n, v, incv, tau, c, ldc, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarfb "F_FUNC(slarfb,SLARFB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, s *v, int *ldv, s *t, int *ldt, s *c, int *ldc, s *work, int *ldwork) nogil
|
||
|
|
cdef void slarfb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, s *v, int *ldv, s *t, int *ldt, s *c, int *ldc, s *work, int *ldwork) nogil:
|
||
|
|
_fortran_slarfb(side, trans, direct, storev, m, n, k, v, ldv, t, ldt, c, ldc, work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarfg "F_FUNC(slarfg,SLARFG)"(int *n, s *alpha, s *x, int *incx, s *tau) nogil
|
||
|
|
cdef void slarfg(int *n, s *alpha, s *x, int *incx, s *tau) nogil:
|
||
|
|
_fortran_slarfg(n, alpha, x, incx, tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarfgp "F_FUNC(slarfgp,SLARFGP)"(int *n, s *alpha, s *x, int *incx, s *tau) nogil
|
||
|
|
cdef void slarfgp(int *n, s *alpha, s *x, int *incx, s *tau) nogil:
|
||
|
|
_fortran_slarfgp(n, alpha, x, incx, tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarft "F_FUNC(slarft,SLARFT)"(char *direct, char *storev, int *n, int *k, s *v, int *ldv, s *tau, s *t, int *ldt) nogil
|
||
|
|
cdef void slarft(char *direct, char *storev, int *n, int *k, s *v, int *ldv, s *tau, s *t, int *ldt) nogil:
|
||
|
|
_fortran_slarft(direct, storev, n, k, v, ldv, tau, t, ldt)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarfx "F_FUNC(slarfx,SLARFX)"(char *side, int *m, int *n, s *v, s *tau, s *c, int *ldc, s *work) nogil
|
||
|
|
cdef void slarfx(char *side, int *m, int *n, s *v, s *tau, s *c, int *ldc, s *work) nogil:
|
||
|
|
_fortran_slarfx(side, m, n, v, tau, c, ldc, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slargv "F_FUNC(slargv,SLARGV)"(int *n, s *x, int *incx, s *y, int *incy, s *c, int *incc) nogil
|
||
|
|
cdef void slargv(int *n, s *x, int *incx, s *y, int *incy, s *c, int *incc) nogil:
|
||
|
|
_fortran_slargv(n, x, incx, y, incy, c, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarnv "F_FUNC(slarnv,SLARNV)"(int *idist, int *iseed, int *n, s *x) nogil
|
||
|
|
cdef void slarnv(int *idist, int *iseed, int *n, s *x) nogil:
|
||
|
|
_fortran_slarnv(idist, iseed, n, x)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarra "F_FUNC(slarra,SLARRA)"(int *n, s *d, s *e, s *e2, s *spltol, s *tnrm, int *nsplit, int *isplit, int *info) nogil
|
||
|
|
cdef void slarra(int *n, s *d, s *e, s *e2, s *spltol, s *tnrm, int *nsplit, int *isplit, int *info) nogil:
|
||
|
|
_fortran_slarra(n, d, e, e2, spltol, tnrm, nsplit, isplit, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarrb "F_FUNC(slarrb,SLARRB)"(int *n, s *d, s *lld, int *ifirst, int *ilast, s *rtol1, s *rtol2, int *offset, s *w, s *wgap, s *werr, s *work, int *iwork, s *pivmin, s *spdiam, int *twist, int *info) nogil
|
||
|
|
cdef void slarrb(int *n, s *d, s *lld, int *ifirst, int *ilast, s *rtol1, s *rtol2, int *offset, s *w, s *wgap, s *werr, s *work, int *iwork, s *pivmin, s *spdiam, int *twist, int *info) nogil:
|
||
|
|
_fortran_slarrb(n, d, lld, ifirst, ilast, rtol1, rtol2, offset, w, wgap, werr, work, iwork, pivmin, spdiam, twist, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarrc "F_FUNC(slarrc,SLARRC)"(char *jobt, int *n, s *vl, s *vu, s *d, s *e, s *pivmin, int *eigcnt, int *lcnt, int *rcnt, int *info) nogil
|
||
|
|
cdef void slarrc(char *jobt, int *n, s *vl, s *vu, s *d, s *e, s *pivmin, int *eigcnt, int *lcnt, int *rcnt, int *info) nogil:
|
||
|
|
_fortran_slarrc(jobt, n, vl, vu, d, e, pivmin, eigcnt, lcnt, rcnt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarrd "F_FUNC(slarrd,SLARRD)"(char *range, char *order, int *n, s *vl, s *vu, int *il, int *iu, s *gers, s *reltol, s *d, s *e, s *e2, s *pivmin, int *nsplit, int *isplit, int *m, s *w, s *werr, s *wl, s *wu, int *iblock, int *indexw, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slarrd(char *range, char *order, int *n, s *vl, s *vu, int *il, int *iu, s *gers, s *reltol, s *d, s *e, s *e2, s *pivmin, int *nsplit, int *isplit, int *m, s *w, s *werr, s *wl, s *wu, int *iblock, int *indexw, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slarrd(range, order, n, vl, vu, il, iu, gers, reltol, d, e, e2, pivmin, nsplit, isplit, m, w, werr, wl, wu, iblock, indexw, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarre "F_FUNC(slarre,SLARRE)"(char *range, int *n, s *vl, s *vu, int *il, int *iu, s *d, s *e, s *e2, s *rtol1, s *rtol2, s *spltol, int *nsplit, int *isplit, int *m, s *w, s *werr, s *wgap, int *iblock, int *indexw, s *gers, s *pivmin, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slarre(char *range, int *n, s *vl, s *vu, int *il, int *iu, s *d, s *e, s *e2, s *rtol1, s *rtol2, s *spltol, int *nsplit, int *isplit, int *m, s *w, s *werr, s *wgap, int *iblock, int *indexw, s *gers, s *pivmin, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slarre(range, n, vl, vu, il, iu, d, e, e2, rtol1, rtol2, spltol, nsplit, isplit, m, w, werr, wgap, iblock, indexw, gers, pivmin, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarrf "F_FUNC(slarrf,SLARRF)"(int *n, s *d, s *l, s *ld, int *clstrt, int *clend, s *w, s *wgap, s *werr, s *spdiam, s *clgapl, s *clgapr, s *pivmin, s *sigma, s *dplus, s *lplus, s *work, int *info) nogil
|
||
|
|
cdef void slarrf(int *n, s *d, s *l, s *ld, int *clstrt, int *clend, s *w, s *wgap, s *werr, s *spdiam, s *clgapl, s *clgapr, s *pivmin, s *sigma, s *dplus, s *lplus, s *work, int *info) nogil:
|
||
|
|
_fortran_slarrf(n, d, l, ld, clstrt, clend, w, wgap, werr, spdiam, clgapl, clgapr, pivmin, sigma, dplus, lplus, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarrj "F_FUNC(slarrj,SLARRJ)"(int *n, s *d, s *e2, int *ifirst, int *ilast, s *rtol, int *offset, s *w, s *werr, s *work, int *iwork, s *pivmin, s *spdiam, int *info) nogil
|
||
|
|
cdef void slarrj(int *n, s *d, s *e2, int *ifirst, int *ilast, s *rtol, int *offset, s *w, s *werr, s *work, int *iwork, s *pivmin, s *spdiam, int *info) nogil:
|
||
|
|
_fortran_slarrj(n, d, e2, ifirst, ilast, rtol, offset, w, werr, work, iwork, pivmin, spdiam, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarrk "F_FUNC(slarrk,SLARRK)"(int *n, int *iw, s *gl, s *gu, s *d, s *e2, s *pivmin, s *reltol, s *w, s *werr, int *info) nogil
|
||
|
|
cdef void slarrk(int *n, int *iw, s *gl, s *gu, s *d, s *e2, s *pivmin, s *reltol, s *w, s *werr, int *info) nogil:
|
||
|
|
_fortran_slarrk(n, iw, gl, gu, d, e2, pivmin, reltol, w, werr, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarrr "F_FUNC(slarrr,SLARRR)"(int *n, s *d, s *e, int *info) nogil
|
||
|
|
cdef void slarrr(int *n, s *d, s *e, int *info) nogil:
|
||
|
|
_fortran_slarrr(n, d, e, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarrv "F_FUNC(slarrv,SLARRV)"(int *n, s *vl, s *vu, s *d, s *l, s *pivmin, int *isplit, int *m, int *dol, int *dou, s *minrgp, s *rtol1, s *rtol2, s *w, s *werr, s *wgap, int *iblock, int *indexw, s *gers, s *z, int *ldz, int *isuppz, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slarrv(int *n, s *vl, s *vu, s *d, s *l, s *pivmin, int *isplit, int *m, int *dol, int *dou, s *minrgp, s *rtol1, s *rtol2, s *w, s *werr, s *wgap, int *iblock, int *indexw, s *gers, s *z, int *ldz, int *isuppz, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slarrv(n, vl, vu, d, l, pivmin, isplit, m, dol, dou, minrgp, rtol1, rtol2, w, werr, wgap, iblock, indexw, gers, z, ldz, isuppz, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slartg "F_FUNC(slartg,SLARTG)"(s *f, s *g, s *cs, s *sn, s *r) nogil
|
||
|
|
cdef void slartg(s *f, s *g, s *cs, s *sn, s *r) nogil:
|
||
|
|
_fortran_slartg(f, g, cs, sn, r)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slartgp "F_FUNC(slartgp,SLARTGP)"(s *f, s *g, s *cs, s *sn, s *r) nogil
|
||
|
|
cdef void slartgp(s *f, s *g, s *cs, s *sn, s *r) nogil:
|
||
|
|
_fortran_slartgp(f, g, cs, sn, r)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slartgs "F_FUNC(slartgs,SLARTGS)"(s *x, s *y, s *sigma, s *cs, s *sn) nogil
|
||
|
|
cdef void slartgs(s *x, s *y, s *sigma, s *cs, s *sn) nogil:
|
||
|
|
_fortran_slartgs(x, y, sigma, cs, sn)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slartv "F_FUNC(slartv,SLARTV)"(int *n, s *x, int *incx, s *y, int *incy, s *c, s *s, int *incc) nogil
|
||
|
|
cdef void slartv(int *n, s *x, int *incx, s *y, int *incy, s *c, s *s, int *incc) nogil:
|
||
|
|
_fortran_slartv(n, x, incx, y, incy, c, s, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaruv "F_FUNC(slaruv,SLARUV)"(int *iseed, int *n, s *x) nogil
|
||
|
|
cdef void slaruv(int *iseed, int *n, s *x) nogil:
|
||
|
|
_fortran_slaruv(iseed, n, x)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarz "F_FUNC(slarz,SLARZ)"(char *side, int *m, int *n, int *l, s *v, int *incv, s *tau, s *c, int *ldc, s *work) nogil
|
||
|
|
cdef void slarz(char *side, int *m, int *n, int *l, s *v, int *incv, s *tau, s *c, int *ldc, s *work) nogil:
|
||
|
|
_fortran_slarz(side, m, n, l, v, incv, tau, c, ldc, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarzb "F_FUNC(slarzb,SLARZB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, s *v, int *ldv, s *t, int *ldt, s *c, int *ldc, s *work, int *ldwork) nogil
|
||
|
|
cdef void slarzb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, s *v, int *ldv, s *t, int *ldt, s *c, int *ldc, s *work, int *ldwork) nogil:
|
||
|
|
_fortran_slarzb(side, trans, direct, storev, m, n, k, l, v, ldv, t, ldt, c, ldc, work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slarzt "F_FUNC(slarzt,SLARZT)"(char *direct, char *storev, int *n, int *k, s *v, int *ldv, s *tau, s *t, int *ldt) nogil
|
||
|
|
cdef void slarzt(char *direct, char *storev, int *n, int *k, s *v, int *ldv, s *tau, s *t, int *ldt) nogil:
|
||
|
|
_fortran_slarzt(direct, storev, n, k, v, ldv, tau, t, ldt)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slas2 "F_FUNC(slas2,SLAS2)"(s *f, s *g, s *h, s *ssmin, s *ssmax) nogil
|
||
|
|
cdef void slas2(s *f, s *g, s *h, s *ssmin, s *ssmax) nogil:
|
||
|
|
_fortran_slas2(f, g, h, ssmin, ssmax)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slascl "F_FUNC(slascl,SLASCL)"(char *type_bn, int *kl, int *ku, s *cfrom, s *cto, int *m, int *n, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void slascl(char *type_bn, int *kl, int *ku, s *cfrom, s *cto, int *m, int *n, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_slascl(type_bn, kl, ku, cfrom, cto, m, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasd0 "F_FUNC(slasd0,SLASD0)"(int *n, int *sqre, s *d, s *e, s *u, int *ldu, s *vt, int *ldvt, int *smlsiz, int *iwork, s *work, int *info) nogil
|
||
|
|
cdef void slasd0(int *n, int *sqre, s *d, s *e, s *u, int *ldu, s *vt, int *ldvt, int *smlsiz, int *iwork, s *work, int *info) nogil:
|
||
|
|
_fortran_slasd0(n, sqre, d, e, u, ldu, vt, ldvt, smlsiz, iwork, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasd1 "F_FUNC(slasd1,SLASD1)"(int *nl, int *nr, int *sqre, s *d, s *alpha, s *beta, s *u, int *ldu, s *vt, int *ldvt, int *idxq, int *iwork, s *work, int *info) nogil
|
||
|
|
cdef void slasd1(int *nl, int *nr, int *sqre, s *d, s *alpha, s *beta, s *u, int *ldu, s *vt, int *ldvt, int *idxq, int *iwork, s *work, int *info) nogil:
|
||
|
|
_fortran_slasd1(nl, nr, sqre, d, alpha, beta, u, ldu, vt, ldvt, idxq, iwork, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasd2 "F_FUNC(slasd2,SLASD2)"(int *nl, int *nr, int *sqre, int *k, s *d, s *z, s *alpha, s *beta, s *u, int *ldu, s *vt, int *ldvt, s *dsigma, s *u2, int *ldu2, s *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, int *info) nogil
|
||
|
|
cdef void slasd2(int *nl, int *nr, int *sqre, int *k, s *d, s *z, s *alpha, s *beta, s *u, int *ldu, s *vt, int *ldvt, s *dsigma, s *u2, int *ldu2, s *vt2, int *ldvt2, int *idxp, int *idx, int *idxc, int *idxq, int *coltyp, int *info) nogil:
|
||
|
|
_fortran_slasd2(nl, nr, sqre, k, d, z, alpha, beta, u, ldu, vt, ldvt, dsigma, u2, ldu2, vt2, ldvt2, idxp, idx, idxc, idxq, coltyp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasd3 "F_FUNC(slasd3,SLASD3)"(int *nl, int *nr, int *sqre, int *k, s *d, s *q, int *ldq, s *dsigma, s *u, int *ldu, s *u2, int *ldu2, s *vt, int *ldvt, s *vt2, int *ldvt2, int *idxc, int *ctot, s *z, int *info) nogil
|
||
|
|
cdef void slasd3(int *nl, int *nr, int *sqre, int *k, s *d, s *q, int *ldq, s *dsigma, s *u, int *ldu, s *u2, int *ldu2, s *vt, int *ldvt, s *vt2, int *ldvt2, int *idxc, int *ctot, s *z, int *info) nogil:
|
||
|
|
_fortran_slasd3(nl, nr, sqre, k, d, q, ldq, dsigma, u, ldu, u2, ldu2, vt, ldvt, vt2, ldvt2, idxc, ctot, z, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasd4 "F_FUNC(slasd4,SLASD4)"(int *n, int *i, s *d, s *z, s *delta, s *rho, s *sigma, s *work, int *info) nogil
|
||
|
|
cdef void slasd4(int *n, int *i, s *d, s *z, s *delta, s *rho, s *sigma, s *work, int *info) nogil:
|
||
|
|
_fortran_slasd4(n, i, d, z, delta, rho, sigma, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasd5 "F_FUNC(slasd5,SLASD5)"(int *i, s *d, s *z, s *delta, s *rho, s *dsigma, s *work) nogil
|
||
|
|
cdef void slasd5(int *i, s *d, s *z, s *delta, s *rho, s *dsigma, s *work) nogil:
|
||
|
|
_fortran_slasd5(i, d, z, delta, rho, dsigma, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasd6 "F_FUNC(slasd6,SLASD6)"(int *icompq, int *nl, int *nr, int *sqre, s *d, s *vf, s *vl, s *alpha, s *beta, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, s *givnum, int *ldgnum, s *poles, s *difl, s *difr, s *z, int *k, s *c, s *s, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slasd6(int *icompq, int *nl, int *nr, int *sqre, s *d, s *vf, s *vl, s *alpha, s *beta, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, s *givnum, int *ldgnum, s *poles, s *difl, s *difr, s *z, int *k, s *c, s *s, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slasd6(icompq, nl, nr, sqre, d, vf, vl, alpha, beta, idxq, perm, givptr, givcol, ldgcol, givnum, ldgnum, poles, difl, difr, z, k, c, s, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasd7 "F_FUNC(slasd7,SLASD7)"(int *icompq, int *nl, int *nr, int *sqre, int *k, s *d, s *z, s *zw, s *vf, s *vfw, s *vl, s *vlw, s *alpha, s *beta, s *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, s *givnum, int *ldgnum, s *c, s *s, int *info) nogil
|
||
|
|
cdef void slasd7(int *icompq, int *nl, int *nr, int *sqre, int *k, s *d, s *z, s *zw, s *vf, s *vfw, s *vl, s *vlw, s *alpha, s *beta, s *dsigma, int *idx, int *idxp, int *idxq, int *perm, int *givptr, int *givcol, int *ldgcol, s *givnum, int *ldgnum, s *c, s *s, int *info) nogil:
|
||
|
|
_fortran_slasd7(icompq, nl, nr, sqre, k, d, z, zw, vf, vfw, vl, vlw, alpha, beta, dsigma, idx, idxp, idxq, perm, givptr, givcol, ldgcol, givnum, ldgnum, c, s, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasd8 "F_FUNC(slasd8,SLASD8)"(int *icompq, int *k, s *d, s *z, s *vf, s *vl, s *difl, s *difr, int *lddifr, s *dsigma, s *work, int *info) nogil
|
||
|
|
cdef void slasd8(int *icompq, int *k, s *d, s *z, s *vf, s *vl, s *difl, s *difr, int *lddifr, s *dsigma, s *work, int *info) nogil:
|
||
|
|
_fortran_slasd8(icompq, k, d, z, vf, vl, difl, difr, lddifr, dsigma, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasda "F_FUNC(slasda,SLASDA)"(int *icompq, int *smlsiz, int *n, int *sqre, s *d, s *e, s *u, int *ldu, s *vt, int *k, s *difl, s *difr, s *z, s *poles, int *givptr, int *givcol, int *ldgcol, int *perm, s *givnum, s *c, s *s, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void slasda(int *icompq, int *smlsiz, int *n, int *sqre, s *d, s *e, s *u, int *ldu, s *vt, int *k, s *difl, s *difr, s *z, s *poles, int *givptr, int *givcol, int *ldgcol, int *perm, s *givnum, s *c, s *s, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_slasda(icompq, smlsiz, n, sqre, d, e, u, ldu, vt, k, difl, difr, z, poles, givptr, givcol, ldgcol, perm, givnum, c, s, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasdq "F_FUNC(slasdq,SLASDQ)"(char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, s *d, s *e, s *vt, int *ldvt, s *u, int *ldu, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void slasdq(char *uplo, int *sqre, int *n, int *ncvt, int *nru, int *ncc, s *d, s *e, s *vt, int *ldvt, s *u, int *ldu, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_slasdq(uplo, sqre, n, ncvt, nru, ncc, d, e, vt, ldvt, u, ldu, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasdt "F_FUNC(slasdt,SLASDT)"(int *n, int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub) nogil
|
||
|
|
cdef void slasdt(int *n, int *lvl, int *nd, int *inode, int *ndiml, int *ndimr, int *msub) nogil:
|
||
|
|
_fortran_slasdt(n, lvl, nd, inode, ndiml, ndimr, msub)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaset "F_FUNC(slaset,SLASET)"(char *uplo, int *m, int *n, s *alpha, s *beta, s *a, int *lda) nogil
|
||
|
|
cdef void slaset(char *uplo, int *m, int *n, s *alpha, s *beta, s *a, int *lda) nogil:
|
||
|
|
_fortran_slaset(uplo, m, n, alpha, beta, a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasq1 "F_FUNC(slasq1,SLASQ1)"(int *n, s *d, s *e, s *work, int *info) nogil
|
||
|
|
cdef void slasq1(int *n, s *d, s *e, s *work, int *info) nogil:
|
||
|
|
_fortran_slasq1(n, d, e, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasq2 "F_FUNC(slasq2,SLASQ2)"(int *n, s *z, int *info) nogil
|
||
|
|
cdef void slasq2(int *n, s *z, int *info) nogil:
|
||
|
|
_fortran_slasq2(n, z, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasq3 "F_FUNC(slasq3,SLASQ3)"(int *i0, int *n0, s *z, int *pp, s *dmin, s *sigma, s *desig, s *qmax, int *nfail, int *iter, int *ndiv, bint *ieee, int *ttype, s *dmin1, s *dmin2, s *dn, s *dn1, s *dn2, s *g, s *tau) nogil
|
||
|
|
cdef void slasq3(int *i0, int *n0, s *z, int *pp, s *dmin, s *sigma, s *desig, s *qmax, int *nfail, int *iter, int *ndiv, bint *ieee, int *ttype, s *dmin1, s *dmin2, s *dn, s *dn1, s *dn2, s *g, s *tau) nogil:
|
||
|
|
_fortran_slasq3(i0, n0, z, pp, dmin, sigma, desig, qmax, nfail, iter, ndiv, ieee, ttype, dmin1, dmin2, dn, dn1, dn2, g, tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasq4 "F_FUNC(slasq4,SLASQ4)"(int *i0, int *n0, s *z, int *pp, int *n0in, s *dmin, s *dmin1, s *dmin2, s *dn, s *dn1, s *dn2, s *tau, int *ttype, s *g) nogil
|
||
|
|
cdef void slasq4(int *i0, int *n0, s *z, int *pp, int *n0in, s *dmin, s *dmin1, s *dmin2, s *dn, s *dn1, s *dn2, s *tau, int *ttype, s *g) nogil:
|
||
|
|
_fortran_slasq4(i0, n0, z, pp, n0in, dmin, dmin1, dmin2, dn, dn1, dn2, tau, ttype, g)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasq6 "F_FUNC(slasq6,SLASQ6)"(int *i0, int *n0, s *z, int *pp, s *dmin, s *dmin1, s *dmin2, s *dn, s *dnm1, s *dnm2) nogil
|
||
|
|
cdef void slasq6(int *i0, int *n0, s *z, int *pp, s *dmin, s *dmin1, s *dmin2, s *dn, s *dnm1, s *dnm2) nogil:
|
||
|
|
_fortran_slasq6(i0, n0, z, pp, dmin, dmin1, dmin2, dn, dnm1, dnm2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasr "F_FUNC(slasr,SLASR)"(char *side, char *pivot, char *direct, int *m, int *n, s *c, s *s, s *a, int *lda) nogil
|
||
|
|
cdef void slasr(char *side, char *pivot, char *direct, int *m, int *n, s *c, s *s, s *a, int *lda) nogil:
|
||
|
|
_fortran_slasr(side, pivot, direct, m, n, c, s, a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasrt "F_FUNC(slasrt,SLASRT)"(char *id, int *n, s *d, int *info) nogil
|
||
|
|
cdef void slasrt(char *id, int *n, s *d, int *info) nogil:
|
||
|
|
_fortran_slasrt(id, n, d, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slassq "F_FUNC(slassq,SLASSQ)"(int *n, s *x, int *incx, s *scale, s *sumsq) nogil
|
||
|
|
cdef void slassq(int *n, s *x, int *incx, s *scale, s *sumsq) nogil:
|
||
|
|
_fortran_slassq(n, x, incx, scale, sumsq)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasv2 "F_FUNC(slasv2,SLASV2)"(s *f, s *g, s *h, s *ssmin, s *ssmax, s *snr, s *csr, s *snl, s *csl) nogil
|
||
|
|
cdef void slasv2(s *f, s *g, s *h, s *ssmin, s *ssmax, s *snr, s *csr, s *snl, s *csl) nogil:
|
||
|
|
_fortran_slasv2(f, g, h, ssmin, ssmax, snr, csr, snl, csl)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slaswp "F_FUNC(slaswp,SLASWP)"(int *n, s *a, int *lda, int *k1, int *k2, int *ipiv, int *incx) nogil
|
||
|
|
cdef void slaswp(int *n, s *a, int *lda, int *k1, int *k2, int *ipiv, int *incx) nogil:
|
||
|
|
_fortran_slaswp(n, a, lda, k1, k2, ipiv, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasy2 "F_FUNC(slasy2,SLASY2)"(bint *ltranl, bint *ltranr, int *isgn, int *n1, int *n2, s *tl, int *ldtl, s *tr, int *ldtr, s *b, int *ldb, s *scale, s *x, int *ldx, s *xnorm, int *info) nogil
|
||
|
|
cdef void slasy2(bint *ltranl, bint *ltranr, int *isgn, int *n1, int *n2, s *tl, int *ldtl, s *tr, int *ldtr, s *b, int *ldb, s *scale, s *x, int *ldx, s *xnorm, int *info) nogil:
|
||
|
|
_fortran_slasy2(ltranl, ltranr, isgn, n1, n2, tl, ldtl, tr, ldtr, b, ldb, scale, x, ldx, xnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slasyf "F_FUNC(slasyf,SLASYF)"(char *uplo, int *n, int *nb, int *kb, s *a, int *lda, int *ipiv, s *w, int *ldw, int *info) nogil
|
||
|
|
cdef void slasyf(char *uplo, int *n, int *nb, int *kb, s *a, int *lda, int *ipiv, s *w, int *ldw, int *info) nogil:
|
||
|
|
_fortran_slasyf(uplo, n, nb, kb, a, lda, ipiv, w, ldw, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slatbs "F_FUNC(slatbs,SLATBS)"(char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, s *ab, int *ldab, s *x, s *scale, s *cnorm, int *info) nogil
|
||
|
|
cdef void slatbs(char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, s *ab, int *ldab, s *x, s *scale, s *cnorm, int *info) nogil:
|
||
|
|
_fortran_slatbs(uplo, trans, diag, normin, n, kd, ab, ldab, x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slatdf "F_FUNC(slatdf,SLATDF)"(int *ijob, int *n, s *z, int *ldz, s *rhs, s *rdsum, s *rdscal, int *ipiv, int *jpiv) nogil
|
||
|
|
cdef void slatdf(int *ijob, int *n, s *z, int *ldz, s *rhs, s *rdsum, s *rdscal, int *ipiv, int *jpiv) nogil:
|
||
|
|
_fortran_slatdf(ijob, n, z, ldz, rhs, rdsum, rdscal, ipiv, jpiv)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slatps "F_FUNC(slatps,SLATPS)"(char *uplo, char *trans, char *diag, char *normin, int *n, s *ap, s *x, s *scale, s *cnorm, int *info) nogil
|
||
|
|
cdef void slatps(char *uplo, char *trans, char *diag, char *normin, int *n, s *ap, s *x, s *scale, s *cnorm, int *info) nogil:
|
||
|
|
_fortran_slatps(uplo, trans, diag, normin, n, ap, x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slatrd "F_FUNC(slatrd,SLATRD)"(char *uplo, int *n, int *nb, s *a, int *lda, s *e, s *tau, s *w, int *ldw) nogil
|
||
|
|
cdef void slatrd(char *uplo, int *n, int *nb, s *a, int *lda, s *e, s *tau, s *w, int *ldw) nogil:
|
||
|
|
_fortran_slatrd(uplo, n, nb, a, lda, e, tau, w, ldw)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slatrs "F_FUNC(slatrs,SLATRS)"(char *uplo, char *trans, char *diag, char *normin, int *n, s *a, int *lda, s *x, s *scale, s *cnorm, int *info) nogil
|
||
|
|
cdef void slatrs(char *uplo, char *trans, char *diag, char *normin, int *n, s *a, int *lda, s *x, s *scale, s *cnorm, int *info) nogil:
|
||
|
|
_fortran_slatrs(uplo, trans, diag, normin, n, a, lda, x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slatrz "F_FUNC(slatrz,SLATRZ)"(int *m, int *n, int *l, s *a, int *lda, s *tau, s *work) nogil
|
||
|
|
cdef void slatrz(int *m, int *n, int *l, s *a, int *lda, s *tau, s *work) nogil:
|
||
|
|
_fortran_slatrz(m, n, l, a, lda, tau, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slauu2 "F_FUNC(slauu2,SLAUU2)"(char *uplo, int *n, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void slauu2(char *uplo, int *n, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_slauu2(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_slauum "F_FUNC(slauum,SLAUUM)"(char *uplo, int *n, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void slauum(char *uplo, int *n, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_slauum(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sopgtr "F_FUNC(sopgtr,SOPGTR)"(char *uplo, int *n, s *ap, s *tau, s *q, int *ldq, s *work, int *info) nogil
|
||
|
|
cdef void sopgtr(char *uplo, int *n, s *ap, s *tau, s *q, int *ldq, s *work, int *info) nogil:
|
||
|
|
_fortran_sopgtr(uplo, n, ap, tau, q, ldq, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sopmtr "F_FUNC(sopmtr,SOPMTR)"(char *side, char *uplo, char *trans, int *m, int *n, s *ap, s *tau, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void sopmtr(char *side, char *uplo, char *trans, int *m, int *n, s *ap, s *tau, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_sopmtr(side, uplo, trans, m, n, ap, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorbdb "F_FUNC(sorbdb,SORBDB)"(char *trans, char *signs, int *m, int *p, int *q, s *x11, int *ldx11, s *x12, int *ldx12, s *x21, int *ldx21, s *x22, int *ldx22, s *theta, s *phi, s *taup1, s *taup2, s *tauq1, s *tauq2, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sorbdb(char *trans, char *signs, int *m, int *p, int *q, s *x11, int *ldx11, s *x12, int *ldx12, s *x21, int *ldx21, s *x22, int *ldx22, s *theta, s *phi, s *taup1, s *taup2, s *tauq1, s *tauq2, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sorbdb(trans, signs, m, p, q, x11, ldx11, x12, ldx12, x21, ldx21, x22, ldx22, theta, phi, taup1, taup2, tauq1, tauq2, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorcsd "F_FUNC(sorcsd,SORCSD)"(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, char *signs, int *m, int *p, int *q, s *x11, int *ldx11, s *x12, int *ldx12, s *x21, int *ldx21, s *x22, int *ldx22, s *theta, s *u1, int *ldu1, s *u2, int *ldu2, s *v1t, int *ldv1t, s *v2t, int *ldv2t, s *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void sorcsd(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, char *signs, int *m, int *p, int *q, s *x11, int *ldx11, s *x12, int *ldx12, s *x21, int *ldx21, s *x22, int *ldx22, s *theta, s *u1, int *ldu1, s *u2, int *ldu2, s *v1t, int *ldv1t, s *v2t, int *ldv2t, s *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sorcsd(jobu1, jobu2, jobv1t, jobv2t, trans, signs, m, p, q, x11, ldx11, x12, ldx12, x21, ldx21, x22, ldx22, theta, u1, ldu1, u2, ldu2, v1t, ldv1t, v2t, ldv2t, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorg2l "F_FUNC(sorg2l,SORG2L)"(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sorg2l(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sorg2l(m, n, k, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorg2r "F_FUNC(sorg2r,SORG2R)"(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sorg2r(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sorg2r(m, n, k, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorgbr "F_FUNC(sorgbr,SORGBR)"(char *vect, int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sorgbr(char *vect, int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sorgbr(vect, m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorghr "F_FUNC(sorghr,SORGHR)"(int *n, int *ilo, int *ihi, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sorghr(int *n, int *ilo, int *ihi, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sorghr(n, ilo, ihi, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorgl2 "F_FUNC(sorgl2,SORGL2)"(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sorgl2(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sorgl2(m, n, k, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorglq "F_FUNC(sorglq,SORGLQ)"(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sorglq(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sorglq(m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorgql "F_FUNC(sorgql,SORGQL)"(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sorgql(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sorgql(m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorgqr "F_FUNC(sorgqr,SORGQR)"(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sorgqr(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sorgqr(m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorgr2 "F_FUNC(sorgr2,SORGR2)"(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *info) nogil
|
||
|
|
cdef void sorgr2(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *info) nogil:
|
||
|
|
_fortran_sorgr2(m, n, k, a, lda, tau, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorgrq "F_FUNC(sorgrq,SORGRQ)"(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sorgrq(int *m, int *n, int *k, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sorgrq(m, n, k, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorgtr "F_FUNC(sorgtr,SORGTR)"(char *uplo, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sorgtr(char *uplo, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sorgtr(uplo, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorm2l "F_FUNC(sorm2l,SORM2L)"(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void sorm2l(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_sorm2l(side, trans, m, n, k, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorm2r "F_FUNC(sorm2r,SORM2R)"(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void sorm2r(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_sorm2r(side, trans, m, n, k, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormbr "F_FUNC(sormbr,SORMBR)"(char *vect, char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sormbr(char *vect, char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sormbr(vect, side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormhr "F_FUNC(sormhr,SORMHR)"(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sormhr(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sormhr(side, trans, m, n, ilo, ihi, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sorml2 "F_FUNC(sorml2,SORML2)"(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void sorml2(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_sorml2(side, trans, m, n, k, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormlq "F_FUNC(sormlq,SORMLQ)"(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sormlq(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sormlq(side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormql "F_FUNC(sormql,SORMQL)"(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sormql(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sormql(side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormqr "F_FUNC(sormqr,SORMQR)"(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sormqr(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sormqr(side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormr2 "F_FUNC(sormr2,SORMR2)"(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void sormr2(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_sormr2(side, trans, m, n, k, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormr3 "F_FUNC(sormr3,SORMR3)"(char *side, char *trans, int *m, int *n, int *k, int *l, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil
|
||
|
|
cdef void sormr3(char *side, char *trans, int *m, int *n, int *k, int *l, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *info) nogil:
|
||
|
|
_fortran_sormr3(side, trans, m, n, k, l, a, lda, tau, c, ldc, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormrq "F_FUNC(sormrq,SORMRQ)"(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sormrq(char *side, char *trans, int *m, int *n, int *k, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sormrq(side, trans, m, n, k, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormrz "F_FUNC(sormrz,SORMRZ)"(char *side, char *trans, int *m, int *n, int *k, int *l, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sormrz(char *side, char *trans, int *m, int *n, int *k, int *l, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sormrz(side, trans, m, n, k, l, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sormtr "F_FUNC(sormtr,SORMTR)"(char *side, char *uplo, char *trans, int *m, int *n, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void sormtr(char *side, char *uplo, char *trans, int *m, int *n, s *a, int *lda, s *tau, s *c, int *ldc, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_sormtr(side, uplo, trans, m, n, a, lda, tau, c, ldc, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spbcon "F_FUNC(spbcon,SPBCON)"(char *uplo, int *n, int *kd, s *ab, int *ldab, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void spbcon(char *uplo, int *n, int *kd, s *ab, int *ldab, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_spbcon(uplo, n, kd, ab, ldab, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spbequ "F_FUNC(spbequ,SPBEQU)"(char *uplo, int *n, int *kd, s *ab, int *ldab, s *s, s *scond, s *amax, int *info) nogil
|
||
|
|
cdef void spbequ(char *uplo, int *n, int *kd, s *ab, int *ldab, s *s, s *scond, s *amax, int *info) nogil:
|
||
|
|
_fortran_spbequ(uplo, n, kd, ab, ldab, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spbrfs "F_FUNC(spbrfs,SPBRFS)"(char *uplo, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *afb, int *ldafb, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void spbrfs(char *uplo, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *afb, int *ldafb, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_spbrfs(uplo, n, kd, nrhs, ab, ldab, afb, ldafb, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spbstf "F_FUNC(spbstf,SPBSTF)"(char *uplo, int *n, int *kd, s *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void spbstf(char *uplo, int *n, int *kd, s *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_spbstf(uplo, n, kd, ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spbsv "F_FUNC(spbsv,SPBSV)"(char *uplo, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void spbsv(char *uplo, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_spbsv(uplo, n, kd, nrhs, ab, ldab, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spbsvx "F_FUNC(spbsvx,SPBSVX)"(char *fact, char *uplo, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *afb, int *ldafb, char *equed, s *s, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void spbsvx(char *fact, char *uplo, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *afb, int *ldafb, char *equed, s *s, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_spbsvx(fact, uplo, n, kd, nrhs, ab, ldab, afb, ldafb, equed, s, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spbtf2 "F_FUNC(spbtf2,SPBTF2)"(char *uplo, int *n, int *kd, s *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void spbtf2(char *uplo, int *n, int *kd, s *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_spbtf2(uplo, n, kd, ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spbtrf "F_FUNC(spbtrf,SPBTRF)"(char *uplo, int *n, int *kd, s *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void spbtrf(char *uplo, int *n, int *kd, s *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_spbtrf(uplo, n, kd, ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spbtrs "F_FUNC(spbtrs,SPBTRS)"(char *uplo, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void spbtrs(char *uplo, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_spbtrs(uplo, n, kd, nrhs, ab, ldab, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spftrf "F_FUNC(spftrf,SPFTRF)"(char *transr, char *uplo, int *n, s *a, int *info) nogil
|
||
|
|
cdef void spftrf(char *transr, char *uplo, int *n, s *a, int *info) nogil:
|
||
|
|
_fortran_spftrf(transr, uplo, n, a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spftri "F_FUNC(spftri,SPFTRI)"(char *transr, char *uplo, int *n, s *a, int *info) nogil
|
||
|
|
cdef void spftri(char *transr, char *uplo, int *n, s *a, int *info) nogil:
|
||
|
|
_fortran_spftri(transr, uplo, n, a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spftrs "F_FUNC(spftrs,SPFTRS)"(char *transr, char *uplo, int *n, int *nrhs, s *a, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void spftrs(char *transr, char *uplo, int *n, int *nrhs, s *a, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_spftrs(transr, uplo, n, nrhs, a, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spocon "F_FUNC(spocon,SPOCON)"(char *uplo, int *n, s *a, int *lda, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void spocon(char *uplo, int *n, s *a, int *lda, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_spocon(uplo, n, a, lda, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spoequ "F_FUNC(spoequ,SPOEQU)"(int *n, s *a, int *lda, s *s, s *scond, s *amax, int *info) nogil
|
||
|
|
cdef void spoequ(int *n, s *a, int *lda, s *s, s *scond, s *amax, int *info) nogil:
|
||
|
|
_fortran_spoequ(n, a, lda, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spoequb "F_FUNC(spoequb,SPOEQUB)"(int *n, s *a, int *lda, s *s, s *scond, s *amax, int *info) nogil
|
||
|
|
cdef void spoequb(int *n, s *a, int *lda, s *s, s *scond, s *amax, int *info) nogil:
|
||
|
|
_fortran_spoequb(n, a, lda, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sporfs "F_FUNC(sporfs,SPORFS)"(char *uplo, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sporfs(char *uplo, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sporfs(uplo, n, nrhs, a, lda, af, ldaf, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sposv "F_FUNC(sposv,SPOSV)"(char *uplo, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sposv(char *uplo, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sposv(uplo, n, nrhs, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sposvx "F_FUNC(sposvx,SPOSVX)"(char *fact, char *uplo, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, char *equed, s *s, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sposvx(char *fact, char *uplo, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, char *equed, s *s, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sposvx(fact, uplo, n, nrhs, a, lda, af, ldaf, equed, s, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spotf2 "F_FUNC(spotf2,SPOTF2)"(char *uplo, int *n, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void spotf2(char *uplo, int *n, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_spotf2(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spotrf "F_FUNC(spotrf,SPOTRF)"(char *uplo, int *n, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void spotrf(char *uplo, int *n, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_spotrf(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spotri "F_FUNC(spotri,SPOTRI)"(char *uplo, int *n, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void spotri(char *uplo, int *n, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_spotri(uplo, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spotrs "F_FUNC(spotrs,SPOTRS)"(char *uplo, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void spotrs(char *uplo, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_spotrs(uplo, n, nrhs, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sppcon "F_FUNC(sppcon,SPPCON)"(char *uplo, int *n, s *ap, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sppcon(char *uplo, int *n, s *ap, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sppcon(uplo, n, ap, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sppequ "F_FUNC(sppequ,SPPEQU)"(char *uplo, int *n, s *ap, s *s, s *scond, s *amax, int *info) nogil
|
||
|
|
cdef void sppequ(char *uplo, int *n, s *ap, s *s, s *scond, s *amax, int *info) nogil:
|
||
|
|
_fortran_sppequ(uplo, n, ap, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spprfs "F_FUNC(spprfs,SPPRFS)"(char *uplo, int *n, int *nrhs, s *ap, s *afp, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void spprfs(char *uplo, int *n, int *nrhs, s *ap, s *afp, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_spprfs(uplo, n, nrhs, ap, afp, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sppsv "F_FUNC(sppsv,SPPSV)"(char *uplo, int *n, int *nrhs, s *ap, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sppsv(char *uplo, int *n, int *nrhs, s *ap, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sppsv(uplo, n, nrhs, ap, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sppsvx "F_FUNC(sppsvx,SPPSVX)"(char *fact, char *uplo, int *n, int *nrhs, s *ap, s *afp, char *equed, s *s, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sppsvx(char *fact, char *uplo, int *n, int *nrhs, s *ap, s *afp, char *equed, s *s, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sppsvx(fact, uplo, n, nrhs, ap, afp, equed, s, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spptrf "F_FUNC(spptrf,SPPTRF)"(char *uplo, int *n, s *ap, int *info) nogil
|
||
|
|
cdef void spptrf(char *uplo, int *n, s *ap, int *info) nogil:
|
||
|
|
_fortran_spptrf(uplo, n, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spptri "F_FUNC(spptri,SPPTRI)"(char *uplo, int *n, s *ap, int *info) nogil
|
||
|
|
cdef void spptri(char *uplo, int *n, s *ap, int *info) nogil:
|
||
|
|
_fortran_spptri(uplo, n, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spptrs "F_FUNC(spptrs,SPPTRS)"(char *uplo, int *n, int *nrhs, s *ap, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void spptrs(char *uplo, int *n, int *nrhs, s *ap, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_spptrs(uplo, n, nrhs, ap, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spstf2 "F_FUNC(spstf2,SPSTF2)"(char *uplo, int *n, s *a, int *lda, int *piv, int *rank, s *tol, s *work, int *info) nogil
|
||
|
|
cdef void spstf2(char *uplo, int *n, s *a, int *lda, int *piv, int *rank, s *tol, s *work, int *info) nogil:
|
||
|
|
_fortran_spstf2(uplo, n, a, lda, piv, rank, tol, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spstrf "F_FUNC(spstrf,SPSTRF)"(char *uplo, int *n, s *a, int *lda, int *piv, int *rank, s *tol, s *work, int *info) nogil
|
||
|
|
cdef void spstrf(char *uplo, int *n, s *a, int *lda, int *piv, int *rank, s *tol, s *work, int *info) nogil:
|
||
|
|
_fortran_spstrf(uplo, n, a, lda, piv, rank, tol, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sptcon "F_FUNC(sptcon,SPTCON)"(int *n, s *d, s *e, s *anorm, s *rcond, s *work, int *info) nogil
|
||
|
|
cdef void sptcon(int *n, s *d, s *e, s *anorm, s *rcond, s *work, int *info) nogil:
|
||
|
|
_fortran_sptcon(n, d, e, anorm, rcond, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spteqr "F_FUNC(spteqr,SPTEQR)"(char *compz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *info) nogil
|
||
|
|
cdef void spteqr(char *compz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *info) nogil:
|
||
|
|
_fortran_spteqr(compz, n, d, e, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sptrfs "F_FUNC(sptrfs,SPTRFS)"(int *n, int *nrhs, s *d, s *e, s *df, s *ef, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *info) nogil
|
||
|
|
cdef void sptrfs(int *n, int *nrhs, s *d, s *e, s *df, s *ef, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *info) nogil:
|
||
|
|
_fortran_sptrfs(n, nrhs, d, e, df, ef, b, ldb, x, ldx, ferr, berr, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sptsv "F_FUNC(sptsv,SPTSV)"(int *n, int *nrhs, s *d, s *e, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sptsv(int *n, int *nrhs, s *d, s *e, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sptsv(n, nrhs, d, e, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sptsvx "F_FUNC(sptsvx,SPTSVX)"(char *fact, int *n, int *nrhs, s *d, s *e, s *df, s *ef, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *info) nogil
|
||
|
|
cdef void sptsvx(char *fact, int *n, int *nrhs, s *d, s *e, s *df, s *ef, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *info) nogil:
|
||
|
|
_fortran_sptsvx(fact, n, nrhs, d, e, df, ef, b, ldb, x, ldx, rcond, ferr, berr, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spttrf "F_FUNC(spttrf,SPTTRF)"(int *n, s *d, s *e, int *info) nogil
|
||
|
|
cdef void spttrf(int *n, s *d, s *e, int *info) nogil:
|
||
|
|
_fortran_spttrf(n, d, e, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_spttrs "F_FUNC(spttrs,SPTTRS)"(int *n, int *nrhs, s *d, s *e, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void spttrs(int *n, int *nrhs, s *d, s *e, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_spttrs(n, nrhs, d, e, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sptts2 "F_FUNC(sptts2,SPTTS2)"(int *n, int *nrhs, s *d, s *e, s *b, int *ldb) nogil
|
||
|
|
cdef void sptts2(int *n, int *nrhs, s *d, s *e, s *b, int *ldb) nogil:
|
||
|
|
_fortran_sptts2(n, nrhs, d, e, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_srscl "F_FUNC(srscl,SRSCL)"(int *n, s *sa, s *sx, int *incx) nogil
|
||
|
|
cdef void srscl(int *n, s *sa, s *sx, int *incx) nogil:
|
||
|
|
_fortran_srscl(n, sa, sx, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssbev "F_FUNC(ssbev,SSBEV)"(char *jobz, char *uplo, int *n, int *kd, s *ab, int *ldab, s *w, s *z, int *ldz, s *work, int *info) nogil
|
||
|
|
cdef void ssbev(char *jobz, char *uplo, int *n, int *kd, s *ab, int *ldab, s *w, s *z, int *ldz, s *work, int *info) nogil:
|
||
|
|
_fortran_ssbev(jobz, uplo, n, kd, ab, ldab, w, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssbevd "F_FUNC(ssbevd,SSBEVD)"(char *jobz, char *uplo, int *n, int *kd, s *ab, int *ldab, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void ssbevd(char *jobz, char *uplo, int *n, int *kd, s *ab, int *ldab, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_ssbevd(jobz, uplo, n, kd, ab, ldab, w, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssbevx "F_FUNC(ssbevx,SSBEVX)"(char *jobz, char *range, char *uplo, int *n, int *kd, s *ab, int *ldab, s *q, int *ldq, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void ssbevx(char *jobz, char *range, char *uplo, int *n, int *kd, s *ab, int *ldab, s *q, int *ldq, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_ssbevx(jobz, range, uplo, n, kd, ab, ldab, q, ldq, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssbgst "F_FUNC(ssbgst,SSBGST)"(char *vect, char *uplo, int *n, int *ka, int *kb, s *ab, int *ldab, s *bb, int *ldbb, s *x, int *ldx, s *work, int *info) nogil
|
||
|
|
cdef void ssbgst(char *vect, char *uplo, int *n, int *ka, int *kb, s *ab, int *ldab, s *bb, int *ldbb, s *x, int *ldx, s *work, int *info) nogil:
|
||
|
|
_fortran_ssbgst(vect, uplo, n, ka, kb, ab, ldab, bb, ldbb, x, ldx, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssbgv "F_FUNC(ssbgv,SSBGV)"(char *jobz, char *uplo, int *n, int *ka, int *kb, s *ab, int *ldab, s *bb, int *ldbb, s *w, s *z, int *ldz, s *work, int *info) nogil
|
||
|
|
cdef void ssbgv(char *jobz, char *uplo, int *n, int *ka, int *kb, s *ab, int *ldab, s *bb, int *ldbb, s *w, s *z, int *ldz, s *work, int *info) nogil:
|
||
|
|
_fortran_ssbgv(jobz, uplo, n, ka, kb, ab, ldab, bb, ldbb, w, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssbgvd "F_FUNC(ssbgvd,SSBGVD)"(char *jobz, char *uplo, int *n, int *ka, int *kb, s *ab, int *ldab, s *bb, int *ldbb, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void ssbgvd(char *jobz, char *uplo, int *n, int *ka, int *kb, s *ab, int *ldab, s *bb, int *ldbb, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_ssbgvd(jobz, uplo, n, ka, kb, ab, ldab, bb, ldbb, w, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssbgvx "F_FUNC(ssbgvx,SSBGVX)"(char *jobz, char *range, char *uplo, int *n, int *ka, int *kb, s *ab, int *ldab, s *bb, int *ldbb, s *q, int *ldq, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void ssbgvx(char *jobz, char *range, char *uplo, int *n, int *ka, int *kb, s *ab, int *ldab, s *bb, int *ldbb, s *q, int *ldq, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_ssbgvx(jobz, range, uplo, n, ka, kb, ab, ldab, bb, ldbb, q, ldq, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssbtrd "F_FUNC(ssbtrd,SSBTRD)"(char *vect, char *uplo, int *n, int *kd, s *ab, int *ldab, s *d, s *e, s *q, int *ldq, s *work, int *info) nogil
|
||
|
|
cdef void ssbtrd(char *vect, char *uplo, int *n, int *kd, s *ab, int *ldab, s *d, s *e, s *q, int *ldq, s *work, int *info) nogil:
|
||
|
|
_fortran_ssbtrd(vect, uplo, n, kd, ab, ldab, d, e, q, ldq, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssfrk "F_FUNC(ssfrk,SSFRK)"(char *transr, char *uplo, char *trans, int *n, int *k, s *alpha, s *a, int *lda, s *beta, s *c) nogil
|
||
|
|
cdef void ssfrk(char *transr, char *uplo, char *trans, int *n, int *k, s *alpha, s *a, int *lda, s *beta, s *c) nogil:
|
||
|
|
_fortran_ssfrk(transr, uplo, trans, n, k, alpha, a, lda, beta, c)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspcon "F_FUNC(sspcon,SSPCON)"(char *uplo, int *n, s *ap, int *ipiv, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sspcon(char *uplo, int *n, s *ap, int *ipiv, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sspcon(uplo, n, ap, ipiv, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspev "F_FUNC(sspev,SSPEV)"(char *jobz, char *uplo, int *n, s *ap, s *w, s *z, int *ldz, s *work, int *info) nogil
|
||
|
|
cdef void sspev(char *jobz, char *uplo, int *n, s *ap, s *w, s *z, int *ldz, s *work, int *info) nogil:
|
||
|
|
_fortran_sspev(jobz, uplo, n, ap, w, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspevd "F_FUNC(sspevd,SSPEVD)"(char *jobz, char *uplo, int *n, s *ap, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void sspevd(char *jobz, char *uplo, int *n, s *ap, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_sspevd(jobz, uplo, n, ap, w, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspevx "F_FUNC(sspevx,SSPEVX)"(char *jobz, char *range, char *uplo, int *n, s *ap, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void sspevx(char *jobz, char *range, char *uplo, int *n, s *ap, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_sspevx(jobz, range, uplo, n, ap, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspgst "F_FUNC(sspgst,SSPGST)"(int *itype, char *uplo, int *n, s *ap, s *bp, int *info) nogil
|
||
|
|
cdef void sspgst(int *itype, char *uplo, int *n, s *ap, s *bp, int *info) nogil:
|
||
|
|
_fortran_sspgst(itype, uplo, n, ap, bp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspgv "F_FUNC(sspgv,SSPGV)"(int *itype, char *jobz, char *uplo, int *n, s *ap, s *bp, s *w, s *z, int *ldz, s *work, int *info) nogil
|
||
|
|
cdef void sspgv(int *itype, char *jobz, char *uplo, int *n, s *ap, s *bp, s *w, s *z, int *ldz, s *work, int *info) nogil:
|
||
|
|
_fortran_sspgv(itype, jobz, uplo, n, ap, bp, w, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspgvd "F_FUNC(sspgvd,SSPGVD)"(int *itype, char *jobz, char *uplo, int *n, s *ap, s *bp, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void sspgvd(int *itype, char *jobz, char *uplo, int *n, s *ap, s *bp, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_sspgvd(itype, jobz, uplo, n, ap, bp, w, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspgvx "F_FUNC(sspgvx,SSPGVX)"(int *itype, char *jobz, char *range, char *uplo, int *n, s *ap, s *bp, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void sspgvx(int *itype, char *jobz, char *range, char *uplo, int *n, s *ap, s *bp, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_sspgvx(itype, jobz, range, uplo, n, ap, bp, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssprfs "F_FUNC(ssprfs,SSPRFS)"(char *uplo, int *n, int *nrhs, s *ap, s *afp, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void ssprfs(char *uplo, int *n, int *nrhs, s *ap, s *afp, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_ssprfs(uplo, n, nrhs, ap, afp, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspsv "F_FUNC(sspsv,SSPSV)"(char *uplo, int *n, int *nrhs, s *ap, int *ipiv, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void sspsv(char *uplo, int *n, int *nrhs, s *ap, int *ipiv, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_sspsv(uplo, n, nrhs, ap, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sspsvx "F_FUNC(sspsvx,SSPSVX)"(char *fact, char *uplo, int *n, int *nrhs, s *ap, s *afp, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sspsvx(char *fact, char *uplo, int *n, int *nrhs, s *ap, s *afp, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sspsvx(fact, uplo, n, nrhs, ap, afp, ipiv, b, ldb, x, ldx, rcond, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssptrd "F_FUNC(ssptrd,SSPTRD)"(char *uplo, int *n, s *ap, s *d, s *e, s *tau, int *info) nogil
|
||
|
|
cdef void ssptrd(char *uplo, int *n, s *ap, s *d, s *e, s *tau, int *info) nogil:
|
||
|
|
_fortran_ssptrd(uplo, n, ap, d, e, tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssptrf "F_FUNC(ssptrf,SSPTRF)"(char *uplo, int *n, s *ap, int *ipiv, int *info) nogil
|
||
|
|
cdef void ssptrf(char *uplo, int *n, s *ap, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_ssptrf(uplo, n, ap, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssptri "F_FUNC(ssptri,SSPTRI)"(char *uplo, int *n, s *ap, int *ipiv, s *work, int *info) nogil
|
||
|
|
cdef void ssptri(char *uplo, int *n, s *ap, int *ipiv, s *work, int *info) nogil:
|
||
|
|
_fortran_ssptri(uplo, n, ap, ipiv, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssptrs "F_FUNC(ssptrs,SSPTRS)"(char *uplo, int *n, int *nrhs, s *ap, int *ipiv, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ssptrs(char *uplo, int *n, int *nrhs, s *ap, int *ipiv, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ssptrs(uplo, n, nrhs, ap, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sstebz "F_FUNC(sstebz,SSTEBZ)"(char *range, char *order, int *n, s *vl, s *vu, int *il, int *iu, s *abstol, s *d, s *e, int *m, int *nsplit, s *w, int *iblock, int *isplit, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void sstebz(char *range, char *order, int *n, s *vl, s *vu, int *il, int *iu, s *abstol, s *d, s *e, int *m, int *nsplit, s *w, int *iblock, int *isplit, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_sstebz(range, order, n, vl, vu, il, iu, abstol, d, e, m, nsplit, w, iblock, isplit, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sstedc "F_FUNC(sstedc,SSTEDC)"(char *compz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void sstedc(char *compz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_sstedc(compz, n, d, e, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sstegr "F_FUNC(sstegr,SSTEGR)"(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, int *isuppz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void sstegr(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, int *isuppz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_sstegr(jobz, range, n, d, e, vl, vu, il, iu, abstol, m, w, z, ldz, isuppz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sstein "F_FUNC(sstein,SSTEIN)"(int *n, s *d, s *e, int *m, s *w, int *iblock, int *isplit, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void sstein(int *n, s *d, s *e, int *m, s *w, int *iblock, int *isplit, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_sstein(n, d, e, m, w, iblock, isplit, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sstemr "F_FUNC(sstemr,SSTEMR)"(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, int *m, s *w, s *z, int *ldz, int *nzc, int *isuppz, bint *tryrac, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void sstemr(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, int *m, s *w, s *z, int *ldz, int *nzc, int *isuppz, bint *tryrac, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_sstemr(jobz, range, n, d, e, vl, vu, il, iu, m, w, z, ldz, nzc, isuppz, tryrac, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssteqr "F_FUNC(ssteqr,SSTEQR)"(char *compz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *info) nogil
|
||
|
|
cdef void ssteqr(char *compz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *info) nogil:
|
||
|
|
_fortran_ssteqr(compz, n, d, e, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssterf "F_FUNC(ssterf,SSTERF)"(int *n, s *d, s *e, int *info) nogil
|
||
|
|
cdef void ssterf(int *n, s *d, s *e, int *info) nogil:
|
||
|
|
_fortran_ssterf(n, d, e, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sstev "F_FUNC(sstev,SSTEV)"(char *jobz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *info) nogil
|
||
|
|
cdef void sstev(char *jobz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *info) nogil:
|
||
|
|
_fortran_sstev(jobz, n, d, e, z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sstevd "F_FUNC(sstevd,SSTEVD)"(char *jobz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void sstevd(char *jobz, int *n, s *d, s *e, s *z, int *ldz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_sstevd(jobz, n, d, e, z, ldz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sstevr "F_FUNC(sstevr,SSTEVR)"(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, int *isuppz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void sstevr(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, int *isuppz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_sstevr(jobz, range, n, d, e, vl, vu, il, iu, abstol, m, w, z, ldz, isuppz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_sstevx "F_FUNC(sstevx,SSTEVX)"(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void sstevx(char *jobz, char *range, int *n, s *d, s *e, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_sstevx(jobz, range, n, d, e, vl, vu, il, iu, abstol, m, w, z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssycon "F_FUNC(ssycon,SSYCON)"(char *uplo, int *n, s *a, int *lda, int *ipiv, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void ssycon(char *uplo, int *n, s *a, int *lda, int *ipiv, s *anorm, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_ssycon(uplo, n, a, lda, ipiv, anorm, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssyconv "F_FUNC(ssyconv,SSYCONV)"(char *uplo, char *way, int *n, s *a, int *lda, int *ipiv, s *work, int *info) nogil
|
||
|
|
cdef void ssyconv(char *uplo, char *way, int *n, s *a, int *lda, int *ipiv, s *work, int *info) nogil:
|
||
|
|
_fortran_ssyconv(uplo, way, n, a, lda, ipiv, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssyequb "F_FUNC(ssyequb,SSYEQUB)"(char *uplo, int *n, s *a, int *lda, s *s, s *scond, s *amax, s *work, int *info) nogil
|
||
|
|
cdef void ssyequb(char *uplo, int *n, s *a, int *lda, s *s, s *scond, s *amax, s *work, int *info) nogil:
|
||
|
|
_fortran_ssyequb(uplo, n, a, lda, s, scond, amax, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssyev "F_FUNC(ssyev,SSYEV)"(char *jobz, char *uplo, int *n, s *a, int *lda, s *w, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ssyev(char *jobz, char *uplo, int *n, s *a, int *lda, s *w, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ssyev(jobz, uplo, n, a, lda, w, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssyevd "F_FUNC(ssyevd,SSYEVD)"(char *jobz, char *uplo, int *n, s *a, int *lda, s *w, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void ssyevd(char *jobz, char *uplo, int *n, s *a, int *lda, s *w, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_ssyevd(jobz, uplo, n, a, lda, w, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssyevr "F_FUNC(ssyevr,SSYEVR)"(char *jobz, char *range, char *uplo, int *n, s *a, int *lda, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, int *isuppz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void ssyevr(char *jobz, char *range, char *uplo, int *n, s *a, int *lda, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, int *isuppz, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_ssyevr(jobz, range, uplo, n, a, lda, vl, vu, il, iu, abstol, m, w, z, ldz, isuppz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssyevx "F_FUNC(ssyevx,SSYEVX)"(char *jobz, char *range, char *uplo, int *n, s *a, int *lda, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void ssyevx(char *jobz, char *range, char *uplo, int *n, s *a, int *lda, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_ssyevx(jobz, range, uplo, n, a, lda, vl, vu, il, iu, abstol, m, w, z, ldz, work, lwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssygs2 "F_FUNC(ssygs2,SSYGS2)"(int *itype, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ssygs2(int *itype, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ssygs2(itype, uplo, n, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssygst "F_FUNC(ssygst,SSYGST)"(int *itype, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ssygst(int *itype, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ssygst(itype, uplo, n, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssygv "F_FUNC(ssygv,SSYGV)"(int *itype, char *jobz, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, s *w, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ssygv(int *itype, char *jobz, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, s *w, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ssygv(itype, jobz, uplo, n, a, lda, b, ldb, w, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssygvd "F_FUNC(ssygvd,SSYGVD)"(int *itype, char *jobz, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, s *w, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void ssygvd(int *itype, char *jobz, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, s *w, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_ssygvd(itype, jobz, uplo, n, a, lda, b, ldb, w, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssygvx "F_FUNC(ssygvx,SSYGVX)"(int *itype, char *jobz, char *range, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void ssygvx(int *itype, char *jobz, char *range, char *uplo, int *n, s *a, int *lda, s *b, int *ldb, s *vl, s *vu, int *il, int *iu, s *abstol, int *m, s *w, s *z, int *ldz, s *work, int *lwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_ssygvx(itype, jobz, range, uplo, n, a, lda, b, ldb, vl, vu, il, iu, abstol, m, w, z, ldz, work, lwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssyrfs "F_FUNC(ssyrfs,SSYRFS)"(char *uplo, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void ssyrfs(char *uplo, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_ssyrfs(uplo, n, nrhs, a, lda, af, ldaf, ipiv, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssysv "F_FUNC(ssysv,SSYSV)"(char *uplo, int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ssysv(char *uplo, int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ssysv(uplo, n, nrhs, a, lda, ipiv, b, ldb, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssysvx "F_FUNC(ssysvx,SSYSVX)"(char *fact, char *uplo, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void ssysvx(char *fact, char *uplo, int *n, int *nrhs, s *a, int *lda, s *af, int *ldaf, int *ipiv, s *b, int *ldb, s *x, int *ldx, s *rcond, s *ferr, s *berr, s *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_ssysvx(fact, uplo, n, nrhs, a, lda, af, ldaf, ipiv, b, ldb, x, ldx, rcond, ferr, berr, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssyswapr "F_FUNC(ssyswapr,SSYSWAPR)"(char *uplo, int *n, s *a, int *lda, int *i1, int *i2) nogil
|
||
|
|
cdef void ssyswapr(char *uplo, int *n, s *a, int *lda, int *i1, int *i2) nogil:
|
||
|
|
_fortran_ssyswapr(uplo, n, a, lda, i1, i2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssytd2 "F_FUNC(ssytd2,SSYTD2)"(char *uplo, int *n, s *a, int *lda, s *d, s *e, s *tau, int *info) nogil
|
||
|
|
cdef void ssytd2(char *uplo, int *n, s *a, int *lda, s *d, s *e, s *tau, int *info) nogil:
|
||
|
|
_fortran_ssytd2(uplo, n, a, lda, d, e, tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssytf2 "F_FUNC(ssytf2,SSYTF2)"(char *uplo, int *n, s *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void ssytf2(char *uplo, int *n, s *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_ssytf2(uplo, n, a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssytrd "F_FUNC(ssytrd,SSYTRD)"(char *uplo, int *n, s *a, int *lda, s *d, s *e, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ssytrd(char *uplo, int *n, s *a, int *lda, s *d, s *e, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ssytrd(uplo, n, a, lda, d, e, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssytrf "F_FUNC(ssytrf,SSYTRF)"(char *uplo, int *n, s *a, int *lda, int *ipiv, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ssytrf(char *uplo, int *n, s *a, int *lda, int *ipiv, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ssytrf(uplo, n, a, lda, ipiv, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssytri "F_FUNC(ssytri,SSYTRI)"(char *uplo, int *n, s *a, int *lda, int *ipiv, s *work, int *info) nogil
|
||
|
|
cdef void ssytri(char *uplo, int *n, s *a, int *lda, int *ipiv, s *work, int *info) nogil:
|
||
|
|
_fortran_ssytri(uplo, n, a, lda, ipiv, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssytri2 "F_FUNC(ssytri2,SSYTRI2)"(char *uplo, int *n, s *a, int *lda, int *ipiv, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ssytri2(char *uplo, int *n, s *a, int *lda, int *ipiv, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ssytri2(uplo, n, a, lda, ipiv, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssytri2x "F_FUNC(ssytri2x,SSYTRI2X)"(char *uplo, int *n, s *a, int *lda, int *ipiv, s *work, int *nb, int *info) nogil
|
||
|
|
cdef void ssytri2x(char *uplo, int *n, s *a, int *lda, int *ipiv, s *work, int *nb, int *info) nogil:
|
||
|
|
_fortran_ssytri2x(uplo, n, a, lda, ipiv, work, nb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssytrs "F_FUNC(ssytrs,SSYTRS)"(char *uplo, int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ssytrs(char *uplo, int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ssytrs(uplo, n, nrhs, a, lda, ipiv, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ssytrs2 "F_FUNC(ssytrs2,SSYTRS2)"(char *uplo, int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, s *work, int *info) nogil
|
||
|
|
cdef void ssytrs2(char *uplo, int *n, int *nrhs, s *a, int *lda, int *ipiv, s *b, int *ldb, s *work, int *info) nogil:
|
||
|
|
_fortran_ssytrs2(uplo, n, nrhs, a, lda, ipiv, b, ldb, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stbcon "F_FUNC(stbcon,STBCON)"(char *norm, char *uplo, char *diag, int *n, int *kd, s *ab, int *ldab, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void stbcon(char *norm, char *uplo, char *diag, int *n, int *kd, s *ab, int *ldab, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_stbcon(norm, uplo, diag, n, kd, ab, ldab, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stbrfs "F_FUNC(stbrfs,STBRFS)"(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void stbrfs(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_stbrfs(uplo, trans, diag, n, kd, nrhs, ab, ldab, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stbtrs "F_FUNC(stbtrs,STBTRS)"(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void stbtrs(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, s *ab, int *ldab, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_stbtrs(uplo, trans, diag, n, kd, nrhs, ab, ldab, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stfsm "F_FUNC(stfsm,STFSM)"(char *transr, char *side, char *uplo, char *trans, char *diag, int *m, int *n, s *alpha, s *a, s *b, int *ldb) nogil
|
||
|
|
cdef void stfsm(char *transr, char *side, char *uplo, char *trans, char *diag, int *m, int *n, s *alpha, s *a, s *b, int *ldb) nogil:
|
||
|
|
_fortran_stfsm(transr, side, uplo, trans, diag, m, n, alpha, a, b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stftri "F_FUNC(stftri,STFTRI)"(char *transr, char *uplo, char *diag, int *n, s *a, int *info) nogil
|
||
|
|
cdef void stftri(char *transr, char *uplo, char *diag, int *n, s *a, int *info) nogil:
|
||
|
|
_fortran_stftri(transr, uplo, diag, n, a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stfttp "F_FUNC(stfttp,STFTTP)"(char *transr, char *uplo, int *n, s *arf, s *ap, int *info) nogil
|
||
|
|
cdef void stfttp(char *transr, char *uplo, int *n, s *arf, s *ap, int *info) nogil:
|
||
|
|
_fortran_stfttp(transr, uplo, n, arf, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stfttr "F_FUNC(stfttr,STFTTR)"(char *transr, char *uplo, int *n, s *arf, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void stfttr(char *transr, char *uplo, int *n, s *arf, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_stfttr(transr, uplo, n, arf, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stgevc "F_FUNC(stgevc,STGEVC)"(char *side, char *howmny, bint *select, int *n, s *s, int *lds, s *p, int *ldp, s *vl, int *ldvl, s *vr, int *ldvr, int *mm, int *m, s *work, int *info) nogil
|
||
|
|
cdef void stgevc(char *side, char *howmny, bint *select, int *n, s *s, int *lds, s *p, int *ldp, s *vl, int *ldvl, s *vr, int *ldvr, int *mm, int *m, s *work, int *info) nogil:
|
||
|
|
_fortran_stgevc(side, howmny, select, n, s, lds, p, ldp, vl, ldvl, vr, ldvr, mm, m, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stgex2 "F_FUNC(stgex2,STGEX2)"(bint *wantq, bint *wantz, int *n, s *a, int *lda, s *b, int *ldb, s *q, int *ldq, s *z, int *ldz, int *j1, int *n1, int *n2, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void stgex2(bint *wantq, bint *wantz, int *n, s *a, int *lda, s *b, int *ldb, s *q, int *ldq, s *z, int *ldz, int *j1, int *n1, int *n2, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_stgex2(wantq, wantz, n, a, lda, b, ldb, q, ldq, z, ldz, j1, n1, n2, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stgexc "F_FUNC(stgexc,STGEXC)"(bint *wantq, bint *wantz, int *n, s *a, int *lda, s *b, int *ldb, s *q, int *ldq, s *z, int *ldz, int *ifst, int *ilst, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void stgexc(bint *wantq, bint *wantz, int *n, s *a, int *lda, s *b, int *ldb, s *q, int *ldq, s *z, int *ldz, int *ifst, int *ilst, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_stgexc(wantq, wantz, n, a, lda, b, ldb, q, ldq, z, ldz, ifst, ilst, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stgsen "F_FUNC(stgsen,STGSEN)"(int *ijob, bint *wantq, bint *wantz, bint *select, int *n, s *a, int *lda, s *b, int *ldb, s *alphar, s *alphai, s *beta, s *q, int *ldq, s *z, int *ldz, int *m, s *pl, s *pr, s *dif, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void stgsen(int *ijob, bint *wantq, bint *wantz, bint *select, int *n, s *a, int *lda, s *b, int *ldb, s *alphar, s *alphai, s *beta, s *q, int *ldq, s *z, int *ldz, int *m, s *pl, s *pr, s *dif, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_stgsen(ijob, wantq, wantz, select, n, a, lda, b, ldb, alphar, alphai, beta, q, ldq, z, ldz, m, pl, pr, dif, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stgsja "F_FUNC(stgsja,STGSJA)"(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, s *a, int *lda, s *b, int *ldb, s *tola, s *tolb, s *alpha, s *beta, s *u, int *ldu, s *v, int *ldv, s *q, int *ldq, s *work, int *ncycle, int *info) nogil
|
||
|
|
cdef void stgsja(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, s *a, int *lda, s *b, int *ldb, s *tola, s *tolb, s *alpha, s *beta, s *u, int *ldu, s *v, int *ldv, s *q, int *ldq, s *work, int *ncycle, int *info) nogil:
|
||
|
|
_fortran_stgsja(jobu, jobv, jobq, m, p, n, k, l, a, lda, b, ldb, tola, tolb, alpha, beta, u, ldu, v, ldv, q, ldq, work, ncycle, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stgsna "F_FUNC(stgsna,STGSNA)"(char *job, char *howmny, bint *select, int *n, s *a, int *lda, s *b, int *ldb, s *vl, int *ldvl, s *vr, int *ldvr, s *s, s *dif, int *mm, int *m, s *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void stgsna(char *job, char *howmny, bint *select, int *n, s *a, int *lda, s *b, int *ldb, s *vl, int *ldvl, s *vr, int *ldvr, s *s, s *dif, int *mm, int *m, s *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_stgsna(job, howmny, select, n, a, lda, b, ldb, vl, ldvl, vr, ldvr, s, dif, mm, m, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stgsy2 "F_FUNC(stgsy2,STGSY2)"(char *trans, int *ijob, int *m, int *n, s *a, int *lda, s *b, int *ldb, s *c, int *ldc, s *d, int *ldd, s *e, int *lde, s *f, int *ldf, s *scale, s *rdsum, s *rdscal, int *iwork, int *pq, int *info) nogil
|
||
|
|
cdef void stgsy2(char *trans, int *ijob, int *m, int *n, s *a, int *lda, s *b, int *ldb, s *c, int *ldc, s *d, int *ldd, s *e, int *lde, s *f, int *ldf, s *scale, s *rdsum, s *rdscal, int *iwork, int *pq, int *info) nogil:
|
||
|
|
_fortran_stgsy2(trans, ijob, m, n, a, lda, b, ldb, c, ldc, d, ldd, e, lde, f, ldf, scale, rdsum, rdscal, iwork, pq, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stgsyl "F_FUNC(stgsyl,STGSYL)"(char *trans, int *ijob, int *m, int *n, s *a, int *lda, s *b, int *ldb, s *c, int *ldc, s *d, int *ldd, s *e, int *lde, s *f, int *ldf, s *scale, s *dif, s *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void stgsyl(char *trans, int *ijob, int *m, int *n, s *a, int *lda, s *b, int *ldb, s *c, int *ldc, s *d, int *ldd, s *e, int *lde, s *f, int *ldf, s *scale, s *dif, s *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_stgsyl(trans, ijob, m, n, a, lda, b, ldb, c, ldc, d, ldd, e, lde, f, ldf, scale, dif, work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stpcon "F_FUNC(stpcon,STPCON)"(char *norm, char *uplo, char *diag, int *n, s *ap, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void stpcon(char *norm, char *uplo, char *diag, int *n, s *ap, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_stpcon(norm, uplo, diag, n, ap, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stpmqrt "F_FUNC(stpmqrt,STPMQRT)"(char *side, char *trans, int *m, int *n, int *k, int *l, int *nb, s *v, int *ldv, s *t, int *ldt, s *a, int *lda, s *b, int *ldb, s *work, int *info) nogil
|
||
|
|
cdef void stpmqrt(char *side, char *trans, int *m, int *n, int *k, int *l, int *nb, s *v, int *ldv, s *t, int *ldt, s *a, int *lda, s *b, int *ldb, s *work, int *info) nogil:
|
||
|
|
_fortran_stpmqrt(side, trans, m, n, k, l, nb, v, ldv, t, ldt, a, lda, b, ldb, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stpqrt "F_FUNC(stpqrt,STPQRT)"(int *m, int *n, int *l, int *nb, s *a, int *lda, s *b, int *ldb, s *t, int *ldt, s *work, int *info) nogil
|
||
|
|
cdef void stpqrt(int *m, int *n, int *l, int *nb, s *a, int *lda, s *b, int *ldb, s *t, int *ldt, s *work, int *info) nogil:
|
||
|
|
_fortran_stpqrt(m, n, l, nb, a, lda, b, ldb, t, ldt, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stpqrt2 "F_FUNC(stpqrt2,STPQRT2)"(int *m, int *n, int *l, s *a, int *lda, s *b, int *ldb, s *t, int *ldt, int *info) nogil
|
||
|
|
cdef void stpqrt2(int *m, int *n, int *l, s *a, int *lda, s *b, int *ldb, s *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_stpqrt2(m, n, l, a, lda, b, ldb, t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stprfb "F_FUNC(stprfb,STPRFB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, s *v, int *ldv, s *t, int *ldt, s *a, int *lda, s *b, int *ldb, s *work, int *ldwork) nogil
|
||
|
|
cdef void stprfb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, s *v, int *ldv, s *t, int *ldt, s *a, int *lda, s *b, int *ldb, s *work, int *ldwork) nogil:
|
||
|
|
_fortran_stprfb(side, trans, direct, storev, m, n, k, l, v, ldv, t, ldt, a, lda, b, ldb, work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stprfs "F_FUNC(stprfs,STPRFS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, s *ap, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void stprfs(char *uplo, char *trans, char *diag, int *n, int *nrhs, s *ap, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_stprfs(uplo, trans, diag, n, nrhs, ap, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stptri "F_FUNC(stptri,STPTRI)"(char *uplo, char *diag, int *n, s *ap, int *info) nogil
|
||
|
|
cdef void stptri(char *uplo, char *diag, int *n, s *ap, int *info) nogil:
|
||
|
|
_fortran_stptri(uplo, diag, n, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stptrs "F_FUNC(stptrs,STPTRS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, s *ap, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void stptrs(char *uplo, char *trans, char *diag, int *n, int *nrhs, s *ap, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_stptrs(uplo, trans, diag, n, nrhs, ap, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stpttf "F_FUNC(stpttf,STPTTF)"(char *transr, char *uplo, int *n, s *ap, s *arf, int *info) nogil
|
||
|
|
cdef void stpttf(char *transr, char *uplo, int *n, s *ap, s *arf, int *info) nogil:
|
||
|
|
_fortran_stpttf(transr, uplo, n, ap, arf, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stpttr "F_FUNC(stpttr,STPTTR)"(char *uplo, int *n, s *ap, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void stpttr(char *uplo, int *n, s *ap, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_stpttr(uplo, n, ap, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strcon "F_FUNC(strcon,STRCON)"(char *norm, char *uplo, char *diag, int *n, s *a, int *lda, s *rcond, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void strcon(char *norm, char *uplo, char *diag, int *n, s *a, int *lda, s *rcond, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_strcon(norm, uplo, diag, n, a, lda, rcond, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strevc "F_FUNC(strevc,STREVC)"(char *side, char *howmny, bint *select, int *n, s *t, int *ldt, s *vl, int *ldvl, s *vr, int *ldvr, int *mm, int *m, s *work, int *info) nogil
|
||
|
|
cdef void strevc(char *side, char *howmny, bint *select, int *n, s *t, int *ldt, s *vl, int *ldvl, s *vr, int *ldvr, int *mm, int *m, s *work, int *info) nogil:
|
||
|
|
_fortran_strevc(side, howmny, select, n, t, ldt, vl, ldvl, vr, ldvr, mm, m, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strexc "F_FUNC(strexc,STREXC)"(char *compq, int *n, s *t, int *ldt, s *q, int *ldq, int *ifst, int *ilst, s *work, int *info) nogil
|
||
|
|
cdef void strexc(char *compq, int *n, s *t, int *ldt, s *q, int *ldq, int *ifst, int *ilst, s *work, int *info) nogil:
|
||
|
|
_fortran_strexc(compq, n, t, ldt, q, ldq, ifst, ilst, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strrfs "F_FUNC(strrfs,STRRFS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil
|
||
|
|
cdef void strrfs(char *uplo, char *trans, char *diag, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, s *x, int *ldx, s *ferr, s *berr, s *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_strrfs(uplo, trans, diag, n, nrhs, a, lda, b, ldb, x, ldx, ferr, berr, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strsen "F_FUNC(strsen,STRSEN)"(char *job, char *compq, bint *select, int *n, s *t, int *ldt, s *q, int *ldq, s *wr, s *wi, int *m, s *s, s *sep, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void strsen(char *job, char *compq, bint *select, int *n, s *t, int *ldt, s *q, int *ldq, s *wr, s *wi, int *m, s *s, s *sep, s *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_strsen(job, compq, select, n, t, ldt, q, ldq, wr, wi, m, s, sep, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strsna "F_FUNC(strsna,STRSNA)"(char *job, char *howmny, bint *select, int *n, s *t, int *ldt, s *vl, int *ldvl, s *vr, int *ldvr, s *s, s *sep, int *mm, int *m, s *work, int *ldwork, int *iwork, int *info) nogil
|
||
|
|
cdef void strsna(char *job, char *howmny, bint *select, int *n, s *t, int *ldt, s *vl, int *ldvl, s *vr, int *ldvr, s *s, s *sep, int *mm, int *m, s *work, int *ldwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_strsna(job, howmny, select, n, t, ldt, vl, ldvl, vr, ldvr, s, sep, mm, m, work, ldwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strsyl "F_FUNC(strsyl,STRSYL)"(char *trana, char *tranb, int *isgn, int *m, int *n, s *a, int *lda, s *b, int *ldb, s *c, int *ldc, s *scale, int *info) nogil
|
||
|
|
cdef void strsyl(char *trana, char *tranb, int *isgn, int *m, int *n, s *a, int *lda, s *b, int *ldb, s *c, int *ldc, s *scale, int *info) nogil:
|
||
|
|
_fortran_strsyl(trana, tranb, isgn, m, n, a, lda, b, ldb, c, ldc, scale, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strti2 "F_FUNC(strti2,STRTI2)"(char *uplo, char *diag, int *n, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void strti2(char *uplo, char *diag, int *n, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_strti2(uplo, diag, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strtri "F_FUNC(strtri,STRTRI)"(char *uplo, char *diag, int *n, s *a, int *lda, int *info) nogil
|
||
|
|
cdef void strtri(char *uplo, char *diag, int *n, s *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_strtri(uplo, diag, n, a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strtrs "F_FUNC(strtrs,STRTRS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, int *info) nogil
|
||
|
|
cdef void strtrs(char *uplo, char *trans, char *diag, int *n, int *nrhs, s *a, int *lda, s *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_strtrs(uplo, trans, diag, n, nrhs, a, lda, b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strttf "F_FUNC(strttf,STRTTF)"(char *transr, char *uplo, int *n, s *a, int *lda, s *arf, int *info) nogil
|
||
|
|
cdef void strttf(char *transr, char *uplo, int *n, s *a, int *lda, s *arf, int *info) nogil:
|
||
|
|
_fortran_strttf(transr, uplo, n, a, lda, arf, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_strttp "F_FUNC(strttp,STRTTP)"(char *uplo, int *n, s *a, int *lda, s *ap, int *info) nogil
|
||
|
|
cdef void strttp(char *uplo, int *n, s *a, int *lda, s *ap, int *info) nogil:
|
||
|
|
_fortran_strttp(uplo, n, a, lda, ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_stzrzf "F_FUNC(stzrzf,STZRZF)"(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil
|
||
|
|
cdef void stzrzf(int *m, int *n, s *a, int *lda, s *tau, s *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_stzrzf(m, n, a, lda, tau, work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_xerbla_array "F_FUNC(xerbla_array,XERBLA_ARRAY)"(char *srname_array, int *srname_len, int *info) nogil
|
||
|
|
cdef void xerbla_array(char *srname_array, int *srname_len, int *info) nogil:
|
||
|
|
_fortran_xerbla_array(srname_array, srname_len, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zbbcsd "F_FUNC(zbbcsd,ZBBCSD)"(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, int *m, int *p, int *q, d *theta, d *phi, npy_complex128 *u1, int *ldu1, npy_complex128 *u2, int *ldu2, npy_complex128 *v1t, int *ldv1t, npy_complex128 *v2t, int *ldv2t, d *b11d, d *b11e, d *b12d, d *b12e, d *b21d, d *b21e, d *b22d, d *b22e, d *rwork, int *lrwork, int *info) nogil
|
||
|
|
cdef void zbbcsd(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, int *m, int *p, int *q, d *theta, d *phi, z *u1, int *ldu1, z *u2, int *ldu2, z *v1t, int *ldv1t, z *v2t, int *ldv2t, d *b11d, d *b11e, d *b12d, d *b12e, d *b21d, d *b21e, d *b22d, d *b22e, d *rwork, int *lrwork, int *info) nogil:
|
||
|
|
_fortran_zbbcsd(jobu1, jobu2, jobv1t, jobv2t, trans, m, p, q, theta, phi, <npy_complex128*>u1, ldu1, <npy_complex128*>u2, ldu2, <npy_complex128*>v1t, ldv1t, <npy_complex128*>v2t, ldv2t, b11d, b11e, b12d, b12e, b21d, b21e, b22d, b22e, rwork, lrwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zbdsqr "F_FUNC(zbdsqr,ZBDSQR)"(char *uplo, int *n, int *ncvt, int *nru, int *ncc, d *d, d *e, npy_complex128 *vt, int *ldvt, npy_complex128 *u, int *ldu, npy_complex128 *c, int *ldc, d *rwork, int *info) nogil
|
||
|
|
cdef void zbdsqr(char *uplo, int *n, int *ncvt, int *nru, int *ncc, d *d, d *e, z *vt, int *ldvt, z *u, int *ldu, z *c, int *ldc, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zbdsqr(uplo, n, ncvt, nru, ncc, d, e, <npy_complex128*>vt, ldvt, <npy_complex128*>u, ldu, <npy_complex128*>c, ldc, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zcgesv "F_FUNC(zcgesv,ZCGESV)"(int *n, int *nrhs, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, npy_complex128 *work, npy_complex64 *swork, d *rwork, int *iter, int *info) nogil
|
||
|
|
cdef void zcgesv(int *n, int *nrhs, z *a, int *lda, int *ipiv, z *b, int *ldb, z *x, int *ldx, z *work, c *swork, d *rwork, int *iter, int *info) nogil:
|
||
|
|
_fortran_zcgesv(n, nrhs, <npy_complex128*>a, lda, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, <npy_complex128*>work, <npy_complex64*>swork, rwork, iter, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zcposv "F_FUNC(zcposv,ZCPOSV)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, npy_complex128 *work, npy_complex64 *swork, d *rwork, int *iter, int *info) nogil
|
||
|
|
cdef void zcposv(char *uplo, int *n, int *nrhs, z *a, int *lda, z *b, int *ldb, z *x, int *ldx, z *work, c *swork, d *rwork, int *iter, int *info) nogil:
|
||
|
|
_fortran_zcposv(uplo, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, <npy_complex128*>work, <npy_complex64*>swork, rwork, iter, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zdrscl "F_FUNC(zdrscl,ZDRSCL)"(int *n, d *sa, npy_complex128 *sx, int *incx) nogil
|
||
|
|
cdef void zdrscl(int *n, d *sa, z *sx, int *incx) nogil:
|
||
|
|
_fortran_zdrscl(n, sa, <npy_complex128*>sx, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbbrd "F_FUNC(zgbbrd,ZGBBRD)"(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, npy_complex128 *ab, int *ldab, d *d, d *e, npy_complex128 *q, int *ldq, npy_complex128 *pt, int *ldpt, npy_complex128 *c, int *ldc, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zgbbrd(char *vect, int *m, int *n, int *ncc, int *kl, int *ku, z *ab, int *ldab, d *d, d *e, z *q, int *ldq, z *pt, int *ldpt, z *c, int *ldc, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgbbrd(vect, m, n, ncc, kl, ku, <npy_complex128*>ab, ldab, d, e, <npy_complex128*>q, ldq, <npy_complex128*>pt, ldpt, <npy_complex128*>c, ldc, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbcon "F_FUNC(zgbcon,ZGBCON)"(char *norm, int *n, int *kl, int *ku, npy_complex128 *ab, int *ldab, int *ipiv, d *anorm, d *rcond, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zgbcon(char *norm, int *n, int *kl, int *ku, z *ab, int *ldab, int *ipiv, d *anorm, d *rcond, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgbcon(norm, n, kl, ku, <npy_complex128*>ab, ldab, ipiv, anorm, rcond, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbequ "F_FUNC(zgbequ,ZGBEQU)"(int *m, int *n, int *kl, int *ku, npy_complex128 *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil
|
||
|
|
cdef void zgbequ(int *m, int *n, int *kl, int *ku, z *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil:
|
||
|
|
_fortran_zgbequ(m, n, kl, ku, <npy_complex128*>ab, ldab, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbequb "F_FUNC(zgbequb,ZGBEQUB)"(int *m, int *n, int *kl, int *ku, npy_complex128 *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil
|
||
|
|
cdef void zgbequb(int *m, int *n, int *kl, int *ku, z *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil:
|
||
|
|
_fortran_zgbequb(m, n, kl, ku, <npy_complex128*>ab, ldab, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbrfs "F_FUNC(zgbrfs,ZGBRFS)"(char *trans, int *n, int *kl, int *ku, int *nrhs, npy_complex128 *ab, int *ldab, npy_complex128 *afb, int *ldafb, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zgbrfs(char *trans, int *n, int *kl, int *ku, int *nrhs, z *ab, int *ldab, z *afb, int *ldafb, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgbrfs(trans, n, kl, ku, nrhs, <npy_complex128*>ab, ldab, <npy_complex128*>afb, ldafb, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbsv "F_FUNC(zgbsv,ZGBSV)"(int *n, int *kl, int *ku, int *nrhs, npy_complex128 *ab, int *ldab, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zgbsv(int *n, int *kl, int *ku, int *nrhs, z *ab, int *ldab, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zgbsv(n, kl, ku, nrhs, <npy_complex128*>ab, ldab, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbsvx "F_FUNC(zgbsvx,ZGBSVX)"(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, npy_complex128 *ab, int *ldab, npy_complex128 *afb, int *ldafb, int *ipiv, char *equed, d *r, d *c, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zgbsvx(char *fact, char *trans, int *n, int *kl, int *ku, int *nrhs, z *ab, int *ldab, z *afb, int *ldafb, int *ipiv, char *equed, d *r, d *c, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgbsvx(fact, trans, n, kl, ku, nrhs, <npy_complex128*>ab, ldab, <npy_complex128*>afb, ldafb, ipiv, equed, r, c, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbtf2 "F_FUNC(zgbtf2,ZGBTF2)"(int *m, int *n, int *kl, int *ku, npy_complex128 *ab, int *ldab, int *ipiv, int *info) nogil
|
||
|
|
cdef void zgbtf2(int *m, int *n, int *kl, int *ku, z *ab, int *ldab, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_zgbtf2(m, n, kl, ku, <npy_complex128*>ab, ldab, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbtrf "F_FUNC(zgbtrf,ZGBTRF)"(int *m, int *n, int *kl, int *ku, npy_complex128 *ab, int *ldab, int *ipiv, int *info) nogil
|
||
|
|
cdef void zgbtrf(int *m, int *n, int *kl, int *ku, z *ab, int *ldab, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_zgbtrf(m, n, kl, ku, <npy_complex128*>ab, ldab, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgbtrs "F_FUNC(zgbtrs,ZGBTRS)"(char *trans, int *n, int *kl, int *ku, int *nrhs, npy_complex128 *ab, int *ldab, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zgbtrs(char *trans, int *n, int *kl, int *ku, int *nrhs, z *ab, int *ldab, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zgbtrs(trans, n, kl, ku, nrhs, <npy_complex128*>ab, ldab, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgebak "F_FUNC(zgebak,ZGEBAK)"(char *job, char *side, int *n, int *ilo, int *ihi, d *scale, int *m, npy_complex128 *v, int *ldv, int *info) nogil
|
||
|
|
cdef void zgebak(char *job, char *side, int *n, int *ilo, int *ihi, d *scale, int *m, z *v, int *ldv, int *info) nogil:
|
||
|
|
_fortran_zgebak(job, side, n, ilo, ihi, scale, m, <npy_complex128*>v, ldv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgebal "F_FUNC(zgebal,ZGEBAL)"(char *job, int *n, npy_complex128 *a, int *lda, int *ilo, int *ihi, d *scale, int *info) nogil
|
||
|
|
cdef void zgebal(char *job, int *n, z *a, int *lda, int *ilo, int *ihi, d *scale, int *info) nogil:
|
||
|
|
_fortran_zgebal(job, n, <npy_complex128*>a, lda, ilo, ihi, scale, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgebd2 "F_FUNC(zgebd2,ZGEBD2)"(int *m, int *n, npy_complex128 *a, int *lda, d *d, d *e, npy_complex128 *tauq, npy_complex128 *taup, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgebd2(int *m, int *n, z *a, int *lda, d *d, d *e, z *tauq, z *taup, z *work, int *info) nogil:
|
||
|
|
_fortran_zgebd2(m, n, <npy_complex128*>a, lda, d, e, <npy_complex128*>tauq, <npy_complex128*>taup, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgebrd "F_FUNC(zgebrd,ZGEBRD)"(int *m, int *n, npy_complex128 *a, int *lda, d *d, d *e, npy_complex128 *tauq, npy_complex128 *taup, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgebrd(int *m, int *n, z *a, int *lda, d *d, d *e, z *tauq, z *taup, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgebrd(m, n, <npy_complex128*>a, lda, d, e, <npy_complex128*>tauq, <npy_complex128*>taup, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgecon "F_FUNC(zgecon,ZGECON)"(char *norm, int *n, npy_complex128 *a, int *lda, d *anorm, d *rcond, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zgecon(char *norm, int *n, z *a, int *lda, d *anorm, d *rcond, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgecon(norm, n, <npy_complex128*>a, lda, anorm, rcond, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeequ "F_FUNC(zgeequ,ZGEEQU)"(int *m, int *n, npy_complex128 *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil
|
||
|
|
cdef void zgeequ(int *m, int *n, z *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil:
|
||
|
|
_fortran_zgeequ(m, n, <npy_complex128*>a, lda, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeequb "F_FUNC(zgeequb,ZGEEQUB)"(int *m, int *n, npy_complex128 *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil
|
||
|
|
cdef void zgeequb(int *m, int *n, z *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, int *info) nogil:
|
||
|
|
_fortran_zgeequb(m, n, <npy_complex128*>a, lda, r, c, rowcnd, colcnd, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgees "F_FUNC(zgees,ZGEES)"(char *jobvs, char *sort, _zselect1 *select, int *n, npy_complex128 *a, int *lda, int *sdim, npy_complex128 *w, npy_complex128 *vs, int *ldvs, npy_complex128 *work, int *lwork, d *rwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void zgees(char *jobvs, char *sort, zselect1 *select, int *n, z *a, int *lda, int *sdim, z *w, z *vs, int *ldvs, z *work, int *lwork, d *rwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_zgees(jobvs, sort, <_zselect1*>select, n, <npy_complex128*>a, lda, sdim, <npy_complex128*>w, <npy_complex128*>vs, ldvs, <npy_complex128*>work, lwork, rwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeesx "F_FUNC(zgeesx,ZGEESX)"(char *jobvs, char *sort, _zselect1 *select, char *sense, int *n, npy_complex128 *a, int *lda, int *sdim, npy_complex128 *w, npy_complex128 *vs, int *ldvs, d *rconde, d *rcondv, npy_complex128 *work, int *lwork, d *rwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void zgeesx(char *jobvs, char *sort, zselect1 *select, char *sense, int *n, z *a, int *lda, int *sdim, z *w, z *vs, int *ldvs, d *rconde, d *rcondv, z *work, int *lwork, d *rwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_zgeesx(jobvs, sort, <_zselect1*>select, sense, n, <npy_complex128*>a, lda, sdim, <npy_complex128*>w, <npy_complex128*>vs, ldvs, rconde, rcondv, <npy_complex128*>work, lwork, rwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeev "F_FUNC(zgeev,ZGEEV)"(char *jobvl, char *jobvr, int *n, npy_complex128 *a, int *lda, npy_complex128 *w, npy_complex128 *vl, int *ldvl, npy_complex128 *vr, int *ldvr, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zgeev(char *jobvl, char *jobvr, int *n, z *a, int *lda, z *w, z *vl, int *ldvl, z *vr, int *ldvr, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgeev(jobvl, jobvr, n, <npy_complex128*>a, lda, <npy_complex128*>w, <npy_complex128*>vl, ldvl, <npy_complex128*>vr, ldvr, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeevx "F_FUNC(zgeevx,ZGEEVX)"(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, npy_complex128 *a, int *lda, npy_complex128 *w, npy_complex128 *vl, int *ldvl, npy_complex128 *vr, int *ldvr, int *ilo, int *ihi, d *scale, d *abnrm, d *rconde, d *rcondv, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zgeevx(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, z *a, int *lda, z *w, z *vl, int *ldvl, z *vr, int *ldvr, int *ilo, int *ihi, d *scale, d *abnrm, d *rconde, d *rcondv, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgeevx(balanc, jobvl, jobvr, sense, n, <npy_complex128*>a, lda, <npy_complex128*>w, <npy_complex128*>vl, ldvl, <npy_complex128*>vr, ldvr, ilo, ihi, scale, abnrm, rconde, rcondv, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgehd2 "F_FUNC(zgehd2,ZGEHD2)"(int *n, int *ilo, int *ihi, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgehd2(int *n, int *ilo, int *ihi, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zgehd2(n, ilo, ihi, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgehrd "F_FUNC(zgehrd,ZGEHRD)"(int *n, int *ilo, int *ihi, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgehrd(int *n, int *ilo, int *ihi, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgehrd(n, ilo, ihi, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgelq2 "F_FUNC(zgelq2,ZGELQ2)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgelq2(int *m, int *n, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zgelq2(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgelqf "F_FUNC(zgelqf,ZGELQF)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgelqf(int *m, int *n, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgelqf(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgels "F_FUNC(zgels,ZGELS)"(char *trans, int *m, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgels(char *trans, int *m, int *n, int *nrhs, z *a, int *lda, z *b, int *ldb, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgels(trans, m, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgelsd "F_FUNC(zgelsd,ZGELSD)"(int *m, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, d *s, d *rcond, int *rank, npy_complex128 *work, int *lwork, d *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void zgelsd(int *m, int *n, int *nrhs, z *a, int *lda, z *b, int *ldb, d *s, d *rcond, int *rank, z *work, int *lwork, d *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_zgelsd(m, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, s, rcond, rank, <npy_complex128*>work, lwork, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgelss "F_FUNC(zgelss,ZGELSS)"(int *m, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, d *s, d *rcond, int *rank, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zgelss(int *m, int *n, int *nrhs, z *a, int *lda, z *b, int *ldb, d *s, d *rcond, int *rank, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgelss(m, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, s, rcond, rank, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgelsy "F_FUNC(zgelsy,ZGELSY)"(int *m, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, int *jpvt, d *rcond, int *rank, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zgelsy(int *m, int *n, int *nrhs, z *a, int *lda, z *b, int *ldb, int *jpvt, d *rcond, int *rank, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgelsy(m, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, jpvt, rcond, rank, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgemqrt "F_FUNC(zgemqrt,ZGEMQRT)"(char *side, char *trans, int *m, int *n, int *k, int *nb, npy_complex128 *v, int *ldv, npy_complex128 *t, int *ldt, npy_complex128 *c, int *ldc, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgemqrt(char *side, char *trans, int *m, int *n, int *k, int *nb, z *v, int *ldv, z *t, int *ldt, z *c, int *ldc, z *work, int *info) nogil:
|
||
|
|
_fortran_zgemqrt(side, trans, m, n, k, nb, <npy_complex128*>v, ldv, <npy_complex128*>t, ldt, <npy_complex128*>c, ldc, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeql2 "F_FUNC(zgeql2,ZGEQL2)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgeql2(int *m, int *n, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zgeql2(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeqlf "F_FUNC(zgeqlf,ZGEQLF)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgeqlf(int *m, int *n, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgeqlf(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeqp3 "F_FUNC(zgeqp3,ZGEQP3)"(int *m, int *n, npy_complex128 *a, int *lda, int *jpvt, npy_complex128 *tau, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zgeqp3(int *m, int *n, z *a, int *lda, int *jpvt, z *tau, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgeqp3(m, n, <npy_complex128*>a, lda, jpvt, <npy_complex128*>tau, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeqr2 "F_FUNC(zgeqr2,ZGEQR2)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgeqr2(int *m, int *n, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zgeqr2(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeqr2p "F_FUNC(zgeqr2p,ZGEQR2P)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgeqr2p(int *m, int *n, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zgeqr2p(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeqrf "F_FUNC(zgeqrf,ZGEQRF)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgeqrf(int *m, int *n, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgeqrf(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeqrfp "F_FUNC(zgeqrfp,ZGEQRFP)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgeqrfp(int *m, int *n, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgeqrfp(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeqrt "F_FUNC(zgeqrt,ZGEQRT)"(int *m, int *n, int *nb, npy_complex128 *a, int *lda, npy_complex128 *t, int *ldt, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgeqrt(int *m, int *n, int *nb, z *a, int *lda, z *t, int *ldt, z *work, int *info) nogil:
|
||
|
|
_fortran_zgeqrt(m, n, nb, <npy_complex128*>a, lda, <npy_complex128*>t, ldt, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeqrt2 "F_FUNC(zgeqrt2,ZGEQRT2)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *t, int *ldt, int *info) nogil
|
||
|
|
cdef void zgeqrt2(int *m, int *n, z *a, int *lda, z *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_zgeqrt2(m, n, <npy_complex128*>a, lda, <npy_complex128*>t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgeqrt3 "F_FUNC(zgeqrt3,ZGEQRT3)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *t, int *ldt, int *info) nogil
|
||
|
|
cdef void zgeqrt3(int *m, int *n, z *a, int *lda, z *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_zgeqrt3(m, n, <npy_complex128*>a, lda, <npy_complex128*>t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgerfs "F_FUNC(zgerfs,ZGERFS)"(char *trans, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *af, int *ldaf, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zgerfs(char *trans, int *n, int *nrhs, z *a, int *lda, z *af, int *ldaf, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgerfs(trans, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>af, ldaf, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgerq2 "F_FUNC(zgerq2,ZGERQ2)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgerq2(int *m, int *n, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zgerq2(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgerqf "F_FUNC(zgerqf,ZGERQF)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgerqf(int *m, int *n, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgerqf(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgesc2 "F_FUNC(zgesc2,ZGESC2)"(int *n, npy_complex128 *a, int *lda, npy_complex128 *rhs, int *ipiv, int *jpiv, d *scale) nogil
|
||
|
|
cdef void zgesc2(int *n, z *a, int *lda, z *rhs, int *ipiv, int *jpiv, d *scale) nogil:
|
||
|
|
_fortran_zgesc2(n, <npy_complex128*>a, lda, <npy_complex128*>rhs, ipiv, jpiv, scale)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgesdd "F_FUNC(zgesdd,ZGESDD)"(char *jobz, int *m, int *n, npy_complex128 *a, int *lda, d *s, npy_complex128 *u, int *ldu, npy_complex128 *vt, int *ldvt, npy_complex128 *work, int *lwork, d *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void zgesdd(char *jobz, int *m, int *n, z *a, int *lda, d *s, z *u, int *ldu, z *vt, int *ldvt, z *work, int *lwork, d *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_zgesdd(jobz, m, n, <npy_complex128*>a, lda, s, <npy_complex128*>u, ldu, <npy_complex128*>vt, ldvt, <npy_complex128*>work, lwork, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgesv "F_FUNC(zgesv,ZGESV)"(int *n, int *nrhs, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zgesv(int *n, int *nrhs, z *a, int *lda, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zgesv(n, nrhs, <npy_complex128*>a, lda, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgesvd "F_FUNC(zgesvd,ZGESVD)"(char *jobu, char *jobvt, int *m, int *n, npy_complex128 *a, int *lda, d *s, npy_complex128 *u, int *ldu, npy_complex128 *vt, int *ldvt, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zgesvd(char *jobu, char *jobvt, int *m, int *n, z *a, int *lda, d *s, z *u, int *ldu, z *vt, int *ldvt, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgesvd(jobu, jobvt, m, n, <npy_complex128*>a, lda, s, <npy_complex128*>u, ldu, <npy_complex128*>vt, ldvt, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgesvx "F_FUNC(zgesvx,ZGESVX)"(char *fact, char *trans, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *af, int *ldaf, int *ipiv, char *equed, d *r, d *c, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zgesvx(char *fact, char *trans, int *n, int *nrhs, z *a, int *lda, z *af, int *ldaf, int *ipiv, char *equed, d *r, d *c, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgesvx(fact, trans, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>af, ldaf, ipiv, equed, r, c, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgetc2 "F_FUNC(zgetc2,ZGETC2)"(int *n, npy_complex128 *a, int *lda, int *ipiv, int *jpiv, int *info) nogil
|
||
|
|
cdef void zgetc2(int *n, z *a, int *lda, int *ipiv, int *jpiv, int *info) nogil:
|
||
|
|
_fortran_zgetc2(n, <npy_complex128*>a, lda, ipiv, jpiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgetf2 "F_FUNC(zgetf2,ZGETF2)"(int *m, int *n, npy_complex128 *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void zgetf2(int *m, int *n, z *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_zgetf2(m, n, <npy_complex128*>a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgetrf "F_FUNC(zgetrf,ZGETRF)"(int *m, int *n, npy_complex128 *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void zgetrf(int *m, int *n, z *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_zgetrf(m, n, <npy_complex128*>a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgetri "F_FUNC(zgetri,ZGETRI)"(int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgetri(int *n, z *a, int *lda, int *ipiv, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgetri(n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgetrs "F_FUNC(zgetrs,ZGETRS)"(char *trans, int *n, int *nrhs, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zgetrs(char *trans, int *n, int *nrhs, z *a, int *lda, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zgetrs(trans, n, nrhs, <npy_complex128*>a, lda, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zggbak "F_FUNC(zggbak,ZGGBAK)"(char *job, char *side, int *n, int *ilo, int *ihi, d *lscale, d *rscale, int *m, npy_complex128 *v, int *ldv, int *info) nogil
|
||
|
|
cdef void zggbak(char *job, char *side, int *n, int *ilo, int *ihi, d *lscale, d *rscale, int *m, z *v, int *ldv, int *info) nogil:
|
||
|
|
_fortran_zggbak(job, side, n, ilo, ihi, lscale, rscale, m, <npy_complex128*>v, ldv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zggbal "F_FUNC(zggbal,ZGGBAL)"(char *job, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, int *ilo, int *ihi, d *lscale, d *rscale, d *work, int *info) nogil
|
||
|
|
cdef void zggbal(char *job, int *n, z *a, int *lda, z *b, int *ldb, int *ilo, int *ihi, d *lscale, d *rscale, d *work, int *info) nogil:
|
||
|
|
_fortran_zggbal(job, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, ilo, ihi, lscale, rscale, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgges "F_FUNC(zgges,ZGGES)"(char *jobvsl, char *jobvsr, char *sort, _zselect2 *selctg, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, int *sdim, npy_complex128 *alpha, npy_complex128 *beta, npy_complex128 *vsl, int *ldvsl, npy_complex128 *vsr, int *ldvsr, npy_complex128 *work, int *lwork, d *rwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void zgges(char *jobvsl, char *jobvsr, char *sort, zselect2 *selctg, int *n, z *a, int *lda, z *b, int *ldb, int *sdim, z *alpha, z *beta, z *vsl, int *ldvsl, z *vsr, int *ldvsr, z *work, int *lwork, d *rwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_zgges(jobvsl, jobvsr, sort, <_zselect2*>selctg, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, sdim, <npy_complex128*>alpha, <npy_complex128*>beta, <npy_complex128*>vsl, ldvsl, <npy_complex128*>vsr, ldvsr, <npy_complex128*>work, lwork, rwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zggesx "F_FUNC(zggesx,ZGGESX)"(char *jobvsl, char *jobvsr, char *sort, _zselect2 *selctg, char *sense, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, int *sdim, npy_complex128 *alpha, npy_complex128 *beta, npy_complex128 *vsl, int *ldvsl, npy_complex128 *vsr, int *ldvsr, d *rconde, d *rcondv, npy_complex128 *work, int *lwork, d *rwork, int *iwork, int *liwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void zggesx(char *jobvsl, char *jobvsr, char *sort, zselect2 *selctg, char *sense, int *n, z *a, int *lda, z *b, int *ldb, int *sdim, z *alpha, z *beta, z *vsl, int *ldvsl, z *vsr, int *ldvsr, d *rconde, d *rcondv, z *work, int *lwork, d *rwork, int *iwork, int *liwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_zggesx(jobvsl, jobvsr, sort, <_zselect2*>selctg, sense, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, sdim, <npy_complex128*>alpha, <npy_complex128*>beta, <npy_complex128*>vsl, ldvsl, <npy_complex128*>vsr, ldvsr, rconde, rcondv, <npy_complex128*>work, lwork, rwork, iwork, liwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zggev "F_FUNC(zggev,ZGGEV)"(char *jobvl, char *jobvr, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *alpha, npy_complex128 *beta, npy_complex128 *vl, int *ldvl, npy_complex128 *vr, int *ldvr, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zggev(char *jobvl, char *jobvr, int *n, z *a, int *lda, z *b, int *ldb, z *alpha, z *beta, z *vl, int *ldvl, z *vr, int *ldvr, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zggev(jobvl, jobvr, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>alpha, <npy_complex128*>beta, <npy_complex128*>vl, ldvl, <npy_complex128*>vr, ldvr, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zggevx "F_FUNC(zggevx,ZGGEVX)"(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *alpha, npy_complex128 *beta, npy_complex128 *vl, int *ldvl, npy_complex128 *vr, int *ldvr, int *ilo, int *ihi, d *lscale, d *rscale, d *abnrm, d *bbnrm, d *rconde, d *rcondv, npy_complex128 *work, int *lwork, d *rwork, int *iwork, bint *bwork, int *info) nogil
|
||
|
|
cdef void zggevx(char *balanc, char *jobvl, char *jobvr, char *sense, int *n, z *a, int *lda, z *b, int *ldb, z *alpha, z *beta, z *vl, int *ldvl, z *vr, int *ldvr, int *ilo, int *ihi, d *lscale, d *rscale, d *abnrm, d *bbnrm, d *rconde, d *rcondv, z *work, int *lwork, d *rwork, int *iwork, bint *bwork, int *info) nogil:
|
||
|
|
_fortran_zggevx(balanc, jobvl, jobvr, sense, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>alpha, <npy_complex128*>beta, <npy_complex128*>vl, ldvl, <npy_complex128*>vr, ldvr, ilo, ihi, lscale, rscale, abnrm, bbnrm, rconde, rcondv, <npy_complex128*>work, lwork, rwork, iwork, bwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zggglm "F_FUNC(zggglm,ZGGGLM)"(int *n, int *m, int *p, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *d, npy_complex128 *x, npy_complex128 *y, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zggglm(int *n, int *m, int *p, z *a, int *lda, z *b, int *ldb, z *d, z *x, z *y, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zggglm(n, m, p, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>d, <npy_complex128*>x, <npy_complex128*>y, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgghrd "F_FUNC(zgghrd,ZGGHRD)"(char *compq, char *compz, int *n, int *ilo, int *ihi, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *q, int *ldq, npy_complex128 *z, int *ldz, int *info) nogil
|
||
|
|
cdef void zgghrd(char *compq, char *compz, int *n, int *ilo, int *ihi, z *a, int *lda, z *b, int *ldb, z *q, int *ldq, z *z, int *ldz, int *info) nogil:
|
||
|
|
_fortran_zgghrd(compq, compz, n, ilo, ihi, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>q, ldq, <npy_complex128*>z, ldz, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgglse "F_FUNC(zgglse,ZGGLSE)"(int *m, int *n, int *p, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *c, npy_complex128 *d, npy_complex128 *x, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zgglse(int *m, int *n, int *p, z *a, int *lda, z *b, int *ldb, z *c, z *d, z *x, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zgglse(m, n, p, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>c, <npy_complex128*>d, <npy_complex128*>x, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zggqrf "F_FUNC(zggqrf,ZGGQRF)"(int *n, int *m, int *p, npy_complex128 *a, int *lda, npy_complex128 *taua, npy_complex128 *b, int *ldb, npy_complex128 *taub, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zggqrf(int *n, int *m, int *p, z *a, int *lda, z *taua, z *b, int *ldb, z *taub, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zggqrf(n, m, p, <npy_complex128*>a, lda, <npy_complex128*>taua, <npy_complex128*>b, ldb, <npy_complex128*>taub, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zggrqf "F_FUNC(zggrqf,ZGGRQF)"(int *m, int *p, int *n, npy_complex128 *a, int *lda, npy_complex128 *taua, npy_complex128 *b, int *ldb, npy_complex128 *taub, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zggrqf(int *m, int *p, int *n, z *a, int *lda, z *taua, z *b, int *ldb, z *taub, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zggrqf(m, p, n, <npy_complex128*>a, lda, <npy_complex128*>taua, <npy_complex128*>b, ldb, <npy_complex128*>taub, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgtcon "F_FUNC(zgtcon,ZGTCON)"(char *norm, int *n, npy_complex128 *dl, npy_complex128 *d, npy_complex128 *du, npy_complex128 *du2, int *ipiv, d *anorm, d *rcond, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zgtcon(char *norm, int *n, z *dl, z *d, z *du, z *du2, int *ipiv, d *anorm, d *rcond, z *work, int *info) nogil:
|
||
|
|
_fortran_zgtcon(norm, n, <npy_complex128*>dl, <npy_complex128*>d, <npy_complex128*>du, <npy_complex128*>du2, ipiv, anorm, rcond, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgtrfs "F_FUNC(zgtrfs,ZGTRFS)"(char *trans, int *n, int *nrhs, npy_complex128 *dl, npy_complex128 *d, npy_complex128 *du, npy_complex128 *dlf, npy_complex128 *df, npy_complex128 *duf, npy_complex128 *du2, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zgtrfs(char *trans, int *n, int *nrhs, z *dl, z *d, z *du, z *dlf, z *df, z *duf, z *du2, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgtrfs(trans, n, nrhs, <npy_complex128*>dl, <npy_complex128*>d, <npy_complex128*>du, <npy_complex128*>dlf, <npy_complex128*>df, <npy_complex128*>duf, <npy_complex128*>du2, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgtsv "F_FUNC(zgtsv,ZGTSV)"(int *n, int *nrhs, npy_complex128 *dl, npy_complex128 *d, npy_complex128 *du, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zgtsv(int *n, int *nrhs, z *dl, z *d, z *du, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zgtsv(n, nrhs, <npy_complex128*>dl, <npy_complex128*>d, <npy_complex128*>du, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgtsvx "F_FUNC(zgtsvx,ZGTSVX)"(char *fact, char *trans, int *n, int *nrhs, npy_complex128 *dl, npy_complex128 *d, npy_complex128 *du, npy_complex128 *dlf, npy_complex128 *df, npy_complex128 *duf, npy_complex128 *du2, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zgtsvx(char *fact, char *trans, int *n, int *nrhs, z *dl, z *d, z *du, z *dlf, z *df, z *duf, z *du2, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zgtsvx(fact, trans, n, nrhs, <npy_complex128*>dl, <npy_complex128*>d, <npy_complex128*>du, <npy_complex128*>dlf, <npy_complex128*>df, <npy_complex128*>duf, <npy_complex128*>du2, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgttrf "F_FUNC(zgttrf,ZGTTRF)"(int *n, npy_complex128 *dl, npy_complex128 *d, npy_complex128 *du, npy_complex128 *du2, int *ipiv, int *info) nogil
|
||
|
|
cdef void zgttrf(int *n, z *dl, z *d, z *du, z *du2, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_zgttrf(n, <npy_complex128*>dl, <npy_complex128*>d, <npy_complex128*>du, <npy_complex128*>du2, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgttrs "F_FUNC(zgttrs,ZGTTRS)"(char *trans, int *n, int *nrhs, npy_complex128 *dl, npy_complex128 *d, npy_complex128 *du, npy_complex128 *du2, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zgttrs(char *trans, int *n, int *nrhs, z *dl, z *d, z *du, z *du2, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zgttrs(trans, n, nrhs, <npy_complex128*>dl, <npy_complex128*>d, <npy_complex128*>du, <npy_complex128*>du2, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zgtts2 "F_FUNC(zgtts2,ZGTTS2)"(int *itrans, int *n, int *nrhs, npy_complex128 *dl, npy_complex128 *d, npy_complex128 *du, npy_complex128 *du2, int *ipiv, npy_complex128 *b, int *ldb) nogil
|
||
|
|
cdef void zgtts2(int *itrans, int *n, int *nrhs, z *dl, z *d, z *du, z *du2, int *ipiv, z *b, int *ldb) nogil:
|
||
|
|
_fortran_zgtts2(itrans, n, nrhs, <npy_complex128*>dl, <npy_complex128*>d, <npy_complex128*>du, <npy_complex128*>du2, ipiv, <npy_complex128*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhbev "F_FUNC(zhbev,ZHBEV)"(char *jobz, char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zhbev(char *jobz, char *uplo, int *n, int *kd, z *ab, int *ldab, d *w, z *z, int *ldz, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhbev(jobz, uplo, n, kd, <npy_complex128*>ab, ldab, w, <npy_complex128*>z, ldz, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhbevd "F_FUNC(zhbevd,ZHBEVD)"(char *jobz, char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zhbevd(char *jobz, char *uplo, int *n, int *kd, z *ab, int *ldab, d *w, z *z, int *ldz, z *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zhbevd(jobz, uplo, n, kd, <npy_complex128*>ab, ldab, w, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhbevx "F_FUNC(zhbevx,ZHBEVX)"(char *jobz, char *range, char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, npy_complex128 *q, int *ldq, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, d *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void zhbevx(char *jobz, char *range, char *uplo, int *n, int *kd, z *ab, int *ldab, z *q, int *ldq, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, z *z, int *ldz, z *work, d *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_zhbevx(jobz, range, uplo, n, kd, <npy_complex128*>ab, ldab, <npy_complex128*>q, ldq, vl, vu, il, iu, abstol, m, w, <npy_complex128*>z, ldz, <npy_complex128*>work, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhbgst "F_FUNC(zhbgst,ZHBGST)"(char *vect, char *uplo, int *n, int *ka, int *kb, npy_complex128 *ab, int *ldab, npy_complex128 *bb, int *ldbb, npy_complex128 *x, int *ldx, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zhbgst(char *vect, char *uplo, int *n, int *ka, int *kb, z *ab, int *ldab, z *bb, int *ldbb, z *x, int *ldx, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhbgst(vect, uplo, n, ka, kb, <npy_complex128*>ab, ldab, <npy_complex128*>bb, ldbb, <npy_complex128*>x, ldx, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhbgv "F_FUNC(zhbgv,ZHBGV)"(char *jobz, char *uplo, int *n, int *ka, int *kb, npy_complex128 *ab, int *ldab, npy_complex128 *bb, int *ldbb, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zhbgv(char *jobz, char *uplo, int *n, int *ka, int *kb, z *ab, int *ldab, z *bb, int *ldbb, d *w, z *z, int *ldz, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhbgv(jobz, uplo, n, ka, kb, <npy_complex128*>ab, ldab, <npy_complex128*>bb, ldbb, w, <npy_complex128*>z, ldz, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhbgvd "F_FUNC(zhbgvd,ZHBGVD)"(char *jobz, char *uplo, int *n, int *ka, int *kb, npy_complex128 *ab, int *ldab, npy_complex128 *bb, int *ldbb, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zhbgvd(char *jobz, char *uplo, int *n, int *ka, int *kb, z *ab, int *ldab, z *bb, int *ldbb, d *w, z *z, int *ldz, z *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zhbgvd(jobz, uplo, n, ka, kb, <npy_complex128*>ab, ldab, <npy_complex128*>bb, ldbb, w, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhbgvx "F_FUNC(zhbgvx,ZHBGVX)"(char *jobz, char *range, char *uplo, int *n, int *ka, int *kb, npy_complex128 *ab, int *ldab, npy_complex128 *bb, int *ldbb, npy_complex128 *q, int *ldq, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, d *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void zhbgvx(char *jobz, char *range, char *uplo, int *n, int *ka, int *kb, z *ab, int *ldab, z *bb, int *ldbb, z *q, int *ldq, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, z *z, int *ldz, z *work, d *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_zhbgvx(jobz, range, uplo, n, ka, kb, <npy_complex128*>ab, ldab, <npy_complex128*>bb, ldbb, <npy_complex128*>q, ldq, vl, vu, il, iu, abstol, m, w, <npy_complex128*>z, ldz, <npy_complex128*>work, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhbtrd "F_FUNC(zhbtrd,ZHBTRD)"(char *vect, char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, d *d, d *e, npy_complex128 *q, int *ldq, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zhbtrd(char *vect, char *uplo, int *n, int *kd, z *ab, int *ldab, d *d, d *e, z *q, int *ldq, z *work, int *info) nogil:
|
||
|
|
_fortran_zhbtrd(vect, uplo, n, kd, <npy_complex128*>ab, ldab, d, e, <npy_complex128*>q, ldq, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhecon "F_FUNC(zhecon,ZHECON)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, d *anorm, d *rcond, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zhecon(char *uplo, int *n, z *a, int *lda, int *ipiv, d *anorm, d *rcond, z *work, int *info) nogil:
|
||
|
|
_fortran_zhecon(uplo, n, <npy_complex128*>a, lda, ipiv, anorm, rcond, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zheequb "F_FUNC(zheequb,ZHEEQUB)"(char *uplo, int *n, npy_complex128 *a, int *lda, d *s, d *scond, d *amax, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zheequb(char *uplo, int *n, z *a, int *lda, d *s, d *scond, d *amax, z *work, int *info) nogil:
|
||
|
|
_fortran_zheequb(uplo, n, <npy_complex128*>a, lda, s, scond, amax, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zheev "F_FUNC(zheev,ZHEEV)"(char *jobz, char *uplo, int *n, npy_complex128 *a, int *lda, d *w, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zheev(char *jobz, char *uplo, int *n, z *a, int *lda, d *w, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zheev(jobz, uplo, n, <npy_complex128*>a, lda, w, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zheevd "F_FUNC(zheevd,ZHEEVD)"(char *jobz, char *uplo, int *n, npy_complex128 *a, int *lda, d *w, npy_complex128 *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zheevd(char *jobz, char *uplo, int *n, z *a, int *lda, d *w, z *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zheevd(jobz, uplo, n, <npy_complex128*>a, lda, w, <npy_complex128*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zheevr "F_FUNC(zheevr,ZHEEVR)"(char *jobz, char *range, char *uplo, int *n, npy_complex128 *a, int *lda, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, npy_complex128 *z, int *ldz, int *isuppz, npy_complex128 *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zheevr(char *jobz, char *range, char *uplo, int *n, z *a, int *lda, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, z *z, int *ldz, int *isuppz, z *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zheevr(jobz, range, uplo, n, <npy_complex128*>a, lda, vl, vu, il, iu, abstol, m, w, <npy_complex128*>z, ldz, isuppz, <npy_complex128*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zheevx "F_FUNC(zheevx,ZHEEVX)"(char *jobz, char *range, char *uplo, int *n, npy_complex128 *a, int *lda, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, d *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void zheevx(char *jobz, char *range, char *uplo, int *n, z *a, int *lda, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, z *z, int *ldz, z *work, int *lwork, d *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_zheevx(jobz, range, uplo, n, <npy_complex128*>a, lda, vl, vu, il, iu, abstol, m, w, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhegs2 "F_FUNC(zhegs2,ZHEGS2)"(int *itype, char *uplo, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zhegs2(int *itype, char *uplo, int *n, z *a, int *lda, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zhegs2(itype, uplo, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhegst "F_FUNC(zhegst,ZHEGST)"(int *itype, char *uplo, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zhegst(int *itype, char *uplo, int *n, z *a, int *lda, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zhegst(itype, uplo, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhegv "F_FUNC(zhegv,ZHEGV)"(int *itype, char *jobz, char *uplo, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, d *w, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zhegv(int *itype, char *jobz, char *uplo, int *n, z *a, int *lda, z *b, int *ldb, d *w, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhegv(itype, jobz, uplo, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, w, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhegvd "F_FUNC(zhegvd,ZHEGVD)"(int *itype, char *jobz, char *uplo, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, d *w, npy_complex128 *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zhegvd(int *itype, char *jobz, char *uplo, int *n, z *a, int *lda, z *b, int *ldb, d *w, z *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zhegvd(itype, jobz, uplo, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, w, <npy_complex128*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhegvx "F_FUNC(zhegvx,ZHEGVX)"(int *itype, char *jobz, char *range, char *uplo, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, d *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void zhegvx(int *itype, char *jobz, char *range, char *uplo, int *n, z *a, int *lda, z *b, int *ldb, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, z *z, int *ldz, z *work, int *lwork, d *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_zhegvx(itype, jobz, range, uplo, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, vl, vu, il, iu, abstol, m, w, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zherfs "F_FUNC(zherfs,ZHERFS)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *af, int *ldaf, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zherfs(char *uplo, int *n, int *nrhs, z *a, int *lda, z *af, int *ldaf, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zherfs(uplo, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>af, ldaf, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhesv "F_FUNC(zhesv,ZHESV)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zhesv(char *uplo, int *n, int *nrhs, z *a, int *lda, int *ipiv, z *b, int *ldb, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zhesv(uplo, n, nrhs, <npy_complex128*>a, lda, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhesvx "F_FUNC(zhesvx,ZHESVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *af, int *ldaf, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zhesvx(char *fact, char *uplo, int *n, int *nrhs, z *a, int *lda, z *af, int *ldaf, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhesvx(fact, uplo, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>af, ldaf, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zheswapr "F_FUNC(zheswapr,ZHESWAPR)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *i1, int *i2) nogil
|
||
|
|
cdef void zheswapr(char *uplo, int *n, z *a, int *lda, int *i1, int *i2) nogil:
|
||
|
|
_fortran_zheswapr(uplo, n, <npy_complex128*>a, lda, i1, i2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhetd2 "F_FUNC(zhetd2,ZHETD2)"(char *uplo, int *n, npy_complex128 *a, int *lda, d *d, d *e, npy_complex128 *tau, int *info) nogil
|
||
|
|
cdef void zhetd2(char *uplo, int *n, z *a, int *lda, d *d, d *e, z *tau, int *info) nogil:
|
||
|
|
_fortran_zhetd2(uplo, n, <npy_complex128*>a, lda, d, e, <npy_complex128*>tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhetf2 "F_FUNC(zhetf2,ZHETF2)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void zhetf2(char *uplo, int *n, z *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_zhetf2(uplo, n, <npy_complex128*>a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhetrd "F_FUNC(zhetrd,ZHETRD)"(char *uplo, int *n, npy_complex128 *a, int *lda, d *d, d *e, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zhetrd(char *uplo, int *n, z *a, int *lda, d *d, d *e, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zhetrd(uplo, n, <npy_complex128*>a, lda, d, e, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhetrf "F_FUNC(zhetrf,ZHETRF)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zhetrf(char *uplo, int *n, z *a, int *lda, int *ipiv, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zhetrf(uplo, n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhetri "F_FUNC(zhetri,ZHETRI)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zhetri(char *uplo, int *n, z *a, int *lda, int *ipiv, z *work, int *info) nogil:
|
||
|
|
_fortran_zhetri(uplo, n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhetri2 "F_FUNC(zhetri2,ZHETRI2)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zhetri2(char *uplo, int *n, z *a, int *lda, int *ipiv, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zhetri2(uplo, n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhetri2x "F_FUNC(zhetri2x,ZHETRI2X)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *nb, int *info) nogil
|
||
|
|
cdef void zhetri2x(char *uplo, int *n, z *a, int *lda, int *ipiv, z *work, int *nb, int *info) nogil:
|
||
|
|
_fortran_zhetri2x(uplo, n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, nb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhetrs "F_FUNC(zhetrs,ZHETRS)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zhetrs(char *uplo, int *n, int *nrhs, z *a, int *lda, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zhetrs(uplo, n, nrhs, <npy_complex128*>a, lda, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhetrs2 "F_FUNC(zhetrs2,ZHETRS2)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zhetrs2(char *uplo, int *n, int *nrhs, z *a, int *lda, int *ipiv, z *b, int *ldb, z *work, int *info) nogil:
|
||
|
|
_fortran_zhetrs2(uplo, n, nrhs, <npy_complex128*>a, lda, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhfrk "F_FUNC(zhfrk,ZHFRK)"(char *transr, char *uplo, char *trans, int *n, int *k, d *alpha, npy_complex128 *a, int *lda, d *beta, npy_complex128 *c) nogil
|
||
|
|
cdef void zhfrk(char *transr, char *uplo, char *trans, int *n, int *k, d *alpha, z *a, int *lda, d *beta, z *c) nogil:
|
||
|
|
_fortran_zhfrk(transr, uplo, trans, n, k, alpha, <npy_complex128*>a, lda, beta, <npy_complex128*>c)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhgeqz "F_FUNC(zhgeqz,ZHGEQZ)"(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, npy_complex128 *h, int *ldh, npy_complex128 *t, int *ldt, npy_complex128 *alpha, npy_complex128 *beta, npy_complex128 *q, int *ldq, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zhgeqz(char *job, char *compq, char *compz, int *n, int *ilo, int *ihi, z *h, int *ldh, z *t, int *ldt, z *alpha, z *beta, z *q, int *ldq, z *z, int *ldz, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhgeqz(job, compq, compz, n, ilo, ihi, <npy_complex128*>h, ldh, <npy_complex128*>t, ldt, <npy_complex128*>alpha, <npy_complex128*>beta, <npy_complex128*>q, ldq, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpcon "F_FUNC(zhpcon,ZHPCON)"(char *uplo, int *n, npy_complex128 *ap, int *ipiv, d *anorm, d *rcond, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zhpcon(char *uplo, int *n, z *ap, int *ipiv, d *anorm, d *rcond, z *work, int *info) nogil:
|
||
|
|
_fortran_zhpcon(uplo, n, <npy_complex128*>ap, ipiv, anorm, rcond, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpev "F_FUNC(zhpev,ZHPEV)"(char *jobz, char *uplo, int *n, npy_complex128 *ap, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zhpev(char *jobz, char *uplo, int *n, z *ap, d *w, z *z, int *ldz, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhpev(jobz, uplo, n, <npy_complex128*>ap, w, <npy_complex128*>z, ldz, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpevd "F_FUNC(zhpevd,ZHPEVD)"(char *jobz, char *uplo, int *n, npy_complex128 *ap, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zhpevd(char *jobz, char *uplo, int *n, z *ap, d *w, z *z, int *ldz, z *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zhpevd(jobz, uplo, n, <npy_complex128*>ap, w, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpevx "F_FUNC(zhpevx,ZHPEVX)"(char *jobz, char *range, char *uplo, int *n, npy_complex128 *ap, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, d *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void zhpevx(char *jobz, char *range, char *uplo, int *n, z *ap, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, z *z, int *ldz, z *work, d *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_zhpevx(jobz, range, uplo, n, <npy_complex128*>ap, vl, vu, il, iu, abstol, m, w, <npy_complex128*>z, ldz, <npy_complex128*>work, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpgst "F_FUNC(zhpgst,ZHPGST)"(int *itype, char *uplo, int *n, npy_complex128 *ap, npy_complex128 *bp, int *info) nogil
|
||
|
|
cdef void zhpgst(int *itype, char *uplo, int *n, z *ap, z *bp, int *info) nogil:
|
||
|
|
_fortran_zhpgst(itype, uplo, n, <npy_complex128*>ap, <npy_complex128*>bp, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpgv "F_FUNC(zhpgv,ZHPGV)"(int *itype, char *jobz, char *uplo, int *n, npy_complex128 *ap, npy_complex128 *bp, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zhpgv(int *itype, char *jobz, char *uplo, int *n, z *ap, z *bp, d *w, z *z, int *ldz, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhpgv(itype, jobz, uplo, n, <npy_complex128*>ap, <npy_complex128*>bp, w, <npy_complex128*>z, ldz, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpgvd "F_FUNC(zhpgvd,ZHPGVD)"(int *itype, char *jobz, char *uplo, int *n, npy_complex128 *ap, npy_complex128 *bp, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zhpgvd(int *itype, char *jobz, char *uplo, int *n, z *ap, z *bp, d *w, z *z, int *ldz, z *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zhpgvd(itype, jobz, uplo, n, <npy_complex128*>ap, <npy_complex128*>bp, w, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpgvx "F_FUNC(zhpgvx,ZHPGVX)"(int *itype, char *jobz, char *range, char *uplo, int *n, npy_complex128 *ap, npy_complex128 *bp, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, npy_complex128 *z, int *ldz, npy_complex128 *work, d *rwork, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void zhpgvx(int *itype, char *jobz, char *range, char *uplo, int *n, z *ap, z *bp, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, z *z, int *ldz, z *work, d *rwork, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_zhpgvx(itype, jobz, range, uplo, n, <npy_complex128*>ap, <npy_complex128*>bp, vl, vu, il, iu, abstol, m, w, <npy_complex128*>z, ldz, <npy_complex128*>work, rwork, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhprfs "F_FUNC(zhprfs,ZHPRFS)"(char *uplo, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *afp, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zhprfs(char *uplo, int *n, int *nrhs, z *ap, z *afp, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhprfs(uplo, n, nrhs, <npy_complex128*>ap, <npy_complex128*>afp, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpsv "F_FUNC(zhpsv,ZHPSV)"(char *uplo, int *n, int *nrhs, npy_complex128 *ap, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zhpsv(char *uplo, int *n, int *nrhs, z *ap, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zhpsv(uplo, n, nrhs, <npy_complex128*>ap, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhpsvx "F_FUNC(zhpsvx,ZHPSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *afp, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zhpsvx(char *fact, char *uplo, int *n, int *nrhs, z *ap, z *afp, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zhpsvx(fact, uplo, n, nrhs, <npy_complex128*>ap, <npy_complex128*>afp, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhptrd "F_FUNC(zhptrd,ZHPTRD)"(char *uplo, int *n, npy_complex128 *ap, d *d, d *e, npy_complex128 *tau, int *info) nogil
|
||
|
|
cdef void zhptrd(char *uplo, int *n, z *ap, d *d, d *e, z *tau, int *info) nogil:
|
||
|
|
_fortran_zhptrd(uplo, n, <npy_complex128*>ap, d, e, <npy_complex128*>tau, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhptrf "F_FUNC(zhptrf,ZHPTRF)"(char *uplo, int *n, npy_complex128 *ap, int *ipiv, int *info) nogil
|
||
|
|
cdef void zhptrf(char *uplo, int *n, z *ap, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_zhptrf(uplo, n, <npy_complex128*>ap, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhptri "F_FUNC(zhptri,ZHPTRI)"(char *uplo, int *n, npy_complex128 *ap, int *ipiv, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zhptri(char *uplo, int *n, z *ap, int *ipiv, z *work, int *info) nogil:
|
||
|
|
_fortran_zhptri(uplo, n, <npy_complex128*>ap, ipiv, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhptrs "F_FUNC(zhptrs,ZHPTRS)"(char *uplo, int *n, int *nrhs, npy_complex128 *ap, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zhptrs(char *uplo, int *n, int *nrhs, z *ap, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zhptrs(uplo, n, nrhs, <npy_complex128*>ap, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhsein "F_FUNC(zhsein,ZHSEIN)"(char *side, char *eigsrc, char *initv, bint *select, int *n, npy_complex128 *h, int *ldh, npy_complex128 *w, npy_complex128 *vl, int *ldvl, npy_complex128 *vr, int *ldvr, int *mm, int *m, npy_complex128 *work, d *rwork, int *ifaill, int *ifailr, int *info) nogil
|
||
|
|
cdef void zhsein(char *side, char *eigsrc, char *initv, bint *select, int *n, z *h, int *ldh, z *w, z *vl, int *ldvl, z *vr, int *ldvr, int *mm, int *m, z *work, d *rwork, int *ifaill, int *ifailr, int *info) nogil:
|
||
|
|
_fortran_zhsein(side, eigsrc, initv, select, n, <npy_complex128*>h, ldh, <npy_complex128*>w, <npy_complex128*>vl, ldvl, <npy_complex128*>vr, ldvr, mm, m, <npy_complex128*>work, rwork, ifaill, ifailr, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zhseqr "F_FUNC(zhseqr,ZHSEQR)"(char *job, char *compz, int *n, int *ilo, int *ihi, npy_complex128 *h, int *ldh, npy_complex128 *w, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zhseqr(char *job, char *compz, int *n, int *ilo, int *ihi, z *h, int *ldh, z *w, z *z, int *ldz, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zhseqr(job, compz, n, ilo, ihi, <npy_complex128*>h, ldh, <npy_complex128*>w, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlabrd "F_FUNC(zlabrd,ZLABRD)"(int *m, int *n, int *nb, npy_complex128 *a, int *lda, d *d, d *e, npy_complex128 *tauq, npy_complex128 *taup, npy_complex128 *x, int *ldx, npy_complex128 *y, int *ldy) nogil
|
||
|
|
cdef void zlabrd(int *m, int *n, int *nb, z *a, int *lda, d *d, d *e, z *tauq, z *taup, z *x, int *ldx, z *y, int *ldy) nogil:
|
||
|
|
_fortran_zlabrd(m, n, nb, <npy_complex128*>a, lda, d, e, <npy_complex128*>tauq, <npy_complex128*>taup, <npy_complex128*>x, ldx, <npy_complex128*>y, ldy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlacgv "F_FUNC(zlacgv,ZLACGV)"(int *n, npy_complex128 *x, int *incx) nogil
|
||
|
|
cdef void zlacgv(int *n, z *x, int *incx) nogil:
|
||
|
|
_fortran_zlacgv(n, <npy_complex128*>x, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlacn2 "F_FUNC(zlacn2,ZLACN2)"(int *n, npy_complex128 *v, npy_complex128 *x, d *est, int *kase, int *isave) nogil
|
||
|
|
cdef void zlacn2(int *n, z *v, z *x, d *est, int *kase, int *isave) nogil:
|
||
|
|
_fortran_zlacn2(n, <npy_complex128*>v, <npy_complex128*>x, est, kase, isave)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlacon "F_FUNC(zlacon,ZLACON)"(int *n, npy_complex128 *v, npy_complex128 *x, d *est, int *kase) nogil
|
||
|
|
cdef void zlacon(int *n, z *v, z *x, d *est, int *kase) nogil:
|
||
|
|
_fortran_zlacon(n, <npy_complex128*>v, <npy_complex128*>x, est, kase)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlacp2 "F_FUNC(zlacp2,ZLACP2)"(char *uplo, int *m, int *n, d *a, int *lda, npy_complex128 *b, int *ldb) nogil
|
||
|
|
cdef void zlacp2(char *uplo, int *m, int *n, d *a, int *lda, z *b, int *ldb) nogil:
|
||
|
|
_fortran_zlacp2(uplo, m, n, a, lda, <npy_complex128*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlacpy "F_FUNC(zlacpy,ZLACPY)"(char *uplo, int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb) nogil
|
||
|
|
cdef void zlacpy(char *uplo, int *m, int *n, z *a, int *lda, z *b, int *ldb) nogil:
|
||
|
|
_fortran_zlacpy(uplo, m, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlacrm "F_FUNC(zlacrm,ZLACRM)"(int *m, int *n, npy_complex128 *a, int *lda, d *b, int *ldb, npy_complex128 *c, int *ldc, d *rwork) nogil
|
||
|
|
cdef void zlacrm(int *m, int *n, z *a, int *lda, d *b, int *ldb, z *c, int *ldc, d *rwork) nogil:
|
||
|
|
_fortran_zlacrm(m, n, <npy_complex128*>a, lda, b, ldb, <npy_complex128*>c, ldc, rwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlacrt "F_FUNC(zlacrt,ZLACRT)"(int *n, npy_complex128 *cx, int *incx, npy_complex128 *cy, int *incy, npy_complex128 *c, npy_complex128 *s) nogil
|
||
|
|
cdef void zlacrt(int *n, z *cx, int *incx, z *cy, int *incy, z *c, z *s) nogil:
|
||
|
|
_fortran_zlacrt(n, <npy_complex128*>cx, incx, <npy_complex128*>cy, incy, <npy_complex128*>c, <npy_complex128*>s)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaed0 "F_FUNC(zlaed0,ZLAED0)"(int *qsiz, int *n, d *d, d *e, npy_complex128 *q, int *ldq, npy_complex128 *qstore, int *ldqs, d *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void zlaed0(int *qsiz, int *n, d *d, d *e, z *q, int *ldq, z *qstore, int *ldqs, d *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_zlaed0(qsiz, n, d, e, <npy_complex128*>q, ldq, <npy_complex128*>qstore, ldqs, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaed7 "F_FUNC(zlaed7,ZLAED7)"(int *n, int *cutpnt, int *qsiz, int *tlvls, int *curlvl, int *curpbm, d *d, npy_complex128 *q, int *ldq, d *rho, int *indxq, d *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, d *givnum, npy_complex128 *work, d *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void zlaed7(int *n, int *cutpnt, int *qsiz, int *tlvls, int *curlvl, int *curpbm, d *d, z *q, int *ldq, d *rho, int *indxq, d *qstore, int *qptr, int *prmptr, int *perm, int *givptr, int *givcol, d *givnum, z *work, d *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_zlaed7(n, cutpnt, qsiz, tlvls, curlvl, curpbm, d, <npy_complex128*>q, ldq, rho, indxq, qstore, qptr, prmptr, perm, givptr, givcol, givnum, <npy_complex128*>work, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaed8 "F_FUNC(zlaed8,ZLAED8)"(int *k, int *n, int *qsiz, npy_complex128 *q, int *ldq, d *d, d *rho, int *cutpnt, d *z, d *dlamda, npy_complex128 *q2, int *ldq2, d *w, int *indxp, int *indx, int *indxq, int *perm, int *givptr, int *givcol, d *givnum, int *info) nogil
|
||
|
|
cdef void zlaed8(int *k, int *n, int *qsiz, z *q, int *ldq, d *d, d *rho, int *cutpnt, d *z, d *dlamda, z *q2, int *ldq2, d *w, int *indxp, int *indx, int *indxq, int *perm, int *givptr, int *givcol, d *givnum, int *info) nogil:
|
||
|
|
_fortran_zlaed8(k, n, qsiz, <npy_complex128*>q, ldq, d, rho, cutpnt, z, dlamda, <npy_complex128*>q2, ldq2, w, indxp, indx, indxq, perm, givptr, givcol, givnum, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaein "F_FUNC(zlaein,ZLAEIN)"(bint *rightv, bint *noinit, int *n, npy_complex128 *h, int *ldh, npy_complex128 *w, npy_complex128 *v, npy_complex128 *b, int *ldb, d *rwork, d *eps3, d *smlnum, int *info) nogil
|
||
|
|
cdef void zlaein(bint *rightv, bint *noinit, int *n, z *h, int *ldh, z *w, z *v, z *b, int *ldb, d *rwork, d *eps3, d *smlnum, int *info) nogil:
|
||
|
|
_fortran_zlaein(rightv, noinit, n, <npy_complex128*>h, ldh, <npy_complex128*>w, <npy_complex128*>v, <npy_complex128*>b, ldb, rwork, eps3, smlnum, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaesy "F_FUNC(zlaesy,ZLAESY)"(npy_complex128 *a, npy_complex128 *b, npy_complex128 *c, npy_complex128 *rt1, npy_complex128 *rt2, npy_complex128 *evscal, npy_complex128 *cs1, npy_complex128 *sn1) nogil
|
||
|
|
cdef void zlaesy(z *a, z *b, z *c, z *rt1, z *rt2, z *evscal, z *cs1, z *sn1) nogil:
|
||
|
|
_fortran_zlaesy(<npy_complex128*>a, <npy_complex128*>b, <npy_complex128*>c, <npy_complex128*>rt1, <npy_complex128*>rt2, <npy_complex128*>evscal, <npy_complex128*>cs1, <npy_complex128*>sn1)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaev2 "F_FUNC(zlaev2,ZLAEV2)"(npy_complex128 *a, npy_complex128 *b, npy_complex128 *c, d *rt1, d *rt2, d *cs1, npy_complex128 *sn1) nogil
|
||
|
|
cdef void zlaev2(z *a, z *b, z *c, d *rt1, d *rt2, d *cs1, z *sn1) nogil:
|
||
|
|
_fortran_zlaev2(<npy_complex128*>a, <npy_complex128*>b, <npy_complex128*>c, rt1, rt2, cs1, <npy_complex128*>sn1)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlag2c "F_FUNC(zlag2c,ZLAG2C)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex64 *sa, int *ldsa, int *info) nogil
|
||
|
|
cdef void zlag2c(int *m, int *n, z *a, int *lda, c *sa, int *ldsa, int *info) nogil:
|
||
|
|
_fortran_zlag2c(m, n, <npy_complex128*>a, lda, <npy_complex64*>sa, ldsa, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlags2 "F_FUNC(zlags2,ZLAGS2)"(bint *upper, d *a1, npy_complex128 *a2, d *a3, d *b1, npy_complex128 *b2, d *b3, d *csu, npy_complex128 *snu, d *csv, npy_complex128 *snv, d *csq, npy_complex128 *snq) nogil
|
||
|
|
cdef void zlags2(bint *upper, d *a1, z *a2, d *a3, d *b1, z *b2, d *b3, d *csu, z *snu, d *csv, z *snv, d *csq, z *snq) nogil:
|
||
|
|
_fortran_zlags2(upper, a1, <npy_complex128*>a2, a3, b1, <npy_complex128*>b2, b3, csu, <npy_complex128*>snu, csv, <npy_complex128*>snv, csq, <npy_complex128*>snq)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlagtm "F_FUNC(zlagtm,ZLAGTM)"(char *trans, int *n, int *nrhs, d *alpha, npy_complex128 *dl, npy_complex128 *d, npy_complex128 *du, npy_complex128 *x, int *ldx, d *beta, npy_complex128 *b, int *ldb) nogil
|
||
|
|
cdef void zlagtm(char *trans, int *n, int *nrhs, d *alpha, z *dl, z *d, z *du, z *x, int *ldx, d *beta, z *b, int *ldb) nogil:
|
||
|
|
_fortran_zlagtm(trans, n, nrhs, alpha, <npy_complex128*>dl, <npy_complex128*>d, <npy_complex128*>du, <npy_complex128*>x, ldx, beta, <npy_complex128*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlahef "F_FUNC(zlahef,ZLAHEF)"(char *uplo, int *n, int *nb, int *kb, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *w, int *ldw, int *info) nogil
|
||
|
|
cdef void zlahef(char *uplo, int *n, int *nb, int *kb, z *a, int *lda, int *ipiv, z *w, int *ldw, int *info) nogil:
|
||
|
|
_fortran_zlahef(uplo, n, nb, kb, <npy_complex128*>a, lda, ipiv, <npy_complex128*>w, ldw, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlahqr "F_FUNC(zlahqr,ZLAHQR)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, npy_complex128 *h, int *ldh, npy_complex128 *w, int *iloz, int *ihiz, npy_complex128 *z, int *ldz, int *info) nogil
|
||
|
|
cdef void zlahqr(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, z *h, int *ldh, z *w, int *iloz, int *ihiz, z *z, int *ldz, int *info) nogil:
|
||
|
|
_fortran_zlahqr(wantt, wantz, n, ilo, ihi, <npy_complex128*>h, ldh, <npy_complex128*>w, iloz, ihiz, <npy_complex128*>z, ldz, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlahr2 "F_FUNC(zlahr2,ZLAHR2)"(int *n, int *k, int *nb, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *t, int *ldt, npy_complex128 *y, int *ldy) nogil
|
||
|
|
cdef void zlahr2(int *n, int *k, int *nb, z *a, int *lda, z *tau, z *t, int *ldt, z *y, int *ldy) nogil:
|
||
|
|
_fortran_zlahr2(n, k, nb, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>t, ldt, <npy_complex128*>y, ldy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaic1 "F_FUNC(zlaic1,ZLAIC1)"(int *job, int *j, npy_complex128 *x, d *sest, npy_complex128 *w, npy_complex128 *gamma, d *sestpr, npy_complex128 *s, npy_complex128 *c) nogil
|
||
|
|
cdef void zlaic1(int *job, int *j, z *x, d *sest, z *w, z *gamma, d *sestpr, z *s, z *c) nogil:
|
||
|
|
_fortran_zlaic1(job, j, <npy_complex128*>x, sest, <npy_complex128*>w, <npy_complex128*>gamma, sestpr, <npy_complex128*>s, <npy_complex128*>c)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlals0 "F_FUNC(zlals0,ZLALS0)"(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, npy_complex128 *b, int *ldb, npy_complex128 *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, d *givnum, int *ldgnum, d *poles, d *difl, d *difr, d *z, int *k, d *c, d *s, d *rwork, int *info) nogil
|
||
|
|
cdef void zlals0(int *icompq, int *nl, int *nr, int *sqre, int *nrhs, z *b, int *ldb, z *bx, int *ldbx, int *perm, int *givptr, int *givcol, int *ldgcol, d *givnum, int *ldgnum, d *poles, d *difl, d *difr, d *z, int *k, d *c, d *s, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zlals0(icompq, nl, nr, sqre, nrhs, <npy_complex128*>b, ldb, <npy_complex128*>bx, ldbx, perm, givptr, givcol, ldgcol, givnum, ldgnum, poles, difl, difr, z, k, c, s, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlalsa "F_FUNC(zlalsa,ZLALSA)"(int *icompq, int *smlsiz, int *n, int *nrhs, npy_complex128 *b, int *ldb, npy_complex128 *bx, int *ldbx, d *u, int *ldu, d *vt, int *k, d *difl, d *difr, d *z, d *poles, int *givptr, int *givcol, int *ldgcol, int *perm, d *givnum, d *c, d *s, d *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void zlalsa(int *icompq, int *smlsiz, int *n, int *nrhs, z *b, int *ldb, z *bx, int *ldbx, d *u, int *ldu, d *vt, int *k, d *difl, d *difr, d *z, d *poles, int *givptr, int *givcol, int *ldgcol, int *perm, d *givnum, d *c, d *s, d *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_zlalsa(icompq, smlsiz, n, nrhs, <npy_complex128*>b, ldb, <npy_complex128*>bx, ldbx, u, ldu, vt, k, difl, difr, z, poles, givptr, givcol, ldgcol, perm, givnum, c, s, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlalsd "F_FUNC(zlalsd,ZLALSD)"(char *uplo, int *smlsiz, int *n, int *nrhs, d *d, d *e, npy_complex128 *b, int *ldb, d *rcond, int *rank, npy_complex128 *work, d *rwork, int *iwork, int *info) nogil
|
||
|
|
cdef void zlalsd(char *uplo, int *smlsiz, int *n, int *nrhs, d *d, d *e, z *b, int *ldb, d *rcond, int *rank, z *work, d *rwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_zlalsd(uplo, smlsiz, n, nrhs, d, e, <npy_complex128*>b, ldb, rcond, rank, <npy_complex128*>work, rwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlapll "F_FUNC(zlapll,ZLAPLL)"(int *n, npy_complex128 *x, int *incx, npy_complex128 *y, int *incy, d *ssmin) nogil
|
||
|
|
cdef void zlapll(int *n, z *x, int *incx, z *y, int *incy, d *ssmin) nogil:
|
||
|
|
_fortran_zlapll(n, <npy_complex128*>x, incx, <npy_complex128*>y, incy, ssmin)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlapmr "F_FUNC(zlapmr,ZLAPMR)"(bint *forwrd, int *m, int *n, npy_complex128 *x, int *ldx, int *k) nogil
|
||
|
|
cdef void zlapmr(bint *forwrd, int *m, int *n, z *x, int *ldx, int *k) nogil:
|
||
|
|
_fortran_zlapmr(forwrd, m, n, <npy_complex128*>x, ldx, k)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlapmt "F_FUNC(zlapmt,ZLAPMT)"(bint *forwrd, int *m, int *n, npy_complex128 *x, int *ldx, int *k) nogil
|
||
|
|
cdef void zlapmt(bint *forwrd, int *m, int *n, z *x, int *ldx, int *k) nogil:
|
||
|
|
_fortran_zlapmt(forwrd, m, n, <npy_complex128*>x, ldx, k)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqgb "F_FUNC(zlaqgb,ZLAQGB)"(int *m, int *n, int *kl, int *ku, npy_complex128 *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, char *equed) nogil
|
||
|
|
cdef void zlaqgb(int *m, int *n, int *kl, int *ku, z *ab, int *ldab, d *r, d *c, d *rowcnd, d *colcnd, d *amax, char *equed) nogil:
|
||
|
|
_fortran_zlaqgb(m, n, kl, ku, <npy_complex128*>ab, ldab, r, c, rowcnd, colcnd, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqge "F_FUNC(zlaqge,ZLAQGE)"(int *m, int *n, npy_complex128 *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, char *equed) nogil
|
||
|
|
cdef void zlaqge(int *m, int *n, z *a, int *lda, d *r, d *c, d *rowcnd, d *colcnd, d *amax, char *equed) nogil:
|
||
|
|
_fortran_zlaqge(m, n, <npy_complex128*>a, lda, r, c, rowcnd, colcnd, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqhb "F_FUNC(zlaqhb,ZLAQHB)"(char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, d *s, d *scond, d *amax, char *equed) nogil
|
||
|
|
cdef void zlaqhb(char *uplo, int *n, int *kd, z *ab, int *ldab, d *s, d *scond, d *amax, char *equed) nogil:
|
||
|
|
_fortran_zlaqhb(uplo, n, kd, <npy_complex128*>ab, ldab, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqhe "F_FUNC(zlaqhe,ZLAQHE)"(char *uplo, int *n, npy_complex128 *a, int *lda, d *s, d *scond, d *amax, char *equed) nogil
|
||
|
|
cdef void zlaqhe(char *uplo, int *n, z *a, int *lda, d *s, d *scond, d *amax, char *equed) nogil:
|
||
|
|
_fortran_zlaqhe(uplo, n, <npy_complex128*>a, lda, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqhp "F_FUNC(zlaqhp,ZLAQHP)"(char *uplo, int *n, npy_complex128 *ap, d *s, d *scond, d *amax, char *equed) nogil
|
||
|
|
cdef void zlaqhp(char *uplo, int *n, z *ap, d *s, d *scond, d *amax, char *equed) nogil:
|
||
|
|
_fortran_zlaqhp(uplo, n, <npy_complex128*>ap, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqp2 "F_FUNC(zlaqp2,ZLAQP2)"(int *m, int *n, int *offset, npy_complex128 *a, int *lda, int *jpvt, npy_complex128 *tau, d *vn1, d *vn2, npy_complex128 *work) nogil
|
||
|
|
cdef void zlaqp2(int *m, int *n, int *offset, z *a, int *lda, int *jpvt, z *tau, d *vn1, d *vn2, z *work) nogil:
|
||
|
|
_fortran_zlaqp2(m, n, offset, <npy_complex128*>a, lda, jpvt, <npy_complex128*>tau, vn1, vn2, <npy_complex128*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqps "F_FUNC(zlaqps,ZLAQPS)"(int *m, int *n, int *offset, int *nb, int *kb, npy_complex128 *a, int *lda, int *jpvt, npy_complex128 *tau, d *vn1, d *vn2, npy_complex128 *auxv, npy_complex128 *f, int *ldf) nogil
|
||
|
|
cdef void zlaqps(int *m, int *n, int *offset, int *nb, int *kb, z *a, int *lda, int *jpvt, z *tau, d *vn1, d *vn2, z *auxv, z *f, int *ldf) nogil:
|
||
|
|
_fortran_zlaqps(m, n, offset, nb, kb, <npy_complex128*>a, lda, jpvt, <npy_complex128*>tau, vn1, vn2, <npy_complex128*>auxv, <npy_complex128*>f, ldf)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqr0 "F_FUNC(zlaqr0,ZLAQR0)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, npy_complex128 *h, int *ldh, npy_complex128 *w, int *iloz, int *ihiz, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zlaqr0(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, z *h, int *ldh, z *w, int *iloz, int *ihiz, z *z, int *ldz, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zlaqr0(wantt, wantz, n, ilo, ihi, <npy_complex128*>h, ldh, <npy_complex128*>w, iloz, ihiz, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqr1 "F_FUNC(zlaqr1,ZLAQR1)"(int *n, npy_complex128 *h, int *ldh, npy_complex128 *s1, npy_complex128 *s2, npy_complex128 *v) nogil
|
||
|
|
cdef void zlaqr1(int *n, z *h, int *ldh, z *s1, z *s2, z *v) nogil:
|
||
|
|
_fortran_zlaqr1(n, <npy_complex128*>h, ldh, <npy_complex128*>s1, <npy_complex128*>s2, <npy_complex128*>v)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqr2 "F_FUNC(zlaqr2,ZLAQR2)"(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, npy_complex128 *h, int *ldh, int *iloz, int *ihiz, npy_complex128 *z, int *ldz, int *ns, int *nd, npy_complex128 *sh, npy_complex128 *v, int *ldv, int *nh, npy_complex128 *t, int *ldt, int *nv, npy_complex128 *wv, int *ldwv, npy_complex128 *work, int *lwork) nogil
|
||
|
|
cdef void zlaqr2(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, z *h, int *ldh, int *iloz, int *ihiz, z *z, int *ldz, int *ns, int *nd, z *sh, z *v, int *ldv, int *nh, z *t, int *ldt, int *nv, z *wv, int *ldwv, z *work, int *lwork) nogil:
|
||
|
|
_fortran_zlaqr2(wantt, wantz, n, ktop, kbot, nw, <npy_complex128*>h, ldh, iloz, ihiz, <npy_complex128*>z, ldz, ns, nd, <npy_complex128*>sh, <npy_complex128*>v, ldv, nh, <npy_complex128*>t, ldt, nv, <npy_complex128*>wv, ldwv, <npy_complex128*>work, lwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqr3 "F_FUNC(zlaqr3,ZLAQR3)"(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, npy_complex128 *h, int *ldh, int *iloz, int *ihiz, npy_complex128 *z, int *ldz, int *ns, int *nd, npy_complex128 *sh, npy_complex128 *v, int *ldv, int *nh, npy_complex128 *t, int *ldt, int *nv, npy_complex128 *wv, int *ldwv, npy_complex128 *work, int *lwork) nogil
|
||
|
|
cdef void zlaqr3(bint *wantt, bint *wantz, int *n, int *ktop, int *kbot, int *nw, z *h, int *ldh, int *iloz, int *ihiz, z *z, int *ldz, int *ns, int *nd, z *sh, z *v, int *ldv, int *nh, z *t, int *ldt, int *nv, z *wv, int *ldwv, z *work, int *lwork) nogil:
|
||
|
|
_fortran_zlaqr3(wantt, wantz, n, ktop, kbot, nw, <npy_complex128*>h, ldh, iloz, ihiz, <npy_complex128*>z, ldz, ns, nd, <npy_complex128*>sh, <npy_complex128*>v, ldv, nh, <npy_complex128*>t, ldt, nv, <npy_complex128*>wv, ldwv, <npy_complex128*>work, lwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqr4 "F_FUNC(zlaqr4,ZLAQR4)"(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, npy_complex128 *h, int *ldh, npy_complex128 *w, int *iloz, int *ihiz, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zlaqr4(bint *wantt, bint *wantz, int *n, int *ilo, int *ihi, z *h, int *ldh, z *w, int *iloz, int *ihiz, z *z, int *ldz, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zlaqr4(wantt, wantz, n, ilo, ihi, <npy_complex128*>h, ldh, <npy_complex128*>w, iloz, ihiz, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqr5 "F_FUNC(zlaqr5,ZLAQR5)"(bint *wantt, bint *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, npy_complex128 *s, npy_complex128 *h, int *ldh, int *iloz, int *ihiz, npy_complex128 *z, int *ldz, npy_complex128 *v, int *ldv, npy_complex128 *u, int *ldu, int *nv, npy_complex128 *wv, int *ldwv, int *nh, npy_complex128 *wh, int *ldwh) nogil
|
||
|
|
cdef void zlaqr5(bint *wantt, bint *wantz, int *kacc22, int *n, int *ktop, int *kbot, int *nshfts, z *s, z *h, int *ldh, int *iloz, int *ihiz, z *z, int *ldz, z *v, int *ldv, z *u, int *ldu, int *nv, z *wv, int *ldwv, int *nh, z *wh, int *ldwh) nogil:
|
||
|
|
_fortran_zlaqr5(wantt, wantz, kacc22, n, ktop, kbot, nshfts, <npy_complex128*>s, <npy_complex128*>h, ldh, iloz, ihiz, <npy_complex128*>z, ldz, <npy_complex128*>v, ldv, <npy_complex128*>u, ldu, nv, <npy_complex128*>wv, ldwv, nh, <npy_complex128*>wh, ldwh)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqsb "F_FUNC(zlaqsb,ZLAQSB)"(char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, d *s, d *scond, d *amax, char *equed) nogil
|
||
|
|
cdef void zlaqsb(char *uplo, int *n, int *kd, z *ab, int *ldab, d *s, d *scond, d *amax, char *equed) nogil:
|
||
|
|
_fortran_zlaqsb(uplo, n, kd, <npy_complex128*>ab, ldab, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqsp "F_FUNC(zlaqsp,ZLAQSP)"(char *uplo, int *n, npy_complex128 *ap, d *s, d *scond, d *amax, char *equed) nogil
|
||
|
|
cdef void zlaqsp(char *uplo, int *n, z *ap, d *s, d *scond, d *amax, char *equed) nogil:
|
||
|
|
_fortran_zlaqsp(uplo, n, <npy_complex128*>ap, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaqsy "F_FUNC(zlaqsy,ZLAQSY)"(char *uplo, int *n, npy_complex128 *a, int *lda, d *s, d *scond, d *amax, char *equed) nogil
|
||
|
|
cdef void zlaqsy(char *uplo, int *n, z *a, int *lda, d *s, d *scond, d *amax, char *equed) nogil:
|
||
|
|
_fortran_zlaqsy(uplo, n, <npy_complex128*>a, lda, s, scond, amax, equed)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlar1v "F_FUNC(zlar1v,ZLAR1V)"(int *n, int *b1, int *bn, d *lambda_, d *d, d *l, d *ld, d *lld, d *pivmin, d *gaptol, npy_complex128 *z, bint *wantnc, int *negcnt, d *ztz, d *mingma, int *r, int *isuppz, d *nrminv, d *resid, d *rqcorr, d *work) nogil
|
||
|
|
cdef void zlar1v(int *n, int *b1, int *bn, d *lambda_, d *d, d *l, d *ld, d *lld, d *pivmin, d *gaptol, z *z, bint *wantnc, int *negcnt, d *ztz, d *mingma, int *r, int *isuppz, d *nrminv, d *resid, d *rqcorr, d *work) nogil:
|
||
|
|
_fortran_zlar1v(n, b1, bn, lambda_, d, l, ld, lld, pivmin, gaptol, <npy_complex128*>z, wantnc, negcnt, ztz, mingma, r, isuppz, nrminv, resid, rqcorr, work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlar2v "F_FUNC(zlar2v,ZLAR2V)"(int *n, npy_complex128 *x, npy_complex128 *y, npy_complex128 *z, int *incx, d *c, npy_complex128 *s, int *incc) nogil
|
||
|
|
cdef void zlar2v(int *n, z *x, z *y, z *z, int *incx, d *c, z *s, int *incc) nogil:
|
||
|
|
_fortran_zlar2v(n, <npy_complex128*>x, <npy_complex128*>y, <npy_complex128*>z, incx, c, <npy_complex128*>s, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarcm "F_FUNC(zlarcm,ZLARCM)"(int *m, int *n, d *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *c, int *ldc, d *rwork) nogil
|
||
|
|
cdef void zlarcm(int *m, int *n, d *a, int *lda, z *b, int *ldb, z *c, int *ldc, d *rwork) nogil:
|
||
|
|
_fortran_zlarcm(m, n, a, lda, <npy_complex128*>b, ldb, <npy_complex128*>c, ldc, rwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarf "F_FUNC(zlarf,ZLARF)"(char *side, int *m, int *n, npy_complex128 *v, int *incv, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work) nogil
|
||
|
|
cdef void zlarf(char *side, int *m, int *n, z *v, int *incv, z *tau, z *c, int *ldc, z *work) nogil:
|
||
|
|
_fortran_zlarf(side, m, n, <npy_complex128*>v, incv, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarfb "F_FUNC(zlarfb,ZLARFB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, npy_complex128 *v, int *ldv, npy_complex128 *t, int *ldt, npy_complex128 *c, int *ldc, npy_complex128 *work, int *ldwork) nogil
|
||
|
|
cdef void zlarfb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, z *v, int *ldv, z *t, int *ldt, z *c, int *ldc, z *work, int *ldwork) nogil:
|
||
|
|
_fortran_zlarfb(side, trans, direct, storev, m, n, k, <npy_complex128*>v, ldv, <npy_complex128*>t, ldt, <npy_complex128*>c, ldc, <npy_complex128*>work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarfg "F_FUNC(zlarfg,ZLARFG)"(int *n, npy_complex128 *alpha, npy_complex128 *x, int *incx, npy_complex128 *tau) nogil
|
||
|
|
cdef void zlarfg(int *n, z *alpha, z *x, int *incx, z *tau) nogil:
|
||
|
|
_fortran_zlarfg(n, <npy_complex128*>alpha, <npy_complex128*>x, incx, <npy_complex128*>tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarfgp "F_FUNC(zlarfgp,ZLARFGP)"(int *n, npy_complex128 *alpha, npy_complex128 *x, int *incx, npy_complex128 *tau) nogil
|
||
|
|
cdef void zlarfgp(int *n, z *alpha, z *x, int *incx, z *tau) nogil:
|
||
|
|
_fortran_zlarfgp(n, <npy_complex128*>alpha, <npy_complex128*>x, incx, <npy_complex128*>tau)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarft "F_FUNC(zlarft,ZLARFT)"(char *direct, char *storev, int *n, int *k, npy_complex128 *v, int *ldv, npy_complex128 *tau, npy_complex128 *t, int *ldt) nogil
|
||
|
|
cdef void zlarft(char *direct, char *storev, int *n, int *k, z *v, int *ldv, z *tau, z *t, int *ldt) nogil:
|
||
|
|
_fortran_zlarft(direct, storev, n, k, <npy_complex128*>v, ldv, <npy_complex128*>tau, <npy_complex128*>t, ldt)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarfx "F_FUNC(zlarfx,ZLARFX)"(char *side, int *m, int *n, npy_complex128 *v, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work) nogil
|
||
|
|
cdef void zlarfx(char *side, int *m, int *n, z *v, z *tau, z *c, int *ldc, z *work) nogil:
|
||
|
|
_fortran_zlarfx(side, m, n, <npy_complex128*>v, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlargv "F_FUNC(zlargv,ZLARGV)"(int *n, npy_complex128 *x, int *incx, npy_complex128 *y, int *incy, d *c, int *incc) nogil
|
||
|
|
cdef void zlargv(int *n, z *x, int *incx, z *y, int *incy, d *c, int *incc) nogil:
|
||
|
|
_fortran_zlargv(n, <npy_complex128*>x, incx, <npy_complex128*>y, incy, c, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarnv "F_FUNC(zlarnv,ZLARNV)"(int *idist, int *iseed, int *n, npy_complex128 *x) nogil
|
||
|
|
cdef void zlarnv(int *idist, int *iseed, int *n, z *x) nogil:
|
||
|
|
_fortran_zlarnv(idist, iseed, n, <npy_complex128*>x)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarrv "F_FUNC(zlarrv,ZLARRV)"(int *n, d *vl, d *vu, d *d, d *l, d *pivmin, int *isplit, int *m, int *dol, int *dou, d *minrgp, d *rtol1, d *rtol2, d *w, d *werr, d *wgap, int *iblock, int *indexw, d *gers, npy_complex128 *z, int *ldz, int *isuppz, d *work, int *iwork, int *info) nogil
|
||
|
|
cdef void zlarrv(int *n, d *vl, d *vu, d *d, d *l, d *pivmin, int *isplit, int *m, int *dol, int *dou, d *minrgp, d *rtol1, d *rtol2, d *w, d *werr, d *wgap, int *iblock, int *indexw, d *gers, z *z, int *ldz, int *isuppz, d *work, int *iwork, int *info) nogil:
|
||
|
|
_fortran_zlarrv(n, vl, vu, d, l, pivmin, isplit, m, dol, dou, minrgp, rtol1, rtol2, w, werr, wgap, iblock, indexw, gers, <npy_complex128*>z, ldz, isuppz, work, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlartg "F_FUNC(zlartg,ZLARTG)"(npy_complex128 *f, npy_complex128 *g, d *cs, npy_complex128 *sn, npy_complex128 *r) nogil
|
||
|
|
cdef void zlartg(z *f, z *g, d *cs, z *sn, z *r) nogil:
|
||
|
|
_fortran_zlartg(<npy_complex128*>f, <npy_complex128*>g, cs, <npy_complex128*>sn, <npy_complex128*>r)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlartv "F_FUNC(zlartv,ZLARTV)"(int *n, npy_complex128 *x, int *incx, npy_complex128 *y, int *incy, d *c, npy_complex128 *s, int *incc) nogil
|
||
|
|
cdef void zlartv(int *n, z *x, int *incx, z *y, int *incy, d *c, z *s, int *incc) nogil:
|
||
|
|
_fortran_zlartv(n, <npy_complex128*>x, incx, <npy_complex128*>y, incy, c, <npy_complex128*>s, incc)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarz "F_FUNC(zlarz,ZLARZ)"(char *side, int *m, int *n, int *l, npy_complex128 *v, int *incv, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work) nogil
|
||
|
|
cdef void zlarz(char *side, int *m, int *n, int *l, z *v, int *incv, z *tau, z *c, int *ldc, z *work) nogil:
|
||
|
|
_fortran_zlarz(side, m, n, l, <npy_complex128*>v, incv, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarzb "F_FUNC(zlarzb,ZLARZB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, npy_complex128 *v, int *ldv, npy_complex128 *t, int *ldt, npy_complex128 *c, int *ldc, npy_complex128 *work, int *ldwork) nogil
|
||
|
|
cdef void zlarzb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, z *v, int *ldv, z *t, int *ldt, z *c, int *ldc, z *work, int *ldwork) nogil:
|
||
|
|
_fortran_zlarzb(side, trans, direct, storev, m, n, k, l, <npy_complex128*>v, ldv, <npy_complex128*>t, ldt, <npy_complex128*>c, ldc, <npy_complex128*>work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlarzt "F_FUNC(zlarzt,ZLARZT)"(char *direct, char *storev, int *n, int *k, npy_complex128 *v, int *ldv, npy_complex128 *tau, npy_complex128 *t, int *ldt) nogil
|
||
|
|
cdef void zlarzt(char *direct, char *storev, int *n, int *k, z *v, int *ldv, z *tau, z *t, int *ldt) nogil:
|
||
|
|
_fortran_zlarzt(direct, storev, n, k, <npy_complex128*>v, ldv, <npy_complex128*>tau, <npy_complex128*>t, ldt)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlascl "F_FUNC(zlascl,ZLASCL)"(char *type_bn, int *kl, int *ku, d *cfrom, d *cto, int *m, int *n, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void zlascl(char *type_bn, int *kl, int *ku, d *cfrom, d *cto, int *m, int *n, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_zlascl(type_bn, kl, ku, cfrom, cto, m, n, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaset "F_FUNC(zlaset,ZLASET)"(char *uplo, int *m, int *n, npy_complex128 *alpha, npy_complex128 *beta, npy_complex128 *a, int *lda) nogil
|
||
|
|
cdef void zlaset(char *uplo, int *m, int *n, z *alpha, z *beta, z *a, int *lda) nogil:
|
||
|
|
_fortran_zlaset(uplo, m, n, <npy_complex128*>alpha, <npy_complex128*>beta, <npy_complex128*>a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlasr "F_FUNC(zlasr,ZLASR)"(char *side, char *pivot, char *direct, int *m, int *n, d *c, d *s, npy_complex128 *a, int *lda) nogil
|
||
|
|
cdef void zlasr(char *side, char *pivot, char *direct, int *m, int *n, d *c, d *s, z *a, int *lda) nogil:
|
||
|
|
_fortran_zlasr(side, pivot, direct, m, n, c, s, <npy_complex128*>a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlassq "F_FUNC(zlassq,ZLASSQ)"(int *n, npy_complex128 *x, int *incx, d *scale, d *sumsq) nogil
|
||
|
|
cdef void zlassq(int *n, z *x, int *incx, d *scale, d *sumsq) nogil:
|
||
|
|
_fortran_zlassq(n, <npy_complex128*>x, incx, scale, sumsq)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlaswp "F_FUNC(zlaswp,ZLASWP)"(int *n, npy_complex128 *a, int *lda, int *k1, int *k2, int *ipiv, int *incx) nogil
|
||
|
|
cdef void zlaswp(int *n, z *a, int *lda, int *k1, int *k2, int *ipiv, int *incx) nogil:
|
||
|
|
_fortran_zlaswp(n, <npy_complex128*>a, lda, k1, k2, ipiv, incx)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlasyf "F_FUNC(zlasyf,ZLASYF)"(char *uplo, int *n, int *nb, int *kb, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *w, int *ldw, int *info) nogil
|
||
|
|
cdef void zlasyf(char *uplo, int *n, int *nb, int *kb, z *a, int *lda, int *ipiv, z *w, int *ldw, int *info) nogil:
|
||
|
|
_fortran_zlasyf(uplo, n, nb, kb, <npy_complex128*>a, lda, ipiv, <npy_complex128*>w, ldw, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlat2c "F_FUNC(zlat2c,ZLAT2C)"(char *uplo, int *n, npy_complex128 *a, int *lda, npy_complex64 *sa, int *ldsa, int *info) nogil
|
||
|
|
cdef void zlat2c(char *uplo, int *n, z *a, int *lda, c *sa, int *ldsa, int *info) nogil:
|
||
|
|
_fortran_zlat2c(uplo, n, <npy_complex128*>a, lda, <npy_complex64*>sa, ldsa, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlatbs "F_FUNC(zlatbs,ZLATBS)"(char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, npy_complex128 *ab, int *ldab, npy_complex128 *x, d *scale, d *cnorm, int *info) nogil
|
||
|
|
cdef void zlatbs(char *uplo, char *trans, char *diag, char *normin, int *n, int *kd, z *ab, int *ldab, z *x, d *scale, d *cnorm, int *info) nogil:
|
||
|
|
_fortran_zlatbs(uplo, trans, diag, normin, n, kd, <npy_complex128*>ab, ldab, <npy_complex128*>x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlatdf "F_FUNC(zlatdf,ZLATDF)"(int *ijob, int *n, npy_complex128 *z, int *ldz, npy_complex128 *rhs, d *rdsum, d *rdscal, int *ipiv, int *jpiv) nogil
|
||
|
|
cdef void zlatdf(int *ijob, int *n, z *z, int *ldz, z *rhs, d *rdsum, d *rdscal, int *ipiv, int *jpiv) nogil:
|
||
|
|
_fortran_zlatdf(ijob, n, <npy_complex128*>z, ldz, <npy_complex128*>rhs, rdsum, rdscal, ipiv, jpiv)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlatps "F_FUNC(zlatps,ZLATPS)"(char *uplo, char *trans, char *diag, char *normin, int *n, npy_complex128 *ap, npy_complex128 *x, d *scale, d *cnorm, int *info) nogil
|
||
|
|
cdef void zlatps(char *uplo, char *trans, char *diag, char *normin, int *n, z *ap, z *x, d *scale, d *cnorm, int *info) nogil:
|
||
|
|
_fortran_zlatps(uplo, trans, diag, normin, n, <npy_complex128*>ap, <npy_complex128*>x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlatrd "F_FUNC(zlatrd,ZLATRD)"(char *uplo, int *n, int *nb, npy_complex128 *a, int *lda, d *e, npy_complex128 *tau, npy_complex128 *w, int *ldw) nogil
|
||
|
|
cdef void zlatrd(char *uplo, int *n, int *nb, z *a, int *lda, d *e, z *tau, z *w, int *ldw) nogil:
|
||
|
|
_fortran_zlatrd(uplo, n, nb, <npy_complex128*>a, lda, e, <npy_complex128*>tau, <npy_complex128*>w, ldw)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlatrs "F_FUNC(zlatrs,ZLATRS)"(char *uplo, char *trans, char *diag, char *normin, int *n, npy_complex128 *a, int *lda, npy_complex128 *x, d *scale, d *cnorm, int *info) nogil
|
||
|
|
cdef void zlatrs(char *uplo, char *trans, char *diag, char *normin, int *n, z *a, int *lda, z *x, d *scale, d *cnorm, int *info) nogil:
|
||
|
|
_fortran_zlatrs(uplo, trans, diag, normin, n, <npy_complex128*>a, lda, <npy_complex128*>x, scale, cnorm, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlatrz "F_FUNC(zlatrz,ZLATRZ)"(int *m, int *n, int *l, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work) nogil
|
||
|
|
cdef void zlatrz(int *m, int *n, int *l, z *a, int *lda, z *tau, z *work) nogil:
|
||
|
|
_fortran_zlatrz(m, n, l, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlauu2 "F_FUNC(zlauu2,ZLAUU2)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void zlauu2(char *uplo, int *n, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_zlauu2(uplo, n, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zlauum "F_FUNC(zlauum,ZLAUUM)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void zlauum(char *uplo, int *n, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_zlauum(uplo, n, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpbcon "F_FUNC(zpbcon,ZPBCON)"(char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, d *anorm, d *rcond, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zpbcon(char *uplo, int *n, int *kd, z *ab, int *ldab, d *anorm, d *rcond, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zpbcon(uplo, n, kd, <npy_complex128*>ab, ldab, anorm, rcond, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpbequ "F_FUNC(zpbequ,ZPBEQU)"(char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, d *s, d *scond, d *amax, int *info) nogil
|
||
|
|
cdef void zpbequ(char *uplo, int *n, int *kd, z *ab, int *ldab, d *s, d *scond, d *amax, int *info) nogil:
|
||
|
|
_fortran_zpbequ(uplo, n, kd, <npy_complex128*>ab, ldab, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpbrfs "F_FUNC(zpbrfs,ZPBRFS)"(char *uplo, int *n, int *kd, int *nrhs, npy_complex128 *ab, int *ldab, npy_complex128 *afb, int *ldafb, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zpbrfs(char *uplo, int *n, int *kd, int *nrhs, z *ab, int *ldab, z *afb, int *ldafb, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zpbrfs(uplo, n, kd, nrhs, <npy_complex128*>ab, ldab, <npy_complex128*>afb, ldafb, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpbstf "F_FUNC(zpbstf,ZPBSTF)"(char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void zpbstf(char *uplo, int *n, int *kd, z *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_zpbstf(uplo, n, kd, <npy_complex128*>ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpbsv "F_FUNC(zpbsv,ZPBSV)"(char *uplo, int *n, int *kd, int *nrhs, npy_complex128 *ab, int *ldab, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zpbsv(char *uplo, int *n, int *kd, int *nrhs, z *ab, int *ldab, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zpbsv(uplo, n, kd, nrhs, <npy_complex128*>ab, ldab, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpbsvx "F_FUNC(zpbsvx,ZPBSVX)"(char *fact, char *uplo, int *n, int *kd, int *nrhs, npy_complex128 *ab, int *ldab, npy_complex128 *afb, int *ldafb, char *equed, d *s, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zpbsvx(char *fact, char *uplo, int *n, int *kd, int *nrhs, z *ab, int *ldab, z *afb, int *ldafb, char *equed, d *s, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zpbsvx(fact, uplo, n, kd, nrhs, <npy_complex128*>ab, ldab, <npy_complex128*>afb, ldafb, equed, s, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpbtf2 "F_FUNC(zpbtf2,ZPBTF2)"(char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void zpbtf2(char *uplo, int *n, int *kd, z *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_zpbtf2(uplo, n, kd, <npy_complex128*>ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpbtrf "F_FUNC(zpbtrf,ZPBTRF)"(char *uplo, int *n, int *kd, npy_complex128 *ab, int *ldab, int *info) nogil
|
||
|
|
cdef void zpbtrf(char *uplo, int *n, int *kd, z *ab, int *ldab, int *info) nogil:
|
||
|
|
_fortran_zpbtrf(uplo, n, kd, <npy_complex128*>ab, ldab, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpbtrs "F_FUNC(zpbtrs,ZPBTRS)"(char *uplo, int *n, int *kd, int *nrhs, npy_complex128 *ab, int *ldab, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zpbtrs(char *uplo, int *n, int *kd, int *nrhs, z *ab, int *ldab, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zpbtrs(uplo, n, kd, nrhs, <npy_complex128*>ab, ldab, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpftrf "F_FUNC(zpftrf,ZPFTRF)"(char *transr, char *uplo, int *n, npy_complex128 *a, int *info) nogil
|
||
|
|
cdef void zpftrf(char *transr, char *uplo, int *n, z *a, int *info) nogil:
|
||
|
|
_fortran_zpftrf(transr, uplo, n, <npy_complex128*>a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpftri "F_FUNC(zpftri,ZPFTRI)"(char *transr, char *uplo, int *n, npy_complex128 *a, int *info) nogil
|
||
|
|
cdef void zpftri(char *transr, char *uplo, int *n, z *a, int *info) nogil:
|
||
|
|
_fortran_zpftri(transr, uplo, n, <npy_complex128*>a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpftrs "F_FUNC(zpftrs,ZPFTRS)"(char *transr, char *uplo, int *n, int *nrhs, npy_complex128 *a, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zpftrs(char *transr, char *uplo, int *n, int *nrhs, z *a, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zpftrs(transr, uplo, n, nrhs, <npy_complex128*>a, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpocon "F_FUNC(zpocon,ZPOCON)"(char *uplo, int *n, npy_complex128 *a, int *lda, d *anorm, d *rcond, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zpocon(char *uplo, int *n, z *a, int *lda, d *anorm, d *rcond, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zpocon(uplo, n, <npy_complex128*>a, lda, anorm, rcond, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpoequ "F_FUNC(zpoequ,ZPOEQU)"(int *n, npy_complex128 *a, int *lda, d *s, d *scond, d *amax, int *info) nogil
|
||
|
|
cdef void zpoequ(int *n, z *a, int *lda, d *s, d *scond, d *amax, int *info) nogil:
|
||
|
|
_fortran_zpoequ(n, <npy_complex128*>a, lda, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpoequb "F_FUNC(zpoequb,ZPOEQUB)"(int *n, npy_complex128 *a, int *lda, d *s, d *scond, d *amax, int *info) nogil
|
||
|
|
cdef void zpoequb(int *n, z *a, int *lda, d *s, d *scond, d *amax, int *info) nogil:
|
||
|
|
_fortran_zpoequb(n, <npy_complex128*>a, lda, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zporfs "F_FUNC(zporfs,ZPORFS)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *af, int *ldaf, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zporfs(char *uplo, int *n, int *nrhs, z *a, int *lda, z *af, int *ldaf, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zporfs(uplo, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>af, ldaf, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zposv "F_FUNC(zposv,ZPOSV)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zposv(char *uplo, int *n, int *nrhs, z *a, int *lda, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zposv(uplo, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zposvx "F_FUNC(zposvx,ZPOSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *af, int *ldaf, char *equed, d *s, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zposvx(char *fact, char *uplo, int *n, int *nrhs, z *a, int *lda, z *af, int *ldaf, char *equed, d *s, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zposvx(fact, uplo, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>af, ldaf, equed, s, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpotf2 "F_FUNC(zpotf2,ZPOTF2)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void zpotf2(char *uplo, int *n, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_zpotf2(uplo, n, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpotrf "F_FUNC(zpotrf,ZPOTRF)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void zpotrf(char *uplo, int *n, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_zpotrf(uplo, n, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpotri "F_FUNC(zpotri,ZPOTRI)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void zpotri(char *uplo, int *n, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_zpotri(uplo, n, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpotrs "F_FUNC(zpotrs,ZPOTRS)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zpotrs(char *uplo, int *n, int *nrhs, z *a, int *lda, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zpotrs(uplo, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zppcon "F_FUNC(zppcon,ZPPCON)"(char *uplo, int *n, npy_complex128 *ap, d *anorm, d *rcond, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zppcon(char *uplo, int *n, z *ap, d *anorm, d *rcond, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zppcon(uplo, n, <npy_complex128*>ap, anorm, rcond, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zppequ "F_FUNC(zppequ,ZPPEQU)"(char *uplo, int *n, npy_complex128 *ap, d *s, d *scond, d *amax, int *info) nogil
|
||
|
|
cdef void zppequ(char *uplo, int *n, z *ap, d *s, d *scond, d *amax, int *info) nogil:
|
||
|
|
_fortran_zppequ(uplo, n, <npy_complex128*>ap, s, scond, amax, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpprfs "F_FUNC(zpprfs,ZPPRFS)"(char *uplo, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *afp, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zpprfs(char *uplo, int *n, int *nrhs, z *ap, z *afp, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zpprfs(uplo, n, nrhs, <npy_complex128*>ap, <npy_complex128*>afp, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zppsv "F_FUNC(zppsv,ZPPSV)"(char *uplo, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zppsv(char *uplo, int *n, int *nrhs, z *ap, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zppsv(uplo, n, nrhs, <npy_complex128*>ap, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zppsvx "F_FUNC(zppsvx,ZPPSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *afp, char *equed, d *s, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zppsvx(char *fact, char *uplo, int *n, int *nrhs, z *ap, z *afp, char *equed, d *s, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zppsvx(fact, uplo, n, nrhs, <npy_complex128*>ap, <npy_complex128*>afp, equed, s, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpptrf "F_FUNC(zpptrf,ZPPTRF)"(char *uplo, int *n, npy_complex128 *ap, int *info) nogil
|
||
|
|
cdef void zpptrf(char *uplo, int *n, z *ap, int *info) nogil:
|
||
|
|
_fortran_zpptrf(uplo, n, <npy_complex128*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpptri "F_FUNC(zpptri,ZPPTRI)"(char *uplo, int *n, npy_complex128 *ap, int *info) nogil
|
||
|
|
cdef void zpptri(char *uplo, int *n, z *ap, int *info) nogil:
|
||
|
|
_fortran_zpptri(uplo, n, <npy_complex128*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpptrs "F_FUNC(zpptrs,ZPPTRS)"(char *uplo, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zpptrs(char *uplo, int *n, int *nrhs, z *ap, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zpptrs(uplo, n, nrhs, <npy_complex128*>ap, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpstf2 "F_FUNC(zpstf2,ZPSTF2)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *piv, int *rank, d *tol, d *work, int *info) nogil
|
||
|
|
cdef void zpstf2(char *uplo, int *n, z *a, int *lda, int *piv, int *rank, d *tol, d *work, int *info) nogil:
|
||
|
|
_fortran_zpstf2(uplo, n, <npy_complex128*>a, lda, piv, rank, tol, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpstrf "F_FUNC(zpstrf,ZPSTRF)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *piv, int *rank, d *tol, d *work, int *info) nogil
|
||
|
|
cdef void zpstrf(char *uplo, int *n, z *a, int *lda, int *piv, int *rank, d *tol, d *work, int *info) nogil:
|
||
|
|
_fortran_zpstrf(uplo, n, <npy_complex128*>a, lda, piv, rank, tol, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zptcon "F_FUNC(zptcon,ZPTCON)"(int *n, d *d, npy_complex128 *e, d *anorm, d *rcond, d *rwork, int *info) nogil
|
||
|
|
cdef void zptcon(int *n, d *d, z *e, d *anorm, d *rcond, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zptcon(n, d, <npy_complex128*>e, anorm, rcond, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpteqr "F_FUNC(zpteqr,ZPTEQR)"(char *compz, int *n, d *d, d *e, npy_complex128 *z, int *ldz, d *work, int *info) nogil
|
||
|
|
cdef void zpteqr(char *compz, int *n, d *d, d *e, z *z, int *ldz, d *work, int *info) nogil:
|
||
|
|
_fortran_zpteqr(compz, n, d, e, <npy_complex128*>z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zptrfs "F_FUNC(zptrfs,ZPTRFS)"(char *uplo, int *n, int *nrhs, d *d, npy_complex128 *e, d *df, npy_complex128 *ef, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zptrfs(char *uplo, int *n, int *nrhs, d *d, z *e, d *df, z *ef, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zptrfs(uplo, n, nrhs, d, <npy_complex128*>e, df, <npy_complex128*>ef, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zptsv "F_FUNC(zptsv,ZPTSV)"(int *n, int *nrhs, d *d, npy_complex128 *e, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zptsv(int *n, int *nrhs, d *d, z *e, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zptsv(n, nrhs, d, <npy_complex128*>e, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zptsvx "F_FUNC(zptsvx,ZPTSVX)"(char *fact, int *n, int *nrhs, d *d, npy_complex128 *e, d *df, npy_complex128 *ef, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zptsvx(char *fact, int *n, int *nrhs, d *d, z *e, d *df, z *ef, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zptsvx(fact, n, nrhs, d, <npy_complex128*>e, df, <npy_complex128*>ef, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpttrf "F_FUNC(zpttrf,ZPTTRF)"(int *n, d *d, npy_complex128 *e, int *info) nogil
|
||
|
|
cdef void zpttrf(int *n, d *d, z *e, int *info) nogil:
|
||
|
|
_fortran_zpttrf(n, d, <npy_complex128*>e, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zpttrs "F_FUNC(zpttrs,ZPTTRS)"(char *uplo, int *n, int *nrhs, d *d, npy_complex128 *e, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zpttrs(char *uplo, int *n, int *nrhs, d *d, z *e, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zpttrs(uplo, n, nrhs, d, <npy_complex128*>e, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zptts2 "F_FUNC(zptts2,ZPTTS2)"(int *iuplo, int *n, int *nrhs, d *d, npy_complex128 *e, npy_complex128 *b, int *ldb) nogil
|
||
|
|
cdef void zptts2(int *iuplo, int *n, int *nrhs, d *d, z *e, z *b, int *ldb) nogil:
|
||
|
|
_fortran_zptts2(iuplo, n, nrhs, d, <npy_complex128*>e, <npy_complex128*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zrot "F_FUNC(zrot,ZROT)"(int *n, npy_complex128 *cx, int *incx, npy_complex128 *cy, int *incy, d *c, npy_complex128 *s) nogil
|
||
|
|
cdef void zrot(int *n, z *cx, int *incx, z *cy, int *incy, d *c, z *s) nogil:
|
||
|
|
_fortran_zrot(n, <npy_complex128*>cx, incx, <npy_complex128*>cy, incy, c, <npy_complex128*>s)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zspcon "F_FUNC(zspcon,ZSPCON)"(char *uplo, int *n, npy_complex128 *ap, int *ipiv, d *anorm, d *rcond, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zspcon(char *uplo, int *n, z *ap, int *ipiv, d *anorm, d *rcond, z *work, int *info) nogil:
|
||
|
|
_fortran_zspcon(uplo, n, <npy_complex128*>ap, ipiv, anorm, rcond, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zspmv "F_FUNC(zspmv,ZSPMV)"(char *uplo, int *n, npy_complex128 *alpha, npy_complex128 *ap, npy_complex128 *x, int *incx, npy_complex128 *beta, npy_complex128 *y, int *incy) nogil
|
||
|
|
cdef void zspmv(char *uplo, int *n, z *alpha, z *ap, z *x, int *incx, z *beta, z *y, int *incy) nogil:
|
||
|
|
_fortran_zspmv(uplo, n, <npy_complex128*>alpha, <npy_complex128*>ap, <npy_complex128*>x, incx, <npy_complex128*>beta, <npy_complex128*>y, incy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zspr "F_FUNC(zspr,ZSPR)"(char *uplo, int *n, npy_complex128 *alpha, npy_complex128 *x, int *incx, npy_complex128 *ap) nogil
|
||
|
|
cdef void zspr(char *uplo, int *n, z *alpha, z *x, int *incx, z *ap) nogil:
|
||
|
|
_fortran_zspr(uplo, n, <npy_complex128*>alpha, <npy_complex128*>x, incx, <npy_complex128*>ap)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsprfs "F_FUNC(zsprfs,ZSPRFS)"(char *uplo, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *afp, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zsprfs(char *uplo, int *n, int *nrhs, z *ap, z *afp, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zsprfs(uplo, n, nrhs, <npy_complex128*>ap, <npy_complex128*>afp, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zspsv "F_FUNC(zspsv,ZSPSV)"(char *uplo, int *n, int *nrhs, npy_complex128 *ap, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zspsv(char *uplo, int *n, int *nrhs, z *ap, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zspsv(uplo, n, nrhs, <npy_complex128*>ap, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zspsvx "F_FUNC(zspsvx,ZSPSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *afp, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zspsvx(char *fact, char *uplo, int *n, int *nrhs, z *ap, z *afp, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zspsvx(fact, uplo, n, nrhs, <npy_complex128*>ap, <npy_complex128*>afp, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsptrf "F_FUNC(zsptrf,ZSPTRF)"(char *uplo, int *n, npy_complex128 *ap, int *ipiv, int *info) nogil
|
||
|
|
cdef void zsptrf(char *uplo, int *n, z *ap, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_zsptrf(uplo, n, <npy_complex128*>ap, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsptri "F_FUNC(zsptri,ZSPTRI)"(char *uplo, int *n, npy_complex128 *ap, int *ipiv, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zsptri(char *uplo, int *n, z *ap, int *ipiv, z *work, int *info) nogil:
|
||
|
|
_fortran_zsptri(uplo, n, <npy_complex128*>ap, ipiv, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsptrs "F_FUNC(zsptrs,ZSPTRS)"(char *uplo, int *n, int *nrhs, npy_complex128 *ap, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zsptrs(char *uplo, int *n, int *nrhs, z *ap, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zsptrs(uplo, n, nrhs, <npy_complex128*>ap, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zstedc "F_FUNC(zstedc,ZSTEDC)"(char *compz, int *n, d *d, d *e, npy_complex128 *z, int *ldz, npy_complex128 *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zstedc(char *compz, int *n, d *d, d *e, z *z, int *ldz, z *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zstedc(compz, n, d, e, <npy_complex128*>z, ldz, <npy_complex128*>work, lwork, rwork, lrwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zstegr "F_FUNC(zstegr,ZSTEGR)"(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, npy_complex128 *z, int *ldz, int *isuppz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zstegr(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, d *abstol, int *m, d *w, z *z, int *ldz, int *isuppz, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zstegr(jobz, range, n, d, e, vl, vu, il, iu, abstol, m, w, <npy_complex128*>z, ldz, isuppz, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zstein "F_FUNC(zstein,ZSTEIN)"(int *n, d *d, d *e, int *m, d *w, int *iblock, int *isplit, npy_complex128 *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil
|
||
|
|
cdef void zstein(int *n, d *d, d *e, int *m, d *w, int *iblock, int *isplit, z *z, int *ldz, d *work, int *iwork, int *ifail, int *info) nogil:
|
||
|
|
_fortran_zstein(n, d, e, m, w, iblock, isplit, <npy_complex128*>z, ldz, work, iwork, ifail, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zstemr "F_FUNC(zstemr,ZSTEMR)"(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, int *m, d *w, npy_complex128 *z, int *ldz, int *nzc, int *isuppz, bint *tryrac, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void zstemr(char *jobz, char *range, int *n, d *d, d *e, d *vl, d *vu, int *il, int *iu, int *m, d *w, z *z, int *ldz, int *nzc, int *isuppz, bint *tryrac, d *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_zstemr(jobz, range, n, d, e, vl, vu, il, iu, m, w, <npy_complex128*>z, ldz, nzc, isuppz, tryrac, work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsteqr "F_FUNC(zsteqr,ZSTEQR)"(char *compz, int *n, d *d, d *e, npy_complex128 *z, int *ldz, d *work, int *info) nogil
|
||
|
|
cdef void zsteqr(char *compz, int *n, d *d, d *e, z *z, int *ldz, d *work, int *info) nogil:
|
||
|
|
_fortran_zsteqr(compz, n, d, e, <npy_complex128*>z, ldz, work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsycon "F_FUNC(zsycon,ZSYCON)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, d *anorm, d *rcond, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zsycon(char *uplo, int *n, z *a, int *lda, int *ipiv, d *anorm, d *rcond, z *work, int *info) nogil:
|
||
|
|
_fortran_zsycon(uplo, n, <npy_complex128*>a, lda, ipiv, anorm, rcond, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsyconv "F_FUNC(zsyconv,ZSYCONV)"(char *uplo, char *way, int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zsyconv(char *uplo, char *way, int *n, z *a, int *lda, int *ipiv, z *work, int *info) nogil:
|
||
|
|
_fortran_zsyconv(uplo, way, n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsyequb "F_FUNC(zsyequb,ZSYEQUB)"(char *uplo, int *n, npy_complex128 *a, int *lda, d *s, d *scond, d *amax, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zsyequb(char *uplo, int *n, z *a, int *lda, d *s, d *scond, d *amax, z *work, int *info) nogil:
|
||
|
|
_fortran_zsyequb(uplo, n, <npy_complex128*>a, lda, s, scond, amax, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsymv "F_FUNC(zsymv,ZSYMV)"(char *uplo, int *n, npy_complex128 *alpha, npy_complex128 *a, int *lda, npy_complex128 *x, int *incx, npy_complex128 *beta, npy_complex128 *y, int *incy) nogil
|
||
|
|
cdef void zsymv(char *uplo, int *n, z *alpha, z *a, int *lda, z *x, int *incx, z *beta, z *y, int *incy) nogil:
|
||
|
|
_fortran_zsymv(uplo, n, <npy_complex128*>alpha, <npy_complex128*>a, lda, <npy_complex128*>x, incx, <npy_complex128*>beta, <npy_complex128*>y, incy)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsyr "F_FUNC(zsyr,ZSYR)"(char *uplo, int *n, npy_complex128 *alpha, npy_complex128 *x, int *incx, npy_complex128 *a, int *lda) nogil
|
||
|
|
cdef void zsyr(char *uplo, int *n, z *alpha, z *x, int *incx, z *a, int *lda) nogil:
|
||
|
|
_fortran_zsyr(uplo, n, <npy_complex128*>alpha, <npy_complex128*>x, incx, <npy_complex128*>a, lda)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsyrfs "F_FUNC(zsyrfs,ZSYRFS)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *af, int *ldaf, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void zsyrfs(char *uplo, int *n, int *nrhs, z *a, int *lda, z *af, int *ldaf, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zsyrfs(uplo, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>af, ldaf, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsysv "F_FUNC(zsysv,ZSYSV)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zsysv(char *uplo, int *n, int *nrhs, z *a, int *lda, int *ipiv, z *b, int *ldb, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zsysv(uplo, n, nrhs, <npy_complex128*>a, lda, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsysvx "F_FUNC(zsysvx,ZSYSVX)"(char *fact, char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *af, int *ldaf, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *rcond, d *ferr, d *berr, npy_complex128 *work, int *lwork, d *rwork, int *info) nogil
|
||
|
|
cdef void zsysvx(char *fact, char *uplo, int *n, int *nrhs, z *a, int *lda, z *af, int *ldaf, int *ipiv, z *b, int *ldb, z *x, int *ldx, d *rcond, d *ferr, d *berr, z *work, int *lwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_zsysvx(fact, uplo, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>af, ldaf, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, rcond, ferr, berr, <npy_complex128*>work, lwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsyswapr "F_FUNC(zsyswapr,ZSYSWAPR)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *i1, int *i2) nogil
|
||
|
|
cdef void zsyswapr(char *uplo, int *n, z *a, int *lda, int *i1, int *i2) nogil:
|
||
|
|
_fortran_zsyswapr(uplo, n, <npy_complex128*>a, lda, i1, i2)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsytf2 "F_FUNC(zsytf2,ZSYTF2)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, int *info) nogil
|
||
|
|
cdef void zsytf2(char *uplo, int *n, z *a, int *lda, int *ipiv, int *info) nogil:
|
||
|
|
_fortran_zsytf2(uplo, n, <npy_complex128*>a, lda, ipiv, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsytrf "F_FUNC(zsytrf,ZSYTRF)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zsytrf(char *uplo, int *n, z *a, int *lda, int *ipiv, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zsytrf(uplo, n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsytri "F_FUNC(zsytri,ZSYTRI)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zsytri(char *uplo, int *n, z *a, int *lda, int *ipiv, z *work, int *info) nogil:
|
||
|
|
_fortran_zsytri(uplo, n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsytri2 "F_FUNC(zsytri2,ZSYTRI2)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zsytri2(char *uplo, int *n, z *a, int *lda, int *ipiv, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zsytri2(uplo, n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsytri2x "F_FUNC(zsytri2x,ZSYTRI2X)"(char *uplo, int *n, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *work, int *nb, int *info) nogil
|
||
|
|
cdef void zsytri2x(char *uplo, int *n, z *a, int *lda, int *ipiv, z *work, int *nb, int *info) nogil:
|
||
|
|
_fortran_zsytri2x(uplo, n, <npy_complex128*>a, lda, ipiv, <npy_complex128*>work, nb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsytrs "F_FUNC(zsytrs,ZSYTRS)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void zsytrs(char *uplo, int *n, int *nrhs, z *a, int *lda, int *ipiv, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_zsytrs(uplo, n, nrhs, <npy_complex128*>a, lda, ipiv, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zsytrs2 "F_FUNC(zsytrs2,ZSYTRS2)"(char *uplo, int *n, int *nrhs, npy_complex128 *a, int *lda, int *ipiv, npy_complex128 *b, int *ldb, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zsytrs2(char *uplo, int *n, int *nrhs, z *a, int *lda, int *ipiv, z *b, int *ldb, z *work, int *info) nogil:
|
||
|
|
_fortran_zsytrs2(uplo, n, nrhs, <npy_complex128*>a, lda, ipiv, <npy_complex128*>b, ldb, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztbcon "F_FUNC(ztbcon,ZTBCON)"(char *norm, char *uplo, char *diag, int *n, int *kd, npy_complex128 *ab, int *ldab, d *rcond, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void ztbcon(char *norm, char *uplo, char *diag, int *n, int *kd, z *ab, int *ldab, d *rcond, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_ztbcon(norm, uplo, diag, n, kd, <npy_complex128*>ab, ldab, rcond, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztbrfs "F_FUNC(ztbrfs,ZTBRFS)"(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, npy_complex128 *ab, int *ldab, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void ztbrfs(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, z *ab, int *ldab, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_ztbrfs(uplo, trans, diag, n, kd, nrhs, <npy_complex128*>ab, ldab, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztbtrs "F_FUNC(ztbtrs,ZTBTRS)"(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, npy_complex128 *ab, int *ldab, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ztbtrs(char *uplo, char *trans, char *diag, int *n, int *kd, int *nrhs, z *ab, int *ldab, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ztbtrs(uplo, trans, diag, n, kd, nrhs, <npy_complex128*>ab, ldab, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztfsm "F_FUNC(ztfsm,ZTFSM)"(char *transr, char *side, char *uplo, char *trans, char *diag, int *m, int *n, npy_complex128 *alpha, npy_complex128 *a, npy_complex128 *b, int *ldb) nogil
|
||
|
|
cdef void ztfsm(char *transr, char *side, char *uplo, char *trans, char *diag, int *m, int *n, z *alpha, z *a, z *b, int *ldb) nogil:
|
||
|
|
_fortran_ztfsm(transr, side, uplo, trans, diag, m, n, <npy_complex128*>alpha, <npy_complex128*>a, <npy_complex128*>b, ldb)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztftri "F_FUNC(ztftri,ZTFTRI)"(char *transr, char *uplo, char *diag, int *n, npy_complex128 *a, int *info) nogil
|
||
|
|
cdef void ztftri(char *transr, char *uplo, char *diag, int *n, z *a, int *info) nogil:
|
||
|
|
_fortran_ztftri(transr, uplo, diag, n, <npy_complex128*>a, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztfttp "F_FUNC(ztfttp,ZTFTTP)"(char *transr, char *uplo, int *n, npy_complex128 *arf, npy_complex128 *ap, int *info) nogil
|
||
|
|
cdef void ztfttp(char *transr, char *uplo, int *n, z *arf, z *ap, int *info) nogil:
|
||
|
|
_fortran_ztfttp(transr, uplo, n, <npy_complex128*>arf, <npy_complex128*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztfttr "F_FUNC(ztfttr,ZTFTTR)"(char *transr, char *uplo, int *n, npy_complex128 *arf, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void ztfttr(char *transr, char *uplo, int *n, z *arf, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_ztfttr(transr, uplo, n, <npy_complex128*>arf, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztgevc "F_FUNC(ztgevc,ZTGEVC)"(char *side, char *howmny, bint *select, int *n, npy_complex128 *s, int *lds, npy_complex128 *p, int *ldp, npy_complex128 *vl, int *ldvl, npy_complex128 *vr, int *ldvr, int *mm, int *m, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void ztgevc(char *side, char *howmny, bint *select, int *n, z *s, int *lds, z *p, int *ldp, z *vl, int *ldvl, z *vr, int *ldvr, int *mm, int *m, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_ztgevc(side, howmny, select, n, <npy_complex128*>s, lds, <npy_complex128*>p, ldp, <npy_complex128*>vl, ldvl, <npy_complex128*>vr, ldvr, mm, m, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztgex2 "F_FUNC(ztgex2,ZTGEX2)"(bint *wantq, bint *wantz, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *q, int *ldq, npy_complex128 *z, int *ldz, int *j1, int *info) nogil
|
||
|
|
cdef void ztgex2(bint *wantq, bint *wantz, int *n, z *a, int *lda, z *b, int *ldb, z *q, int *ldq, z *z, int *ldz, int *j1, int *info) nogil:
|
||
|
|
_fortran_ztgex2(wantq, wantz, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>q, ldq, <npy_complex128*>z, ldz, j1, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztgexc "F_FUNC(ztgexc,ZTGEXC)"(bint *wantq, bint *wantz, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *q, int *ldq, npy_complex128 *z, int *ldz, int *ifst, int *ilst, int *info) nogil
|
||
|
|
cdef void ztgexc(bint *wantq, bint *wantz, int *n, z *a, int *lda, z *b, int *ldb, z *q, int *ldq, z *z, int *ldz, int *ifst, int *ilst, int *info) nogil:
|
||
|
|
_fortran_ztgexc(wantq, wantz, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>q, ldq, <npy_complex128*>z, ldz, ifst, ilst, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztgsen "F_FUNC(ztgsen,ZTGSEN)"(int *ijob, bint *wantq, bint *wantz, bint *select, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *alpha, npy_complex128 *beta, npy_complex128 *q, int *ldq, npy_complex128 *z, int *ldz, int *m, d *pl, d *pr, d *dif, npy_complex128 *work, int *lwork, int *iwork, int *liwork, int *info) nogil
|
||
|
|
cdef void ztgsen(int *ijob, bint *wantq, bint *wantz, bint *select, int *n, z *a, int *lda, z *b, int *ldb, z *alpha, z *beta, z *q, int *ldq, z *z, int *ldz, int *m, d *pl, d *pr, d *dif, z *work, int *lwork, int *iwork, int *liwork, int *info) nogil:
|
||
|
|
_fortran_ztgsen(ijob, wantq, wantz, select, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>alpha, <npy_complex128*>beta, <npy_complex128*>q, ldq, <npy_complex128*>z, ldz, m, pl, pr, dif, <npy_complex128*>work, lwork, iwork, liwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztgsja "F_FUNC(ztgsja,ZTGSJA)"(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, d *tola, d *tolb, d *alpha, d *beta, npy_complex128 *u, int *ldu, npy_complex128 *v, int *ldv, npy_complex128 *q, int *ldq, npy_complex128 *work, int *ncycle, int *info) nogil
|
||
|
|
cdef void ztgsja(char *jobu, char *jobv, char *jobq, int *m, int *p, int *n, int *k, int *l, z *a, int *lda, z *b, int *ldb, d *tola, d *tolb, d *alpha, d *beta, z *u, int *ldu, z *v, int *ldv, z *q, int *ldq, z *work, int *ncycle, int *info) nogil:
|
||
|
|
_fortran_ztgsja(jobu, jobv, jobq, m, p, n, k, l, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, tola, tolb, alpha, beta, <npy_complex128*>u, ldu, <npy_complex128*>v, ldv, <npy_complex128*>q, ldq, <npy_complex128*>work, ncycle, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztgsna "F_FUNC(ztgsna,ZTGSNA)"(char *job, char *howmny, bint *select, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *vl, int *ldvl, npy_complex128 *vr, int *ldvr, d *s, d *dif, int *mm, int *m, npy_complex128 *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void ztgsna(char *job, char *howmny, bint *select, int *n, z *a, int *lda, z *b, int *ldb, z *vl, int *ldvl, z *vr, int *ldvr, d *s, d *dif, int *mm, int *m, z *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_ztgsna(job, howmny, select, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>vl, ldvl, <npy_complex128*>vr, ldvr, s, dif, mm, m, <npy_complex128*>work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztgsy2 "F_FUNC(ztgsy2,ZTGSY2)"(char *trans, int *ijob, int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *c, int *ldc, npy_complex128 *d, int *ldd, npy_complex128 *e, int *lde, npy_complex128 *f, int *ldf, d *scale, d *rdsum, d *rdscal, int *info) nogil
|
||
|
|
cdef void ztgsy2(char *trans, int *ijob, int *m, int *n, z *a, int *lda, z *b, int *ldb, z *c, int *ldc, z *d, int *ldd, z *e, int *lde, z *f, int *ldf, d *scale, d *rdsum, d *rdscal, int *info) nogil:
|
||
|
|
_fortran_ztgsy2(trans, ijob, m, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>c, ldc, <npy_complex128*>d, ldd, <npy_complex128*>e, lde, <npy_complex128*>f, ldf, scale, rdsum, rdscal, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztgsyl "F_FUNC(ztgsyl,ZTGSYL)"(char *trans, int *ijob, int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *c, int *ldc, npy_complex128 *d, int *ldd, npy_complex128 *e, int *lde, npy_complex128 *f, int *ldf, d *scale, d *dif, npy_complex128 *work, int *lwork, int *iwork, int *info) nogil
|
||
|
|
cdef void ztgsyl(char *trans, int *ijob, int *m, int *n, z *a, int *lda, z *b, int *ldb, z *c, int *ldc, z *d, int *ldd, z *e, int *lde, z *f, int *ldf, d *scale, d *dif, z *work, int *lwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_ztgsyl(trans, ijob, m, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>c, ldc, <npy_complex128*>d, ldd, <npy_complex128*>e, lde, <npy_complex128*>f, ldf, scale, dif, <npy_complex128*>work, lwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztpcon "F_FUNC(ztpcon,ZTPCON)"(char *norm, char *uplo, char *diag, int *n, npy_complex128 *ap, d *rcond, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void ztpcon(char *norm, char *uplo, char *diag, int *n, z *ap, d *rcond, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_ztpcon(norm, uplo, diag, n, <npy_complex128*>ap, rcond, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztpmqrt "F_FUNC(ztpmqrt,ZTPMQRT)"(char *side, char *trans, int *m, int *n, int *k, int *l, int *nb, npy_complex128 *v, int *ldv, npy_complex128 *t, int *ldt, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void ztpmqrt(char *side, char *trans, int *m, int *n, int *k, int *l, int *nb, z *v, int *ldv, z *t, int *ldt, z *a, int *lda, z *b, int *ldb, z *work, int *info) nogil:
|
||
|
|
_fortran_ztpmqrt(side, trans, m, n, k, l, nb, <npy_complex128*>v, ldv, <npy_complex128*>t, ldt, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztpqrt "F_FUNC(ztpqrt,ZTPQRT)"(int *m, int *n, int *l, int *nb, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *t, int *ldt, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void ztpqrt(int *m, int *n, int *l, int *nb, z *a, int *lda, z *b, int *ldb, z *t, int *ldt, z *work, int *info) nogil:
|
||
|
|
_fortran_ztpqrt(m, n, l, nb, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>t, ldt, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztpqrt2 "F_FUNC(ztpqrt2,ZTPQRT2)"(int *m, int *n, int *l, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *t, int *ldt, int *info) nogil
|
||
|
|
cdef void ztpqrt2(int *m, int *n, int *l, z *a, int *lda, z *b, int *ldb, z *t, int *ldt, int *info) nogil:
|
||
|
|
_fortran_ztpqrt2(m, n, l, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>t, ldt, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztprfb "F_FUNC(ztprfb,ZTPRFB)"(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, npy_complex128 *v, int *ldv, npy_complex128 *t, int *ldt, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *work, int *ldwork) nogil
|
||
|
|
cdef void ztprfb(char *side, char *trans, char *direct, char *storev, int *m, int *n, int *k, int *l, z *v, int *ldv, z *t, int *ldt, z *a, int *lda, z *b, int *ldb, z *work, int *ldwork) nogil:
|
||
|
|
_fortran_ztprfb(side, trans, direct, storev, m, n, k, l, <npy_complex128*>v, ldv, <npy_complex128*>t, ldt, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>work, ldwork)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztprfs "F_FUNC(ztprfs,ZTPRFS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void ztprfs(char *uplo, char *trans, char *diag, int *n, int *nrhs, z *ap, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_ztprfs(uplo, trans, diag, n, nrhs, <npy_complex128*>ap, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztptri "F_FUNC(ztptri,ZTPTRI)"(char *uplo, char *diag, int *n, npy_complex128 *ap, int *info) nogil
|
||
|
|
cdef void ztptri(char *uplo, char *diag, int *n, z *ap, int *info) nogil:
|
||
|
|
_fortran_ztptri(uplo, diag, n, <npy_complex128*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztptrs "F_FUNC(ztptrs,ZTPTRS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, npy_complex128 *ap, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ztptrs(char *uplo, char *trans, char *diag, int *n, int *nrhs, z *ap, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ztptrs(uplo, trans, diag, n, nrhs, <npy_complex128*>ap, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztpttf "F_FUNC(ztpttf,ZTPTTF)"(char *transr, char *uplo, int *n, npy_complex128 *ap, npy_complex128 *arf, int *info) nogil
|
||
|
|
cdef void ztpttf(char *transr, char *uplo, int *n, z *ap, z *arf, int *info) nogil:
|
||
|
|
_fortran_ztpttf(transr, uplo, n, <npy_complex128*>ap, <npy_complex128*>arf, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztpttr "F_FUNC(ztpttr,ZTPTTR)"(char *uplo, int *n, npy_complex128 *ap, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void ztpttr(char *uplo, int *n, z *ap, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_ztpttr(uplo, n, <npy_complex128*>ap, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrcon "F_FUNC(ztrcon,ZTRCON)"(char *norm, char *uplo, char *diag, int *n, npy_complex128 *a, int *lda, d *rcond, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void ztrcon(char *norm, char *uplo, char *diag, int *n, z *a, int *lda, d *rcond, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_ztrcon(norm, uplo, diag, n, <npy_complex128*>a, lda, rcond, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrevc "F_FUNC(ztrevc,ZTREVC)"(char *side, char *howmny, bint *select, int *n, npy_complex128 *t, int *ldt, npy_complex128 *vl, int *ldvl, npy_complex128 *vr, int *ldvr, int *mm, int *m, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void ztrevc(char *side, char *howmny, bint *select, int *n, z *t, int *ldt, z *vl, int *ldvl, z *vr, int *ldvr, int *mm, int *m, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_ztrevc(side, howmny, select, n, <npy_complex128*>t, ldt, <npy_complex128*>vl, ldvl, <npy_complex128*>vr, ldvr, mm, m, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrexc "F_FUNC(ztrexc,ZTREXC)"(char *compq, int *n, npy_complex128 *t, int *ldt, npy_complex128 *q, int *ldq, int *ifst, int *ilst, int *info) nogil
|
||
|
|
cdef void ztrexc(char *compq, int *n, z *t, int *ldt, z *q, int *ldq, int *ifst, int *ilst, int *info) nogil:
|
||
|
|
_fortran_ztrexc(compq, n, <npy_complex128*>t, ldt, <npy_complex128*>q, ldq, ifst, ilst, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrrfs "F_FUNC(ztrrfs,ZTRRFS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *x, int *ldx, d *ferr, d *berr, npy_complex128 *work, d *rwork, int *info) nogil
|
||
|
|
cdef void ztrrfs(char *uplo, char *trans, char *diag, int *n, int *nrhs, z *a, int *lda, z *b, int *ldb, z *x, int *ldx, d *ferr, d *berr, z *work, d *rwork, int *info) nogil:
|
||
|
|
_fortran_ztrrfs(uplo, trans, diag, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>x, ldx, ferr, berr, <npy_complex128*>work, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrsen "F_FUNC(ztrsen,ZTRSEN)"(char *job, char *compq, bint *select, int *n, npy_complex128 *t, int *ldt, npy_complex128 *q, int *ldq, npy_complex128 *w, int *m, d *s, d *sep, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ztrsen(char *job, char *compq, bint *select, int *n, z *t, int *ldt, z *q, int *ldq, z *w, int *m, d *s, d *sep, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ztrsen(job, compq, select, n, <npy_complex128*>t, ldt, <npy_complex128*>q, ldq, <npy_complex128*>w, m, s, sep, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrsna "F_FUNC(ztrsna,ZTRSNA)"(char *job, char *howmny, bint *select, int *n, npy_complex128 *t, int *ldt, npy_complex128 *vl, int *ldvl, npy_complex128 *vr, int *ldvr, d *s, d *sep, int *mm, int *m, npy_complex128 *work, int *ldwork, d *rwork, int *info) nogil
|
||
|
|
cdef void ztrsna(char *job, char *howmny, bint *select, int *n, z *t, int *ldt, z *vl, int *ldvl, z *vr, int *ldvr, d *s, d *sep, int *mm, int *m, z *work, int *ldwork, d *rwork, int *info) nogil:
|
||
|
|
_fortran_ztrsna(job, howmny, select, n, <npy_complex128*>t, ldt, <npy_complex128*>vl, ldvl, <npy_complex128*>vr, ldvr, s, sep, mm, m, <npy_complex128*>work, ldwork, rwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrsyl "F_FUNC(ztrsyl,ZTRSYL)"(char *trana, char *tranb, int *isgn, int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, npy_complex128 *c, int *ldc, d *scale, int *info) nogil
|
||
|
|
cdef void ztrsyl(char *trana, char *tranb, int *isgn, int *m, int *n, z *a, int *lda, z *b, int *ldb, z *c, int *ldc, d *scale, int *info) nogil:
|
||
|
|
_fortran_ztrsyl(trana, tranb, isgn, m, n, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, <npy_complex128*>c, ldc, scale, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrti2 "F_FUNC(ztrti2,ZTRTI2)"(char *uplo, char *diag, int *n, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void ztrti2(char *uplo, char *diag, int *n, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_ztrti2(uplo, diag, n, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrtri "F_FUNC(ztrtri,ZTRTRI)"(char *uplo, char *diag, int *n, npy_complex128 *a, int *lda, int *info) nogil
|
||
|
|
cdef void ztrtri(char *uplo, char *diag, int *n, z *a, int *lda, int *info) nogil:
|
||
|
|
_fortran_ztrtri(uplo, diag, n, <npy_complex128*>a, lda, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrtrs "F_FUNC(ztrtrs,ZTRTRS)"(char *uplo, char *trans, char *diag, int *n, int *nrhs, npy_complex128 *a, int *lda, npy_complex128 *b, int *ldb, int *info) nogil
|
||
|
|
cdef void ztrtrs(char *uplo, char *trans, char *diag, int *n, int *nrhs, z *a, int *lda, z *b, int *ldb, int *info) nogil:
|
||
|
|
_fortran_ztrtrs(uplo, trans, diag, n, nrhs, <npy_complex128*>a, lda, <npy_complex128*>b, ldb, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrttf "F_FUNC(ztrttf,ZTRTTF)"(char *transr, char *uplo, int *n, npy_complex128 *a, int *lda, npy_complex128 *arf, int *info) nogil
|
||
|
|
cdef void ztrttf(char *transr, char *uplo, int *n, z *a, int *lda, z *arf, int *info) nogil:
|
||
|
|
_fortran_ztrttf(transr, uplo, n, <npy_complex128*>a, lda, <npy_complex128*>arf, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztrttp "F_FUNC(ztrttp,ZTRTTP)"(char *uplo, int *n, npy_complex128 *a, int *lda, npy_complex128 *ap, int *info) nogil
|
||
|
|
cdef void ztrttp(char *uplo, int *n, z *a, int *lda, z *ap, int *info) nogil:
|
||
|
|
_fortran_ztrttp(uplo, n, <npy_complex128*>a, lda, <npy_complex128*>ap, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_ztzrzf "F_FUNC(ztzrzf,ZTZRZF)"(int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void ztzrzf(int *m, int *n, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_ztzrzf(m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunbdb "F_FUNC(zunbdb,ZUNBDB)"(char *trans, char *signs, int *m, int *p, int *q, npy_complex128 *x11, int *ldx11, npy_complex128 *x12, int *ldx12, npy_complex128 *x21, int *ldx21, npy_complex128 *x22, int *ldx22, d *theta, d *phi, npy_complex128 *taup1, npy_complex128 *taup2, npy_complex128 *tauq1, npy_complex128 *tauq2, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunbdb(char *trans, char *signs, int *m, int *p, int *q, z *x11, int *ldx11, z *x12, int *ldx12, z *x21, int *ldx21, z *x22, int *ldx22, d *theta, d *phi, z *taup1, z *taup2, z *tauq1, z *tauq2, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunbdb(trans, signs, m, p, q, <npy_complex128*>x11, ldx11, <npy_complex128*>x12, ldx12, <npy_complex128*>x21, ldx21, <npy_complex128*>x22, ldx22, theta, phi, <npy_complex128*>taup1, <npy_complex128*>taup2, <npy_complex128*>tauq1, <npy_complex128*>tauq2, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zuncsd "F_FUNC(zuncsd,ZUNCSD)"(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, char *signs, int *m, int *p, int *q, npy_complex128 *x11, int *ldx11, npy_complex128 *x12, int *ldx12, npy_complex128 *x21, int *ldx21, npy_complex128 *x22, int *ldx22, d *theta, npy_complex128 *u1, int *ldu1, npy_complex128 *u2, int *ldu2, npy_complex128 *v1t, int *ldv1t, npy_complex128 *v2t, int *ldv2t, npy_complex128 *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *info) nogil
|
||
|
|
cdef void zuncsd(char *jobu1, char *jobu2, char *jobv1t, char *jobv2t, char *trans, char *signs, int *m, int *p, int *q, z *x11, int *ldx11, z *x12, int *ldx12, z *x21, int *ldx21, z *x22, int *ldx22, d *theta, z *u1, int *ldu1, z *u2, int *ldu2, z *v1t, int *ldv1t, z *v2t, int *ldv2t, z *work, int *lwork, d *rwork, int *lrwork, int *iwork, int *info) nogil:
|
||
|
|
_fortran_zuncsd(jobu1, jobu2, jobv1t, jobv2t, trans, signs, m, p, q, <npy_complex128*>x11, ldx11, <npy_complex128*>x12, ldx12, <npy_complex128*>x21, ldx21, <npy_complex128*>x22, ldx22, theta, <npy_complex128*>u1, ldu1, <npy_complex128*>u2, ldu2, <npy_complex128*>v1t, ldv1t, <npy_complex128*>v2t, ldv2t, <npy_complex128*>work, lwork, rwork, lrwork, iwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zung2l "F_FUNC(zung2l,ZUNG2L)"(int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zung2l(int *m, int *n, int *k, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zung2l(m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zung2r "F_FUNC(zung2r,ZUNG2R)"(int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zung2r(int *m, int *n, int *k, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zung2r(m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zungbr "F_FUNC(zungbr,ZUNGBR)"(char *vect, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zungbr(char *vect, int *m, int *n, int *k, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zungbr(vect, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunghr "F_FUNC(zunghr,ZUNGHR)"(int *n, int *ilo, int *ihi, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunghr(int *n, int *ilo, int *ihi, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunghr(n, ilo, ihi, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zungl2 "F_FUNC(zungl2,ZUNGL2)"(int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zungl2(int *m, int *n, int *k, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zungl2(m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunglq "F_FUNC(zunglq,ZUNGLQ)"(int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunglq(int *m, int *n, int *k, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunglq(m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zungql "F_FUNC(zungql,ZUNGQL)"(int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zungql(int *m, int *n, int *k, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zungql(m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zungqr "F_FUNC(zungqr,ZUNGQR)"(int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zungqr(int *m, int *n, int *k, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zungqr(m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zungr2 "F_FUNC(zungr2,ZUNGR2)"(int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zungr2(int *m, int *n, int *k, z *a, int *lda, z *tau, z *work, int *info) nogil:
|
||
|
|
_fortran_zungr2(m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zungrq "F_FUNC(zungrq,ZUNGRQ)"(int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zungrq(int *m, int *n, int *k, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zungrq(m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zungtr "F_FUNC(zungtr,ZUNGTR)"(char *uplo, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zungtr(char *uplo, int *n, z *a, int *lda, z *tau, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zungtr(uplo, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunm2l "F_FUNC(zunm2l,ZUNM2L)"(char *side, char *trans, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zunm2l(char *side, char *trans, int *m, int *n, int *k, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *info) nogil:
|
||
|
|
_fortran_zunm2l(side, trans, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunm2r "F_FUNC(zunm2r,ZUNM2R)"(char *side, char *trans, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zunm2r(char *side, char *trans, int *m, int *n, int *k, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *info) nogil:
|
||
|
|
_fortran_zunm2r(side, trans, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmbr "F_FUNC(zunmbr,ZUNMBR)"(char *vect, char *side, char *trans, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunmbr(char *vect, char *side, char *trans, int *m, int *n, int *k, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunmbr(vect, side, trans, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmhr "F_FUNC(zunmhr,ZUNMHR)"(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunmhr(char *side, char *trans, int *m, int *n, int *ilo, int *ihi, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunmhr(side, trans, m, n, ilo, ihi, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunml2 "F_FUNC(zunml2,ZUNML2)"(char *side, char *trans, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zunml2(char *side, char *trans, int *m, int *n, int *k, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *info) nogil:
|
||
|
|
_fortran_zunml2(side, trans, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmlq "F_FUNC(zunmlq,ZUNMLQ)"(char *side, char *trans, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunmlq(char *side, char *trans, int *m, int *n, int *k, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunmlq(side, trans, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmql "F_FUNC(zunmql,ZUNMQL)"(char *side, char *trans, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunmql(char *side, char *trans, int *m, int *n, int *k, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunmql(side, trans, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmqr "F_FUNC(zunmqr,ZUNMQR)"(char *side, char *trans, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunmqr(char *side, char *trans, int *m, int *n, int *k, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunmqr(side, trans, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmr2 "F_FUNC(zunmr2,ZUNMR2)"(char *side, char *trans, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zunmr2(char *side, char *trans, int *m, int *n, int *k, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *info) nogil:
|
||
|
|
_fortran_zunmr2(side, trans, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmr3 "F_FUNC(zunmr3,ZUNMR3)"(char *side, char *trans, int *m, int *n, int *k, int *l, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zunmr3(char *side, char *trans, int *m, int *n, int *k, int *l, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *info) nogil:
|
||
|
|
_fortran_zunmr3(side, trans, m, n, k, l, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmrq "F_FUNC(zunmrq,ZUNMRQ)"(char *side, char *trans, int *m, int *n, int *k, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunmrq(char *side, char *trans, int *m, int *n, int *k, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunmrq(side, trans, m, n, k, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmrz "F_FUNC(zunmrz,ZUNMRZ)"(char *side, char *trans, int *m, int *n, int *k, int *l, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunmrz(char *side, char *trans, int *m, int *n, int *k, int *l, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunmrz(side, trans, m, n, k, l, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zunmtr "F_FUNC(zunmtr,ZUNMTR)"(char *side, char *uplo, char *trans, int *m, int *n, npy_complex128 *a, int *lda, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *lwork, int *info) nogil
|
||
|
|
cdef void zunmtr(char *side, char *uplo, char *trans, int *m, int *n, z *a, int *lda, z *tau, z *c, int *ldc, z *work, int *lwork, int *info) nogil:
|
||
|
|
_fortran_zunmtr(side, uplo, trans, m, n, <npy_complex128*>a, lda, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, lwork, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zupgtr "F_FUNC(zupgtr,ZUPGTR)"(char *uplo, int *n, npy_complex128 *ap, npy_complex128 *tau, npy_complex128 *q, int *ldq, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zupgtr(char *uplo, int *n, z *ap, z *tau, z *q, int *ldq, z *work, int *info) nogil:
|
||
|
|
_fortran_zupgtr(uplo, n, <npy_complex128*>ap, <npy_complex128*>tau, <npy_complex128*>q, ldq, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
cdef extern from "_lapack_subroutines.h":
|
||
|
|
void _fortran_zupmtr "F_FUNC(zupmtr,ZUPMTR)"(char *side, char *uplo, char *trans, int *m, int *n, npy_complex128 *ap, npy_complex128 *tau, npy_complex128 *c, int *ldc, npy_complex128 *work, int *info) nogil
|
||
|
|
cdef void zupmtr(char *side, char *uplo, char *trans, int *m, int *n, z *ap, z *tau, z *c, int *ldc, z *work, int *info) nogil:
|
||
|
|
_fortran_zupmtr(side, uplo, trans, m, n, <npy_complex128*>ap, <npy_complex128*>tau, <npy_complex128*>c, ldc, <npy_complex128*>work, info)
|
||
|
|
|
||
|
|
|
||
|
|
# Python accessible wrappers for testing:
|
||
|
|
|
||
|
|
def _test_dlamch(cmach):
|
||
|
|
# This conversion is necessary to handle Python 3 strings.
|
||
|
|
cmach_bytes = bytes(cmach)
|
||
|
|
# Now that it is a bytes representation, a non-temporary variable
|
||
|
|
# must be passed as a part of the function call.
|
||
|
|
cdef char* cmach_char = cmach_bytes
|
||
|
|
return dlamch(cmach_char)
|
||
|
|
|
||
|
|
def _test_slamch(cmach):
|
||
|
|
# This conversion is necessary to handle Python 3 strings.
|
||
|
|
cmach_bytes = bytes(cmach)
|
||
|
|
# Now that it is a bytes representation, a non-temporary variable
|
||
|
|
# must be passed as a part of the function call.
|
||
|
|
cdef char* cmach_char = cmach_bytes
|
||
|
|
return slamch(cmach_char)
|