main = do
    [s, w] <- map readAsInt . words <$> getLine
    print $ solve s w

readAsInt :: String -> Int
readAsInt = read

solve :: Int -> Int -> String
solve s w
    | s <= w    = "unsafe"
    | otherwise = "safe"