sigrlami

WARNING This list outdated, for the up to date version visit https://haskellcosm.com

List of companies that use Haskell in Production

Types of work:

• RD - research&development
• PR - product
• IP - in-house product
• CO - consulting

sigrlami

Running PegNet v2 on a Factom Testnet

1. Download preview binaries with suffix _testnet
2. Activation height set to 142000
3. Run pegnet as usual using configs provided below 3.1 the only differences, network type and path to db 3.2 data stored into separate file, so your mainnet will be safe
4. Acquire test assets from https://faucet.pegnet.info

sigrlami

DEBU[2390] sent tag                                      evt=tag
WARN[2390] unrecognized message                          cmd=0 evt="??" func="MiningClient.Listen()"
WARN[2390] unrecognized message                          evt="??" fields.msg="{0 <nil> }" func="MiningClient.Listen()"

sigrlami

List of 2nd-layer applications that use Factom blockchain

#	Name	URL	State	ANO	Application	Comment
1	PegNet	https://pegnet.org	Prod	Community	DeFi, pegged assets
2	OffBlocks	https://off-blocks.com/	Prod	Federate This	Digital signatures
3	Triall	https://triall.io	Prod	Sphereon	Clinical trials	https://insights.triall.io/triall-partners-with-dizer-capital/ https://insights.triall.io/why-triall-chooses-to-build-on-the-factom-protocol/
4	US DOD		WIP	Factom, Inc	SPA, analysis services	https://www.spa.com/
5	US DOE		WIP	TFA	energy grid monitoring	https://www.blockchain-council.org/blockchain/u-s-department-of-energy-grants-200000-to-factom/
6	Tenderoom	https://tenderoom.com	WIP	Kompendium	Procurement services tracking

sigrlami

Factom API client libraries

#	Language	Developer	State	Repository	Version	License	Coverage
1	Go	Factom, Inc	Ref
2	Java	BIF	Prod	factom-java	0.2.1		Unknown
3	C#	Factoid Authority	Prod	FactomSharp			Unknown
4	Php	Kompendium	Prod		![Packagist Version](https://img.shields.io/packagist/v/kompendium-llc/factom

sigrlami

id,Format,Manufacturer,Model,Release Year,MSRP,Weight,Length,Max Diameter,Max Aperture,EFL,Zoom,Stabilized,Cinema,Variety,Designed In,Made In
1,Full-Frame,Canon,EF 14mm f/2.8L II USM,2007,2099,645,93.98,78.74,2.8,14,0,0,0,Ultra Wide Angle,Japan,Japan
2,Full-Frame,Canon,CN-E 14mm T3.1 L F,2013,5220,1200,93.98,118.364,3.1,14,0,0,1,Ultra Wide Angle,Japan,Japan
3,Full-Frame,Canon,TS-E 17mm f/4L Tilt-Shift,2009,2149,820,106.68,88.9,4,17,0,0,0,Tilt Shift,Japan,Japan
4,Full-Frame,Canon,EF 20mm f/2.8 USM,1992,539,405,70.612,77.47,2.8,20,0,0,0,Ultra Wide Angle,Japan,Japan
5,Full-Frame,Canon,EF 24mm f/2.8 IS USM,2012,599,281,55.626,68.326,2.8,24,0,1,0,Wide Angle,Japan,Japan
6,Full-Frame,Canon,EF 24mm f/1.4L II USM,2008,1549,650,86.868,83.566,1.4,24,0,0,0,Wide Angle,Japan,Japan
7,Full-Frame,Canon,TS-E 24mm f/3.5L II Tilt-Shift,2009,1899,780,106.934,88.392,3.5,24,0,0,0,Tilt Shift,Japan,Japan
8,Micro 4/3,Olympus,M.Zuiko Digital 17mm f/1.8,2013,349,120,35.5,57.5,1.8,17,0,0,0,Normal,Japan,
9,Micro 4/3,Olympus,M.Zuiko Digita

sigrlami

Keybase proof

I hereby claim:

• I am sigrlami on github.
• I am sigrlami (https://keybase.io/sigrlami) on keybase.
• I have a public key ASDv1gwKwMTbHYpBdYFj2TXDdxUEKqQkKk1LP43cdiJ5vwo

To claim this, I am signing this object:

sigrlami

-- Make use of freer-effects, https://hackage.haskell.org/package/freer-effects
-- 
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE DeriveGeneric     #-}
{-# LANGUAGE DataKinds         #-}
{-# LANGUAGE TypeOperators     #-}

import           Control.Monad.Freer            as FF
import           Control.Monad.Freer.Exception  as FF
import           Control.Monad.Freer.Reader     as FF

sigrlami

(defroutes app-routes
  ;; Customers
  (context "/customer" []
    (GET "/list" [] (-> get-customers
                    (restrict {:handler {:and [authenticated-user
                                               (user-can "manage-customers")]}
                               :on-error unauthorized-handler})))
    (POST "/customer" [] create-customer)
    (context "/:id" [id]
      (restrict

sigrlami

(defroutes app-routes
  ;; Customers
  (context "/customer" []
    (GET "/list" [] (-> get-customers
                    (restrict {:handler {:and [authenticated-user
                                               (user-can "manage-customers")]}
                               :on-error unauthorized-handler})))
    (POST "/customer" [] create-customer)
    (context "/:id" [id]
      (restrict