An absorbing boundary condition for wave-current flow simulations in maritime applications