bradparker

module Functor
    ( Functor
    , lift
    , apply
    , map
    , Monad
    , join
    , flatMap

    , Maybe(..)

bradparker

const URL = require('url')
const QS = require('qs')
const { createElement } = require('react')
const { renderToString } = require('react-dom/server')
const { createServer } = require('http')
const logger = require('connect-logger')
const connect = require('connect')

const components = require('./components')

bradparker

.envrc

bradparker

module Main where

import System.IO
import Control.Concurrent
import Control.Concurrent.STM

type Error = String

data Payload
  = Increment

bradparker

const flatMap = (array, func) => (
  array.reduce((result, element) => (
    result.concat(func(element))
  ), [])
)

bradparker

const { assign } = Object

const mergeResults = (pipeline, step) => (
  pipeline.then((context) => (
    step(context).then((result) => (
      assign({}, context, result)
    ))
  ))
)

bradparker

> const curry = require('./curry')
> const add3 = (a, b, c) => a + b + c
> add3(1, 2, 3)
6
> const curAdd3 = curry(add3)
> curAdd3(1)
[Function]
> curAdd3(1, 2)
[Function]

bradparker

const { keys, assign } = Object

const exampleSource = {
  first_name: 'Bob',
  last_name: 'Boberson',
  charity_1: '1',
  charity_2: '2',
  charity_3: '3'
}

bradparker

Modules example

A module which represents part of a Reaat app could export an array of routes and a reducer.

export {default as routes} from './routes'
export {default as reducer} from './store/reducer'

The top level application can take these exports and collect them together into the root routes def and the root reducer.

bradparker

const fetch = require('node-fetch')
const Task = require('data.task')

const KEY = 'KEY!'

const asteroidRequest = new Task((reject, resolve) => (
  fetch(`https://api.nasa.gov/neo/rest/v1/feed?start_date=2016-05-05&end_date=2016-05-05&api_key=${KEY}`)
    .then((res) => res.json())
    .then(resolve)
    .catch(reject)