using System;
using System.Linq;
using System.Collections.Generic;
using System.Security.Cryptography;
 
public class Test
{
 
	private static IEnumerable<object> Cycle(object value=null)
	{
	    while (true)
	    {
	        yield return value;
	    }
	}
 
	private static IEnumerable<byte> RandomBytes(int chunkSize)
	{
	    return Cycle().SelectMany(unused =>
	    {
	        var b = new byte[chunkSize];
	        new RNGCryptoServiceProvider().GetBytes(b);
	        return b;
	    });
	}
 
	private static IEnumerable<int> RandomWrap(int chunkSize, int limit)
	{
		int prev = 0;
        foreach (byte b in RandomBytes(chunkSize))
        {
        	prev = (prev + b) % limit;
        	yield return prev;
        }
 
	}
 
	private static IEnumerable<int> RandomFilter(int chunkSize, int limit)
	{
	    return RandomBytes(chunkSize).Where(n => n < limit).Select(n => (int)n);
	}
 
	private static IEnumerable<int> RandomModulo(int chunkSize, int limit)
	{
	    return RandomBytes(chunkSize).Select(n => n % limit);
	}
 
	private static IEnumerable<int> RandomResize(int chunkSize, int limit)
	{
	    var denom = 256.0/limit;
	    return RandomBytes(chunkSize).Select(n => (int)(n / denom));
	}
 
	private static void TestDistribution(int limit, int amount, int chunkSize, Func<int, int, IEnumerable<int>> fn)
	{
	    var counter = new Dictionary<int, int>();
	    foreach (var i in Enumerable.Range(0, limit))
	    {
	        counter[i] = 0;
	    }
 
	    foreach (var i in fn(chunkSize, limit).Take(amount))
	    {
	        counter[i] += 1;
	    }
	    Console.WriteLine($"{limit} {amount} {chunkSize} {counter.Select(kv => kv.Value).Aggregate(0, (acc, x) => acc + x)}");
	    Console.WriteLine(string.Join(", ", from kv in counter select $"{kv.Key}"));
	    Console.WriteLine(string.Join(", ", from kv in counter select $"{kv.Value}"));
	    Console.WriteLine();
 
	}
 
	private static void Main()
	{
		Console.WriteLine("Wrap");
	    TestDistribution(45, 100000, 100, RandomWrap);
	    TestDistribution(32, 100000, 100, RandomWrap);
	    Console.WriteLine();
 
		Console.WriteLine("Filter");
	    TestDistribution(45, 100000, 100, RandomFilter);
	    TestDistribution(32, 100000, 100, RandomFilter);
	    Console.WriteLine();
 
		Console.WriteLine("Modulo");
	    TestDistribution(45, 100000, 100, RandomModulo);
	    TestDistribution(32, 100000, 100, RandomModulo);
	    Console.WriteLine();
 
		Console.WriteLine("Resize");
	    TestDistribution(45, 100000, 100, RandomResize);
	    TestDistribution(32, 100000, 100, RandomResize);
	    Console.ReadLine();
	}
 
}

