!    -*- f90 -*-
! Note: the context of this file is case sensitive.

python module fitacf_acf2 ! in 
    interface  ! in :fitacf_acf2
        subroutine acf2(wl,tau,te1,ti1,fi1,ven1,vin1,wi1,nion1,alpha1,dens1,bfld1,acf) ! in :fitacf_acf2:fitacf.f
            real intent(in):: wl
            real intent(in):: tau
            real intent(in):: te1
            real intent(in),dimension(nion1) :: ti1
            real intent(in),dimension(nion1),depend(nion1) :: fi1
            real intent(in):: ven1
            real intent(in),dimension(nion1),depend(nion1) :: vin1
            integer intent(in),dimension(nion1),depend(nion1) :: wi1
            integer intent(in), optional,check(len(ti1)>=nion1),depend(ti1) :: nion1=len(ti1)
            real intent(in):: alpha1
            real intent(in):: dens1
            real intent(in):: bfld1
            real intent(in,out):: acf
            real :: te
            real dimension(10) :: ti
            real dimension(10) :: fi
            real :: ven
            real dimension(10) :: vin
            real :: alpha
            real :: dens
            real :: bfld
            integer :: nion
            integer dimension(10) :: wi
            real :: ak
            common /spec/ te,ti,fi,ven,vin,alpha,dens,bfld,nion,wi,ak
        end subroutine acf2
        function spect1(omega) ! in :fitacf_fit_short:fitacf.f
            real :: omega
            real :: te
            real dimension(10) :: ti
            real dimension(10) :: fi
            real :: ven
            real dimension(10) :: vin
            real :: alpha
            real :: dens
            real :: bfld
            integer :: nion
            integer dimension(10) :: wi
            real :: ak
            integer :: imode
            real :: spect1
            common /spec/ te,ti,fi,ven,vin,alpha,dens,bfld,nion,wi,ak
            common /mode/ imode
        end function spect1
        subroutine gaussq(tau,acf) ! in :fitacf_fit_short:fitacf.f
            real :: tau
            real :: acf
            real :: te
            real dimension(10) :: ti
            real dimension(10) :: fi
            real :: ven
            real dimension(10) :: vin
            real :: alpha
            real :: dens
            real :: bfld
            integer :: nion
            integer dimension(10) :: wi
            real :: ak
            common /spec/ te,ti,fi,ven,vin,alpha,dens,bfld,nion,wi,ak
    end interface 
end python module fitacf_acf2

! This file was auto-generated with f2py (version:2).
! See http://cens.ioc.ee/projects/f2py2e/