! -*- f77 -*- ! Note: the context of this file is case sensitive. python module zgexpv ! in interface ! in :zgexpv subroutine zgexpv(n,m,t,v,w,tol,anorm,wsp,lwsp,iwsp,liwsp,itrace,iflag) ! in :zgexpv:zgexpv.f integer :: n integer :: m double precision :: t complex*16 dimension(n) :: v complex*16 dimension(n),depend(n),intent(out) :: w double precision :: tol double precision :: anorm complex*16 dimension(lwsp) :: wsp integer depend(wsp) :: lwsp integer dimension(liwsp) :: iwsp integer depend(iwsp) :: liwsp integer :: itrace integer :: iflag end subroutine zgexpv subroutine zgcoov(x,y) ! in :zgexpv:zgexpv.f integer :: n complex*16 dimension(*) :: x complex*16 dimension(*) :: y complex*16 dimension(50000) :: a integer dimension(50000) :: ia integer dimension(50000) :: ja integer :: nz common /cmat/ a,ia,ja,nz,n end subroutine zgcoov end interface end python module zgexpv ! This file was auto-generated with f2py (version:2). ! See http://cens.ioc.ee/projects/f2py2e/