A mathematical model for the early diagenesis of phosphorus and fluorine in marine sediments; apatite precipitation