{{Configuring shared daemons with respect to a particular Internet domain name}}

extern type ip;
{{An IP address}}

extern type host;
{{A hostname; that is, (more or less) an alphanumeric string}}

extern type domain;
{{An Internet domain name}}

context Domain;
{{Configuration directives specific to an Internet domain}}

extern type serial;
{{Domain zone serial numbers}}
extern val serialAuto : serial;
{{Whenever DNS data changes, choose a sensible serial number automatically.}
extern val serialConst : int -> serial;
{{Use this particular serial number.}}

extern type soa;
{{DNS start-of-authority record}}
extern val soa : domain -> serial -> int -> int -> int -> int -> soa;

extern type dnsKind;
{{How should DNS for this domain be handled?}}
extern val master : soa -> dnsKind;
extern val slave : soa -> dnsKind;
extern val noDns : dnsKind;

extern val domain : domain -> Domain => [Root] {DNS : dnsKind, TTL : int};
{{Configure a domain to which you have access rights.}}