myCompare a b
    | a == b = 0
    | otherwise = div (a - b) $ abs (a - b)

f [a, b]
    | mc == 1 = "G"
    | mc == 0 = "E"
    | otherwise = "L"
    where mc = myCompare a b

main = interact $ unlines . fmap (f . fmap read . words) .
                    tail . lines