A coupling algorithm for high order solids and lattice Boltzmann fluid solvers