A quasi-Hamiltonian discretization of the thermal shallow water equations. - Christopher Eldred; Thomas Dubos; Evaggelos Kritsikis (J. Comput. Phys., 2019)