module cbar_mod

  ! This is to suppress the ranlib "has no symbols" message
  integer, private :: private_dummy

  interface
     subroutine cbar_v_e (lat_in, ele_names, slopes)
       use bmad_struct, only: lat_struct, rp
       implicit none
       type (lat_struct)  lat_in
       real(rp) slopes(4)
       character(40) ele_names(4)
     end subroutine cbar_v_e
  end interface
end module cbar_mod