mastoj

package main

import (
	"fmt"
)

type Result struct {
	Error error
	Data  interface{}
}

mastoj

bq query --format=json --dry_run=true --use_legacy_sql=false 'SELECT @a IS TRUE AS x, @b + 1 AS y, "foo" = @c AS z, ["tomas", "jansson"] as w, STRUCT("wat" as t, 69 as u) as v, [STRUCT(3, "allo" as g), STRUCT(5 as a, "yolo")] as u, STRUCT(["a"] as h) as t;'

mastoj

source https://nuget.org/api/v2

nuget FSharp.Data framework: net45
nuget MySql.Data framework: net45

mastoj

type Time = int*int
type Day = int
type OpeningHour = Day*Time
type DayGroup = 
    {
        Days: int list
        Time: Time
    }

let openingHour day startTime endTime = day,(startTime,endTime)

mastoj

using System;
using System.CodeDom;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace AsyncDiff
{

mastoj

(*
Based on the excellent blog series by Scott Wlaschin: http://fsharpforfunandprofit.com/posts/understanding-parser-combinators/
Inspired by Elm Route Parser: http://package.elm-lang.org/packages/etaque/elm-route-parser/2.2.1/

*)

[<AutoOpen>]
module Parsing =

    open System

mastoj

open Microsoft.FSharp.Reflection


module MA =
    type A = { AStr: string}
    type B = { BInt: int}

    type private DU =
        | A of A
        | B of B

mastoj

Copy `build.fsx` manually to root as a starting point for your build file. 

mastoj

#r "packages/Suave/lib/net40/Suave.dll"

open System
open Suave
open Suave.Filters
open Suave.Successful
open Suave.RequestErrors
open System.Text.RegularExpressions

[<AutoOpen>]

mastoj

/// Discriminated union representing two messages - one for sending
/// numbers to the agent and one for resetting the state of the agent
type CounterMessage = 
  | Update of float
  | Reset

 // Simple agent that calculates average and can be reset
let counter = MailboxProcessor.Start(fun agent -> 
 
   let rec loop sum count = async {