Modelling infragravity motions on a rip-channel beach