open Functoria.DSL

type arpv4

val arpv4 : arpv4 typ
val arp : Ethernet.ethernet impl -> arpv4 impl