import Control.Applicative

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

main :: IO ()
main = do
    [s, w] <- map read . words <$> getLine
    putStrLn $ result s w