(* OCaml compatibility *)
let print_string (s: string) = System.Console.Write s

let string_of_int i = sprintf "%i" i

module Hashtbl =
  let hash o = o.GetHashCode()

(* /OCaml compatibility *)

(* CSE P505, Autumn 2016, Homework 0 *)

(* Change the next line to have your name *)
let your_name = "Dan Grossman"

let hashed_name = Hashtbl.hash your_name

let _ = print_string ((string_of_int hashed_name) + "\n")

(* Replace the integer constant on the next line so you print true *)
let test_result = (hashed_name = 12345)

let _ = print_string (if test_result then "true\n" else "false\n")