struct
  include Core.Std.Filename

  module Infix = struct
    let (/) = concat
  end
end