I hereby claim:
- I am brase on github.
- I am brase (https://keybase.io/brase) on keybase.
- I have a public key ASCazdrWrCYVyvvRqFsBaD0CxYTYB4zlRSj1nRxEW10gwwo
To claim this, I am signing this object:
Verifying my Blockstack ID is secured with the address 127Y55XFMDL2AYQFXpwYLy8UQwKBhNYk2j https://explorer.blockstack.org/address/127Y55XFMDL2AYQFXpwYLy8UQwKBhNYk2j |
let rec resultRec ints last sum = | |
match ints with | |
| i :: rest -> | |
//printfn "Ints: %A ; last: %i, sum: %i" ints last sum | |
if (i = last) then resultRec rest i (sum + i) else resultRec rest i sum | |
| [] -> sum | |
let result (s:string) = | |
let ints = [for c in s -> (int c) - 48] | |
let last = List.last ints |
{-# LANGUAGE InstanceSigs #-} | |
module ReaderM where | |
import Control.Monad.Reader | |
import Control.Monad.State.Strict | |
import Data.Functor.Identity | |
data Config = Config { nr :: Int } | |
main :: IO () |
<# | |
Dumps capture group locations and names/numbers | |
Example: | |
> regexinfo 'Jenny: 555-867-5309' '(?<name>\w+):\s+(?<phone>(?:(?<area>\d{3})-)?(\d{3}-\d{4}))' | |
[Jenny]: [[555]-[867-5309]] | |
| || | | |
| || 1 | |
| |area | |
| phone |
I hereby claim:
To claim this, I am signing this object:
########## | |
# Win10 Initial Setup Script | |
# Author: Disassembler <disassembler@dasm.cz> | |
# Version: 1.7, 2016-08-15 | |
# dasm's script: https://github.com/Disassembler0/Win10-Initial-Setup-Script/ | |
# THIS IS A PERSONALIZED VERSION | |
# This script leaves more MS defaults on, including MS security features. | |
# Tweaked based on personal preferences for @alirobe 2016-11-16 - v1.7.1 |
#r "C:/Users/brase/code/fs/bloc.akka/src/Bloc.Application/bin/Debug/Akka.dll" | |
#r "C:/Users/brase/code/fs/bloc.akka/src/Bloc.Application/bin/Debug/Wire.dll" | |
#r "C:/Users/brase/code/fs/bloc.akka/src/Bloc.Application/bin/Debug/Newtonsoft.Json.dll" | |
#r "C:/Users/brase/code/fs/bloc.akka/src/Bloc.Application/bin/Debug/FSharp.PowerPack.dll" | |
#r "C:/Users/brase/code/fs/bloc.akka/src/Bloc.Application/bin/Debug/FSharp.PowerPack.Linq.dll" | |
#r "C:/Users/brase/code/fs/bloc.akka/src/Bloc.Application/bin/Debug/Akkling.dll" | |
#r "C:/Users/brase/code/fs/bloc.akka/src/Bloc.Application/bin/Debug/Google.ProtocolBuffers.dll" | |
#r "C:/Users/brase/code/fs/bloc.akka/src/Bloc.Application/bin/Debug/Akka.Persistence.dll" | |
#r "C:/Users/brase/code/fs/bloc.akka/src/Bloc.Application/bin/Debug/Akkling.Persistence.dll" |
#time "on" | |
#load "Bootstrap.fsx" | |
open System | |
open Akka.Actor | |
open Akka.Configuration | |
open Akka.FSharp | |
open Akka.TestKit | |
// #Using Actor |
# ------------------------------------------------- | |
# Windows configuration changes | |
# ------------------------------------------------- | |
Set-ExplorerOptions -showHidenFilesFoldersDrives -showProtectedOSFiles -showFileExtensions | |
Update-ExecutionPolicy Unrestricted | |
Install-WindowsUpdate -acceptEula | |
cinst IIS-WebServerRole -source windowsfeatures | |
cinst IIS-HttpCompressionDynamic -source windowsfeatures |
# A simple PowerShell script for retrieving the RAID status of volumes with help of diskpart. | |
# The nicer solution would be using WMI (which does not contain the RAID status in the Status field of Win32_DiskDrive, Win32_LogicalDisk or Win32_Volume for unknown reason) | |
# or using the new PowerShell API introduced with Windows 8 (wrong target system as our customer uses a Windows 7 architecture). | |
# | |
# diskpart requires administrative privileges so this script must be executed under an administrative account if it is executed standalone. | |
# check_mk has this privileges and therefore this script must only be copied to your check_mk/plugins directory and you are done. | |
# | |
# Christopher Klein <ckl[at]neos-it[dot]de> | |
# This script is distributed under the GPL v2 license. |