kolektiv

Keybase proof

I hereby claim:

• I am kolektiv on github.
• I am kolektiv (https://keybase.io/kolektiv) on keybase.
• I have a public key whose fingerprint is 622B DD92 AFB2 453A DFD9 2B42 EC8F 8458 216C 0FBD

To claim this, I am signing this object:

kolektiv

type TestUnion =
    | Union of string

type TestContainer =
    { Test: TestUnion }

    static member FromJson (_: TestContainer) =
            fun t ->
                { Test = Union t }
        <!> Json.read "union"

kolektiv

type Example =
    | IntCase of int
    | StringCase of string
    
let intExample = IntCase 5 // type - Example
let stringExample = StringCase "hello"

type ExampleRecord =
    { ExampleField: Example }
    

kolektiv

let t2 =
    TopicDescription "testtopic2"

let t3 =
    TopicDescription "testtopic3"

let setup =
    ServiceBus.run (
        ServiceBus.liftNamespace (
                Namespace.Topics.create t3

kolektiv

var spahql = require('spahql');

var response = {
    _id: '0',
    text: 'some text',
    sources: 
    [
        {
            _id: '1',
            innerText: 'some inner text'

kolektiv

var response = spahql.db(data);
response.select('//_id').renameAll('id');
response.select('//auth').destroyAll();

// return response.value();

kolektiv

package main

import (
	"fmt"
	"time"
)

func main() {
	i := 0
	t := time.Now()

kolektiv

module Cells =

    // Types
    
    type LifeSpec =
        | LifeSpec of GenerationSpec list
    
    and GenerationSpec =
        | GenerationSpec of strength: int * liveness: (int -> bool)
    

kolektiv

// Implementations

module Reader =


    let bind (f: 'e -> 't, binder: 't -> 'e -> 'u) : 'e -> 'u =
        fun e ->
            binder (f e) e

// Specializations

kolektiv

// Builder

type Builder<'a> (operations: BuilderOperations<'a>) =

    member __.Return _ : 'a =
        operations.Init ()

    member __.ReturnFrom (c:  'a) : 'a =
        c