Geochemical modelling of diagenetic reactions in a sub-arkosic sandstone