shamansir

module Main exposing (..)


import Browser

import Html exposing (Html)
import Html as H


type alias Flags = ()

shamansir

module Main exposing (main)

import Browser
import Html exposing (Html, button, div, h2, input, text)
import Html.Attributes exposing (class, placeholder, value)
import Html.Events exposing (onClick, onInput)
import Parser exposing (..)
import Parser as P exposing (..)

shamansir

module ComonadicUI.Component where
  
import Control.Comonad (Comonad(..))

import ComonadicUI.Pairing
import ComonadicUI.UI 


type Component base w m a = w (UI base m a)

shamansir

# magick: set the correct path to libMagickCore.dylib
install_name_tool -change \
    /ImageMagick-7.0.9/lib/libMagickCore-7.Q16HDRI.7.dylib \
    @executable_path/../lib/libMagickCore-7.Q16HDRI.7.dylib \
    /Users/shamansir/ImageMagick-7.0.9/bin/magick

# magick: set the correct path to libMagickWand.dylib
install_name_tool -change \
    /ImageMagick-7.0.9/lib/libMagickWand-7.Q16HDRI.7.dylib \
    @executable_path/../lib/libMagickWand-7.Q16HDRI.7.dylib \

shamansir

{-# LANGUAGE DeriveFunctor #-}
{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE FlexibleInstances #-}

module Errors2 where


import Prelude
import Control.Monad.Identity

shamansir

coin1 = 0.5 .* return Heads + 0.5 .* return Tails :: P Coin

runW coin1


--albert Heads
--albert Tails

shamansir

module Rpd.API.Covered where

data Covered error state =
    Covered (Array error) (Maybe state)


nothing :: forall error state. Covered error state
nothing =
    Covered [] Nothing

shamansir

module Main exposing (main)

import Browser
import Html exposing (Html, button, div, text)
import Html.Events exposing (onClick)

import Dict

import Json.Decode as D
import Json.Encode as E

shamansir

FROM ubuntu:19.04

ENV PROJECT my-project

RUN addgroup --system user && adduser --system --group user
RUN addgroup --system node && adduser --system --group node

RUN mkdir -p /home/node
RUN mkdir -p /home/node/.nvm
RUN chown -R node:node /home/node && chmod -R 755 /home/node

shamansir

-- from: https://gist.github.com/kapranov-anton/86d44e4d382c2c38ffb5d59e331bc93a

module Main where

import Prelude

import Data.List (List)
import Data.List as List

import Control.Monad.Eff (Eff)