N record subtlety about ferret HOT 1 CLOSED

      public void TestZoneValidity()
        {
            var function = Function<Zone, bool>(ZoneExtensions.IsValidZoneForRRLookup);

            var soa = new ResourceRecord
            {
                RName = new DomainName { Value = new List<byte> { 0, 2 } },
                RType = RecordType.SOA,
                RData = new DomainName { Value = new List<byte> { } },
            };

            var ns = new ResourceRecord
            {
                RName = new DomainName { Value = new List<byte> { 0, 2 } },
                RType = RecordType.NS,
                RData = new DomainName { Value = new List<byte> { 6, 7, 8 } },
            };

            var wildcard = new ResourceRecord
            {
                RName = new DomainName { Value = new List<byte> { 0, 2, 1 } },
                RType = RecordType.A,
                RData = new DomainName { Value = new List<byte> { } },
            };

            var wildcard1 = new ResourceRecord
            {
                RName = new DomainName { Value = new List<byte> { 0, 2, 1, 4 } },
                RType = RecordType.A,
                RData = new DomainName { Value = new List<byte> { } },
            };

            var zn = new Zone { Records = new List<ResourceRecord> { soa, ns, wildcard, wildcard1 } };
            Assert.IsTrue(function.Evaluate(zn));

            var relevant = Function<Query, Zone, IList<ResourceRecord>>(ServerModel.GetRelevantRRs);
            var result = relevant.Evaluate(new Query { QName = new DomainName { Value = new List<byte> { 0, 2, 1, 5 } }, QType = RecordType.A }, zn);
            Assert.IsTrue(result.Count() == 1);
            Assert.IsTrue(wildcard.Equals(result.First()));

            var serverfunction = Function<Query, Zone, Option<Response>>(ServerModel.ServerLookup);
            var response = serverfunction.Evaluate(new Query { QName = new DomainName { Value = new List<byte> { 0, 2, 1, 5 } }, QType = RecordType.A }, zn);
            Assert.IsTrue(response.HasValue);
            var v = response.Value;
            Assert.IsTrue(v.ResTag == Tag.R2);
        }