! -*- f90 -*- ! This file is autogenerated with f2py (version:1.26.2) ! It contains Fortran 90 wrappers to fortran functions. subroutine f2pywrapset_interact_ (interact, f2py_interact_d0, f2py& &_interact_d1) use typedef, only: real64 use parameters, only: set_interact integer f2py_interact_d0 integer f2py_interact_d1 real(kind=real64) interact(f2py_interact_d0,f2py_interact_d1) interface subroutine set_interact_(interact) use typedef, only: real64 use parameters, only: set_interact real(kind=real64), intent(in),dimension(:,:) :: interact end subroutine set_interact_ end interface call set_interact_(interact) end subroutine f2pywrapset_cutoff_ (cutoff, f2py_cutoff_d0) use typedef, only: real64 use parameters, only: set_cutoff integer f2py_cutoff_d0 real(kind=real64) cutoff(f2py_cutoff_d0) interface subroutine set_cutoff_(cutoff) use typedef, only: real64 use parameters, only: set_cutoff real(kind=real64), intent(in),dimension(:) :: cutoff end subroutine set_cutoff_ end interface call set_cutoff_(cutoff) end subroutine f2pywrapadd_stardata_ (data, t0, id, f2py_data_d0, f2py& &_data_d1) use typedef, only: real64,int64 use stardata, only: add_stardata,random_stardata_id real(kind=real64) t0 integer(kind=int64) id integer f2py_data_d0 integer f2py_data_d1 real(kind=real64) data(f2py_data_d0,f2py_data_d1) interface subroutine add_stardata_(data,t0,id) use typedef, only: real64,int64 use stardata, only: add_stardata,random_stardata_id real(kind=real64), intent(in),dimension(:,:) :: data real(kind=real64), intent(in) :: t0 integer(kind=int64), intent(out) :: id end subroutine add_stardata_ end interface call add_stardata_(data, t0, id) end