Action of the Liouville equation is a generating function for the accessory parameters and the potential of the Weil—Petersson metric on the Teichmüller space