import Data.Bits (xor)
import Data.Bool (bool)

main :: IO ()
main = do
    s <- getLine
    answer $ solve s

type Answer = Bool
answer :: Answer -> IO ()
answer = putStrLn . bool "First" "Second"

solve :: String -> Answer
solve = last . flip (zipWith . ((.) xor . (==)) . head <*> id) (iterate not False)
