let main () =
  let s = Scanf.scanf "%s" Batteries.identity in
  let i = BatString.fold_left (fun acc elm -> if Char.equal elm '1' then acc + 1 else acc) 0 s in
  Printf.printf "%d\n" i

let _ = main ()
