MangelMaxime

namespace Fable.Import
open System
open System.Text.RegularExpressions
open Fable.Core
open Fable.Import.JS
open Fable.Import.Browser

module Mapboxgl =
    type [<AllowNullLiteral>] [<Import("Map","mapboxgl")>] Map(?options: MapboxOptions) =
        inherit Evented()

MangelMaxime

let keyboardCaptureHandler (keyboard: Keyboard.Record) =
    match keyboard.Modifiers with
    | { Control = true } ->
        match keyboard.LastKey with
        | Keyboard.Keys.O ->
            window2.Closed <- false
            true // Key has been captured
        | _ -> false
    | _ ->
        match keyboard.LastKey with

MangelMaxime

open Fable.Helpers.React
open Fable.Helpers.React.Props

module RL = Fable.Helpers.ReactLeaflet

let group =

  let truckTracks =
      zones.paths
      |> Array.map(fun path ->

MangelMaxime

module Client

open Fable.Core
open Fable.Core.JsInterop
open Fable.Import


importSideEffects "vis/dist/vis.css"

[<Import("*", "vis")>]

MangelMaxime

package async;

#if macro
import haxe.macro.Context;
#end

class Async {
	public static macro function async(expr:haxe.macro.Expr) {
		expr = Context.storeTypedExpr(Context.typeExpr(expr));
        return macro untyped __js__("(async {0})", ${expr})();

MangelMaxime

[<RequireQualifiedAccess>]
module Http

open Fable.Import
open Fable.PowerPack
open Fable.PowerPack.Fetch
open Thoth.Json
open Fable.Core.JsInterop

type User =

MangelMaxime

module Tests.Main

open Expecto
open Util.Testing
open Thoth.Json.Net

let json =
    """
{
    "name": "Test HTTP Scenario",

MangelMaxime

html,
body {
    font-size: 16px;
}

.main-container {
    display: flex;
    width: 100%;
    height: 100%;
    justify-content: center;

MangelMaxime

html,
body {
    font-size: 16px;
}

.main-container {
    display: flex;
    width: 100%;
    height: 100%;
    justify-content: center;

MangelMaxime

html,
body {
    font-size: 16px;
}