fakenickels

{

  "name": "app",
  "namespace": true,
  "refmt": 3,
  "reason": {
    "react-jsx": 3
  },
  "bs-dependencies": [
  ],

fakenickels

const field = ({name, type, resolver}) => {
 return {
   name,
   stringifyResponse: type,
   getFieldValue: resolver,
 }
}

let schema = field({})

fakenickels

open Graphql_lwt;

type role =
  | Admin
  | User;

type user = {
  id: int,
  name: string,
  role,

fakenickels

type file = {
  .
  "path": string,
  "data": string,
  "mime": string,
  "size": int,
};

type currentImage = {
  .

fakenickels

  // Available variables:
  // - Machine
  // - interpret
  // - assign
  // - send
  // - sendParent
  // - spawn
  // - raise
  // - actions

fakenickels

module type SERIALIZABLE = sig
  type t
  val to_string: t -> string
  val of_string: string -> t
end;;

implicit module SInt : SERIALIZABLE with type t = int = struct
  type t = int
  let to_string = string_of_int
  let of_string = int_of_string

fakenickels

  // Available variables:
  // - Machine
  // - interpret
  // - assign
  // - send
  // - sendParent
  // - spawn
  // - raise
  // - actions

fakenickels

import * as React from "react"
import Ripples from 'react-ripples'
import styled from "styled-components"
import { variant } from "styled-system"
import { MdChevronLeft, MdChevronRight } from "react-icons/md"
import { useTransition, animated } from 'react-spring'
import { Box } from "./Box"
import { Text } from "./Text"

const Wrapper = styled(Box)`

fakenickels

Prysmian
  Connect to ModBus
    next -> Read register
  Read register
    next -> Calculate matrix
  Calculate matrix
    next -> Write matrix to PLC
  Write matrix to PLC
    next -> Process preform idle state
  Process preform idle state

fakenickels

module Region = {
  [@bs.deriving abstract]
  type t = {
    latitude: float,
    longitude: float,
    latitudeDelta: float,
    longitudeDelta: float,
  };
};