Imports System.Collections.Generic
Imports System.Console
Imports System.Math  
Module Program
 	Sub Main()
        Dim input() As String = Console.ReadLine().Split(" ")
        Dim a As String = input(0)
        Dim b As String  = input(1)
        Console.WriteLine(IIF(a=b, "H", "D"))
    End Sub
End Module
