let () =
  let s = Scanf.scanf "%s " (fun a -> a) in
  let l = Batteries.String.to_list s in

  let t1 = Batteries.List.filteri (fun i x -> i mod 2 = 0) l in
  let t2 = Batteries.List.filteri (fun i x -> i mod 2 <> 0) l in

  Printf.printf "%s\n" @@
  if (
    (
      List.sort_uniq compare t1 |> List.length = 1
    ) 
    &&
      (
        List.sort_uniq compare t2 |> List.length = 1
      )
  )
  then "Second"
  else if List.length l mod 2 = 0 then "Second" else "First"

