Am_Ops.Int64_as

struct

    let ( +. ) = Int64.add

    let ( -. ) = Int64.sub

    let ( *. ) = Int64.mul

    let ( /. ) = Int64.div

    let ( ~-. ) = Int64.neg

  end