module energy_vs_time_interface
  
   interface
      subroutine get_data_from_END_phase_space(dir_file,muon_alive, n_left)
      use energy_vs_time_mod
!      use energy_vs_time_interface
      implicit none
  
    type(muon_alive_struct), allocatable :: muon_alive(:)
    character*300 dir_file
    integer n_left
  end subroutine get_data_from_END_phase_space
end interface

interface
  
  subroutine fit_line(muon_save, k, slope, offset)
    use energy_vs_time_mod    
!    use energy_vs_time_interface
    implicit none
    type(muon_alive_struct), allocatable :: muon_save(:)
    real(rp) slope, offset
    integer k
  end subroutine fit_line
end interface

interface
    subroutine find_all_files(dir_list , phase_space_file,ix, all_there)
      use sim_utils
      implicit none
      character*(*) dir_list
      character*300, allocatable ::phase_space_file(:)
      character*100 name(200)
      integer i, ix,j, tot_files,lun
      integer reason
      logical all_there
    end subroutine find_all_files
end interface

  end module energy_vs_time_interface