Dan Mannock dmannock

## fsharp_csharp_object_comparison.fs
// store a value on an immutable object, read it and print out
// F# valid program
type A = { Simples: string }
let a = { Simples = "this is nice" }
a.Simples |> printfn "%s"

// C# also does this o.O
public class MoarBrackets {
    public readonly string Value;

## meetup_manc-haskell-group_introduction_notes_2018-07-05.txt
manchester haskell group 2018-07-05 First meetup (Ziferblat meeting room)
very quick notes - maybe useful?

good turnout (10 out of 14)!

attendees (in order left-to-right round the table):
adrian
yunis (obvs organiser)
dan (me)
steven?

## keybase.md

      
              1 file
            
          
              0 forks
            
          
              0 comments
            
          
              0 stars
            
          
                dmannock
                / keybase.md
            
            
              Created
              March 17, 2018 11:53
            
              
                Keybase Verify
              
          
    Keybase proof

I hereby claim:

I am dmannock on github.
I am dmannock (https://keybase.io/dmannock) on keybase.
I have a public key ASCZ4EPZcBAccfUv4uT3ywVplpFmQbIMs8I_1uEWOE9lZgo

To claim this, I am signing this object:

  
## Bacon_pancakes_infinite_repeat_version.html
<!DOCTYPE html>
<html>
<head>
  <script src="https://cdnjs.cloudflare.com/ajax/libs/bacon.js/0.7.58/Bacon.js"></script>
  <meta charset="utf-8">
  <meta name="viewport" content="width=device-width">
  <title>Bacon Pancakes js Bin</title>
</head>
<body>
  <div id="containsBacon"></div>

## GenericTypeFromType.cs
private Type TypeGroup
{
 get
 {
   if (Type.IsGenericType && !Type.IsGenericTypeDefinition)
       return Type.GetGenericTypeDefinition();
   return Type;
 }
}

## callbackChainer.js

function wrap(call, cb) {
  var args = [];
  for (var i=1; i < call.args.length; i++) {
    args.push(call.args[i]);
  }
  var thiscb = cb;

  return function() {
    var argsLen = arguments.length;

## DelegateAdjuster.cs
    public class DelegateAdjuster
    {
        public static Action<BaseT> CastArgument<BaseT, DerivedT>(Expression<Action<DerivedT>> source) where DerivedT : BaseT
        {
            if (typeof(DerivedT) == typeof(BaseT))
            {
                return (Action<BaseT>)((Delegate)source.Compile());

            }
            ParameterExpression sourceParameter = Expression.Parameter(typeof(BaseT), "source");

## CommandThrottler.cs
    public class CommandThrottler
    {
        private static readonly Dictionary<Type, object> observables = new Dictionary<Type, object>();

        public static readonly TimeSpan DefaultThrottle = TimeSpan.FromMilliseconds(500);
        public static readonly TimeSpan SmallThrottle = TimeSpan.FromMilliseconds(200);
        public static readonly TimeSpan LargeThrottle = TimeSpan.FromSeconds(1);
        public static readonly TimeSpan None = TimeSpan.Zero;

        private IServiceBus _bus;

## ServiceProxy.cs
    public class ServiceProxy
    {

        public static TimeSpan Timeout { get; protected set; }

        public ServiceProxy()
        {
            Timeout = TimeSpan.FromSeconds(10);
        }

## DynamicToDictionaryHelper.cs
    public static class DynamicHelpers
    {
        public static Dictionary<TKey, TValue> ToDictionary<TKey, TValue>(dynamic dyn)
        {
            Dictionary<TKey, TValue> output = new Dictionary<TKey, TValue>();

            foreach (var kvp in dyn as IDictionary<TKey, object>)
            {
                output.Add(
                    (TKey)Convert.ChangeType(kvp.Key, typeof(TKey)),
	// store a value on an immutable object, read it and print out
	// F# valid program
	type A = { Simples: string }
	let a = { Simples = "this is nice" }
	a.Simples \|> printfn "%s"

	// C# also does this o.O
	public class MoarBrackets {
	public readonly string Value;
	manchester haskell group 2018-07-05 First meetup (Ziferblat meeting room)
	very quick notes - maybe useful?

	good turnout (10 out of 14)!

	attendees (in order left-to-right round the table):
	adrian
	yunis (obvs organiser)
	dan (me)
	steven?
	<!DOCTYPE html>
	<html>
	<head>
	<script src="https://cdnjs.cloudflare.com/ajax/libs/bacon.js/0.7.58/Bacon.js"></script>
	<meta charset="utf-8">
	<meta name="viewport" content="width=device-width">
	<title>Bacon Pancakes js Bin</title>
	</head>
	<body>
	<div id="containsBacon"></div>
	private Type TypeGroup
	{
	get
	{
	if (Type.IsGenericType && !Type.IsGenericTypeDefinition)
	return Type.GetGenericTypeDefinition();
	return Type;
	}
	}

	function wrap(call, cb) {
	var args = [];
	for (var i=1; i < call.args.length; i++) {
	args.push(call.args[i]);
	}
	var thiscb = cb;

	return function() {
	var argsLen = arguments.length;
	public class DelegateAdjuster
	{
	public static Action<BaseT> CastArgument<BaseT, DerivedT>(Expression<Action<DerivedT>> source) where DerivedT : BaseT
	{
	if (typeof(DerivedT) == typeof(BaseT))
	{
	return (Action<BaseT>)((Delegate)source.Compile());

	}
	ParameterExpression sourceParameter = Expression.Parameter(typeof(BaseT), "source");
	public class CommandThrottler
	{
	private static readonly Dictionary<Type, object> observables = new Dictionary<Type, object>();

	public static readonly TimeSpan DefaultThrottle = TimeSpan.FromMilliseconds(500);
	public static readonly TimeSpan SmallThrottle = TimeSpan.FromMilliseconds(200);
	public static readonly TimeSpan LargeThrottle = TimeSpan.FromSeconds(1);
	public static readonly TimeSpan None = TimeSpan.Zero;

	private IServiceBus _bus;
	public class ServiceProxy
	{

	public static TimeSpan Timeout { get; protected set; }

	public ServiceProxy()
	{
	Timeout = TimeSpan.FromSeconds(10);
	}
	public static class DynamicHelpers
	{
	public static Dictionary<TKey, TValue> ToDictionary<TKey, TValue>(dynamic dyn)
	{
	Dictionary<TKey, TValue> output = new Dictionary<TKey, TValue>();

	foreach (var kvp in dyn as IDictionary<TKey, object>)
	{
	output.Add(
	(TKey)Convert.ChangeType(kvp.Key, typeof(TKey)),