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 |