Skip to content

Instantly share code, notes, and snippets.

View ajuggler's full-sized avatar

Antonio Hernandez ajuggler

View GitHub Profile
@ajuggler
ajuggler / Main.hs
Last active June 13, 2022 17:56
MPP - Bank Client agreement (homework)
{-# LANGUAGE OverloadedStrings #-}
module Example where
import Language.Marlowe.Extended
np = 3 :: Integer -- Number of payments (positive integer)
am = 50 :: Integer -- Amount (in Ada) of each deposit by Client (positive integer)
main :: IO ()
main = printJSON $ contract np am (TimeParam "Bank Deadline") (TimeParam "Client Deadline")
@ajuggler
ajuggler / about.md
Last active April 11, 2023 19:46
Monads in Haskell. Notes based on lectures by Irfan Ali.

Monads in Haskell

These are my notes on the lectures on the topic of Monads imparted by Irfan Ali between May 27 and June 7, 2022.

Contents

  • Motivating example
  • The Monad class
  • List monad
  • State monad
@ajuggler
ajuggler / metadata.json
Created September 8, 2022 18:04
Example_20220908
{"valueParameterInfo":[],"timeParameterDescriptions":[],"roleDescriptions":[],"contractType":"Other","contractShortDescription":"Unknown","contractName":"Unknown","contractLongDescription":"We couldn't find information about this contract","choiceInfo":[]}
@ajuggler
ajuggler / metadata.json
Created September 8, 2022 18:41
Example_20220908
{"valueParameterInfo":[],"timeParameterDescriptions":[],"roleDescriptions":[],"contractType":"Other","contractShortDescription":"Unknown","contractName":"Unknown","contractLongDescription":"We couldn't find information about this contract","choiceInfo":[]}
@ajuggler
ajuggler / metadata.json
Created September 8, 2022 19:13
MyEscrow
{"valueParameterInfo":[],"timeParameterDescriptions":[],"roleDescriptions":[],"contractType":"Other","contractShortDescription":"Unknown","contractName":"Unknown","contractLongDescription":"We couldn't find information about this contract","choiceInfo":[]}