sig
  val valid_ip : string -> bool
  val ip_in_net : string -> string -> bool
  val is_subnet : string -> string -> bool
  val is_host : string -> bool
  val get_hostpart : string -> string
  val get_network : string -> string
  val get_netmask : string -> string
  val get_broadcast : string -> string
  val long_mask : string -> string
  val short_mask : string -> string
end