dXNpbmcgU3lzdGVtOwp1c2luZyBTeXN0ZW0uTGlucTsKdXNpbmcgU3lzdGVtLkNvbGxlY3Rpb25zLkdlbmVyaWM7CnVzaW5nIFN5c3RlbS5TZWN1cml0eS5DcnlwdG9ncmFwaHk7CgpwdWJsaWMgY2xhc3MgVGVzdAp7CgoJcHJpdmF0ZSBzdGF0aWMgSUVudW1lcmFibGU8b2JqZWN0PiBDeWNsZShvYmplY3QgdmFsdWU9bnVsbCkKCXsKCSAgICB3aGlsZSAodHJ1ZSkKCSAgICB7CgkgICAgICAgIHlpZWxkIHJldHVybiB2YWx1ZTsKCSAgICB9Cgl9CgkKCXByaXZhdGUgc3RhdGljIElFbnVtZXJhYmxlPGJ5dGU+IFJhbmRvbUJ5dGVzKGludCBjaHVua1NpemUpCgl7CgkgICAgcmV0dXJuIEN5Y2xlKCkuU2VsZWN0TWFueSh1bnVzZWQgPT4KCSAgICB7CgkgICAgICAgIHZhciBiID0gbmV3IGJ5dGVbY2h1bmtTaXplXTsKCSAgICAgICAgbmV3IFJOR0NyeXB0b1NlcnZpY2VQcm92aWRlcigpLkdldEJ5dGVzKGIpOwoJICAgICAgICByZXR1cm4gYjsKCSAgICB9KTsKCX0KCglwcml2YXRlIHN0YXRpYyBJRW51bWVyYWJsZTxpbnQ+IFJhbmRvbVdyYXAoaW50IGNodW5rU2l6ZSwgaW50IGxpbWl0KQoJewoJCWludCBwcmV2ID0gMDsKICAgICAgICBmb3JlYWNoIChieXRlIGIgaW4gUmFuZG9tQnl0ZXMoY2h1bmtTaXplKSkKICAgICAgICB7CiAgICAgICAgCXByZXYgPSAocHJldiArIGIpICUgbGltaXQ7CiAgICAgICAgCXlpZWxkIHJldHVybiBwcmV2OwogICAgICAgIH0KCQkKCX0KCQoJcHJpdmF0ZSBzdGF0aWMgSUVudW1lcmFibGU8aW50PiBSYW5kb21GaWx0ZXIoaW50IGNodW5rU2l6ZSwgaW50IGxpbWl0KQoJewoJICAgIHJldHVybiBSYW5kb21CeXRlcyhjaHVua1NpemUpLldoZXJlKG4gPT4gbiA8IGxpbWl0KS5TZWxlY3QobiA9PiAoaW50KW4pOwoJfQoKCXByaXZhdGUgc3RhdGljIElFbnVtZXJhYmxlPGludD4gUmFuZG9tTW9kdWxvKGludCBjaHVua1NpemUsIGludCBsaW1pdCkKCXsKCSAgICByZXR1cm4gUmFuZG9tQnl0ZXMoY2h1bmtTaXplKS5TZWxlY3QobiA9PiBuICUgbGltaXQpOwoJfQoJCglwcml2YXRlIHN0YXRpYyBJRW51bWVyYWJsZTxpbnQ+IFJhbmRvbVJlc2l6ZShpbnQgY2h1bmtTaXplLCBpbnQgbGltaXQpCgl7CgkgICAgdmFyIGRlbm9tID0gMjU2LjAvbGltaXQ7CgkgICAgcmV0dXJuIFJhbmRvbUJ5dGVzKGNodW5rU2l6ZSkuU2VsZWN0KG4gPT4gKGludCkobiAvIGRlbm9tKSk7Cgl9CgkKCXByaXZhdGUgc3RhdGljIHZvaWQgVGVzdERpc3RyaWJ1dGlvbihpbnQgbGltaXQsIGludCBhbW91bnQsIGludCBjaHVua1NpemUsIEZ1bmM8aW50LCBpbnQsIElFbnVtZXJhYmxlPGludD4+IGZuKQoJewoJICAgIHZhciBjb3VudGVyID0gbmV3IERpY3Rpb25hcnk8aW50LCBpbnQ+KCk7CgkgICAgZm9yZWFjaCAodmFyIGkgaW4gRW51bWVyYWJsZS5SYW5nZSgwLCBsaW1pdCkpCgkgICAgewoJICAgICAgICBjb3VudGVyW2ldID0gMDsKCSAgICB9CgkKCSAgICBmb3JlYWNoICh2YXIgaSBpbiBmbihjaHVua1NpemUsIGxpbWl0KS5UYWtlKGFtb3VudCkpCgkgICAgewoJICAgICAgICBjb3VudGVyW2ldICs9IDE7CgkgICAgfQoJICAgIENvbnNvbGUuV3JpdGVMaW5lKCQie2xpbWl0fSB7YW1vdW50fSB7Y2h1bmtTaXplfSB7Y291bnRlci5TZWxlY3Qoa3YgPT4ga3YuVmFsdWUpLkFnZ3JlZ2F0ZSgwLCAoYWNjLCB4KSA9PiBhY2MgKyB4KX0iKTsKCSAgICBDb25zb2xlLldyaXRlTGluZShzdHJpbmcuSm9pbigiLCAiLCBmcm9tIGt2IGluIGNvdW50ZXIgc2VsZWN0ICQie2t2LktleX0iKSk7CgkgICAgQ29uc29sZS5Xcml0ZUxpbmUoc3RyaW5nLkpvaW4oIiwgIiwgZnJvbSBrdiBpbiBjb3VudGVyIHNlbGVjdCAkIntrdi5WYWx1ZX0iKSk7CgkgICAgQ29uc29sZS5Xcml0ZUxpbmUoKTsKCQoJfQoJCglwcml2YXRlIHN0YXRpYyB2b2lkIE1haW4oKQoJewoJCUNvbnNvbGUuV3JpdGVMaW5lKCJXcmFwIik7CgkgICAgVGVzdERpc3RyaWJ1dGlvbig0NSwgMTAwMDAwLCAxMDAsIFJhbmRvbVdyYXApOwoJICAgIFRlc3REaXN0cmlidXRpb24oMzIsIDEwMDAwMCwgMTAwLCBSYW5kb21XcmFwKTsKCSAgICBDb25zb2xlLldyaXRlTGluZSgpOwoJCgkJQ29uc29sZS5Xcml0ZUxpbmUoIkZpbHRlciIpOwoJICAgIFRlc3REaXN0cmlidXRpb24oNDUsIDEwMDAwMCwgMTAwLCBSYW5kb21GaWx0ZXIpOwoJICAgIFRlc3REaXN0cmlidXRpb24oMzIsIDEwMDAwMCwgMTAwLCBSYW5kb21GaWx0ZXIpOwoJICAgIENvbnNvbGUuV3JpdGVMaW5lKCk7CgkKCQlDb25zb2xlLldyaXRlTGluZSgiTW9kdWxvIik7CgkgICAgVGVzdERpc3RyaWJ1dGlvbig0NSwgMTAwMDAwLCAxMDAsIFJhbmRvbU1vZHVsbyk7CgkgICAgVGVzdERpc3RyaWJ1dGlvbigzMiwgMTAwMDAwLCAxMDAsIFJhbmRvbU1vZHVsbyk7CgkgICAgQ29uc29sZS5Xcml0ZUxpbmUoKTsKCQoJCUNvbnNvbGUuV3JpdGVMaW5lKCJSZXNpemUiKTsKCSAgICBUZXN0RGlzdHJpYnV0aW9uKDQ1LCAxMDAwMDAsIDEwMCwgUmFuZG9tUmVzaXplKTsKCSAgICBUZXN0RGlzdHJpYnV0aW9uKDMyLCAxMDAwMDAsIDEwMCwgUmFuZG9tUmVzaXplKTsKCSAgICBDb25zb2xlLlJlYWRMaW5lKCk7Cgl9Cgp9