tabakerov

float[][] result;
float t, c;

float ease(float p) {
  p = c01(p);
  return 3*p*p - 2*p*p*p;
}

float ease(float p, float g) {
  p = c01(p);

tabakerov

https://www.youtube.com/watch?v=dArgOrm98Bk

Clarity

Just dump everything from mind

Breaking your mindset

• Imagine 6 impossible things
• How can I make someone else happy right now?
• What's something in my immediate environment that I have never noticed?

tabakerov

ts2fable issue with @types/p5

• @types/p5 v1.3.0
• ts2fable v0.7.1

Run: ts2fable node_modules/@types/p5/index.d.ts src/Fable.Import.p5.fs -e p5

Result: /.../src/Fable.Import.p5.fs(95,17): (95,24) error FSHARP: The namespace or module '__index' is not defined. (code 39)

Fable.Import.p5.fs:

tabakerov

version: "3"
services:
  db:
    image: mysql:5.7
    container_name: "products_db_dev"
    ports:
      - "3396:3306"
    environment:
      - MYSQL_ROOT_PASSWORD=root
      - MYSQL_DATABASE=products_db_dev

tabakerov

    static class TaskExtensions
    {
        static Task<T> Return<T>(T task) => Task.FromResult(task);

        static async Task<R> Bind<T, R>(this Task<T> task, Func<T, Task<R>> cont) =>
            await cont(await task.ConfigureAwait(false)).ConfigureAwait(false);

        static async Task<R> Map<T, R>(this Task<T> task, Func<T, R> map) =>
            map(await task.ConfigureAwait(false));

tabakerov

// Learn more about F# at http://fsharp.org

open System
open MongoDB.Driver
open System.Security.Authentication

type PostId = PostId of string
type CommentId = CommentId of string

tabakerov

OpenTypeExtension newExtension = new OpenTypeExtension();
newExtension.ExtensionName = "com.contoso.trackingKey";

newExtension.AdditionalData = new Dictionary<string, object>();
newExtension.AdditionalData.Add("trackingKeyMajor", "ABC");
newExtension.AdditionalData.Add("trackingKeyMinor", "123");

var extension = await graphClient.Users[email].Extensions.Request().AddAsync(newExtension);

tabakerov

open System
open System.Globalization

type ISplitter =
    abstract member Split: string -> int -> string[]

type Splitter () =
    let folder (lim:int) (acc:string list)  (el:string) =
        match acc with
        | head::tail -> 

tabakerov

using System;

class Program
{
    static Func<int, int> CreateAdder(int a)
    {
        int F(int i)
        {            
            Console.WriteLine($"Closured {a}");
            return a + i;

tabakerov

let rec fib_a p =
    if (p = 0) || (p = 1)
    then 1
    else
        fib_a(p-1)+fib_a(p-2)
    

let rec fib_b p =
    match p with
    | 1 | 0 -> 1