View aoc-day2.hs
#!/usr/bin/env cabal | |
{-# LANGUAGE OverloadedStrings #-} | |
{-# LANGUAGE RecordWildCards #-} | |
{- cabal: | |
build-depends: | |
, base ^>= 4.13.0.0 | |
, text ^>= 1.2.4.0 | |
, transformers ^>= 0.5.6.2 |
View aoc-day1.hs
#!/usr/bin/env cabal | |
{-# LANGUAGE OverloadedStrings #-} | |
{- cabal: | |
build-depends: | |
, base ^>= 4.13.0.0 | |
, unliftio ^>= 0.2.13.1 | |
, text ^>= 1.2.4.0 | |
, transformers ^>= 0.5.6.2 | |
-} |
View Dummy.hs
{-# LANGUAGE DuplicateRecordFields #-} | |
{-# LANGUAGE OverloadedLabels #-} | |
module Main where | |
import Core as C | |
import Protolude | |
import Dhall | |
import System.Environment (getArgs) | |
import GHC.Natural (naturalToInt) |
View main.hs
-- http://codingdojo.org/kata/FooBarQix/ | |
{-# LANGUAGE OverloadedStrings #-} | |
import Data.Text as T | |
import qualified Data.Map.Strict as M | |
import qualified Data.Char as C | |
import qualified Data.List as L | |
import Data.Maybe (catMaybes, fromMaybe) | |
newtype Digit = D Text |
View install.sh
sudo apt-get update | |
sudo apt-get install curl -y | |
sudo apt-get install emacs25-nox -y | |
sudo apt-get install git -y | |
curl -sSL https://get.haskellstack.org/ | sh |
View main.fs
module Implem04 | |
open System | |
type Age = int | |
type FirstName = string | |
type LastName = string | |
type Person = | |
{ FirstName : FirstName |
View main.fs
module Implem03 | |
open System | |
type Age = int | |
type FirstName = string | |
type LastName = string | |
type Person = | |
{ FirstName : FirstName |
View main.fs
module Implem02 | |
open System | |
type Age = int | |
type FirstName = string | |
type LastName = string | |
type Person = | |
{ FirstName : FirstName |
View main.fs
module Implem01 | |
open System | |
//These are type aliases | |
type Age = int | |
type FirstName = string | |
type LastName = string | |
//This is a product type : Record |
View demo-v0.fs
// In here we want to show informations about collaborators in some consulting organization. | |
module BasicDemo | |
//Basic import, useful to access "String" by example" | |
open System | |
//This is type alias | |
type Age = int | |
type FirstName = string | |
type LastName = string |
NewerOlder