I hereby claim:
- I am buggymcbugfix on github.
- I am buggymcbugfix (https://keybase.io/buggymcbugfix) on keybase.
- I have a public key ASA_Ar84jtYMoLEOldsPGc2u1osS7Lph38hEgrqjIrPCzgo
To claim this, I am signing this object:
| -- Connect to FortiClient VPN. Uses of `delay` here are nothing short of an ugly HaCk. | |
| -- You may need to adjust the delays to work on your system. Also make sure with your | |
| -- sysadmin that it is ok to hard-code your password (see below*) as THIS IS NOT SECURE. | |
| -- !!!USE THIS SCRIPT AT YOUR OWN RISK!!! | |
| -- trick taken from [1] to avoid long GUI delay | |
| ignoring application responses | |
| tell application "System Events" to tell application process "FortiClientAgent" | |
| click menu bar item 1 of menu bar 2 | |
| end tell |
I hereby claim:
To claim this, I am signing this object:
| {-# lAnGuAgE DataKinds #-} | |
| {-# LaNgUaGe FlexibleInstances #-} | |
| {-# lAnGuAgE FunctionalDependencies #-} | |
| {-# LaNgUaGe KindSignatures #-} | |
| {-# lAnGuAgE TypeFamilies #-} | |
| {-# LaNgUaGe TypeOperators #-} | |
| {-# lAnGuAgE UndecidableInstances #-} | |
| module Commit where | |
| import Data.Kind (Constraint, Type) |
| {"lastUpload":"2022-02-23T08:24:19.468Z","extensionVersion":"v3.4.3"} |
| #!/usr/bin/env stack | |
| {- stack script | |
| --resolver nightly-2018-11-23 | |
| --package sbv | |
| -} | |
| {-# LANGUAGE DeriveAnyClass #-} | |
| {-# LANGUAGE DeriveGeneric #-} | |
| {-# LANGUAGE BlockArguments #-} |
| -- Kudos to Dominic Orchard | |
| {-# LANGUAGE InstanceSigs #-} | |
| {-# LANGUAGE GeneralizedNewtypeDeriving #-} | |
| -- P is contravariant in a | |
| -- P is covariant in b | |
| data P a b = P (a -> b) |
Source: https://www.cis.upenn.edu/~sweirich/icfp-plmw15/slides/peyton-jones.pdf
| {-# LANGUAGE RecordWildCards #-} | |
| {-# LANGUAGE ScopedTypeVariables #-} | |
| module Main where | |
| import Control.Monad.Random.Class | |
| import Control.Monad.Reader | |
| import Data.Foldable (for_) | |
| import Graphics.Rendering.Cairo hiding (x, y) | |
| import qualified Numeric.Noise.Perlin as P | |
| import System.Random |