eCDF (stat_ecdf) adding maximum distance line between two eCDFs

Question

How can I add the maximum distance line (D-max) between the eCDFs of two samples in ggplot?

ggplot(data, aes(x = value)) +
  stat_ecdf(aes(color = type,linetype =